diff --git a/src/stage0/CMakeLists.txt b/src/stage0/CMakeLists.txt
index e6013e3f6a..1ce1014ed2 100644
--- a/src/stage0/CMakeLists.txt
+++ b/src/stage0/CMakeLists.txt
@@ -1 +1 @@
-add_library (stage0 OBJECT ./init/coe.cpp ./init/control/alternative.cpp ./init/control/applicative.cpp ./init/control/combinators.cpp ./init/control/conditional.cpp ./init/control/default.cpp ./init/control/estate.cpp ./init/control/except.cpp ./init/control/functor.cpp ./init/control/id.cpp ./init/control/lift.cpp ./init/control/monad.cpp ./init/control/monadfail.cpp ./init/control/option.cpp ./init/control/reader.cpp ./init/control/state.cpp ./init/core.cpp ./init/data/array/basic.cpp ./init/data/array/binsearch.cpp ./init/data/array/default.cpp ./init/data/array/qsort.cpp ./init/data/assoclist.cpp ./init/data/basic.cpp ./init/data/bytearray/basic.cpp ./init/data/bytearray/default.cpp ./init/data/char/basic.cpp ./init/data/char/default.cpp ./init/data/default.cpp ./init/data/dlist.cpp ./init/data/fin/basic.cpp ./init/data/fin/default.cpp ./init/data/hashable.cpp ./init/data/hashmap/basic.cpp ./init/data/hashmap/default.cpp ./init/data/int/basic.cpp ./init/data/int/default.cpp ./init/data/list/basic.cpp ./init/data/list/default.cpp ./init/data/list/instances.cpp ./init/data/nat/basic.cpp ./init/data/nat/bitwise.cpp ./init/data/nat/default.cpp ./init/data/nat/div.cpp ./init/data/option/basic.cpp ./init/data/option/instances.cpp ./init/data/ordering/basic.cpp ./init/data/ordering/default.cpp ./init/data/random.cpp ./init/data/rbmap/basic.cpp ./init/data/rbmap/default.cpp ./init/data/rbtree/basic.cpp ./init/data/rbtree/default.cpp ./init/data/repr.cpp ./init/data/string/basic.cpp ./init/data/string/default.cpp ./init/data/tostring.cpp ./init/data/uint.cpp ./init/default.cpp ./init/env_ext.cpp ./init/fix.cpp ./init/io.cpp ./init/lean/compiler/closedtermcache.cpp ./init/lean/compiler/constfolding.cpp ./init/lean/compiler/default.cpp ./init/lean/compiler/ir/basic.cpp ./init/lean/compiler/ir/borrow.cpp ./init/lean/compiler/ir/boxing.cpp ./init/lean/compiler/ir/checker.cpp ./init/lean/compiler/ir/compilerm.cpp ./init/lean/compiler/ir/default.cpp ./init/lean/compiler/ir/elimdead.cpp ./init/lean/compiler/ir/emitcpp.cpp ./init/lean/compiler/ir/emitutil.cpp ./init/lean/compiler/ir/format.cpp ./init/lean/compiler/ir/freevars.cpp ./init/lean/compiler/ir/livevars.cpp ./init/lean/compiler/ir/normids.cpp ./init/lean/compiler/ir/pushproj.cpp ./init/lean/compiler/ir/rc.cpp ./init/lean/compiler/ir/resetreuse.cpp ./init/lean/compiler/ir/simpcase.cpp ./init/lean/compiler/util.cpp ./init/lean/config.cpp ./init/lean/declaration.cpp ./init/lean/default.cpp ./init/lean/disjoint_set.cpp ./init/lean/elaborator.cpp ./init/lean/environment.cpp ./init/lean/expander.cpp ./init/lean/expr.cpp ./init/lean/extern.cpp ./init/lean/format.cpp ./init/lean/frontend.cpp ./init/lean/kvmap.cpp ./init/lean/level.cpp ./init/lean/message.cpp ./init/lean/modifiers.cpp ./init/lean/name.cpp ./init/lean/name_mangling.cpp ./init/lean/options.cpp ./init/lean/parser/basic.cpp ./init/lean/parser/combinators.cpp ./init/lean/parser/command.cpp ./init/lean/parser/declaration.cpp ./init/lean/parser/identifier.cpp ./init/lean/parser/level.cpp ./init/lean/parser/module.cpp ./init/lean/parser/notation.cpp ./init/lean/parser/parsec.cpp ./init/lean/parser/pratt.cpp ./init/lean/parser/rec.cpp ./init/lean/parser/stringliteral.cpp ./init/lean/parser/syntax.cpp ./init/lean/parser/term.cpp ./init/lean/parser/token.cpp ./init/lean/parser/trie.cpp ./init/lean/position.cpp ./init/lean/smap.cpp ./init/lean/trace.cpp ./init/lean/util.cpp ./init/platform.cpp ./init/util.cpp ./init/wf.cpp)
+add_library (stage0 OBJECT ./init/coe.cpp ./init/control/alternative.cpp ./init/control/applicative.cpp ./init/control/combinators.cpp ./init/control/conditional.cpp ./init/control/default.cpp ./init/control/estate.cpp ./init/control/except.cpp ./init/control/functor.cpp ./init/control/id.cpp ./init/control/lift.cpp ./init/control/monad.cpp ./init/control/monadfail.cpp ./init/control/option.cpp ./init/control/reader.cpp ./init/control/state.cpp ./init/core.cpp ./init/data/array/basic.cpp ./init/data/array/binsearch.cpp ./init/data/array/default.cpp ./init/data/array/qsort.cpp ./init/data/assoclist.cpp ./init/data/basic.cpp ./init/data/bytearray/basic.cpp ./init/data/bytearray/default.cpp ./init/data/char/basic.cpp ./init/data/char/default.cpp ./init/data/default.cpp ./init/data/dlist.cpp ./init/data/fin/basic.cpp ./init/data/fin/default.cpp ./init/data/hashable.cpp ./init/data/hashmap/basic.cpp ./init/data/hashmap/default.cpp ./init/data/int/basic.cpp ./init/data/int/default.cpp ./init/data/list/basic.cpp ./init/data/list/default.cpp ./init/data/list/instances.cpp ./init/data/nat/basic.cpp ./init/data/nat/bitwise.cpp ./init/data/nat/default.cpp ./init/data/nat/div.cpp ./init/data/option/basic.cpp ./init/data/option/instances.cpp ./init/data/ordering/basic.cpp ./init/data/ordering/default.cpp ./init/data/random.cpp ./init/data/rbmap/basic.cpp ./init/data/rbmap/default.cpp ./init/data/rbtree/basic.cpp ./init/data/rbtree/default.cpp ./init/data/repr.cpp ./init/data/string/basic.cpp ./init/data/string/default.cpp ./init/data/tostring.cpp ./init/data/uint.cpp ./init/default.cpp ./init/env_ext.cpp ./init/fix.cpp ./init/io.cpp ./init/lean/compiler/closedtermcache.cpp ./init/lean/compiler/constfolding.cpp ./init/lean/compiler/default.cpp ./init/lean/compiler/initattr.cpp ./init/lean/compiler/ir/basic.cpp ./init/lean/compiler/ir/borrow.cpp ./init/lean/compiler/ir/boxing.cpp ./init/lean/compiler/ir/checker.cpp ./init/lean/compiler/ir/compilerm.cpp ./init/lean/compiler/ir/default.cpp ./init/lean/compiler/ir/elimdead.cpp ./init/lean/compiler/ir/emitcpp.cpp ./init/lean/compiler/ir/emitutil.cpp ./init/lean/compiler/ir/format.cpp ./init/lean/compiler/ir/freevars.cpp ./init/lean/compiler/ir/livevars.cpp ./init/lean/compiler/ir/normids.cpp ./init/lean/compiler/ir/pushproj.cpp ./init/lean/compiler/ir/rc.cpp ./init/lean/compiler/ir/resetreuse.cpp ./init/lean/compiler/ir/simpcase.cpp ./init/lean/compiler/util.cpp ./init/lean/config.cpp ./init/lean/declaration.cpp ./init/lean/default.cpp ./init/lean/disjoint_set.cpp ./init/lean/elaborator.cpp ./init/lean/environment.cpp ./init/lean/expander.cpp ./init/lean/expr.cpp ./init/lean/extern.cpp ./init/lean/format.cpp ./init/lean/frontend.cpp ./init/lean/kvmap.cpp ./init/lean/level.cpp ./init/lean/message.cpp ./init/lean/modifiers.cpp ./init/lean/name.cpp ./init/lean/name_mangling.cpp ./init/lean/options.cpp ./init/lean/parser/basic.cpp ./init/lean/parser/combinators.cpp ./init/lean/parser/command.cpp ./init/lean/parser/declaration.cpp ./init/lean/parser/identifier.cpp ./init/lean/parser/level.cpp ./init/lean/parser/module.cpp ./init/lean/parser/notation.cpp ./init/lean/parser/parsec.cpp ./init/lean/parser/pratt.cpp ./init/lean/parser/rec.cpp ./init/lean/parser/stringliteral.cpp ./init/lean/parser/syntax.cpp ./init/lean/parser/term.cpp ./init/lean/parser/token.cpp ./init/lean/parser/trie.cpp ./init/lean/position.cpp ./init/lean/smap.cpp ./init/lean/trace.cpp ./init/lean/util.cpp ./init/platform.cpp ./init/util.cpp ./init/wf.cpp)
diff --git a/src/stage0/init/lean/compiler/ir/basic.cpp b/src/stage0/init/lean/compiler/ir/basic.cpp
index 350940d1ca..b200541649 100644
--- a/src/stage0/init/lean/compiler/ir/basic.cpp
+++ b/src/stage0/init/lean/compiler/ir/basic.cpp
@@ -212,6 +212,7 @@ obj* mk_uset_core(obj*, obj*, obj*, obj*);
 }}
 obj* l_Lean_IR_LocalContext_getType(obj*, obj*);
 obj* l_Lean_IR_FnBody_body___boxed(obj*);
+obj* l_Lean_IR_VarId_Hashable___boxed(obj*);
 obj* l_Lean_IR_IRType_HasBeq;
 obj* l_Lean_IR_altInh;
 obj* l_Lean_IR_FnBody_body___main___boxed(obj*);
@@ -296,6 +297,7 @@ obj* l_RBNode_find___main___at_Lean_IR_LocalContext_isJP___spec__1___boxed(obj*,
 namespace lean {
 usize usize_of_nat(obj*);
 }
+usize l_Lean_IR_VarId_Hashable(obj*);
 obj* l_Lean_IR_push(obj*, obj*);
 namespace lean {
 namespace ir {
@@ -413,6 +415,24 @@ lean::cnstr_set(x_5, 0, x_3);
 return x_5;
 }
 }
+usize l_Lean_IR_VarId_Hashable(obj* x_0) {
+_start:
+{
+usize x_1; 
+x_1 = lean::usize_of_nat(x_0);
+return x_1;
+}
+}
+obj* l_Lean_IR_VarId_Hashable___boxed(obj* x_0) {
+_start:
+{
+usize x_1; obj* x_2; 
+x_1 = l_Lean_IR_VarId_Hashable(x_0);
+x_2 = lean::box_size_t(x_1);
+lean::dec(x_0);
+return x_2;
+}
+}
 uint8 l_Lean_IR_JoinPointId_HasBeq(obj* x_0, obj* x_1) {
 _start:
 {
@@ -5207,77 +5227,64 @@ case 1:
 switch (lean::obj_tag(x_2)) {
 case 1:
 {
-obj* x_13; obj* x_14; uint8 x_15; 
+obj* x_13; obj* x_14; obj* x_15; obj* x_16; uint8 x_17; 
 x_13 = lean::cnstr_get(x_1, 0);
-x_14 = lean::cnstr_get(x_2, 0);
-x_15 = l_Lean_IR_VarId_alphaEqv(x_0, x_13, x_14);
-return x_15;
+x_14 = lean::cnstr_get(x_1, 1);
+x_15 = lean::cnstr_get(x_2, 0);
+x_16 = lean::cnstr_get(x_2, 1);
+x_17 = lean::nat_dec_eq(x_13, x_15);
+if (x_17 == 0)
+{
+uint8 x_19; 
+lean::dec(x_0);
+x_19 = 0;
+return x_19;
+}
+else
+{
+uint8 x_20; 
+x_20 = l_Lean_IR_VarId_alphaEqv(x_0, x_14, x_16);
+return x_20;
+}
 }
 default:
 {
-uint8 x_17; 
+uint8 x_22; 
 lean::dec(x_0);
-x_17 = 0;
-return x_17;
+x_22 = 0;
+return x_22;
 }
 }
 }
 case 2:
 {
-uint8 x_18; 
-x_18 = lean::cnstr_get_scalar<uint8>(x_1, sizeof(void*)*3);
+uint8 x_23; 
+x_23 = lean::cnstr_get_scalar<uint8>(x_1, sizeof(void*)*3);
 switch (lean::obj_tag(x_2)) {
 case 2:
 {
-obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; uint8 x_24; obj* x_25; uint8 x_27; 
-x_19 = lean::cnstr_get(x_1, 0);
-x_20 = lean::cnstr_get(x_1, 1);
-x_21 = lean::cnstr_get(x_1, 2);
-x_22 = lean::cnstr_get(x_2, 0);
-x_23 = lean::cnstr_get(x_2, 1);
-x_24 = lean::cnstr_get_scalar<uint8>(x_2, sizeof(void*)*3);
-x_25 = lean::cnstr_get(x_2, 2);
+obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; uint8 x_29; obj* x_30; uint8 x_32; 
+x_24 = lean::cnstr_get(x_1, 0);
+x_25 = lean::cnstr_get(x_1, 1);
+x_26 = lean::cnstr_get(x_1, 2);
+x_27 = lean::cnstr_get(x_2, 0);
+x_28 = lean::cnstr_get(x_2, 1);
+x_29 = lean::cnstr_get_scalar<uint8>(x_2, sizeof(void*)*3);
+x_30 = lean::cnstr_get(x_2, 2);
 lean::inc(x_0);
-x_27 = l_Lean_IR_VarId_alphaEqv(x_0, x_19, x_22);
-if (x_27 == 0)
+x_32 = l_Lean_IR_VarId_alphaEqv(x_0, x_24, x_27);
+if (x_32 == 0)
 {
-uint8 x_29; 
+uint8 x_34; 
 lean::dec(x_0);
-x_29 = 0;
-return x_29;
-}
-else
-{
-uint8 x_30; 
-x_30 = l_Lean_IR_CtorInfo_beq___main(x_20, x_23);
-if (x_30 == 0)
-{
-uint8 x_32; 
-lean::dec(x_0);
-x_32 = 0;
-return x_32;
-}
-else
-{
-if (x_18 == 0)
-{
-if (x_24 == 0)
-{
-uint8 x_33; 
-x_33 = l_Array_isEqv___at_Lean_IR_args_alphaEqv___spec__1(x_0, x_21, x_25);
-return x_33;
+x_34 = 0;
+return x_34;
 }
 else
 {
 uint8 x_35; 
-lean::dec(x_0);
-x_35 = 0;
-return x_35;
-}
-}
-else
-{
-if (x_24 == 0)
+x_35 = l_Lean_IR_CtorInfo_beq___main(x_25, x_28);
+if (x_35 == 0)
 {
 uint8 x_37; 
 lean::dec(x_0);
@@ -5286,15 +5293,15 @@ return x_37;
 }
 else
 {
+if (x_23 == 0)
+{
+if (x_29 == 0)
+{
 uint8 x_38; 
-x_38 = l_Array_isEqv___at_Lean_IR_args_alphaEqv___spec__1(x_0, x_21, x_25);
+x_38 = l_Array_isEqv___at_Lean_IR_args_alphaEqv___spec__1(x_0, x_26, x_30);
 return x_38;
 }
-}
-}
-}
-}
-default:
+else
 {
 uint8 x_40; 
 lean::dec(x_0);
@@ -5302,38 +5309,65 @@ x_40 = 0;
 return x_40;
 }
 }
+else
+{
+if (x_29 == 0)
+{
+uint8 x_42; 
+lean::dec(x_0);
+x_42 = 0;
+return x_42;
+}
+else
+{
+uint8 x_43; 
+x_43 = l_Array_isEqv___at_Lean_IR_args_alphaEqv___spec__1(x_0, x_26, x_30);
+return x_43;
+}
+}
+}
+}
+}
+default:
+{
+uint8 x_45; 
+lean::dec(x_0);
+x_45 = 0;
+return x_45;
+}
+}
 }
 case 3:
 {
 switch (lean::obj_tag(x_2)) {
 case 3:
 {
-obj* x_41; obj* x_42; obj* x_43; obj* x_44; uint8 x_45; 
-x_41 = lean::cnstr_get(x_1, 0);
-x_42 = lean::cnstr_get(x_1, 1);
-x_43 = lean::cnstr_get(x_2, 0);
-x_44 = lean::cnstr_get(x_2, 1);
-x_45 = lean::nat_dec_eq(x_41, x_43);
-if (x_45 == 0)
+obj* x_46; obj* x_47; obj* x_48; obj* x_49; uint8 x_50; 
+x_46 = lean::cnstr_get(x_1, 0);
+x_47 = lean::cnstr_get(x_1, 1);
+x_48 = lean::cnstr_get(x_2, 0);
+x_49 = lean::cnstr_get(x_2, 1);
+x_50 = lean::nat_dec_eq(x_46, x_48);
+if (x_50 == 0)
 {
-uint8 x_47; 
+uint8 x_52; 
 lean::dec(x_0);
-x_47 = 0;
-return x_47;
+x_52 = 0;
+return x_52;
 }
 else
 {
-uint8 x_48; 
-x_48 = l_Lean_IR_VarId_alphaEqv(x_0, x_42, x_44);
-return x_48;
+uint8 x_53; 
+x_53 = l_Lean_IR_VarId_alphaEqv(x_0, x_47, x_49);
+return x_53;
 }
 }
 default:
 {
-uint8 x_50; 
+uint8 x_55; 
 lean::dec(x_0);
-x_50 = 0;
-return x_50;
+x_55 = 0;
+return x_55;
 }
 }
 }
@@ -5342,32 +5376,32 @@ case 4:
 switch (lean::obj_tag(x_2)) {
 case 4:
 {
-obj* x_51; obj* x_52; obj* x_53; obj* x_54; uint8 x_55; 
-x_51 = lean::cnstr_get(x_1, 0);
-x_52 = lean::cnstr_get(x_1, 1);
-x_53 = lean::cnstr_get(x_2, 0);
-x_54 = lean::cnstr_get(x_2, 1);
-x_55 = lean::nat_dec_eq(x_51, x_53);
-if (x_55 == 0)
+obj* x_56; obj* x_57; obj* x_58; obj* x_59; uint8 x_60; 
+x_56 = lean::cnstr_get(x_1, 0);
+x_57 = lean::cnstr_get(x_1, 1);
+x_58 = lean::cnstr_get(x_2, 0);
+x_59 = lean::cnstr_get(x_2, 1);
+x_60 = lean::nat_dec_eq(x_56, x_58);
+if (x_60 == 0)
 {
-uint8 x_57; 
+uint8 x_62; 
 lean::dec(x_0);
-x_57 = 0;
-return x_57;
+x_62 = 0;
+return x_62;
 }
 else
 {
-uint8 x_58; 
-x_58 = l_Lean_IR_VarId_alphaEqv(x_0, x_52, x_54);
-return x_58;
+uint8 x_63; 
+x_63 = l_Lean_IR_VarId_alphaEqv(x_0, x_57, x_59);
+return x_63;
 }
 }
 default:
 {
-uint8 x_60; 
+uint8 x_65; 
 lean::dec(x_0);
-x_60 = 0;
-return x_60;
+x_65 = 0;
+return x_65;
 }
 }
 }
@@ -5376,46 +5410,46 @@ case 5:
 switch (lean::obj_tag(x_2)) {
 case 5:
 {
-obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; uint8 x_67; 
-x_61 = lean::cnstr_get(x_1, 0);
-x_62 = lean::cnstr_get(x_1, 1);
-x_63 = lean::cnstr_get(x_1, 2);
-x_64 = lean::cnstr_get(x_2, 0);
-x_65 = lean::cnstr_get(x_2, 1);
-x_66 = lean::cnstr_get(x_2, 2);
-x_67 = lean::nat_dec_eq(x_61, x_64);
-if (x_67 == 0)
+obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; uint8 x_72; 
+x_66 = lean::cnstr_get(x_1, 0);
+x_67 = lean::cnstr_get(x_1, 1);
+x_68 = lean::cnstr_get(x_1, 2);
+x_69 = lean::cnstr_get(x_2, 0);
+x_70 = lean::cnstr_get(x_2, 1);
+x_71 = lean::cnstr_get(x_2, 2);
+x_72 = lean::nat_dec_eq(x_66, x_69);
+if (x_72 == 0)
 {
-uint8 x_69; 
+uint8 x_74; 
 lean::dec(x_0);
-x_69 = 0;
-return x_69;
+x_74 = 0;
+return x_74;
 }
 else
 {
-uint8 x_70; 
-x_70 = lean::nat_dec_eq(x_62, x_65);
-if (x_70 == 0)
-{
-uint8 x_72; 
-lean::dec(x_0);
-x_72 = 0;
-return x_72;
-}
-else
-{
-uint8 x_73; 
-x_73 = l_Lean_IR_VarId_alphaEqv(x_0, x_63, x_66);
-return x_73;
-}
-}
-}
-default:
-{
 uint8 x_75; 
+x_75 = lean::nat_dec_eq(x_67, x_70);
+if (x_75 == 0)
+{
+uint8 x_77; 
 lean::dec(x_0);
-x_75 = 0;
-return x_75;
+x_77 = 0;
+return x_77;
+}
+else
+{
+uint8 x_78; 
+x_78 = l_Lean_IR_VarId_alphaEqv(x_0, x_68, x_71);
+return x_78;
+}
+}
+}
+default:
+{
+uint8 x_80; 
+lean::dec(x_0);
+x_80 = 0;
+return x_80;
 }
 }
 }
@@ -5424,32 +5458,32 @@ case 6:
 switch (lean::obj_tag(x_2)) {
 case 6:
 {
-obj* x_76; obj* x_77; obj* x_78; obj* x_79; uint8 x_80; 
-x_76 = lean::cnstr_get(x_1, 0);
-x_77 = lean::cnstr_get(x_1, 1);
-x_78 = lean::cnstr_get(x_2, 0);
-x_79 = lean::cnstr_get(x_2, 1);
-x_80 = lean_name_dec_eq(x_76, x_78);
-if (x_80 == 0)
+obj* x_81; obj* x_82; obj* x_83; obj* x_84; uint8 x_85; 
+x_81 = lean::cnstr_get(x_1, 0);
+x_82 = lean::cnstr_get(x_1, 1);
+x_83 = lean::cnstr_get(x_2, 0);
+x_84 = lean::cnstr_get(x_2, 1);
+x_85 = lean_name_dec_eq(x_81, x_83);
+if (x_85 == 0)
 {
-uint8 x_82; 
+uint8 x_87; 
 lean::dec(x_0);
-x_82 = 0;
-return x_82;
+x_87 = 0;
+return x_87;
 }
 else
 {
-uint8 x_83; 
-x_83 = l_Array_isEqv___at_Lean_IR_args_alphaEqv___spec__1(x_0, x_77, x_79);
-return x_83;
+uint8 x_88; 
+x_88 = l_Array_isEqv___at_Lean_IR_args_alphaEqv___spec__1(x_0, x_82, x_84);
+return x_88;
 }
 }
 default:
 {
-uint8 x_85; 
+uint8 x_90; 
 lean::dec(x_0);
-x_85 = 0;
-return x_85;
+x_90 = 0;
+return x_90;
 }
 }
 }
@@ -5458,31 +5492,31 @@ case 7:
 switch (lean::obj_tag(x_2)) {
 case 7:
 {
-obj* x_86; obj* x_87; obj* x_88; uint8 x_89; 
-x_86 = lean::cnstr_get(x_1, 0);
-x_87 = lean::cnstr_get(x_2, 0);
-x_88 = lean::cnstr_get(x_2, 1);
-x_89 = lean_name_dec_eq(x_86, x_87);
-if (x_89 == 0)
+obj* x_91; obj* x_92; obj* x_93; uint8 x_94; 
+x_91 = lean::cnstr_get(x_1, 0);
+x_92 = lean::cnstr_get(x_2, 0);
+x_93 = lean::cnstr_get(x_2, 1);
+x_94 = lean_name_dec_eq(x_91, x_92);
+if (x_94 == 0)
 {
-uint8 x_91; 
+uint8 x_96; 
 lean::dec(x_0);
-x_91 = 0;
-return x_91;
+x_96 = 0;
+return x_96;
 }
 else
 {
-uint8 x_92; 
-x_92 = l_Array_isEqv___at_Lean_IR_args_alphaEqv___spec__1(x_0, x_88, x_88);
-return x_92;
+uint8 x_97; 
+x_97 = l_Array_isEqv___at_Lean_IR_args_alphaEqv___spec__1(x_0, x_93, x_93);
+return x_97;
 }
 }
 default:
 {
-uint8 x_94; 
+uint8 x_99; 
 lean::dec(x_0);
-x_94 = 0;
-return x_94;
+x_99 = 0;
+return x_99;
 }
 }
 }
@@ -5491,82 +5525,62 @@ case 8:
 switch (lean::obj_tag(x_2)) {
 case 8:
 {
-obj* x_95; obj* x_96; obj* x_97; obj* x_98; uint8 x_100; 
-x_95 = lean::cnstr_get(x_1, 0);
-x_96 = lean::cnstr_get(x_1, 1);
-x_97 = lean::cnstr_get(x_2, 0);
-x_98 = lean::cnstr_get(x_2, 1);
+obj* x_100; obj* x_101; obj* x_102; obj* x_103; uint8 x_105; 
+x_100 = lean::cnstr_get(x_1, 0);
+x_101 = lean::cnstr_get(x_1, 1);
+x_102 = lean::cnstr_get(x_2, 0);
+x_103 = lean::cnstr_get(x_2, 1);
 lean::inc(x_0);
-x_100 = l_Lean_IR_VarId_alphaEqv(x_0, x_95, x_97);
-if (x_100 == 0)
+x_105 = l_Lean_IR_VarId_alphaEqv(x_0, x_100, x_102);
+if (x_105 == 0)
 {
-uint8 x_102; 
+uint8 x_107; 
 lean::dec(x_0);
-x_102 = 0;
-return x_102;
+x_107 = 0;
+return x_107;
 }
 else
 {
-uint8 x_103; 
-x_103 = l_Array_isEqv___at_Lean_IR_args_alphaEqv___spec__1(x_0, x_96, x_98);
-return x_103;
+uint8 x_108; 
+x_108 = l_Array_isEqv___at_Lean_IR_args_alphaEqv___spec__1(x_0, x_101, x_103);
+return x_108;
 }
 }
 default:
 {
-uint8 x_105; 
+uint8 x_110; 
 lean::dec(x_0);
-x_105 = 0;
-return x_105;
+x_110 = 0;
+return x_110;
 }
 }
 }
 case 9:
 {
-uint8 x_106; 
-x_106 = lean::cnstr_get_scalar<uint8>(x_1, sizeof(void*)*1);
+uint8 x_111; 
+x_111 = lean::cnstr_get_scalar<uint8>(x_1, sizeof(void*)*1);
 switch (lean::obj_tag(x_2)) {
 case 9:
 {
-obj* x_107; uint8 x_108; obj* x_109; uint8 x_110; 
-x_107 = lean::cnstr_get(x_1, 0);
-x_108 = lean::cnstr_get_scalar<uint8>(x_2, sizeof(void*)*1);
-x_109 = lean::cnstr_get(x_2, 0);
-x_110 = l_Lean_IR_IRType_beq___main(x_106, x_108);
-if (x_110 == 0)
+obj* x_112; uint8 x_113; obj* x_114; uint8 x_115; 
+x_112 = lean::cnstr_get(x_1, 0);
+x_113 = lean::cnstr_get_scalar<uint8>(x_2, sizeof(void*)*1);
+x_114 = lean::cnstr_get(x_2, 0);
+x_115 = l_Lean_IR_IRType_beq___main(x_111, x_113);
+if (x_115 == 0)
 {
-uint8 x_112; 
+uint8 x_117; 
 lean::dec(x_0);
-x_112 = 0;
-return x_112;
+x_117 = 0;
+return x_117;
 }
 else
 {
-uint8 x_113; 
-x_113 = l_Lean_IR_VarId_alphaEqv(x_0, x_107, x_109);
-return x_113;
-}
-}
-default:
-{
-uint8 x_115; 
-lean::dec(x_0);
-x_115 = 0;
-return x_115;
-}
-}
-}
-case 10:
-{
-switch (lean::obj_tag(x_2)) {
-case 10:
-{
-obj* x_116; obj* x_117; uint8 x_118; 
-x_116 = lean::cnstr_get(x_1, 0);
-x_117 = lean::cnstr_get(x_2, 0);
-x_118 = l_Lean_IR_VarId_alphaEqv(x_0, x_116, x_117);
+uint8 x_118; 
+x_118 = l_Lean_IR_VarId_alphaEqv(x_0, x_112, x_114);
 return x_118;
 }
+}
 default:
 {
 uint8 x_120; 
@@ -5576,50 +5590,50 @@ return x_120;
 }
 }
 }
-case 11:
+case 10:
 {
-lean::dec(x_0);
 switch (lean::obj_tag(x_2)) {
-case 11:
+case 10:
 {
-obj* x_122; obj* x_123; uint8 x_124; 
-x_122 = lean::cnstr_get(x_1, 0);
-x_123 = lean::cnstr_get(x_2, 0);
-x_124 = l_Lean_IR_LitVal_beq___main(x_122, x_123);
-return x_124;
+obj* x_121; obj* x_122; uint8 x_123; 
+x_121 = lean::cnstr_get(x_1, 0);
+x_122 = lean::cnstr_get(x_2, 0);
+x_123 = l_Lean_IR_VarId_alphaEqv(x_0, x_121, x_122);
+return x_123;
 }
 default:
 {
 uint8 x_125; 
+lean::dec(x_0);
 x_125 = 0;
 return x_125;
 }
 }
 }
-case 12:
+case 11:
 {
+lean::dec(x_0);
 switch (lean::obj_tag(x_2)) {
-case 12:
+case 11:
 {
-obj* x_126; obj* x_127; uint8 x_128; 
-x_126 = lean::cnstr_get(x_1, 0);
-x_127 = lean::cnstr_get(x_2, 0);
-x_128 = l_Lean_IR_VarId_alphaEqv(x_0, x_126, x_127);
-return x_128;
+obj* x_127; obj* x_128; uint8 x_129; 
+x_127 = lean::cnstr_get(x_1, 0);
+x_128 = lean::cnstr_get(x_2, 0);
+x_129 = l_Lean_IR_LitVal_beq___main(x_127, x_128);
+return x_129;
 }
 default:
 {
 uint8 x_130; 
-lean::dec(x_0);
 x_130 = 0;
 return x_130;
 }
 }
 }
-default:
+case 12:
 {
 switch (lean::obj_tag(x_2)) {
-case 13:
+case 12:
 {
 obj* x_131; obj* x_132; uint8 x_133; 
 x_131 = lean::cnstr_get(x_1, 0);
@@ -5636,6 +5650,26 @@ return x_135;
 }
 }
 }
+default:
+{
+switch (lean::obj_tag(x_2)) {
+case 13:
+{
+obj* x_136; obj* x_137; uint8 x_138; 
+x_136 = lean::cnstr_get(x_1, 0);
+x_137 = lean::cnstr_get(x_2, 0);
+x_138 = l_Lean_IR_VarId_alphaEqv(x_0, x_136, x_137);
+return x_138;
+}
+default:
+{
+uint8 x_140; 
+lean::dec(x_0);
+x_140 = 0;
+return x_140;
+}
+}
+}
 }
 }
 }
diff --git a/src/stage0/init/lean/compiler/ir/borrow.cpp b/src/stage0/init/lean/compiler/ir/borrow.cpp
index b206be1bf3..b58c322bf6 100644
--- a/src/stage0/init/lean/compiler/ir/borrow.cpp
+++ b/src/stage0/init/lean/compiler/ir/borrow.cpp
@@ -2283,7 +2283,7 @@ return x_13;
 case 1:
 {
 obj* x_16; obj* x_19; obj* x_20; obj* x_23; 
-x_16 = lean::cnstr_get(x_1, 0);
+x_16 = lean::cnstr_get(x_1, 1);
 lean::inc(x_16);
 lean::dec(x_1);
 x_19 = l_Lean_IR_Borrow_ownVar(x_0, x_2, x_3);
@@ -2331,8 +2331,8 @@ x_50 = lean::unbox(x_48);
 if (x_50 == 0)
 {
 obj* x_53; obj* x_55; obj* x_56; obj* x_57; 
-lean::dec(x_43);
 lean::dec(x_2);
+lean::dec(x_43);
 x_53 = lean::cnstr_get(x_46, 1);
 if (lean::is_exclusive(x_46)) {
  lean::cnstr_release(x_46, 0);
diff --git a/src/stage0/init/lean/compiler/ir/boxing.cpp b/src/stage0/init/lean/compiler/ir/boxing.cpp
index 16ee8607e5..6c03202ec9 100644
--- a/src/stage0/init/lean/compiler/ir/boxing.cpp
+++ b/src/stage0/init/lean/compiler/ir/boxing.cpp
@@ -42,6 +42,7 @@ obj* l_Lean_IR_ExplicitBoxing_withJDecl___boxed(obj*);
 obj* l_Lean_IR_ExplicitBoxing_unboxResultIfNeeded___boxed(obj*, obj*, obj*, obj*, obj*, obj*);
 obj* l_Array_miterateAux___main___at_Lean_IR_ExplicitBoxing_castArgsIfNeeded___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*);
 obj* l_Array_miterateAux___main___at_Lean_IR_ExplicitBoxing_visitVDeclExpr___spec__2___boxed(obj*, obj*, obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_findEnvDecl_x_27(obj*, obj*, obj*);
 obj* l_Lean_IR_LocalContext_addJP(obj*, obj*, obj*, obj*);
 obj* l_Array_miterateAux___main___at_Lean_IR_LocalContext_addParams___spec__1(obj*, obj*, obj*, obj*);
 obj* l_Lean_IR_reshape(obj*, obj*);
@@ -94,7 +95,6 @@ obj* l_Lean_IR_ExplicitBoxing_getVarType___boxed(obj*, obj*, obj*);
 obj* l_Lean_IR_ExplicitBoxing_getDecl___boxed(obj*, obj*, obj*);
 obj* l_Lean_IR_ExplicitBoxing_getJPParams(obj*, obj*, obj*);
 obj* l_Lean_IR_ExplicitBoxing_castArgsIfNeededAux___at_Lean_IR_ExplicitBoxing_boxArgsIfNeeded___spec__1___boxed(obj*, obj*, obj*);
-obj* l_Lean_IR_findDeclAux_x_27(obj*, obj*, obj*);
 obj* l_Lean_IR_ExplicitBoxing_boxArgsIfNeeded___boxed(obj*, obj*, obj*, obj*);
 obj* l_Lean_IR_ExplicitBoxing_castArgsIfNeededAux___at_Lean_IR_ExplicitBoxing_visitVDeclExpr___spec__1(obj*, obj*, obj*, obj*);
 obj* l_Lean_IR_ExplicitBoxing_visitVDeclExpr___boxed(obj*, obj*, obj*, obj*, obj*, obj*);
@@ -511,7 +511,7 @@ _start:
 obj* x_3; obj* x_4; obj* x_5; 
 x_3 = lean::cnstr_get(x_1, 2);
 x_4 = lean::cnstr_get(x_1, 1);
-x_5 = l_Lean_IR_findDeclAux_x_27(x_3, x_0, x_4);
+x_5 = l_Lean_IR_findEnvDecl_x_27(x_3, x_0, x_4);
 if (lean::obj_tag(x_5) == 0)
 {
 obj* x_6; obj* x_7; 
diff --git a/src/stage0/init/lean/compiler/ir/checker.cpp b/src/stage0/init/lean/compiler/ir/checker.cpp
index e5ccdf0924..7bf8b7b942 100644
--- a/src/stage0/init/lean/compiler/ir/checker.cpp
+++ b/src/stage0/init/lean/compiler/ir/checker.cpp
@@ -14,37 +14,47 @@ typedef lean::uint32 uint32; typedef lean::uint64 uint64;
 #pragma GCC diagnostic ignored "-Wunused-label"
 #pragma GCC diagnostic ignored "-Wunused-but-set-variable"
 #endif
+obj* l_Lean_IR_Checker_getDecl(obj*, obj*);
+extern obj* l_Lean_IR_getDecl___closed__1;
 obj* l_Lean_IR_Checker_checkType(uint8, obj*, obj*);
 obj* l_Lean_IR_Checker_checkExpr___main(uint8, obj*, obj*);
+obj* l_Lean_IR_Checker_checkFullApp___closed__1;
+obj* l_Lean_IR_Checker_getDecl___boxed(obj*, obj*);
 obj* l_Array_miterateAux___main___at_Lean_IR_Checker_checkDecl___main___spec__1___boxed(obj*, obj*, obj*, obj*, obj*);
-obj* l_Array_mforAux___main___at_Lean_IR_checkDecls___spec__1(obj*, obj*, obj*, obj*);
+obj* l_Array_mforAux___main___at_Lean_IR_checkDecls___spec__1(obj*, obj*, obj*, obj*, obj*);
 extern obj* l_Lean_IR_JoinPointId_HasToString___closed__1;
 obj* l_Array_miterateAux___main___at_Lean_IR_Checker_checkFnBody___main___spec__1(obj*, obj*, obj*, obj*, obj*);
 uint8 l_Lean_IR_IRType_beq___main(uint8, uint8);
+obj* l_Lean_IR_Checker_checkPartialApp___closed__1;
+obj* l_Lean_IR_Checker_checkPartialApp___closed__2;
 obj* l_Lean_IR_LocalContext_addLocal(obj*, obj*, uint8, obj*);
 uint8 l_Lean_IR_LocalContext_isParam(obj*, obj*);
 uint8 l_Lean_IR_LocalContext_contains(obj*, obj*);
 obj* l_Lean_IR_Checker_checkScalarVar(obj*, obj*);
 obj* l_Array_miterateAux___main___at_Lean_IR_Checker_withParams___spec__1___closed__1;
-obj* l_Array_mforAux___main___at_Lean_IR_checkDecls___spec__1___boxed(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_Checker_checkFullApp___boxed(obj*, obj*, obj*);
+obj* l_Array_mforAux___main___at_Lean_IR_checkDecls___spec__1___boxed(obj*, obj*, obj*, obj*, obj*);
 obj* l_Lean_IR_Checker_checkFnBody___main___closed__1;
 obj* l_Lean_IR_Checker_checkExpr___boxed(obj*, obj*, obj*);
 obj* l_Lean_IR_Checker_checkDecl(obj*, obj*);
 obj* l_Lean_Name_toStringWithSep___main(obj*, obj*);
 obj* l_Lean_IR_Checker_checkFnBody___main___closed__2;
+obj* l_Lean_IR_Checker_checkFullApp___closed__4;
 obj* l_Lean_IR_checkDecls(obj*, obj*, obj*);
 uint8 l_Lean_IR_IRType_isObj___main(uint8);
 obj* l_Lean_IR_Checker_checkType___closed__1;
 obj* l_Lean_IR_Checker_checkDecl___main(obj*, obj*);
 obj* l_Array_miterateAux___main___at_Lean_IR_Checker_checkDecl___main___spec__1(obj*, obj*, obj*, obj*, obj*);
-obj* l_Lean_IR_checkDecl(obj*, obj*, obj*);
+obj* l_Lean_IR_checkDecl(obj*, obj*, obj*, obj*);
 obj* l_Lean_IR_Checker_checkType___boxed(obj*, obj*, obj*);
 obj* l_Lean_IR_checkDecl___closed__2;
 obj* l_Lean_IR_Checker_checkFnBody(obj*, obj*);
 obj* l_Nat_repr(obj*);
 obj* l_Lean_IR_Checker_withParams(obj*, obj*, obj*);
+obj* l_Lean_IR_findEnvDecl_x_27(obj*, obj*, obj*);
 obj* l_Lean_IR_LocalContext_addJP(obj*, obj*, obj*, obj*);
 obj* l_Array_miterateAux___main___at_Lean_IR_Checker_checkDecl___main___spec__2___boxed(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_Checker_checkPartialApp___boxed(obj*, obj*, obj*);
 obj* l_Lean_IR_Checker_checkJP(obj*, obj*);
 namespace lean {
 obj* string_append(obj*, obj*);
@@ -54,34 +64,44 @@ namespace lean {
 uint8 nat_dec_lt(obj*, obj*);
 }
 extern obj* l_Char_HasRepr___closed__1;
+obj* l_Lean_IR_Checker_checkFullApp(obj*, obj*, obj*);
 obj* l_Lean_IR_Decl_name___main(obj*);
 obj* l_Lean_IR_LocalContext_addParam(obj*, obj*);
 namespace lean {
 obj* nat_add(obj*, obj*);
 }
+namespace lean {
+uint8 nat_dec_eq(obj*, obj*);
+}
 uint8 l_Lean_IR_CtorInfo_isRef(obj*);
 obj* l_Lean_IR_LocalContext_getType(obj*, obj*);
 obj* l_Array_mforAux___main___at_Lean_IR_Checker_checkArgs___spec__1___boxed(obj*, obj*, obj*);
 obj* l_Array_miterateAux___main___at_Lean_IR_Checker_withParams___spec__1(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_Checker_checkPartialApp___closed__3;
 obj* l_Lean_IR_Checker_checkObjType___boxed(obj*, obj*);
 obj* l_Lean_IR_Checker_checkVar___closed__2;
 obj* l_Lean_IR_Checker_checkScalarType(uint8, obj*);
 obj* l_Lean_IR_Checker_checkArg(obj*, obj*);
+obj* l_Lean_IR_Checker_checkFullApp___closed__3;
 obj* l_Lean_IR_AltCore_body___main(obj*);
 obj* l_Lean_IR_Checker_checkExpr___main___boxed(obj*, obj*, obj*);
 obj* l_Lean_IR_Checker_checkArgs___boxed(obj*, obj*);
+obj* l_Lean_IR_Checker_checkPartialApp(obj*, obj*, obj*);
 obj* l_Lean_IR_Checker_checkVar(obj*, obj*);
 obj* l_Lean_IR_checkDecl___closed__1;
 obj* l_Array_miterateAux___main___at_Lean_IR_Checker_withParams___spec__1___boxed(obj*, obj*, obj*, obj*, obj*);
 obj* l_Lean_IR_Checker_checkVarType(obj*, obj*, obj*);
+obj* l_Lean_IR_getEnv___rarg(obj*);
 obj* l_Array_miterateAux___main___at_Lean_IR_Checker_checkFnBody___main___spec__1___boxed(obj*, obj*, obj*, obj*, obj*);
 uint8 l_Lean_IR_LocalContext_isLocalVar(obj*, obj*);
 extern obj* l_Lean_IR_VarId_HasToString___closed__1;
+obj* l_Lean_IR_Decl_params___main(obj*);
 obj* l_Lean_IR_Checker_checkVar___closed__1;
 obj* l_Array_mforAux___main___at_Lean_IR_Checker_checkFnBody___main___spec__2(obj*, obj*, obj*);
+obj* l_Lean_IR_Checker_checkFullApp___closed__2;
 extern obj* l_Lean_Name_toString___closed__1;
 obj* l_Lean_IR_Checker_checkArgs(obj*, obj*);
-obj* l_Lean_IR_checkDecl___boxed(obj*, obj*, obj*);
+obj* l_Lean_IR_checkDecl___boxed(obj*, obj*, obj*, obj*);
 obj* l_Lean_IR_Checker_withParams___boxed(obj*, obj*, obj*);
 obj* l_Lean_IR_Checker_checkObjType(uint8, obj*);
 obj* l_Lean_IR_checkDecls___boxed(obj*, obj*, obj*);
@@ -94,6 +114,49 @@ obj* l_Lean_IR_Checker_checkJP___closed__1;
 obj* l_Array_miterateAux___main___at_Lean_IR_Checker_checkDecl___main___spec__2(obj*, obj*, obj*, obj*, obj*);
 uint8 l_Lean_IR_IRType_isScalar___main(uint8);
 obj* l_Lean_IR_Checker_checkExpr(uint8, obj*, obj*);
+obj* l_Lean_IR_Checker_getDecl(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; obj* x_3; obj* x_4; 
+x_2 = lean::cnstr_get(x_1, 0);
+x_3 = lean::cnstr_get(x_1, 2);
+x_4 = l_Lean_IR_findEnvDecl_x_27(x_2, x_0, x_3);
+if (lean::obj_tag(x_4) == 0)
+{
+obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; 
+x_5 = l_Lean_Name_toString___closed__1;
+x_6 = l_Lean_Name_toStringWithSep___main(x_5, x_0);
+x_7 = l_Lean_IR_getDecl___closed__1;
+x_8 = lean::string_append(x_7, x_6);
+lean::dec(x_6);
+x_10 = l_Char_HasRepr___closed__1;
+x_11 = lean::string_append(x_8, x_10);
+x_12 = lean::alloc_cnstr(0, 1, 0);
+lean::cnstr_set(x_12, 0, x_11);
+return x_12;
+}
+else
+{
+obj* x_14; obj* x_17; 
+lean::dec(x_0);
+x_14 = lean::cnstr_get(x_4, 0);
+lean::inc(x_14);
+lean::dec(x_4);
+x_17 = lean::alloc_cnstr(1, 1, 0);
+lean::cnstr_set(x_17, 0, x_14);
+return x_17;
+}
+}
+}
+obj* l_Lean_IR_Checker_getDecl___boxed(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; 
+x_2 = l_Lean_IR_Checker_getDecl(x_0, x_1);
+lean::dec(x_1);
+return x_2;
+}
+}
 obj* _init_l_Lean_IR_Checker_checkVar___closed__1() {
 _start:
 {
@@ -115,46 +178,49 @@ return x_1;
 obj* l_Lean_IR_Checker_checkVar(obj* x_0, obj* x_1) {
 _start:
 {
-uint8 x_3; 
-lean::inc(x_1);
-x_3 = l_Lean_IR_LocalContext_isLocalVar(x_1, x_0);
-if (x_3 == 0)
+obj* x_2; uint8 x_6; 
+x_2 = lean::cnstr_get(x_1, 1);
+lean::inc(x_2);
+lean::dec(x_1);
+lean::inc(x_2);
+x_6 = l_Lean_IR_LocalContext_isLocalVar(x_2, x_0);
+if (x_6 == 0)
 {
-uint8 x_4; 
-x_4 = l_Lean_IR_LocalContext_isParam(x_1, x_0);
-if (x_4 == 0)
+uint8 x_7; 
+x_7 = l_Lean_IR_LocalContext_isParam(x_2, x_0);
+if (x_7 == 0)
 {
-obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; 
-x_5 = l_Nat_repr(x_0);
-x_6 = l_Lean_IR_VarId_HasToString___closed__1;
-x_7 = lean::string_append(x_6, x_5);
-lean::dec(x_5);
-x_9 = l_Lean_IR_Checker_checkVar___closed__1;
-x_10 = lean::string_append(x_9, x_7);
-lean::dec(x_7);
-x_12 = l_Char_HasRepr___closed__1;
-x_13 = lean::string_append(x_10, x_12);
-x_14 = lean::alloc_cnstr(0, 1, 0);
-lean::cnstr_set(x_14, 0, x_13);
-return x_14;
-}
-else
-{
-obj* x_16; 
-lean::dec(x_0);
-x_16 = l_Lean_IR_Checker_checkVar___closed__2;
-return x_16;
-}
+obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; 
+x_8 = l_Nat_repr(x_0);
+x_9 = l_Lean_IR_VarId_HasToString___closed__1;
+x_10 = lean::string_append(x_9, x_8);
+lean::dec(x_8);
+x_12 = l_Lean_IR_Checker_checkVar___closed__1;
+x_13 = lean::string_append(x_12, x_10);
+lean::dec(x_10);
+x_15 = l_Char_HasRepr___closed__1;
+x_16 = lean::string_append(x_13, x_15);
+x_17 = lean::alloc_cnstr(0, 1, 0);
+lean::cnstr_set(x_17, 0, x_16);
+return x_17;
 }
 else
 {
 obj* x_19; 
-lean::dec(x_1);
 lean::dec(x_0);
 x_19 = l_Lean_IR_Checker_checkVar___closed__2;
 return x_19;
 }
 }
+else
+{
+obj* x_22; 
+lean::dec(x_0);
+lean::dec(x_2);
+x_22 = l_Lean_IR_Checker_checkVar___closed__2;
+return x_22;
+}
+}
 }
 obj* _init_l_Lean_IR_Checker_checkJP___closed__1() {
 _start:
@@ -167,30 +233,33 @@ return x_0;
 obj* l_Lean_IR_Checker_checkJP(obj* x_0, obj* x_1) {
 _start:
 {
-uint8 x_2; 
-x_2 = l_Lean_IR_LocalContext_isJP(x_1, x_0);
-if (x_2 == 0)
+obj* x_2; uint8 x_5; 
+x_2 = lean::cnstr_get(x_1, 1);
+lean::inc(x_2);
+lean::dec(x_1);
+x_5 = l_Lean_IR_LocalContext_isJP(x_2, x_0);
+if (x_5 == 0)
 {
-obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; 
-x_3 = l_Nat_repr(x_0);
-x_4 = l_Lean_IR_JoinPointId_HasToString___closed__1;
-x_5 = lean::string_append(x_4, x_3);
-lean::dec(x_3);
-x_7 = l_Lean_IR_Checker_checkJP___closed__1;
-x_8 = lean::string_append(x_7, x_5);
-lean::dec(x_5);
-x_10 = l_Char_HasRepr___closed__1;
-x_11 = lean::string_append(x_8, x_10);
-x_12 = lean::alloc_cnstr(0, 1, 0);
-lean::cnstr_set(x_12, 0, x_11);
-return x_12;
+obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; 
+x_6 = l_Nat_repr(x_0);
+x_7 = l_Lean_IR_JoinPointId_HasToString___closed__1;
+x_8 = lean::string_append(x_7, x_6);
+lean::dec(x_6);
+x_10 = l_Lean_IR_Checker_checkJP___closed__1;
+x_11 = lean::string_append(x_10, x_8);
+lean::dec(x_8);
+x_13 = l_Char_HasRepr___closed__1;
+x_14 = lean::string_append(x_11, x_13);
+x_15 = lean::alloc_cnstr(0, 1, 0);
+lean::cnstr_set(x_15, 0, x_14);
+return x_15;
 }
 else
 {
-obj* x_14; 
+obj* x_17; 
 lean::dec(x_0);
-x_14 = l_Lean_IR_Checker_checkVar___closed__2;
-return x_14;
+x_17 = l_Lean_IR_Checker_checkVar___closed__2;
+return x_17;
 }
 }
 }
@@ -398,45 +467,48 @@ return x_3;
 obj* l_Lean_IR_Checker_checkVarType(obj* x_0, obj* x_1, obj* x_2) {
 _start:
 {
-obj* x_3; 
-x_3 = l_Lean_IR_LocalContext_getType(x_2, x_0);
-if (lean::obj_tag(x_3) == 0)
+obj* x_3; obj* x_6; 
+x_3 = lean::cnstr_get(x_2, 1);
+lean::inc(x_3);
+lean::dec(x_2);
+x_6 = l_Lean_IR_LocalContext_getType(x_3, x_0);
+if (lean::obj_tag(x_6) == 0)
 {
-obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; 
+obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_15; obj* x_16; obj* x_17; 
 lean::dec(x_1);
-x_5 = l_Nat_repr(x_0);
-x_6 = l_Lean_IR_VarId_HasToString___closed__1;
-x_7 = lean::string_append(x_6, x_5);
-lean::dec(x_5);
-x_9 = l_Lean_IR_Checker_checkVar___closed__1;
-x_10 = lean::string_append(x_9, x_7);
-lean::dec(x_7);
-x_12 = l_Char_HasRepr___closed__1;
-x_13 = lean::string_append(x_10, x_12);
-x_14 = lean::alloc_cnstr(0, 1, 0);
-lean::cnstr_set(x_14, 0, x_13);
-return x_14;
+x_8 = l_Nat_repr(x_0);
+x_9 = l_Lean_IR_VarId_HasToString___closed__1;
+x_10 = lean::string_append(x_9, x_8);
+lean::dec(x_8);
+x_12 = l_Lean_IR_Checker_checkVar___closed__1;
+x_13 = lean::string_append(x_12, x_10);
+lean::dec(x_10);
+x_15 = l_Char_HasRepr___closed__1;
+x_16 = lean::string_append(x_13, x_15);
+x_17 = lean::alloc_cnstr(0, 1, 0);
+lean::cnstr_set(x_17, 0, x_16);
+return x_17;
 }
 else
 {
-obj* x_16; obj* x_19; uint8 x_20; 
+obj* x_19; obj* x_22; uint8 x_23; 
 lean::dec(x_0);
-x_16 = lean::cnstr_get(x_3, 0);
-lean::inc(x_16);
-lean::dec(x_3);
-x_19 = lean::apply_1(x_1, x_16);
-x_20 = lean::unbox(x_19);
-if (x_20 == 0)
+x_19 = lean::cnstr_get(x_6, 0);
+lean::inc(x_19);
+lean::dec(x_6);
+x_22 = lean::apply_1(x_1, x_19);
+x_23 = lean::unbox(x_22);
+if (x_23 == 0)
 {
-obj* x_21; 
-x_21 = l_Lean_IR_Checker_checkType___closed__1;
-return x_21;
+obj* x_24; 
+x_24 = l_Lean_IR_Checker_checkType___closed__1;
+return x_24;
 }
 else
 {
-obj* x_22; 
-x_22 = l_Lean_IR_Checker_checkVar___closed__2;
-return x_22;
+obj* x_25; 
+x_25 = l_Lean_IR_Checker_checkVar___closed__2;
+return x_25;
 }
 }
 }
@@ -444,44 +516,47 @@ return x_22;
 obj* l_Lean_IR_Checker_checkObjVar(obj* x_0, obj* x_1) {
 _start:
 {
-obj* x_2; 
-x_2 = l_Lean_IR_LocalContext_getType(x_1, x_0);
-if (lean::obj_tag(x_2) == 0)
+obj* x_2; obj* x_5; 
+x_2 = lean::cnstr_get(x_1, 1);
+lean::inc(x_2);
+lean::dec(x_1);
+x_5 = l_Lean_IR_LocalContext_getType(x_2, x_0);
+if (lean::obj_tag(x_5) == 0)
 {
-obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; 
-x_3 = l_Nat_repr(x_0);
-x_4 = l_Lean_IR_VarId_HasToString___closed__1;
-x_5 = lean::string_append(x_4, x_3);
-lean::dec(x_3);
-x_7 = l_Lean_IR_Checker_checkVar___closed__1;
-x_8 = lean::string_append(x_7, x_5);
-lean::dec(x_5);
-x_10 = l_Char_HasRepr___closed__1;
-x_11 = lean::string_append(x_8, x_10);
-x_12 = lean::alloc_cnstr(0, 1, 0);
-lean::cnstr_set(x_12, 0, x_11);
-return x_12;
+obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; 
+x_6 = l_Nat_repr(x_0);
+x_7 = l_Lean_IR_VarId_HasToString___closed__1;
+x_8 = lean::string_append(x_7, x_6);
+lean::dec(x_6);
+x_10 = l_Lean_IR_Checker_checkVar___closed__1;
+x_11 = lean::string_append(x_10, x_8);
+lean::dec(x_8);
+x_13 = l_Char_HasRepr___closed__1;
+x_14 = lean::string_append(x_11, x_13);
+x_15 = lean::alloc_cnstr(0, 1, 0);
+lean::cnstr_set(x_15, 0, x_14);
+return x_15;
 }
 else
 {
-obj* x_14; uint8 x_17; uint8 x_18; 
+obj* x_17; uint8 x_20; uint8 x_21; 
 lean::dec(x_0);
-x_14 = lean::cnstr_get(x_2, 0);
-lean::inc(x_14);
-lean::dec(x_2);
-x_17 = lean::unbox(x_14);
-x_18 = l_Lean_IR_IRType_isObj___main(x_17);
-if (x_18 == 0)
+x_17 = lean::cnstr_get(x_5, 0);
+lean::inc(x_17);
+lean::dec(x_5);
+x_20 = lean::unbox(x_17);
+x_21 = l_Lean_IR_IRType_isObj___main(x_20);
+if (x_21 == 0)
 {
-obj* x_19; 
-x_19 = l_Lean_IR_Checker_checkType___closed__1;
-return x_19;
+obj* x_22; 
+x_22 = l_Lean_IR_Checker_checkType___closed__1;
+return x_22;
 }
 else
 {
-obj* x_20; 
-x_20 = l_Lean_IR_Checker_checkVar___closed__2;
-return x_20;
+obj* x_23; 
+x_23 = l_Lean_IR_Checker_checkVar___closed__2;
+return x_23;
 }
 }
 }
@@ -489,48 +564,301 @@ return x_20;
 obj* l_Lean_IR_Checker_checkScalarVar(obj* x_0, obj* x_1) {
 _start:
 {
-obj* x_2; 
-x_2 = l_Lean_IR_LocalContext_getType(x_1, x_0);
-if (lean::obj_tag(x_2) == 0)
+obj* x_2; obj* x_5; 
+x_2 = lean::cnstr_get(x_1, 1);
+lean::inc(x_2);
+lean::dec(x_1);
+x_5 = l_Lean_IR_LocalContext_getType(x_2, x_0);
+if (lean::obj_tag(x_5) == 0)
 {
-obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; 
-x_3 = l_Nat_repr(x_0);
-x_4 = l_Lean_IR_VarId_HasToString___closed__1;
-x_5 = lean::string_append(x_4, x_3);
-lean::dec(x_3);
-x_7 = l_Lean_IR_Checker_checkVar___closed__1;
-x_8 = lean::string_append(x_7, x_5);
-lean::dec(x_5);
-x_10 = l_Char_HasRepr___closed__1;
-x_11 = lean::string_append(x_8, x_10);
-x_12 = lean::alloc_cnstr(0, 1, 0);
-lean::cnstr_set(x_12, 0, x_11);
-return x_12;
+obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; 
+x_6 = l_Nat_repr(x_0);
+x_7 = l_Lean_IR_VarId_HasToString___closed__1;
+x_8 = lean::string_append(x_7, x_6);
+lean::dec(x_6);
+x_10 = l_Lean_IR_Checker_checkVar___closed__1;
+x_11 = lean::string_append(x_10, x_8);
+lean::dec(x_8);
+x_13 = l_Char_HasRepr___closed__1;
+x_14 = lean::string_append(x_11, x_13);
+x_15 = lean::alloc_cnstr(0, 1, 0);
+lean::cnstr_set(x_15, 0, x_14);
+return x_15;
 }
 else
 {
-obj* x_14; uint8 x_17; uint8 x_18; 
+obj* x_17; uint8 x_20; uint8 x_21; 
 lean::dec(x_0);
-x_14 = lean::cnstr_get(x_2, 0);
-lean::inc(x_14);
-lean::dec(x_2);
-x_17 = lean::unbox(x_14);
-x_18 = l_Lean_IR_IRType_isScalar___main(x_17);
-if (x_18 == 0)
+x_17 = lean::cnstr_get(x_5, 0);
+lean::inc(x_17);
+lean::dec(x_5);
+x_20 = lean::unbox(x_17);
+x_21 = l_Lean_IR_IRType_isScalar___main(x_20);
+if (x_21 == 0)
 {
-obj* x_19; 
-x_19 = l_Lean_IR_Checker_checkType___closed__1;
-return x_19;
+obj* x_22; 
+x_22 = l_Lean_IR_Checker_checkType___closed__1;
+return x_22;
 }
 else
 {
-obj* x_20; 
-x_20 = l_Lean_IR_Checker_checkVar___closed__2;
-return x_20;
+obj* x_23; 
+x_23 = l_Lean_IR_Checker_checkVar___closed__2;
+return x_23;
 }
 }
 }
 }
+obj* _init_l_Lean_IR_Checker_checkFullApp___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("incorrect number of arguments to '");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_Checker_checkFullApp___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("', ");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_Checker_checkFullApp___closed__3() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string(" provided, ");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_Checker_checkFullApp___closed__4() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string(" expected");
+return x_0;
+}
+}
+obj* l_Lean_IR_Checker_checkFullApp(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_4; 
+lean::inc(x_0);
+x_4 = l_Lean_IR_Checker_getDecl(x_0, x_2);
+if (lean::obj_tag(x_4) == 0)
+{
+obj* x_7; obj* x_9; obj* x_10; 
+lean::dec(x_0);
+lean::dec(x_2);
+x_7 = lean::cnstr_get(x_4, 0);
+if (lean::is_exclusive(x_4)) {
+ x_9 = x_4;
+} else {
+ lean::inc(x_7);
+ lean::dec(x_4);
+ x_9 = lean::box(0);
+}
+if (lean::is_scalar(x_9)) {
+ x_10 = lean::alloc_cnstr(0, 1, 0);
+} else {
+ x_10 = x_9;
+}
+lean::cnstr_set(x_10, 0, x_7);
+return x_10;
+}
+else
+{
+obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; uint8 x_19; 
+x_11 = lean::cnstr_get(x_4, 0);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_set(x_4, 0, lean::box(0));
+ x_13 = x_4;
+} else {
+ lean::inc(x_11);
+ lean::dec(x_4);
+ x_13 = lean::box(0);
+}
+x_14 = lean::array_get_size(x_1);
+x_15 = l_Lean_IR_Decl_params___main(x_11);
+lean::dec(x_11);
+x_17 = lean::array_get_size(x_15);
+lean::dec(x_15);
+x_19 = lean::nat_dec_eq(x_14, x_17);
+if (x_19 == 0)
+{
+obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_36; obj* x_37; obj* x_38; 
+lean::dec(x_2);
+x_21 = l_Lean_Name_toString___closed__1;
+x_22 = l_Lean_Name_toStringWithSep___main(x_21, x_0);
+x_23 = l_Lean_IR_Checker_checkFullApp___closed__1;
+x_24 = lean::string_append(x_23, x_22);
+lean::dec(x_22);
+x_26 = l_Lean_IR_Checker_checkFullApp___closed__2;
+x_27 = lean::string_append(x_24, x_26);
+x_28 = l_Nat_repr(x_14);
+x_29 = lean::string_append(x_27, x_28);
+lean::dec(x_28);
+x_31 = l_Lean_IR_Checker_checkFullApp___closed__3;
+x_32 = lean::string_append(x_29, x_31);
+x_33 = l_Nat_repr(x_17);
+x_34 = lean::string_append(x_32, x_33);
+lean::dec(x_33);
+x_36 = l_Lean_IR_Checker_checkFullApp___closed__4;
+x_37 = lean::string_append(x_34, x_36);
+if (lean::is_scalar(x_13)) {
+ x_38 = lean::alloc_cnstr(0, 1, 0);
+} else {
+ x_38 = x_13;
+ lean::cnstr_set_tag(x_13, 0);
+}
+lean::cnstr_set(x_38, 0, x_37);
+return x_38;
+}
+else
+{
+obj* x_43; obj* x_44; 
+lean::dec(x_13);
+lean::dec(x_0);
+lean::dec(x_14);
+lean::dec(x_17);
+x_43 = lean::mk_nat_obj(0ul);
+x_44 = l_Array_mforAux___main___at_Lean_IR_Checker_checkArgs___spec__1(x_1, x_43, x_2);
+return x_44;
+}
+}
+}
+}
+obj* l_Lean_IR_Checker_checkFullApp___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_Checker_checkFullApp(x_0, x_1, x_2);
+lean::dec(x_1);
+return x_3;
+}
+}
+obj* _init_l_Lean_IR_Checker_checkPartialApp___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("too many arguments too partial application '");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_Checker_checkPartialApp___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("', num. args: ");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_Checker_checkPartialApp___closed__3() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string(", arity: ");
+return x_0;
+}
+}
+obj* l_Lean_IR_Checker_checkPartialApp(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_4; 
+lean::inc(x_0);
+x_4 = l_Lean_IR_Checker_getDecl(x_0, x_2);
+if (lean::obj_tag(x_4) == 0)
+{
+obj* x_7; obj* x_9; obj* x_10; 
+lean::dec(x_0);
+lean::dec(x_2);
+x_7 = lean::cnstr_get(x_4, 0);
+if (lean::is_exclusive(x_4)) {
+ x_9 = x_4;
+} else {
+ lean::inc(x_7);
+ lean::dec(x_4);
+ x_9 = lean::box(0);
+}
+if (lean::is_scalar(x_9)) {
+ x_10 = lean::alloc_cnstr(0, 1, 0);
+} else {
+ x_10 = x_9;
+}
+lean::cnstr_set(x_10, 0, x_7);
+return x_10;
+}
+else
+{
+obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_17; uint8 x_19; 
+x_11 = lean::cnstr_get(x_4, 0);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_set(x_4, 0, lean::box(0));
+ x_13 = x_4;
+} else {
+ lean::inc(x_11);
+ lean::dec(x_4);
+ x_13 = lean::box(0);
+}
+x_14 = lean::array_get_size(x_1);
+x_15 = l_Lean_IR_Decl_params___main(x_11);
+lean::dec(x_11);
+x_17 = lean::array_get_size(x_15);
+lean::dec(x_15);
+x_19 = lean::nat_dec_lt(x_14, x_17);
+if (x_19 == 0)
+{
+obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_36; 
+lean::dec(x_2);
+x_21 = l_Lean_Name_toString___closed__1;
+x_22 = l_Lean_Name_toStringWithSep___main(x_21, x_0);
+x_23 = l_Lean_IR_Checker_checkPartialApp___closed__1;
+x_24 = lean::string_append(x_23, x_22);
+lean::dec(x_22);
+x_26 = l_Lean_IR_Checker_checkPartialApp___closed__2;
+x_27 = lean::string_append(x_24, x_26);
+x_28 = l_Nat_repr(x_14);
+x_29 = lean::string_append(x_27, x_28);
+lean::dec(x_28);
+x_31 = l_Lean_IR_Checker_checkPartialApp___closed__3;
+x_32 = lean::string_append(x_29, x_31);
+x_33 = l_Nat_repr(x_17);
+x_34 = lean::string_append(x_32, x_33);
+lean::dec(x_33);
+if (lean::is_scalar(x_13)) {
+ x_36 = lean::alloc_cnstr(0, 1, 0);
+} else {
+ x_36 = x_13;
+ lean::cnstr_set_tag(x_13, 0);
+}
+lean::cnstr_set(x_36, 0, x_34);
+return x_36;
+}
+else
+{
+obj* x_41; obj* x_42; 
+lean::dec(x_13);
+lean::dec(x_0);
+lean::dec(x_14);
+lean::dec(x_17);
+x_41 = lean::mk_nat_obj(0ul);
+x_42 = l_Array_mforAux___main___at_Lean_IR_Checker_checkArgs___spec__1(x_1, x_41, x_2);
+return x_42;
+}
+}
+}
+}
+obj* l_Lean_IR_Checker_checkPartialApp___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_Checker_checkPartialApp(x_0, x_1, x_2);
+lean::dec(x_1);
+return x_3;
+}
+}
 obj* l_Lean_IR_Checker_checkExpr___main(uint8 x_0, obj* x_1, obj* x_2) {
 _start:
 {
@@ -589,116 +917,125 @@ return x_22;
 }
 }
 }
-case 1:
-{
-obj* x_24; obj* x_28; 
-x_24 = lean::cnstr_get(x_1, 0);
-lean::inc(x_24);
-lean::dec(x_1);
-lean::inc(x_2);
-x_28 = l_Lean_IR_Checker_checkObjVar(x_24, x_2);
-if (lean::obj_tag(x_28) == 0)
-{
-obj* x_30; obj* x_32; obj* x_33; 
-lean::dec(x_2);
-x_30 = lean::cnstr_get(x_28, 0);
-if (lean::is_exclusive(x_28)) {
- x_32 = x_28;
-} else {
- lean::inc(x_30);
- lean::dec(x_28);
- x_32 = lean::box(0);
-}
-if (lean::is_scalar(x_32)) {
- x_33 = lean::alloc_cnstr(0, 1, 0);
-} else {
- x_33 = x_32;
-}
-lean::cnstr_set(x_33, 0, x_30);
-return x_33;
-}
-else
-{
-obj* x_35; 
-lean::dec(x_28);
-x_35 = l_Lean_IR_Checker_checkObjType(x_0, x_2);
-lean::dec(x_2);
-return x_35;
-}
-}
 case 2:
 {
-obj* x_37; obj* x_39; obj* x_43; 
-x_37 = lean::cnstr_get(x_1, 0);
-lean::inc(x_37);
-x_39 = lean::cnstr_get(x_1, 2);
-lean::inc(x_39);
+obj* x_24; obj* x_26; obj* x_30; 
+x_24 = lean::cnstr_get(x_1, 0);
+lean::inc(x_24);
+x_26 = lean::cnstr_get(x_1, 2);
+lean::inc(x_26);
 lean::dec(x_1);
 lean::inc(x_2);
-x_43 = l_Lean_IR_Checker_checkObjVar(x_37, x_2);
-if (lean::obj_tag(x_43) == 0)
+x_30 = l_Lean_IR_Checker_checkObjVar(x_24, x_2);
+if (lean::obj_tag(x_30) == 0)
 {
-obj* x_46; obj* x_48; obj* x_49; 
-lean::dec(x_39);
+obj* x_33; obj* x_35; obj* x_36; 
 lean::dec(x_2);
-x_46 = lean::cnstr_get(x_43, 0);
-if (lean::is_exclusive(x_43)) {
- x_48 = x_43;
+lean::dec(x_26);
+x_33 = lean::cnstr_get(x_30, 0);
+if (lean::is_exclusive(x_30)) {
+ x_35 = x_30;
 } else {
- lean::inc(x_46);
- lean::dec(x_43);
- x_48 = lean::box(0);
+ lean::inc(x_33);
+ lean::dec(x_30);
+ x_35 = lean::box(0);
 }
-if (lean::is_scalar(x_48)) {
- x_49 = lean::alloc_cnstr(0, 1, 0);
+if (lean::is_scalar(x_35)) {
+ x_36 = lean::alloc_cnstr(0, 1, 0);
 } else {
- x_49 = x_48;
+ x_36 = x_35;
 }
-lean::cnstr_set(x_49, 0, x_46);
-return x_49;
+lean::cnstr_set(x_36, 0, x_33);
+return x_36;
 }
 else
 {
-obj* x_51; obj* x_53; 
-lean::dec(x_43);
-x_51 = lean::mk_nat_obj(0ul);
+obj* x_38; obj* x_40; 
+lean::dec(x_30);
+x_38 = lean::mk_nat_obj(0ul);
 lean::inc(x_2);
-x_53 = l_Array_mforAux___main___at_Lean_IR_Checker_checkArgs___spec__1(x_39, x_51, x_2);
-lean::dec(x_39);
+x_40 = l_Array_mforAux___main___at_Lean_IR_Checker_checkArgs___spec__1(x_26, x_38, x_2);
+lean::dec(x_26);
+if (lean::obj_tag(x_40) == 0)
+{
+obj* x_43; obj* x_45; obj* x_46; 
+lean::dec(x_2);
+x_43 = lean::cnstr_get(x_40, 0);
+if (lean::is_exclusive(x_40)) {
+ x_45 = x_40;
+} else {
+ lean::inc(x_43);
+ lean::dec(x_40);
+ x_45 = lean::box(0);
+}
+if (lean::is_scalar(x_45)) {
+ x_46 = lean::alloc_cnstr(0, 1, 0);
+} else {
+ x_46 = x_45;
+}
+lean::cnstr_set(x_46, 0, x_43);
+return x_46;
+}
+else
+{
+obj* x_48; 
+lean::dec(x_40);
+x_48 = l_Lean_IR_Checker_checkObjType(x_0, x_2);
+lean::dec(x_2);
+return x_48;
+}
+}
+}
+case 4:
+{
+obj* x_50; obj* x_53; 
+x_50 = lean::cnstr_get(x_1, 1);
+lean::inc(x_50);
+lean::dec(x_1);
+x_53 = l_Lean_IR_Checker_checkObjVar(x_50, x_2);
 if (lean::obj_tag(x_53) == 0)
 {
-obj* x_56; obj* x_58; obj* x_59; 
-lean::dec(x_2);
-x_56 = lean::cnstr_get(x_53, 0);
+obj* x_54; obj* x_56; obj* x_57; 
+x_54 = lean::cnstr_get(x_53, 0);
 if (lean::is_exclusive(x_53)) {
- x_58 = x_53;
+ x_56 = x_53;
 } else {
- lean::inc(x_56);
+ lean::inc(x_54);
  lean::dec(x_53);
- x_58 = lean::box(0);
+ x_56 = lean::box(0);
 }
-if (lean::is_scalar(x_58)) {
- x_59 = lean::alloc_cnstr(0, 1, 0);
+if (lean::is_scalar(x_56)) {
+ x_57 = lean::alloc_cnstr(0, 1, 0);
 } else {
- x_59 = x_58;
+ x_57 = x_56;
 }
-lean::cnstr_set(x_59, 0, x_56);
-return x_59;
+lean::cnstr_set(x_57, 0, x_54);
+return x_57;
 }
 else
 {
-obj* x_61; 
+uint8 x_59; uint8 x_60; 
 lean::dec(x_53);
-x_61 = l_Lean_IR_Checker_checkObjType(x_0, x_2);
-lean::dec(x_2);
+x_59 = 5;
+x_60 = l_Lean_IR_IRType_beq___main(x_0, x_59);
+if (x_60 == 0)
+{
+obj* x_61; 
+x_61 = l_Lean_IR_Checker_checkType___closed__1;
 return x_61;
 }
+else
+{
+obj* x_62; 
+x_62 = l_Lean_IR_Checker_checkVar___closed__2;
+return x_62;
 }
 }
-case 3:
+}
+case 5:
 {
 obj* x_63; obj* x_67; 
-x_63 = lean::cnstr_get(x_1, 1);
+x_63 = lean::cnstr_get(x_1, 2);
 lean::inc(x_63);
 lean::dec(x_1);
 lean::inc(x_2);
@@ -727,294 +1064,217 @@ else
 {
 obj* x_74; 
 lean::dec(x_67);
-x_74 = l_Lean_IR_Checker_checkObjType(x_0, x_2);
+x_74 = l_Lean_IR_Checker_checkScalarType(x_0, x_2);
 lean::dec(x_2);
 return x_74;
 }
 }
-case 4:
-{
-obj* x_76; obj* x_79; 
-x_76 = lean::cnstr_get(x_1, 1);
-lean::inc(x_76);
-lean::dec(x_1);
-x_79 = l_Lean_IR_Checker_checkObjVar(x_76, x_2);
-if (lean::obj_tag(x_79) == 0)
-{
-obj* x_80; obj* x_82; obj* x_83; 
-x_80 = lean::cnstr_get(x_79, 0);
-if (lean::is_exclusive(x_79)) {
- x_82 = x_79;
-} else {
- lean::inc(x_80);
- lean::dec(x_79);
- x_82 = lean::box(0);
-}
-if (lean::is_scalar(x_82)) {
- x_83 = lean::alloc_cnstr(0, 1, 0);
-} else {
- x_83 = x_82;
-}
-lean::cnstr_set(x_83, 0, x_80);
-return x_83;
-}
-else
-{
-uint8 x_85; uint8 x_86; 
-lean::dec(x_79);
-x_85 = 5;
-x_86 = l_Lean_IR_IRType_beq___main(x_0, x_85);
-if (x_86 == 0)
-{
-obj* x_87; 
-x_87 = l_Lean_IR_Checker_checkType___closed__1;
-return x_87;
-}
-else
-{
-obj* x_88; 
-x_88 = l_Lean_IR_Checker_checkVar___closed__2;
-return x_88;
-}
-}
-}
-case 5:
-{
-obj* x_89; obj* x_93; 
-x_89 = lean::cnstr_get(x_1, 2);
-lean::inc(x_89);
-lean::dec(x_1);
-lean::inc(x_2);
-x_93 = l_Lean_IR_Checker_checkObjVar(x_89, x_2);
-if (lean::obj_tag(x_93) == 0)
-{
-obj* x_95; obj* x_97; obj* x_98; 
-lean::dec(x_2);
-x_95 = lean::cnstr_get(x_93, 0);
-if (lean::is_exclusive(x_93)) {
- x_97 = x_93;
-} else {
- lean::inc(x_95);
- lean::dec(x_93);
- x_97 = lean::box(0);
-}
-if (lean::is_scalar(x_97)) {
- x_98 = lean::alloc_cnstr(0, 1, 0);
-} else {
- x_98 = x_97;
-}
-lean::cnstr_set(x_98, 0, x_95);
-return x_98;
-}
-else
-{
-obj* x_100; 
-lean::dec(x_93);
-x_100 = l_Lean_IR_Checker_checkScalarType(x_0, x_2);
-lean::dec(x_2);
-return x_100;
-}
-}
 case 6:
 {
-obj* x_102; obj* x_105; obj* x_106; 
-x_102 = lean::cnstr_get(x_1, 1);
-lean::inc(x_102);
+obj* x_76; obj* x_78; obj* x_81; 
+x_76 = lean::cnstr_get(x_1, 0);
+lean::inc(x_76);
+x_78 = lean::cnstr_get(x_1, 1);
+lean::inc(x_78);
 lean::dec(x_1);
-x_105 = lean::mk_nat_obj(0ul);
-x_106 = l_Array_mforAux___main___at_Lean_IR_Checker_checkArgs___spec__1(x_102, x_105, x_2);
-lean::dec(x_102);
-return x_106;
+x_81 = l_Lean_IR_Checker_checkFullApp(x_76, x_78, x_2);
+lean::dec(x_78);
+return x_81;
 }
 case 7:
 {
-obj* x_108; obj* x_111; 
-x_108 = lean::cnstr_get(x_1, 1);
-lean::inc(x_108);
+obj* x_83; obj* x_85; obj* x_89; 
+x_83 = lean::cnstr_get(x_1, 0);
+lean::inc(x_83);
+x_85 = lean::cnstr_get(x_1, 1);
+lean::inc(x_85);
 lean::dec(x_1);
-x_111 = l_Lean_IR_Checker_checkObjType(x_0, x_2);
-if (lean::obj_tag(x_111) == 0)
+lean::inc(x_2);
+x_89 = l_Lean_IR_Checker_checkPartialApp(x_83, x_85, x_2);
+lean::dec(x_85);
+if (lean::obj_tag(x_89) == 0)
 {
-obj* x_114; obj* x_116; obj* x_117; 
-lean::dec(x_108);
+obj* x_92; obj* x_94; obj* x_95; 
 lean::dec(x_2);
-x_114 = lean::cnstr_get(x_111, 0);
-if (lean::is_exclusive(x_111)) {
- x_116 = x_111;
+x_92 = lean::cnstr_get(x_89, 0);
+if (lean::is_exclusive(x_89)) {
+ x_94 = x_89;
 } else {
- lean::inc(x_114);
- lean::dec(x_111);
- x_116 = lean::box(0);
+ lean::inc(x_92);
+ lean::dec(x_89);
+ x_94 = lean::box(0);
 }
-if (lean::is_scalar(x_116)) {
- x_117 = lean::alloc_cnstr(0, 1, 0);
+if (lean::is_scalar(x_94)) {
+ x_95 = lean::alloc_cnstr(0, 1, 0);
 } else {
- x_117 = x_116;
+ x_95 = x_94;
 }
-lean::cnstr_set(x_117, 0, x_114);
-return x_117;
+lean::cnstr_set(x_95, 0, x_92);
+return x_95;
 }
 else
 {
-obj* x_119; obj* x_120; 
-lean::dec(x_111);
-x_119 = lean::mk_nat_obj(0ul);
-x_120 = l_Array_mforAux___main___at_Lean_IR_Checker_checkArgs___spec__1(x_108, x_119, x_2);
-lean::dec(x_108);
-return x_120;
+obj* x_97; 
+lean::dec(x_89);
+x_97 = l_Lean_IR_Checker_checkObjType(x_0, x_2);
+lean::dec(x_2);
+return x_97;
 }
 }
 case 8:
 {
-obj* x_122; obj* x_124; obj* x_128; 
-x_122 = lean::cnstr_get(x_1, 0);
-lean::inc(x_122);
-x_124 = lean::cnstr_get(x_1, 1);
-lean::inc(x_124);
+obj* x_99; obj* x_101; obj* x_105; 
+x_99 = lean::cnstr_get(x_1, 0);
+lean::inc(x_99);
+x_101 = lean::cnstr_get(x_1, 1);
+lean::inc(x_101);
 lean::dec(x_1);
 lean::inc(x_2);
-x_128 = l_Lean_IR_Checker_checkObjVar(x_122, x_2);
-if (lean::obj_tag(x_128) == 0)
+x_105 = l_Lean_IR_Checker_checkObjVar(x_99, x_2);
+if (lean::obj_tag(x_105) == 0)
 {
-obj* x_131; obj* x_133; obj* x_134; 
-lean::dec(x_124);
+obj* x_108; obj* x_110; obj* x_111; 
+lean::dec(x_101);
 lean::dec(x_2);
-x_131 = lean::cnstr_get(x_128, 0);
-if (lean::is_exclusive(x_128)) {
- x_133 = x_128;
+x_108 = lean::cnstr_get(x_105, 0);
+if (lean::is_exclusive(x_105)) {
+ x_110 = x_105;
 } else {
- lean::inc(x_131);
- lean::dec(x_128);
- x_133 = lean::box(0);
+ lean::inc(x_108);
+ lean::dec(x_105);
+ x_110 = lean::box(0);
 }
-if (lean::is_scalar(x_133)) {
- x_134 = lean::alloc_cnstr(0, 1, 0);
+if (lean::is_scalar(x_110)) {
+ x_111 = lean::alloc_cnstr(0, 1, 0);
 } else {
- x_134 = x_133;
+ x_111 = x_110;
 }
-lean::cnstr_set(x_134, 0, x_131);
-return x_134;
+lean::cnstr_set(x_111, 0, x_108);
+return x_111;
 }
 else
 {
-obj* x_136; obj* x_137; 
-lean::dec(x_128);
-x_136 = lean::mk_nat_obj(0ul);
-x_137 = l_Array_mforAux___main___at_Lean_IR_Checker_checkArgs___spec__1(x_124, x_136, x_2);
-lean::dec(x_124);
-return x_137;
+obj* x_113; obj* x_114; 
+lean::dec(x_105);
+x_113 = lean::mk_nat_obj(0ul);
+x_114 = l_Array_mforAux___main___at_Lean_IR_Checker_checkArgs___spec__1(x_101, x_113, x_2);
+lean::dec(x_101);
+return x_114;
 }
 }
 case 9:
 {
-uint8 x_139; obj* x_140; obj* x_143; 
-x_139 = lean::cnstr_get_scalar<uint8>(x_1, sizeof(void*)*1);
-x_140 = lean::cnstr_get(x_1, 0);
-lean::inc(x_140);
+uint8 x_116; obj* x_117; obj* x_120; 
+x_116 = lean::cnstr_get_scalar<uint8>(x_1, sizeof(void*)*1);
+x_117 = lean::cnstr_get(x_1, 0);
+lean::inc(x_117);
 lean::dec(x_1);
-x_143 = l_Lean_IR_Checker_checkObjType(x_0, x_2);
-if (lean::obj_tag(x_143) == 0)
+x_120 = l_Lean_IR_Checker_checkObjType(x_0, x_2);
+if (lean::obj_tag(x_120) == 0)
 {
-obj* x_146; obj* x_148; obj* x_149; 
+obj* x_123; obj* x_125; obj* x_126; 
+lean::dec(x_117);
 lean::dec(x_2);
-lean::dec(x_140);
-x_146 = lean::cnstr_get(x_143, 0);
-if (lean::is_exclusive(x_143)) {
- x_148 = x_143;
+x_123 = lean::cnstr_get(x_120, 0);
+if (lean::is_exclusive(x_120)) {
+ x_125 = x_120;
 } else {
- lean::inc(x_146);
- lean::dec(x_143);
- x_148 = lean::box(0);
+ lean::inc(x_123);
+ lean::dec(x_120);
+ x_125 = lean::box(0);
 }
-if (lean::is_scalar(x_148)) {
- x_149 = lean::alloc_cnstr(0, 1, 0);
+if (lean::is_scalar(x_125)) {
+ x_126 = lean::alloc_cnstr(0, 1, 0);
 } else {
- x_149 = x_148;
+ x_126 = x_125;
 }
-lean::cnstr_set(x_149, 0, x_146);
-return x_149;
+lean::cnstr_set(x_126, 0, x_123);
+return x_126;
 }
 else
 {
-obj* x_153; 
-lean::dec(x_143);
+obj* x_130; 
+lean::dec(x_120);
 lean::inc(x_2);
-lean::inc(x_140);
-x_153 = l_Lean_IR_Checker_checkScalarVar(x_140, x_2);
-if (lean::obj_tag(x_153) == 0)
+lean::inc(x_117);
+x_130 = l_Lean_IR_Checker_checkScalarVar(x_117, x_2);
+if (lean::obj_tag(x_130) == 0)
 {
-obj* x_156; obj* x_158; obj* x_159; 
+obj* x_133; obj* x_135; obj* x_136; 
+lean::dec(x_117);
 lean::dec(x_2);
-lean::dec(x_140);
-x_156 = lean::cnstr_get(x_153, 0);
-if (lean::is_exclusive(x_153)) {
- x_158 = x_153;
+x_133 = lean::cnstr_get(x_130, 0);
+if (lean::is_exclusive(x_130)) {
+ x_135 = x_130;
 } else {
- lean::inc(x_156);
- lean::dec(x_153);
- x_158 = lean::box(0);
+ lean::inc(x_133);
+ lean::dec(x_130);
+ x_135 = lean::box(0);
 }
-if (lean::is_scalar(x_158)) {
- x_159 = lean::alloc_cnstr(0, 1, 0);
+if (lean::is_scalar(x_135)) {
+ x_136 = lean::alloc_cnstr(0, 1, 0);
 } else {
- x_159 = x_158;
+ x_136 = x_135;
 }
-lean::cnstr_set(x_159, 0, x_156);
+lean::cnstr_set(x_136, 0, x_133);
+return x_136;
+}
+else
+{
+obj* x_137; obj* x_138; obj* x_141; 
+if (lean::is_exclusive(x_130)) {
+ lean::cnstr_release(x_130, 0);
+ x_137 = x_130;
+} else {
+ lean::dec(x_130);
+ x_137 = lean::box(0);
+}
+x_138 = lean::cnstr_get(x_2, 1);
+lean::inc(x_138);
+lean::dec(x_2);
+x_141 = l_Lean_IR_LocalContext_getType(x_138, x_117);
+if (lean::obj_tag(x_141) == 0)
+{
+obj* x_142; obj* x_143; obj* x_144; obj* x_146; obj* x_147; obj* x_149; obj* x_150; obj* x_151; 
+x_142 = l_Nat_repr(x_117);
+x_143 = l_Lean_IR_VarId_HasToString___closed__1;
+x_144 = lean::string_append(x_143, x_142);
+lean::dec(x_142);
+x_146 = l_Lean_IR_Checker_checkVar___closed__1;
+x_147 = lean::string_append(x_146, x_144);
+lean::dec(x_144);
+x_149 = l_Char_HasRepr___closed__1;
+x_150 = lean::string_append(x_147, x_149);
+if (lean::is_scalar(x_137)) {
+ x_151 = lean::alloc_cnstr(0, 1, 0);
+} else {
+ x_151 = x_137;
+ lean::cnstr_set_tag(x_137, 0);
+}
+lean::cnstr_set(x_151, 0, x_150);
+return x_151;
+}
+else
+{
+obj* x_154; uint8 x_157; uint8 x_158; 
+lean::dec(x_117);
+lean::dec(x_137);
+x_154 = lean::cnstr_get(x_141, 0);
+lean::inc(x_154);
+lean::dec(x_141);
+x_157 = lean::unbox(x_154);
+x_158 = l_Lean_IR_IRType_beq___main(x_157, x_116);
+if (x_158 == 0)
+{
+obj* x_159; 
+x_159 = l_Lean_IR_Checker_checkType___closed__1;
 return x_159;
 }
 else
 {
-obj* x_160; obj* x_161; 
-if (lean::is_exclusive(x_153)) {
- lean::cnstr_release(x_153, 0);
- x_160 = x_153;
-} else {
- lean::dec(x_153);
- x_160 = lean::box(0);
-}
-x_161 = l_Lean_IR_LocalContext_getType(x_2, x_140);
-if (lean::obj_tag(x_161) == 0)
-{
-obj* x_162; obj* x_163; obj* x_164; obj* x_166; obj* x_167; obj* x_169; obj* x_170; obj* x_171; 
-x_162 = l_Nat_repr(x_140);
-x_163 = l_Lean_IR_VarId_HasToString___closed__1;
-x_164 = lean::string_append(x_163, x_162);
-lean::dec(x_162);
-x_166 = l_Lean_IR_Checker_checkVar___closed__1;
-x_167 = lean::string_append(x_166, x_164);
-lean::dec(x_164);
-x_169 = l_Char_HasRepr___closed__1;
-x_170 = lean::string_append(x_167, x_169);
-if (lean::is_scalar(x_160)) {
- x_171 = lean::alloc_cnstr(0, 1, 0);
-} else {
- x_171 = x_160;
- lean::cnstr_set_tag(x_160, 0);
-}
-lean::cnstr_set(x_171, 0, x_170);
-return x_171;
-}
-else
-{
-obj* x_174; uint8 x_177; uint8 x_178; 
-lean::dec(x_140);
-lean::dec(x_160);
-x_174 = lean::cnstr_get(x_161, 0);
-lean::inc(x_174);
-lean::dec(x_161);
-x_177 = lean::unbox(x_174);
-x_178 = l_Lean_IR_IRType_beq___main(x_177, x_139);
-if (x_178 == 0)
-{
-obj* x_179; 
-x_179 = l_Lean_IR_Checker_checkType___closed__1;
-return x_179;
-}
-else
-{
-obj* x_180; 
-x_180 = l_Lean_IR_Checker_checkVar___closed__2;
-return x_180;
+obj* x_160; 
+x_160 = l_Lean_IR_Checker_checkVar___closed__2;
+return x_160;
 }
 }
 }
@@ -1022,107 +1282,190 @@ return x_180;
 }
 case 10:
 {
-obj* x_181; obj* x_184; 
-x_181 = lean::cnstr_get(x_1, 0);
-lean::inc(x_181);
+obj* x_161; obj* x_164; 
+x_161 = lean::cnstr_get(x_1, 0);
+lean::inc(x_161);
 lean::dec(x_1);
-x_184 = l_Lean_IR_Checker_checkScalarType(x_0, x_2);
-if (lean::obj_tag(x_184) == 0)
+x_164 = l_Lean_IR_Checker_checkScalarType(x_0, x_2);
+if (lean::obj_tag(x_164) == 0)
 {
-obj* x_187; obj* x_189; obj* x_190; 
-lean::dec(x_181);
+obj* x_167; obj* x_169; obj* x_170; 
+lean::dec(x_161);
 lean::dec(x_2);
-x_187 = lean::cnstr_get(x_184, 0);
-if (lean::is_exclusive(x_184)) {
- x_189 = x_184;
+x_167 = lean::cnstr_get(x_164, 0);
+if (lean::is_exclusive(x_164)) {
+ x_169 = x_164;
 } else {
- lean::inc(x_187);
- lean::dec(x_184);
- x_189 = lean::box(0);
+ lean::inc(x_167);
+ lean::dec(x_164);
+ x_169 = lean::box(0);
 }
-if (lean::is_scalar(x_189)) {
- x_190 = lean::alloc_cnstr(0, 1, 0);
+if (lean::is_scalar(x_169)) {
+ x_170 = lean::alloc_cnstr(0, 1, 0);
 } else {
- x_190 = x_189;
+ x_170 = x_169;
 }
-lean::cnstr_set(x_190, 0, x_187);
-return x_190;
+lean::cnstr_set(x_170, 0, x_167);
+return x_170;
 }
 else
 {
-obj* x_192; 
-lean::dec(x_184);
-x_192 = l_Lean_IR_Checker_checkObjVar(x_181, x_2);
-return x_192;
+obj* x_172; 
+lean::dec(x_164);
+x_172 = l_Lean_IR_Checker_checkObjVar(x_161, x_2);
+return x_172;
 }
 }
 case 11:
 {
-obj* x_193; 
-x_193 = lean::cnstr_get(x_1, 0);
-lean::inc(x_193);
+obj* x_173; 
+x_173 = lean::cnstr_get(x_1, 0);
+lean::inc(x_173);
 lean::dec(x_1);
-if (lean::obj_tag(x_193) == 0)
+if (lean::obj_tag(x_173) == 0)
 {
-obj* x_198; 
-lean::dec(x_193);
+obj* x_178; 
+lean::dec(x_173);
 lean::dec(x_2);
-x_198 = l_Lean_IR_Checker_checkVar___closed__2;
-return x_198;
+x_178 = l_Lean_IR_Checker_checkVar___closed__2;
+return x_178;
 }
 else
 {
-obj* x_200; 
-lean::dec(x_193);
-x_200 = l_Lean_IR_Checker_checkObjType(x_0, x_2);
+obj* x_180; 
+lean::dec(x_173);
+x_180 = l_Lean_IR_Checker_checkObjType(x_0, x_2);
 lean::dec(x_2);
-return x_200;
+return x_180;
+}
+}
+case 12:
+{
+obj* x_182; obj* x_185; 
+x_182 = lean::cnstr_get(x_1, 0);
+lean::inc(x_182);
+lean::dec(x_1);
+x_185 = l_Lean_IR_Checker_checkObjVar(x_182, x_2);
+if (lean::obj_tag(x_185) == 0)
+{
+obj* x_186; obj* x_188; obj* x_189; 
+x_186 = lean::cnstr_get(x_185, 0);
+if (lean::is_exclusive(x_185)) {
+ x_188 = x_185;
+} else {
+ lean::inc(x_186);
+ lean::dec(x_185);
+ x_188 = lean::box(0);
+}
+if (lean::is_scalar(x_188)) {
+ x_189 = lean::alloc_cnstr(0, 1, 0);
+} else {
+ x_189 = x_188;
+}
+lean::cnstr_set(x_189, 0, x_186);
+return x_189;
+}
+else
+{
+uint8 x_191; uint8 x_192; 
+lean::dec(x_185);
+x_191 = 1;
+x_192 = l_Lean_IR_IRType_beq___main(x_0, x_191);
+if (x_192 == 0)
+{
+obj* x_193; 
+x_193 = l_Lean_IR_Checker_checkType___closed__1;
+return x_193;
+}
+else
+{
+obj* x_194; 
+x_194 = l_Lean_IR_Checker_checkVar___closed__2;
+return x_194;
+}
+}
+}
+case 13:
+{
+obj* x_195; obj* x_198; 
+x_195 = lean::cnstr_get(x_1, 0);
+lean::inc(x_195);
+lean::dec(x_1);
+x_198 = l_Lean_IR_Checker_checkObjVar(x_195, x_2);
+if (lean::obj_tag(x_198) == 0)
+{
+obj* x_199; obj* x_201; obj* x_202; 
+x_199 = lean::cnstr_get(x_198, 0);
+if (lean::is_exclusive(x_198)) {
+ x_201 = x_198;
+} else {
+ lean::inc(x_199);
+ lean::dec(x_198);
+ x_201 = lean::box(0);
+}
+if (lean::is_scalar(x_201)) {
+ x_202 = lean::alloc_cnstr(0, 1, 0);
+} else {
+ x_202 = x_201;
+}
+lean::cnstr_set(x_202, 0, x_199);
+return x_202;
+}
+else
+{
+uint8 x_204; uint8 x_205; 
+lean::dec(x_198);
+x_204 = 1;
+x_205 = l_Lean_IR_IRType_beq___main(x_0, x_204);
+if (x_205 == 0)
+{
+obj* x_206; 
+x_206 = l_Lean_IR_Checker_checkType___closed__1;
+return x_206;
+}
+else
+{
+obj* x_207; 
+x_207 = l_Lean_IR_Checker_checkVar___closed__2;
+return x_207;
+}
 }
 }
 default:
 {
-obj* x_202; obj* x_205; 
-x_202 = lean::cnstr_get(x_1, 0);
-lean::inc(x_202);
+obj* x_208; obj* x_212; 
+x_208 = lean::cnstr_get(x_1, 1);
+lean::inc(x_208);
 lean::dec(x_1);
-x_205 = l_Lean_IR_Checker_checkObjVar(x_202, x_2);
-if (lean::obj_tag(x_205) == 0)
+lean::inc(x_2);
+x_212 = l_Lean_IR_Checker_checkObjVar(x_208, x_2);
+if (lean::obj_tag(x_212) == 0)
 {
-obj* x_206; obj* x_208; obj* x_209; 
-x_206 = lean::cnstr_get(x_205, 0);
-if (lean::is_exclusive(x_205)) {
- x_208 = x_205;
+obj* x_214; obj* x_216; obj* x_217; 
+lean::dec(x_2);
+x_214 = lean::cnstr_get(x_212, 0);
+if (lean::is_exclusive(x_212)) {
+ x_216 = x_212;
 } else {
- lean::inc(x_206);
- lean::dec(x_205);
- x_208 = lean::box(0);
+ lean::inc(x_214);
+ lean::dec(x_212);
+ x_216 = lean::box(0);
 }
-if (lean::is_scalar(x_208)) {
- x_209 = lean::alloc_cnstr(0, 1, 0);
+if (lean::is_scalar(x_216)) {
+ x_217 = lean::alloc_cnstr(0, 1, 0);
 } else {
- x_209 = x_208;
+ x_217 = x_216;
 }
-lean::cnstr_set(x_209, 0, x_206);
-return x_209;
+lean::cnstr_set(x_217, 0, x_214);
+return x_217;
 }
 else
 {
-uint8 x_211; uint8 x_212; 
-lean::dec(x_205);
-x_211 = 1;
-x_212 = l_Lean_IR_IRType_beq___main(x_0, x_211);
-if (x_212 == 0)
-{
-obj* x_213; 
-x_213 = l_Lean_IR_Checker_checkType___closed__1;
-return x_213;
-}
-else
-{
-obj* x_214; 
-x_214 = l_Lean_IR_Checker_checkVar___closed__2;
-return x_214;
-}
+obj* x_219; 
+lean::dec(x_212);
+x_219 = l_Lean_IR_Checker_checkObjType(x_0, x_2);
+lean::dec(x_2);
+return x_219;
 }
 }
 }
@@ -1214,39 +1557,63 @@ return x_24;
 obj* l_Lean_IR_Checker_withParams(obj* x_0, obj* x_1, obj* x_2) {
 _start:
 {
-obj* x_3; obj* x_5; 
-x_3 = lean::mk_nat_obj(0ul);
-lean::inc(x_2);
-x_5 = l_Array_miterateAux___main___at_Lean_IR_Checker_withParams___spec__1(x_0, x_0, x_3, x_2, x_2);
-lean::dec(x_2);
-if (lean::obj_tag(x_5) == 0)
+obj* x_3; obj* x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_11; 
+x_3 = lean::cnstr_get(x_2, 0);
+lean::inc(x_3);
+x_5 = lean::cnstr_get(x_2, 1);
+lean::inc(x_5);
+x_7 = lean::cnstr_get(x_2, 2);
+lean::inc(x_7);
+x_9 = lean::mk_nat_obj(0ul);
+x_10 = l_Array_miterateAux___main___at_Lean_IR_Checker_withParams___spec__1(x_0, x_0, x_9, x_5, x_2);
+if (lean::is_exclusive(x_2)) {
+ lean::cnstr_release(x_2, 0);
+ lean::cnstr_release(x_2, 1);
+ lean::cnstr_release(x_2, 2);
+ x_11 = x_2;
+} else {
+ lean::dec(x_2);
+ x_11 = lean::box(0);
+}
+if (lean::obj_tag(x_10) == 0)
 {
-obj* x_8; obj* x_10; obj* x_11; 
+obj* x_16; obj* x_18; obj* x_19; 
+lean::dec(x_7);
+lean::dec(x_11);
 lean::dec(x_1);
-x_8 = lean::cnstr_get(x_5, 0);
-if (lean::is_exclusive(x_5)) {
- x_10 = x_5;
+lean::dec(x_3);
+x_16 = lean::cnstr_get(x_10, 0);
+if (lean::is_exclusive(x_10)) {
+ x_18 = x_10;
 } else {
- lean::inc(x_8);
- lean::dec(x_5);
- x_10 = lean::box(0);
+ lean::inc(x_16);
+ lean::dec(x_10);
+ x_18 = lean::box(0);
 }
-if (lean::is_scalar(x_10)) {
- x_11 = lean::alloc_cnstr(0, 1, 0);
+if (lean::is_scalar(x_18)) {
+ x_19 = lean::alloc_cnstr(0, 1, 0);
 } else {
- x_11 = x_10;
+ x_19 = x_18;
 }
-lean::cnstr_set(x_11, 0, x_8);
-return x_11;
+lean::cnstr_set(x_19, 0, x_16);
+return x_19;
 }
 else
 {
-obj* x_12; obj* x_15; 
-x_12 = lean::cnstr_get(x_5, 0);
-lean::inc(x_12);
-lean::dec(x_5);
-x_15 = lean::apply_1(x_1, x_12);
-return x_15;
+obj* x_20; obj* x_23; obj* x_24; 
+x_20 = lean::cnstr_get(x_10, 0);
+lean::inc(x_20);
+lean::dec(x_10);
+if (lean::is_scalar(x_11)) {
+ x_23 = lean::alloc_cnstr(0, 3, 0);
+} else {
+ x_23 = x_11;
+}
+lean::cnstr_set(x_23, 0, x_3);
+lean::cnstr_set(x_23, 1, x_20);
+lean::cnstr_set(x_23, 2, x_7);
+x_24 = lean::apply_1(x_1, x_23);
+return x_24;
 }
 }
 }
@@ -1436,491 +1803,584 @@ return x_20;
 }
 else
 {
-uint8 x_23; 
+obj* x_22; obj* x_24; obj* x_26; obj* x_28; uint8 x_30; 
 lean::dec(x_12);
-lean::inc(x_1);
-x_23 = l_Lean_IR_LocalContext_contains(x_1, x_2);
-if (x_23 == 0)
+x_22 = lean::cnstr_get(x_1, 0);
+x_24 = lean::cnstr_get(x_1, 1);
+x_26 = lean::cnstr_get(x_1, 2);
+if (lean::is_exclusive(x_1)) {
+ lean::cnstr_set(x_1, 0, lean::box(0));
+ lean::cnstr_set(x_1, 1, lean::box(0));
+ lean::cnstr_set(x_1, 2, lean::box(0));
+ x_28 = x_1;
+} else {
+ lean::inc(x_22);
+ lean::inc(x_24);
+ lean::inc(x_26);
+ lean::dec(x_1);
+ x_28 = lean::box(0);
+}
+lean::inc(x_24);
+x_30 = l_Lean_IR_LocalContext_contains(x_24, x_2);
+if (x_30 == 0)
 {
-obj* x_24; 
-x_24 = l_Lean_IR_LocalContext_addLocal(x_1, x_2, x_4, x_5);
+obj* x_31; obj* x_32; 
+x_31 = l_Lean_IR_LocalContext_addLocal(x_24, x_2, x_4, x_5);
+if (lean::is_scalar(x_28)) {
+ x_32 = lean::alloc_cnstr(0, 3, 0);
+} else {
+ x_32 = x_28;
+}
+lean::cnstr_set(x_32, 0, x_22);
+lean::cnstr_set(x_32, 1, x_31);
+lean::cnstr_set(x_32, 2, x_26);
 x_0 = x_7;
-x_1 = x_24;
+x_1 = x_32;
 goto _start;
 }
 else
 {
-obj* x_30; 
+obj* x_41; 
 lean::dec(x_7);
 lean::dec(x_5);
-lean::dec(x_1);
+lean::dec(x_22);
 lean::dec(x_2);
-x_30 = l_Lean_IR_Checker_checkFnBody___main___closed__1;
-return x_30;
+lean::dec(x_28);
+lean::dec(x_24);
+lean::dec(x_26);
+x_41 = l_Lean_IR_Checker_checkFnBody___main___closed__1;
+return x_41;
 }
 }
 }
 case 1:
 {
-obj* x_31; obj* x_33; obj* x_35; obj* x_37; obj* x_40; obj* x_42; 
-x_31 = lean::cnstr_get(x_0, 0);
-lean::inc(x_31);
-x_33 = lean::cnstr_get(x_0, 1);
-lean::inc(x_33);
-x_35 = lean::cnstr_get(x_0, 2);
-lean::inc(x_35);
-x_37 = lean::cnstr_get(x_0, 3);
-lean::inc(x_37);
+obj* x_42; obj* x_44; obj* x_46; obj* x_48; obj* x_51; obj* x_53; obj* x_55; obj* x_57; obj* x_59; obj* x_60; 
+x_42 = lean::cnstr_get(x_0, 0);
+lean::inc(x_42);
+x_44 = lean::cnstr_get(x_0, 1);
+lean::inc(x_44);
+x_46 = lean::cnstr_get(x_0, 2);
+lean::inc(x_46);
+x_48 = lean::cnstr_get(x_0, 3);
+lean::inc(x_48);
 lean::dec(x_0);
-x_40 = lean::mk_nat_obj(0ul);
-lean::inc(x_1);
-x_42 = l_Array_miterateAux___main___at_Lean_IR_Checker_checkFnBody___main___spec__1(x_33, x_33, x_40, x_1, x_1);
-if (lean::obj_tag(x_42) == 0)
-{
-obj* x_48; obj* x_50; obj* x_51; 
-lean::dec(x_1);
-lean::dec(x_33);
-lean::dec(x_37);
-lean::dec(x_31);
-lean::dec(x_35);
-x_48 = lean::cnstr_get(x_42, 0);
-if (lean::is_exclusive(x_42)) {
- x_50 = x_42;
+x_51 = lean::cnstr_get(x_1, 0);
+lean::inc(x_51);
+x_53 = lean::cnstr_get(x_1, 1);
+lean::inc(x_53);
+x_55 = lean::cnstr_get(x_1, 2);
+lean::inc(x_55);
+x_57 = lean::mk_nat_obj(0ul);
+lean::inc(x_53);
+x_59 = l_Array_miterateAux___main___at_Lean_IR_Checker_checkFnBody___main___spec__1(x_44, x_44, x_57, x_53, x_1);
+if (lean::is_exclusive(x_1)) {
+ lean::cnstr_release(x_1, 0);
+ lean::cnstr_release(x_1, 1);
+ lean::cnstr_release(x_1, 2);
+ x_60 = x_1;
 } else {
- lean::inc(x_48);
- lean::dec(x_42);
- x_50 = lean::box(0);
+ lean::dec(x_1);
+ x_60 = lean::box(0);
 }
-if (lean::is_scalar(x_50)) {
- x_51 = lean::alloc_cnstr(0, 1, 0);
-} else {
- x_51 = x_50;
-}
-lean::cnstr_set(x_51, 0, x_48);
-return x_51;
-}
-else
+if (lean::obj_tag(x_59) == 0)
 {
-obj* x_52; obj* x_56; 
-x_52 = lean::cnstr_get(x_42, 0);
-lean::inc(x_52);
+obj* x_69; obj* x_71; obj* x_72; 
+lean::dec(x_51);
+lean::dec(x_53);
+lean::dec(x_55);
+lean::dec(x_48);
+lean::dec(x_60);
 lean::dec(x_42);
-lean::inc(x_35);
-x_56 = l_Lean_IR_Checker_checkFnBody___main(x_35, x_52);
-if (lean::obj_tag(x_56) == 0)
-{
-obj* x_62; obj* x_64; obj* x_65; 
-lean::dec(x_1);
-lean::dec(x_33);
-lean::dec(x_37);
-lean::dec(x_31);
-lean::dec(x_35);
-x_62 = lean::cnstr_get(x_56, 0);
-if (lean::is_exclusive(x_56)) {
- x_64 = x_56;
+lean::dec(x_44);
+lean::dec(x_46);
+x_69 = lean::cnstr_get(x_59, 0);
+if (lean::is_exclusive(x_59)) {
+ x_71 = x_59;
 } else {
- lean::inc(x_62);
- lean::dec(x_56);
- x_64 = lean::box(0);
+ lean::inc(x_69);
+ lean::dec(x_59);
+ x_71 = lean::box(0);
 }
-if (lean::is_scalar(x_64)) {
- x_65 = lean::alloc_cnstr(0, 1, 0);
+if (lean::is_scalar(x_71)) {
+ x_72 = lean::alloc_cnstr(0, 1, 0);
 } else {
- x_65 = x_64;
+ x_72 = x_71;
 }
-lean::cnstr_set(x_65, 0, x_62);
-return x_65;
+lean::cnstr_set(x_72, 0, x_69);
+return x_72;
 }
 else
 {
-uint8 x_68; 
-lean::dec(x_56);
-lean::inc(x_1);
-x_68 = l_Lean_IR_LocalContext_contains(x_1, x_31);
-if (x_68 == 0)
+obj* x_73; obj* x_78; obj* x_80; 
+x_73 = lean::cnstr_get(x_59, 0);
+lean::inc(x_73);
+lean::dec(x_59);
+lean::inc(x_55);
+lean::inc(x_51);
+if (lean::is_scalar(x_60)) {
+ x_78 = lean::alloc_cnstr(0, 3, 0);
+} else {
+ x_78 = x_60;
+}
+lean::cnstr_set(x_78, 0, x_51);
+lean::cnstr_set(x_78, 1, x_73);
+lean::cnstr_set(x_78, 2, x_55);
+lean::inc(x_46);
+x_80 = l_Lean_IR_Checker_checkFnBody___main(x_46, x_78);
+if (lean::obj_tag(x_80) == 0)
 {
-obj* x_69; 
-x_69 = l_Lean_IR_LocalContext_addJP(x_1, x_31, x_33, x_35);
-x_0 = x_37;
-x_1 = x_69;
+obj* x_88; obj* x_90; obj* x_91; 
+lean::dec(x_51);
+lean::dec(x_53);
+lean::dec(x_55);
+lean::dec(x_48);
+lean::dec(x_42);
+lean::dec(x_44);
+lean::dec(x_46);
+x_88 = lean::cnstr_get(x_80, 0);
+if (lean::is_exclusive(x_80)) {
+ x_90 = x_80;
+} else {
+ lean::inc(x_88);
+ lean::dec(x_80);
+ x_90 = lean::box(0);
+}
+if (lean::is_scalar(x_90)) {
+ x_91 = lean::alloc_cnstr(0, 1, 0);
+} else {
+ x_91 = x_90;
+}
+lean::cnstr_set(x_91, 0, x_88);
+return x_91;
+}
+else
+{
+uint8 x_94; 
+lean::dec(x_80);
+lean::inc(x_53);
+x_94 = l_Lean_IR_LocalContext_contains(x_53, x_42);
+if (x_94 == 0)
+{
+obj* x_95; obj* x_96; 
+x_95 = l_Lean_IR_LocalContext_addJP(x_53, x_42, x_44, x_46);
+x_96 = lean::alloc_cnstr(0, 3, 0);
+lean::cnstr_set(x_96, 0, x_51);
+lean::cnstr_set(x_96, 1, x_95);
+lean::cnstr_set(x_96, 2, x_55);
+x_0 = x_48;
+x_1 = x_96;
 goto _start;
 }
 else
 {
-obj* x_76; 
-lean::dec(x_1);
-lean::dec(x_33);
-lean::dec(x_37);
-lean::dec(x_31);
-lean::dec(x_35);
-x_76 = l_Lean_IR_Checker_checkFnBody___main___closed__2;
-return x_76;
+obj* x_105; 
+lean::dec(x_51);
+lean::dec(x_53);
+lean::dec(x_55);
+lean::dec(x_48);
+lean::dec(x_42);
+lean::dec(x_44);
+lean::dec(x_46);
+x_105 = l_Lean_IR_Checker_checkFnBody___main___closed__2;
+return x_105;
 }
 }
 }
 }
+case 2:
+{
+obj* x_106; obj* x_108; obj* x_110; obj* x_114; 
+x_106 = lean::cnstr_get(x_0, 0);
+lean::inc(x_106);
+x_108 = lean::cnstr_get(x_0, 2);
+lean::inc(x_108);
+x_110 = lean::cnstr_get(x_0, 3);
+lean::inc(x_110);
+lean::dec(x_0);
+lean::inc(x_1);
+x_114 = l_Lean_IR_Checker_checkVar(x_106, x_1);
+if (lean::obj_tag(x_114) == 0)
+{
+obj* x_118; obj* x_120; obj* x_121; 
+lean::dec(x_1);
+lean::dec(x_108);
+lean::dec(x_110);
+x_118 = lean::cnstr_get(x_114, 0);
+if (lean::is_exclusive(x_114)) {
+ x_120 = x_114;
+} else {
+ lean::inc(x_118);
+ lean::dec(x_114);
+ x_120 = lean::box(0);
+}
+if (lean::is_scalar(x_120)) {
+ x_121 = lean::alloc_cnstr(0, 1, 0);
+} else {
+ x_121 = x_120;
+}
+lean::cnstr_set(x_121, 0, x_118);
+return x_121;
+}
+else
+{
+obj* x_124; 
+lean::dec(x_114);
+lean::inc(x_1);
+x_124 = l_Lean_IR_Checker_checkVar(x_108, x_1);
+if (lean::obj_tag(x_124) == 0)
+{
+obj* x_127; obj* x_129; obj* x_130; 
+lean::dec(x_1);
+lean::dec(x_110);
+x_127 = lean::cnstr_get(x_124, 0);
+if (lean::is_exclusive(x_124)) {
+ x_129 = x_124;
+} else {
+ lean::inc(x_127);
+ lean::dec(x_124);
+ x_129 = lean::box(0);
+}
+if (lean::is_scalar(x_129)) {
+ x_130 = lean::alloc_cnstr(0, 1, 0);
+} else {
+ x_130 = x_129;
+}
+lean::cnstr_set(x_130, 0, x_127);
+return x_130;
+}
+else
+{
+lean::dec(x_124);
+x_0 = x_110;
+goto _start;
+}
+}
+}
+case 3:
+{
+obj* x_133; obj* x_135; obj* x_137; obj* x_141; 
+x_133 = lean::cnstr_get(x_0, 0);
+lean::inc(x_133);
+x_135 = lean::cnstr_get(x_0, 2);
+lean::inc(x_135);
+x_137 = lean::cnstr_get(x_0, 3);
+lean::inc(x_137);
+lean::dec(x_0);
+lean::inc(x_1);
+x_141 = l_Lean_IR_Checker_checkVar(x_133, x_1);
+if (lean::obj_tag(x_141) == 0)
+{
+obj* x_145; obj* x_147; obj* x_148; 
+lean::dec(x_1);
+lean::dec(x_137);
+lean::dec(x_135);
+x_145 = lean::cnstr_get(x_141, 0);
+if (lean::is_exclusive(x_141)) {
+ x_147 = x_141;
+} else {
+ lean::inc(x_145);
+ lean::dec(x_141);
+ x_147 = lean::box(0);
+}
+if (lean::is_scalar(x_147)) {
+ x_148 = lean::alloc_cnstr(0, 1, 0);
+} else {
+ x_148 = x_147;
+}
+lean::cnstr_set(x_148, 0, x_145);
+return x_148;
+}
+else
+{
+obj* x_151; 
+lean::dec(x_141);
+lean::inc(x_1);
+x_151 = l_Lean_IR_Checker_checkVar(x_135, x_1);
+if (lean::obj_tag(x_151) == 0)
+{
+obj* x_154; obj* x_156; obj* x_157; 
+lean::dec(x_1);
+lean::dec(x_137);
+x_154 = lean::cnstr_get(x_151, 0);
+if (lean::is_exclusive(x_151)) {
+ x_156 = x_151;
+} else {
+ lean::inc(x_154);
+ lean::dec(x_151);
+ x_156 = lean::box(0);
+}
+if (lean::is_scalar(x_156)) {
+ x_157 = lean::alloc_cnstr(0, 1, 0);
+} else {
+ x_157 = x_156;
+}
+lean::cnstr_set(x_157, 0, x_154);
+return x_157;
+}
+else
+{
+lean::dec(x_151);
+x_0 = x_137;
+goto _start;
+}
+}
+}
 case 4:
 {
-obj* x_77; obj* x_79; obj* x_81; obj* x_85; 
-x_77 = lean::cnstr_get(x_0, 0);
-lean::inc(x_77);
-x_79 = lean::cnstr_get(x_0, 3);
-lean::inc(x_79);
-x_81 = lean::cnstr_get(x_0, 4);
-lean::inc(x_81);
+obj* x_160; obj* x_162; obj* x_164; obj* x_168; 
+x_160 = lean::cnstr_get(x_0, 0);
+lean::inc(x_160);
+x_162 = lean::cnstr_get(x_0, 3);
+lean::inc(x_162);
+x_164 = lean::cnstr_get(x_0, 4);
+lean::inc(x_164);
 lean::dec(x_0);
 lean::inc(x_1);
-x_85 = l_Lean_IR_Checker_checkVar(x_77, x_1);
-if (lean::obj_tag(x_85) == 0)
+x_168 = l_Lean_IR_Checker_checkVar(x_160, x_1);
+if (lean::obj_tag(x_168) == 0)
 {
-obj* x_89; obj* x_91; obj* x_92; 
-lean::dec(x_81);
-lean::dec(x_79);
+obj* x_172; obj* x_174; obj* x_175; 
+lean::dec(x_162);
+lean::dec(x_164);
 lean::dec(x_1);
-x_89 = lean::cnstr_get(x_85, 0);
-if (lean::is_exclusive(x_85)) {
- x_91 = x_85;
+x_172 = lean::cnstr_get(x_168, 0);
+if (lean::is_exclusive(x_168)) {
+ x_174 = x_168;
 } else {
- lean::inc(x_89);
- lean::dec(x_85);
- x_91 = lean::box(0);
+ lean::inc(x_172);
+ lean::dec(x_168);
+ x_174 = lean::box(0);
 }
-if (lean::is_scalar(x_91)) {
- x_92 = lean::alloc_cnstr(0, 1, 0);
+if (lean::is_scalar(x_174)) {
+ x_175 = lean::alloc_cnstr(0, 1, 0);
 } else {
- x_92 = x_91;
+ x_175 = x_174;
 }
-lean::cnstr_set(x_92, 0, x_89);
-return x_92;
+lean::cnstr_set(x_175, 0, x_172);
+return x_175;
 }
 else
 {
-obj* x_95; 
-lean::dec(x_85);
+obj* x_178; 
+lean::dec(x_168);
 lean::inc(x_1);
-x_95 = l_Lean_IR_Checker_checkVar(x_79, x_1);
-if (lean::obj_tag(x_95) == 0)
+x_178 = l_Lean_IR_Checker_checkVar(x_162, x_1);
+if (lean::obj_tag(x_178) == 0)
 {
-obj* x_98; obj* x_100; obj* x_101; 
-lean::dec(x_81);
+obj* x_181; obj* x_183; obj* x_184; 
+lean::dec(x_164);
 lean::dec(x_1);
-x_98 = lean::cnstr_get(x_95, 0);
-if (lean::is_exclusive(x_95)) {
- x_100 = x_95;
+x_181 = lean::cnstr_get(x_178, 0);
+if (lean::is_exclusive(x_178)) {
+ x_183 = x_178;
 } else {
- lean::inc(x_98);
- lean::dec(x_95);
- x_100 = lean::box(0);
+ lean::inc(x_181);
+ lean::dec(x_178);
+ x_183 = lean::box(0);
 }
-if (lean::is_scalar(x_100)) {
- x_101 = lean::alloc_cnstr(0, 1, 0);
+if (lean::is_scalar(x_183)) {
+ x_184 = lean::alloc_cnstr(0, 1, 0);
 } else {
- x_101 = x_100;
+ x_184 = x_183;
 }
-lean::cnstr_set(x_101, 0, x_98);
-return x_101;
+lean::cnstr_set(x_184, 0, x_181);
+return x_184;
 }
 else
 {
-lean::dec(x_95);
-x_0 = x_81;
+lean::dec(x_178);
+x_0 = x_164;
 goto _start;
 }
 }
 }
-case 5:
-{
-obj* x_104; obj* x_106; obj* x_110; 
-x_104 = lean::cnstr_get(x_0, 0);
-lean::inc(x_104);
-x_106 = lean::cnstr_get(x_0, 2);
-lean::inc(x_106);
-lean::dec(x_0);
-lean::inc(x_1);
-x_110 = l_Lean_IR_Checker_checkVar(x_104, x_1);
-if (lean::obj_tag(x_110) == 0)
-{
-obj* x_113; obj* x_115; obj* x_116; 
-lean::dec(x_106);
-lean::dec(x_1);
-x_113 = lean::cnstr_get(x_110, 0);
-if (lean::is_exclusive(x_110)) {
- x_115 = x_110;
-} else {
- lean::inc(x_113);
- lean::dec(x_110);
- x_115 = lean::box(0);
-}
-if (lean::is_scalar(x_115)) {
- x_116 = lean::alloc_cnstr(0, 1, 0);
-} else {
- x_116 = x_115;
-}
-lean::cnstr_set(x_116, 0, x_113);
-return x_116;
-}
-else
-{
-lean::dec(x_110);
-x_0 = x_106;
-goto _start;
-}
-}
 case 6:
 {
-obj* x_119; obj* x_121; obj* x_125; 
-x_119 = lean::cnstr_get(x_0, 0);
-lean::inc(x_119);
-x_121 = lean::cnstr_get(x_0, 2);
-lean::inc(x_121);
+obj* x_187; obj* x_189; obj* x_193; 
+x_187 = lean::cnstr_get(x_0, 0);
+lean::inc(x_187);
+x_189 = lean::cnstr_get(x_0, 2);
+lean::inc(x_189);
 lean::dec(x_0);
 lean::inc(x_1);
-x_125 = l_Lean_IR_Checker_checkVar(x_119, x_1);
-if (lean::obj_tag(x_125) == 0)
+x_193 = l_Lean_IR_Checker_checkVar(x_187, x_1);
+if (lean::obj_tag(x_193) == 0)
 {
-obj* x_128; obj* x_130; obj* x_131; 
+obj* x_196; obj* x_198; obj* x_199; 
 lean::dec(x_1);
-lean::dec(x_121);
-x_128 = lean::cnstr_get(x_125, 0);
-if (lean::is_exclusive(x_125)) {
- x_130 = x_125;
+lean::dec(x_189);
+x_196 = lean::cnstr_get(x_193, 0);
+if (lean::is_exclusive(x_193)) {
+ x_198 = x_193;
 } else {
- lean::inc(x_128);
- lean::dec(x_125);
- x_130 = lean::box(0);
+ lean::inc(x_196);
+ lean::dec(x_193);
+ x_198 = lean::box(0);
 }
-if (lean::is_scalar(x_130)) {
- x_131 = lean::alloc_cnstr(0, 1, 0);
+if (lean::is_scalar(x_198)) {
+ x_199 = lean::alloc_cnstr(0, 1, 0);
 } else {
- x_131 = x_130;
+ x_199 = x_198;
 }
-lean::cnstr_set(x_131, 0, x_128);
-return x_131;
+lean::cnstr_set(x_199, 0, x_196);
+return x_199;
 }
 else
 {
-lean::dec(x_125);
-x_0 = x_121;
-goto _start;
-}
-}
-case 7:
-{
-obj* x_134; obj* x_136; obj* x_140; 
-x_134 = lean::cnstr_get(x_0, 0);
-lean::inc(x_134);
-x_136 = lean::cnstr_get(x_0, 2);
-lean::inc(x_136);
-lean::dec(x_0);
-lean::inc(x_1);
-x_140 = l_Lean_IR_Checker_checkVar(x_134, x_1);
-if (lean::obj_tag(x_140) == 0)
-{
-obj* x_143; obj* x_145; obj* x_146; 
-lean::dec(x_1);
-lean::dec(x_136);
-x_143 = lean::cnstr_get(x_140, 0);
-if (lean::is_exclusive(x_140)) {
- x_145 = x_140;
-} else {
- lean::inc(x_143);
- lean::dec(x_140);
- x_145 = lean::box(0);
-}
-if (lean::is_scalar(x_145)) {
- x_146 = lean::alloc_cnstr(0, 1, 0);
-} else {
- x_146 = x_145;
-}
-lean::cnstr_set(x_146, 0, x_143);
-return x_146;
-}
-else
-{
-lean::dec(x_140);
-x_0 = x_136;
+lean::dec(x_193);
+x_0 = x_189;
 goto _start;
 }
 }
 case 8:
 {
-obj* x_149; 
-x_149 = lean::cnstr_get(x_0, 1);
-lean::inc(x_149);
+obj* x_202; 
+x_202 = lean::cnstr_get(x_0, 1);
+lean::inc(x_202);
 lean::dec(x_0);
-x_0 = x_149;
+x_0 = x_202;
 goto _start;
 }
 case 9:
 {
-obj* x_153; obj* x_155; obj* x_159; 
-x_153 = lean::cnstr_get(x_0, 1);
-lean::inc(x_153);
-x_155 = lean::cnstr_get(x_0, 2);
-lean::inc(x_155);
+obj* x_206; obj* x_208; obj* x_212; 
+x_206 = lean::cnstr_get(x_0, 1);
+lean::inc(x_206);
+x_208 = lean::cnstr_get(x_0, 2);
+lean::inc(x_208);
 lean::dec(x_0);
 lean::inc(x_1);
-x_159 = l_Lean_IR_Checker_checkVar(x_153, x_1);
-if (lean::obj_tag(x_159) == 0)
+x_212 = l_Lean_IR_Checker_checkVar(x_206, x_1);
+if (lean::obj_tag(x_212) == 0)
 {
-obj* x_162; obj* x_164; obj* x_165; 
+obj* x_215; obj* x_217; obj* x_218; 
 lean::dec(x_1);
-lean::dec(x_155);
-x_162 = lean::cnstr_get(x_159, 0);
-if (lean::is_exclusive(x_159)) {
- x_164 = x_159;
+lean::dec(x_208);
+x_215 = lean::cnstr_get(x_212, 0);
+if (lean::is_exclusive(x_212)) {
+ x_217 = x_212;
 } else {
- lean::inc(x_162);
- lean::dec(x_159);
- x_164 = lean::box(0);
+ lean::inc(x_215);
+ lean::dec(x_212);
+ x_217 = lean::box(0);
 }
-if (lean::is_scalar(x_164)) {
- x_165 = lean::alloc_cnstr(0, 1, 0);
+if (lean::is_scalar(x_217)) {
+ x_218 = lean::alloc_cnstr(0, 1, 0);
 } else {
- x_165 = x_164;
+ x_218 = x_217;
 }
-lean::cnstr_set(x_165, 0, x_162);
-return x_165;
+lean::cnstr_set(x_218, 0, x_215);
+return x_218;
 }
 else
 {
-obj* x_167; obj* x_168; 
-lean::dec(x_159);
-x_167 = lean::mk_nat_obj(0ul);
-x_168 = l_Array_mforAux___main___at_Lean_IR_Checker_checkFnBody___main___spec__2(x_155, x_167, x_1);
-lean::dec(x_155);
-return x_168;
+obj* x_220; obj* x_221; 
+lean::dec(x_212);
+x_220 = lean::mk_nat_obj(0ul);
+x_221 = l_Array_mforAux___main___at_Lean_IR_Checker_checkFnBody___main___spec__2(x_208, x_220, x_1);
+lean::dec(x_208);
+return x_221;
 }
 }
 case 10:
 {
-obj* x_170; obj* x_173; 
-x_170 = lean::cnstr_get(x_0, 0);
-lean::inc(x_170);
+obj* x_223; obj* x_226; 
+x_223 = lean::cnstr_get(x_0, 0);
+lean::inc(x_223);
 lean::dec(x_0);
-x_173 = l_Lean_IR_Checker_checkArg(x_170, x_1);
-return x_173;
+x_226 = l_Lean_IR_Checker_checkArg(x_223, x_1);
+return x_226;
 }
 case 11:
 {
-obj* x_174; obj* x_176; obj* x_180; 
-x_174 = lean::cnstr_get(x_0, 0);
-lean::inc(x_174);
-x_176 = lean::cnstr_get(x_0, 1);
-lean::inc(x_176);
+obj* x_227; obj* x_229; obj* x_233; 
+x_227 = lean::cnstr_get(x_0, 0);
+lean::inc(x_227);
+x_229 = lean::cnstr_get(x_0, 1);
+lean::inc(x_229);
 lean::dec(x_0);
 lean::inc(x_1);
-x_180 = l_Lean_IR_Checker_checkJP(x_174, x_1);
-if (lean::obj_tag(x_180) == 0)
+x_233 = l_Lean_IR_Checker_checkJP(x_227, x_1);
+if (lean::obj_tag(x_233) == 0)
 {
-obj* x_183; obj* x_185; obj* x_186; 
+obj* x_236; obj* x_238; obj* x_239; 
 lean::dec(x_1);
-lean::dec(x_176);
-x_183 = lean::cnstr_get(x_180, 0);
-if (lean::is_exclusive(x_180)) {
- x_185 = x_180;
+lean::dec(x_229);
+x_236 = lean::cnstr_get(x_233, 0);
+if (lean::is_exclusive(x_233)) {
+ x_238 = x_233;
 } else {
- lean::inc(x_183);
- lean::dec(x_180);
- x_185 = lean::box(0);
+ lean::inc(x_236);
+ lean::dec(x_233);
+ x_238 = lean::box(0);
 }
-if (lean::is_scalar(x_185)) {
- x_186 = lean::alloc_cnstr(0, 1, 0);
+if (lean::is_scalar(x_238)) {
+ x_239 = lean::alloc_cnstr(0, 1, 0);
 } else {
- x_186 = x_185;
+ x_239 = x_238;
 }
-lean::cnstr_set(x_186, 0, x_183);
-return x_186;
+lean::cnstr_set(x_239, 0, x_236);
+return x_239;
 }
 else
 {
-obj* x_188; obj* x_189; 
-lean::dec(x_180);
-x_188 = lean::mk_nat_obj(0ul);
-x_189 = l_Array_mforAux___main___at_Lean_IR_Checker_checkArgs___spec__1(x_176, x_188, x_1);
-lean::dec(x_176);
-return x_189;
+obj* x_241; obj* x_242; 
+lean::dec(x_233);
+x_241 = lean::mk_nat_obj(0ul);
+x_242 = l_Array_mforAux___main___at_Lean_IR_Checker_checkArgs___spec__1(x_229, x_241, x_1);
+lean::dec(x_229);
+return x_242;
 }
 }
 case 12:
 {
-obj* x_192; 
+obj* x_245; 
 lean::dec(x_1);
-x_192 = l_Lean_IR_Checker_checkVar___closed__2;
-return x_192;
+x_245 = l_Lean_IR_Checker_checkVar___closed__2;
+return x_245;
 }
 default:
 {
-obj* x_193; obj* x_195; obj* x_197; obj* x_201; 
-x_193 = lean::cnstr_get(x_0, 0);
-lean::inc(x_193);
-x_195 = lean::cnstr_get(x_0, 2);
-lean::inc(x_195);
-x_197 = lean::cnstr_get(x_0, 3);
-lean::inc(x_197);
+obj* x_246; obj* x_248; obj* x_252; 
+x_246 = lean::cnstr_get(x_0, 0);
+lean::inc(x_246);
+x_248 = lean::cnstr_get(x_0, 2);
+lean::inc(x_248);
 lean::dec(x_0);
 lean::inc(x_1);
-x_201 = l_Lean_IR_Checker_checkVar(x_193, x_1);
-if (lean::obj_tag(x_201) == 0)
+x_252 = l_Lean_IR_Checker_checkVar(x_246, x_1);
+if (lean::obj_tag(x_252) == 0)
 {
-obj* x_205; obj* x_207; obj* x_208; 
+obj* x_255; obj* x_257; obj* x_258; 
+lean::dec(x_248);
 lean::dec(x_1);
-lean::dec(x_197);
-lean::dec(x_195);
-x_205 = lean::cnstr_get(x_201, 0);
-if (lean::is_exclusive(x_201)) {
- x_207 = x_201;
+x_255 = lean::cnstr_get(x_252, 0);
+if (lean::is_exclusive(x_252)) {
+ x_257 = x_252;
 } else {
- lean::inc(x_205);
- lean::dec(x_201);
- x_207 = lean::box(0);
+ lean::inc(x_255);
+ lean::dec(x_252);
+ x_257 = lean::box(0);
 }
-if (lean::is_scalar(x_207)) {
- x_208 = lean::alloc_cnstr(0, 1, 0);
+if (lean::is_scalar(x_257)) {
+ x_258 = lean::alloc_cnstr(0, 1, 0);
 } else {
- x_208 = x_207;
+ x_258 = x_257;
 }
-lean::cnstr_set(x_208, 0, x_205);
-return x_208;
+lean::cnstr_set(x_258, 0, x_255);
+return x_258;
 }
 else
 {
-obj* x_211; 
-lean::dec(x_201);
-lean::inc(x_1);
-x_211 = l_Lean_IR_Checker_checkVar(x_195, x_1);
-if (lean::obj_tag(x_211) == 0)
-{
-obj* x_214; obj* x_216; obj* x_217; 
-lean::dec(x_1);
-lean::dec(x_197);
-x_214 = lean::cnstr_get(x_211, 0);
-if (lean::is_exclusive(x_211)) {
- x_216 = x_211;
-} else {
- lean::inc(x_214);
- lean::dec(x_211);
- x_216 = lean::box(0);
-}
-if (lean::is_scalar(x_216)) {
- x_217 = lean::alloc_cnstr(0, 1, 0);
-} else {
- x_217 = x_216;
-}
-lean::cnstr_set(x_217, 0, x_214);
-return x_217;
-}
-else
-{
-lean::dec(x_211);
-x_0 = x_197;
+lean::dec(x_252);
+x_0 = x_248;
 goto _start;
 }
 }
 }
 }
 }
-}
 obj* l_Array_miterateAux___main___at_Lean_IR_Checker_checkFnBody___main___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
 _start:
 {
@@ -2048,85 +2508,110 @@ _start:
 {
 if (lean::obj_tag(x_0) == 0)
 {
-obj* x_2; obj* x_4; obj* x_7; obj* x_9; 
+obj* x_2; obj* x_4; obj* x_7; obj* x_9; obj* x_11; obj* x_13; obj* x_14; obj* x_16; 
 x_2 = lean::cnstr_get(x_0, 1);
 lean::inc(x_2);
 x_4 = lean::cnstr_get(x_0, 2);
 lean::inc(x_4);
 lean::dec(x_0);
-x_7 = lean::mk_nat_obj(0ul);
-lean::inc(x_1);
-x_9 = l_Array_miterateAux___main___at_Lean_IR_Checker_checkDecl___main___spec__1(x_2, x_2, x_7, x_1, x_1);
-lean::dec(x_1);
+x_7 = lean::cnstr_get(x_1, 0);
+lean::inc(x_7);
+x_9 = lean::cnstr_get(x_1, 1);
+lean::inc(x_9);
+x_11 = lean::cnstr_get(x_1, 2);
+lean::inc(x_11);
+x_13 = lean::mk_nat_obj(0ul);
+x_14 = l_Array_miterateAux___main___at_Lean_IR_Checker_checkDecl___main___spec__1(x_2, x_2, x_13, x_9, x_1);
 lean::dec(x_2);
-if (lean::obj_tag(x_9) == 0)
+if (lean::is_exclusive(x_1)) {
+ lean::cnstr_release(x_1, 0);
+ lean::cnstr_release(x_1, 1);
+ lean::cnstr_release(x_1, 2);
+ x_16 = x_1;
+} else {
+ lean::dec(x_1);
+ x_16 = lean::box(0);
+}
+if (lean::obj_tag(x_14) == 0)
 {
-obj* x_13; obj* x_15; obj* x_16; 
+obj* x_21; obj* x_23; obj* x_24; 
+lean::dec(x_7);
+lean::dec(x_11);
 lean::dec(x_4);
-x_13 = lean::cnstr_get(x_9, 0);
-if (lean::is_exclusive(x_9)) {
- x_15 = x_9;
+lean::dec(x_16);
+x_21 = lean::cnstr_get(x_14, 0);
+if (lean::is_exclusive(x_14)) {
+ x_23 = x_14;
 } else {
- lean::inc(x_13);
- lean::dec(x_9);
- x_15 = lean::box(0);
+ lean::inc(x_21);
+ lean::dec(x_14);
+ x_23 = lean::box(0);
 }
-if (lean::is_scalar(x_15)) {
- x_16 = lean::alloc_cnstr(0, 1, 0);
+if (lean::is_scalar(x_23)) {
+ x_24 = lean::alloc_cnstr(0, 1, 0);
 } else {
- x_16 = x_15;
+ x_24 = x_23;
 }
-lean::cnstr_set(x_16, 0, x_13);
-return x_16;
+lean::cnstr_set(x_24, 0, x_21);
+return x_24;
 }
 else
 {
-obj* x_17; obj* x_20; 
-x_17 = lean::cnstr_get(x_9, 0);
-lean::inc(x_17);
-lean::dec(x_9);
-x_20 = l_Lean_IR_Checker_checkFnBody___main(x_4, x_17);
-return x_20;
+obj* x_25; obj* x_28; obj* x_29; 
+x_25 = lean::cnstr_get(x_14, 0);
+lean::inc(x_25);
+lean::dec(x_14);
+if (lean::is_scalar(x_16)) {
+ x_28 = lean::alloc_cnstr(0, 3, 0);
+} else {
+ x_28 = x_16;
+}
+lean::cnstr_set(x_28, 0, x_7);
+lean::cnstr_set(x_28, 1, x_25);
+lean::cnstr_set(x_28, 2, x_11);
+x_29 = l_Lean_IR_Checker_checkFnBody___main(x_4, x_28);
+return x_29;
 }
 }
 else
 {
-obj* x_21; obj* x_24; obj* x_25; obj* x_26; obj* x_28; 
-x_21 = lean::cnstr_get(x_0, 1);
-lean::inc(x_21);
+obj* x_30; obj* x_33; obj* x_34; obj* x_35; obj* x_37; obj* x_38; 
+x_30 = lean::cnstr_get(x_0, 1);
+lean::inc(x_30);
 lean::dec(x_0);
-x_24 = lean::box(0);
-x_25 = lean::alloc_cnstr(1, 1, 0);
-lean::cnstr_set(x_25, 0, x_24);
-x_26 = lean::mk_nat_obj(0ul);
-lean::inc(x_1);
-x_28 = l_Array_miterateAux___main___at_Lean_IR_Checker_checkDecl___main___spec__2(x_21, x_21, x_26, x_1, x_1);
+x_33 = lean::box(0);
+x_34 = lean::alloc_cnstr(1, 1, 0);
+lean::cnstr_set(x_34, 0, x_33);
+x_35 = lean::cnstr_get(x_1, 1);
+lean::inc(x_35);
+x_37 = lean::mk_nat_obj(0ul);
+x_38 = l_Array_miterateAux___main___at_Lean_IR_Checker_checkDecl___main___spec__2(x_30, x_30, x_37, x_35, x_1);
 lean::dec(x_1);
-lean::dec(x_21);
-if (lean::obj_tag(x_28) == 0)
+lean::dec(x_30);
+if (lean::obj_tag(x_38) == 0)
 {
-obj* x_32; obj* x_34; obj* x_35; 
-lean::dec(x_25);
-x_32 = lean::cnstr_get(x_28, 0);
-if (lean::is_exclusive(x_28)) {
- x_34 = x_28;
+obj* x_42; obj* x_44; obj* x_45; 
+lean::dec(x_34);
+x_42 = lean::cnstr_get(x_38, 0);
+if (lean::is_exclusive(x_38)) {
+ x_44 = x_38;
 } else {
- lean::inc(x_32);
- lean::dec(x_28);
- x_34 = lean::box(0);
+ lean::inc(x_42);
+ lean::dec(x_38);
+ x_44 = lean::box(0);
 }
-if (lean::is_scalar(x_34)) {
- x_35 = lean::alloc_cnstr(0, 1, 0);
+if (lean::is_scalar(x_44)) {
+ x_45 = lean::alloc_cnstr(0, 1, 0);
 } else {
- x_35 = x_34;
+ x_45 = x_44;
 }
-lean::cnstr_set(x_35, 0, x_32);
-return x_35;
+lean::cnstr_set(x_45, 0, x_42);
+return x_45;
 }
 else
 {
-lean::dec(x_28);
-return x_25;
+lean::dec(x_38);
+return x_34;
 }
 }
 }
@@ -2177,168 +2662,198 @@ x_0 = lean::mk_string("', error: ");
 return x_0;
 }
 }
-obj* l_Lean_IR_checkDecl(obj* x_0, obj* x_1, obj* x_2) {
+obj* l_Lean_IR_checkDecl(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
 _start:
 {
-obj* x_3; obj* x_5; 
-x_3 = lean::box(0);
+obj* x_4; 
+x_4 = l_Lean_IR_getEnv___rarg(x_3);
+if (lean::obj_tag(x_4) == 0)
+{
+obj* x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_13; 
+x_5 = lean::cnstr_get(x_4, 0);
+x_7 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_set(x_4, 0, lean::box(0));
+ lean::cnstr_set(x_4, 1, lean::box(0));
+ x_9 = x_4;
+} else {
+ lean::inc(x_5);
+ lean::inc(x_7);
+ lean::dec(x_4);
+ x_9 = lean::box(0);
+}
+x_10 = lean::box(0);
+x_11 = lean::alloc_cnstr(0, 3, 0);
+lean::cnstr_set(x_11, 0, x_5);
+lean::cnstr_set(x_11, 1, x_10);
+lean::cnstr_set(x_11, 2, x_0);
+lean::inc(x_1);
+x_13 = l_Lean_IR_Checker_checkDecl___main(x_1, x_11);
+if (lean::obj_tag(x_13) == 0)
+{
+obj* x_14; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_28; 
+x_14 = lean::cnstr_get(x_13, 0);
+lean::inc(x_14);
+lean::dec(x_13);
+x_17 = l_Lean_IR_Decl_name___main(x_1);
+lean::dec(x_1);
+x_19 = l_Lean_Name_toString___closed__1;
+x_20 = l_Lean_Name_toStringWithSep___main(x_19, x_17);
+x_21 = l_Lean_IR_checkDecl___closed__1;
+x_22 = lean::string_append(x_21, x_20);
+lean::dec(x_20);
+x_24 = l_Lean_IR_checkDecl___closed__2;
+x_25 = lean::string_append(x_22, x_24);
+x_26 = lean::string_append(x_25, x_14);
+lean::dec(x_14);
+if (lean::is_scalar(x_9)) {
+ x_28 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_28 = x_9;
+ lean::cnstr_set_tag(x_9, 1);
+}
+lean::cnstr_set(x_28, 0, x_26);
+lean::cnstr_set(x_28, 1, x_7);
+return x_28;
+}
+else
+{
+obj* x_31; obj* x_32; 
+lean::dec(x_13);
+lean::dec(x_1);
+x_31 = lean::box(0);
+if (lean::is_scalar(x_9)) {
+ x_32 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_32 = x_9;
+}
+lean::cnstr_set(x_32, 0, x_31);
+lean::cnstr_set(x_32, 1, x_7);
+return x_32;
+}
+}
+else
+{
+obj* x_35; obj* x_37; obj* x_39; obj* x_40; 
+lean::dec(x_1);
+lean::dec(x_0);
+x_35 = lean::cnstr_get(x_4, 0);
+x_37 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ x_39 = x_4;
+} else {
+ lean::inc(x_35);
+ lean::inc(x_37);
+ lean::dec(x_4);
+ x_39 = lean::box(0);
+}
+if (lean::is_scalar(x_39)) {
+ x_40 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_40 = x_39;
+}
+lean::cnstr_set(x_40, 0, x_35);
+lean::cnstr_set(x_40, 1, x_37);
+return x_40;
+}
+}
+}
+obj* l_Lean_IR_checkDecl___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Lean_IR_checkDecl(x_0, x_1, x_2, x_3);
+lean::dec(x_2);
+return x_4;
+}
+}
+obj* l_Array_mforAux___main___at_Lean_IR_checkDecls___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; uint8 x_6; 
+x_5 = lean::array_get_size(x_1);
+x_6 = lean::nat_dec_lt(x_2, x_5);
+lean::dec(x_5);
+if (x_6 == 0)
+{
+obj* x_10; obj* x_12; obj* x_13; obj* x_14; 
+lean::dec(x_0);
+lean::dec(x_2);
+x_10 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ x_12 = x_4;
+} else {
+ lean::inc(x_10);
+ lean::dec(x_4);
+ x_12 = lean::box(0);
+}
+x_13 = lean::box(0);
+if (lean::is_scalar(x_12)) {
+ x_14 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_14 = x_12;
+}
+lean::cnstr_set(x_14, 0, x_13);
+lean::cnstr_set(x_14, 1, x_10);
+return x_14;
+}
+else
+{
+obj* x_15; obj* x_16; obj* x_17; obj* x_20; 
+x_15 = lean::array_fget(x_1, x_2);
+x_16 = lean::mk_nat_obj(1ul);
+x_17 = lean::nat_add(x_2, x_16);
+lean::dec(x_2);
 lean::inc(x_0);
-x_5 = l_Lean_IR_Checker_checkDecl___main(x_0, x_3);
-if (lean::obj_tag(x_5) == 0)
+x_20 = l_Lean_IR_checkDecl(x_0, x_15, x_3, x_4);
+if (lean::obj_tag(x_20) == 0)
 {
-obj* x_6; obj* x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_23; 
-x_6 = lean::cnstr_get(x_5, 0);
-lean::inc(x_6);
-lean::dec(x_5);
-x_9 = lean::cnstr_get(x_2, 1);
-if (lean::is_exclusive(x_2)) {
- lean::cnstr_release(x_2, 0);
- x_11 = x_2;
+obj* x_21; obj* x_23; obj* x_24; obj* x_25; 
+x_21 = lean::cnstr_get(x_20, 1);
+if (lean::is_exclusive(x_20)) {
+ lean::cnstr_release(x_20, 0);
+ x_23 = x_20;
 } else {
- lean::inc(x_9);
- lean::dec(x_2);
- x_11 = lean::box(0);
+ lean::inc(x_21);
+ lean::dec(x_20);
+ x_23 = lean::box(0);
 }
-x_12 = l_Lean_IR_Decl_name___main(x_0);
-lean::dec(x_0);
-x_14 = l_Lean_Name_toString___closed__1;
-x_15 = l_Lean_Name_toStringWithSep___main(x_14, x_12);
-x_16 = l_Lean_IR_checkDecl___closed__1;
-x_17 = lean::string_append(x_16, x_15);
-lean::dec(x_15);
-x_19 = l_Lean_IR_checkDecl___closed__2;
-x_20 = lean::string_append(x_17, x_19);
-x_21 = lean::string_append(x_20, x_6);
-lean::dec(x_6);
-if (lean::is_scalar(x_11)) {
- x_23 = lean::alloc_cnstr(1, 2, 0);
+x_24 = lean::box(0);
+if (lean::is_scalar(x_23)) {
+ x_25 = lean::alloc_cnstr(0, 2, 0);
 } else {
- x_23 = x_11;
- lean::cnstr_set_tag(x_11, 1);
+ x_25 = x_23;
 }
-lean::cnstr_set(x_23, 0, x_21);
-lean::cnstr_set(x_23, 1, x_9);
-return x_23;
-}
-else
-{
-obj* x_26; obj* x_28; obj* x_29; obj* x_30; 
-lean::dec(x_5);
-lean::dec(x_0);
-x_26 = lean::cnstr_get(x_2, 1);
-if (lean::is_exclusive(x_2)) {
- lean::cnstr_release(x_2, 0);
- x_28 = x_2;
-} else {
- lean::inc(x_26);
- lean::dec(x_2);
- x_28 = lean::box(0);
-}
-x_29 = lean::box(0);
-if (lean::is_scalar(x_28)) {
- x_30 = lean::alloc_cnstr(0, 2, 0);
-} else {
- x_30 = x_28;
-}
-lean::cnstr_set(x_30, 0, x_29);
-lean::cnstr_set(x_30, 1, x_26);
-return x_30;
-}
-}
-}
-obj* l_Lean_IR_checkDecl___boxed(obj* x_0, obj* x_1, obj* x_2) {
-_start:
-{
-obj* x_3; 
-x_3 = l_Lean_IR_checkDecl(x_0, x_1, x_2);
-lean::dec(x_1);
-return x_3;
-}
-}
-obj* l_Array_mforAux___main___at_Lean_IR_checkDecls___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
-_start:
-{
-obj* x_4; uint8 x_5; 
-x_4 = lean::array_get_size(x_0);
-x_5 = lean::nat_dec_lt(x_1, x_4);
-lean::dec(x_4);
-if (x_5 == 0)
-{
-obj* x_8; obj* x_10; obj* x_11; obj* x_12; 
-lean::dec(x_1);
-x_8 = lean::cnstr_get(x_3, 1);
-if (lean::is_exclusive(x_3)) {
- lean::cnstr_release(x_3, 0);
- x_10 = x_3;
-} else {
- lean::inc(x_8);
- lean::dec(x_3);
- x_10 = lean::box(0);
-}
-x_11 = lean::box(0);
-if (lean::is_scalar(x_10)) {
- x_12 = lean::alloc_cnstr(0, 2, 0);
-} else {
- x_12 = x_10;
-}
-lean::cnstr_set(x_12, 0, x_11);
-lean::cnstr_set(x_12, 1, x_8);
-return x_12;
-}
-else
-{
-obj* x_13; obj* x_14; obj* x_15; obj* x_17; 
-x_13 = lean::array_fget(x_0, x_1);
-x_14 = lean::mk_nat_obj(1ul);
-x_15 = lean::nat_add(x_1, x_14);
-lean::dec(x_1);
-x_17 = l_Lean_IR_checkDecl(x_13, x_2, x_3);
-if (lean::obj_tag(x_17) == 0)
-{
-obj* x_18; obj* x_20; obj* x_21; obj* x_22; 
-x_18 = lean::cnstr_get(x_17, 1);
-if (lean::is_exclusive(x_17)) {
- lean::cnstr_release(x_17, 0);
- x_20 = x_17;
-} else {
- lean::inc(x_18);
- lean::dec(x_17);
- x_20 = lean::box(0);
-}
-x_21 = lean::box(0);
-if (lean::is_scalar(x_20)) {
- x_22 = lean::alloc_cnstr(0, 2, 0);
-} else {
- x_22 = x_20;
-}
-lean::cnstr_set(x_22, 0, x_21);
-lean::cnstr_set(x_22, 1, x_18);
-x_1 = x_15;
-x_3 = x_22;
+lean::cnstr_set(x_25, 0, x_24);
+lean::cnstr_set(x_25, 1, x_21);
+x_2 = x_17;
+x_4 = x_25;
 goto _start;
 }
 else
 {
-obj* x_25; obj* x_27; obj* x_29; obj* x_30; 
-lean::dec(x_15);
-x_25 = lean::cnstr_get(x_17, 0);
-x_27 = lean::cnstr_get(x_17, 1);
-if (lean::is_exclusive(x_17)) {
- x_29 = x_17;
+obj* x_29; obj* x_31; obj* x_33; obj* x_34; 
+lean::dec(x_0);
+lean::dec(x_17);
+x_29 = lean::cnstr_get(x_20, 0);
+x_31 = lean::cnstr_get(x_20, 1);
+if (lean::is_exclusive(x_20)) {
+ x_33 = x_20;
 } else {
- lean::inc(x_25);
- lean::inc(x_27);
- lean::dec(x_17);
- x_29 = lean::box(0);
+ lean::inc(x_29);
+ lean::inc(x_31);
+ lean::dec(x_20);
+ x_33 = lean::box(0);
 }
-if (lean::is_scalar(x_29)) {
- x_30 = lean::alloc_cnstr(1, 2, 0);
+if (lean::is_scalar(x_33)) {
+ x_34 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_30 = x_29;
+ x_34 = x_33;
 }
-lean::cnstr_set(x_30, 0, x_25);
-lean::cnstr_set(x_30, 1, x_27);
-return x_30;
+lean::cnstr_set(x_34, 0, x_29);
+lean::cnstr_set(x_34, 1, x_31);
+return x_34;
 }
 }
 }
@@ -2346,20 +2861,22 @@ return x_30;
 obj* l_Lean_IR_checkDecls(obj* x_0, obj* x_1, obj* x_2) {
 _start:
 {
-obj* x_3; obj* x_4; 
+obj* x_3; obj* x_5; 
 x_3 = lean::mk_nat_obj(0ul);
-x_4 = l_Array_mforAux___main___at_Lean_IR_checkDecls___spec__1(x_0, x_3, x_1, x_2);
-return x_4;
+lean::inc(x_0);
+x_5 = l_Array_mforAux___main___at_Lean_IR_checkDecls___spec__1(x_0, x_0, x_3, x_1, x_2);
+lean::dec(x_0);
+return x_5;
 }
 }
-obj* l_Array_mforAux___main___at_Lean_IR_checkDecls___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+obj* l_Array_mforAux___main___at_Lean_IR_checkDecls___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
 _start:
 {
-obj* x_4; 
-x_4 = l_Array_mforAux___main___at_Lean_IR_checkDecls___spec__1(x_0, x_1, x_2, x_3);
-lean::dec(x_0);
-lean::dec(x_2);
-return x_4;
+obj* x_5; 
+x_5 = l_Array_mforAux___main___at_Lean_IR_checkDecls___spec__1(x_0, x_1, x_2, x_3, x_4);
+lean::dec(x_1);
+lean::dec(x_3);
+return x_5;
 }
 }
 obj* l_Lean_IR_checkDecls___boxed(obj* x_0, obj* x_1, obj* x_2) {
@@ -2367,7 +2884,6 @@ _start:
 {
 obj* x_3; 
 x_3 = l_Lean_IR_checkDecls(x_0, x_1, x_2);
-lean::dec(x_0);
 lean::dec(x_1);
 return x_3;
 }
@@ -2388,6 +2904,20 @@ lean::mark_persistent(l_Lean_IR_Checker_checkVar___closed__2);
 lean::mark_persistent(l_Lean_IR_Checker_checkJP___closed__1);
  l_Lean_IR_Checker_checkType___closed__1 = _init_l_Lean_IR_Checker_checkType___closed__1();
 lean::mark_persistent(l_Lean_IR_Checker_checkType___closed__1);
+ l_Lean_IR_Checker_checkFullApp___closed__1 = _init_l_Lean_IR_Checker_checkFullApp___closed__1();
+lean::mark_persistent(l_Lean_IR_Checker_checkFullApp___closed__1);
+ l_Lean_IR_Checker_checkFullApp___closed__2 = _init_l_Lean_IR_Checker_checkFullApp___closed__2();
+lean::mark_persistent(l_Lean_IR_Checker_checkFullApp___closed__2);
+ l_Lean_IR_Checker_checkFullApp___closed__3 = _init_l_Lean_IR_Checker_checkFullApp___closed__3();
+lean::mark_persistent(l_Lean_IR_Checker_checkFullApp___closed__3);
+ l_Lean_IR_Checker_checkFullApp___closed__4 = _init_l_Lean_IR_Checker_checkFullApp___closed__4();
+lean::mark_persistent(l_Lean_IR_Checker_checkFullApp___closed__4);
+ l_Lean_IR_Checker_checkPartialApp___closed__1 = _init_l_Lean_IR_Checker_checkPartialApp___closed__1();
+lean::mark_persistent(l_Lean_IR_Checker_checkPartialApp___closed__1);
+ l_Lean_IR_Checker_checkPartialApp___closed__2 = _init_l_Lean_IR_Checker_checkPartialApp___closed__2();
+lean::mark_persistent(l_Lean_IR_Checker_checkPartialApp___closed__2);
+ l_Lean_IR_Checker_checkPartialApp___closed__3 = _init_l_Lean_IR_Checker_checkPartialApp___closed__3();
+lean::mark_persistent(l_Lean_IR_Checker_checkPartialApp___closed__3);
  l_Array_miterateAux___main___at_Lean_IR_Checker_withParams___spec__1___closed__1 = _init_l_Array_miterateAux___main___at_Lean_IR_Checker_withParams___spec__1___closed__1();
 lean::mark_persistent(l_Array_miterateAux___main___at_Lean_IR_Checker_withParams___spec__1___closed__1);
  l_Lean_IR_Checker_checkFnBody___main___closed__1 = _init_l_Lean_IR_Checker_checkFnBody___main___closed__1();
diff --git a/src/stage0/init/lean/compiler/ir/compilerm.cpp b/src/stage0/init/lean/compiler/ir/compilerm.cpp
index 08cc886d50..2dcffc390d 100644
--- a/src/stage0/init/lean/compiler/ir/compilerm.cpp
+++ b/src/stage0/init/lean/compiler/ir/compilerm.cpp
@@ -34,14 +34,12 @@ obj* l_Lean_IR_mkDeclMapExtension___closed__1;
 extern obj* l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__2;
 obj* l___private_init_lean_compiler_ir_compilerm_3__logMessageIfAux___boxed(obj*);
 obj* l_Lean_IR_formatDecl___main(obj*, obj*);
-obj* l_Array_mfindAux___main___at_Lean_IR_findDeclAux_x_27___spec__1___boxed(obj*, obj*, obj*);
 obj* l_Array_miterateAux___main___at___private_init_lean_compiler_ir_compilerm_4__mkEntryArray___spec__10(obj*, obj*, obj*, obj*);
 obj* l_Lean_IR_getEnv___boxed(obj*);
 obj* l_HashMapImp_find___at_Lean_IR_findEnvDecl___spec__3(obj*, obj*);
 obj* l_Lean_Format_group___main(obj*);
 uint8 l_Array_anyMAux___main___at_Lean_IR_mkDeclMapExtension___spec__7(obj*, obj*, obj*);
 obj* l_HashMapImp_contains___at_Lean_IR_containsDecl___spec__2___boxed(obj*, obj*);
-obj* l_Lean_IR_findDeclAux_x_27___boxed(obj*, obj*, obj*);
 obj* l_Lean_KVMap_findCore___main(obj*, obj*);
 obj* l_HashMapImp_insert___at___private_init_lean_compiler_ir_compilerm_4__mkEntryArray___spec__2(obj*, obj*, obj*);
 obj* l_Lean_PersistentEnvExtension_getEntries___rarg(obj*, obj*);
@@ -63,11 +61,11 @@ obj* l_Lean_SMap_find___main___at_Lean_IR_findEnvDecl___spec__1(obj*, obj*);
 obj* l_Array_miterateAux___main___at_Lean_IR_Log_format___spec__1(obj*, obj*, obj*, obj*);
 obj* l_RBNode_find___main___at_Lean_IR_findEnvDecl___spec__2(obj*, obj*);
 uint8 l_Lean_SMap_contains___main___at_Lean_IR_containsDecl___spec__1(obj*, obj*);
-obj* l_Array_mfindAux___main___at_Lean_IR_findDeclAux_x_27___spec__1(obj*, obj*, obj*);
 obj* l_HashMapImp_expand___at___private_init_lean_compiler_ir_compilerm_4__mkEntryArray___spec__4(obj*, obj*);
 obj* l_Lean_IR_getDecls___boxed(obj*);
 extern obj* l___private_init_lean_environment_9__persistentEnvExtensionsRef;
 uint8 l_Lean_KVMap_getBool(obj*, obj*, uint8);
+obj* l_Lean_IR_findEnvDecl_x_27(obj*, obj*, obj*);
 extern obj* l_Lean_Format_sbracket___closed__2;
 obj* l_Lean_IR_addDecl___boxed(obj*, obj*, obj*);
 obj* l_Lean_SMap_insert___main___at_Lean_IR_mkDeclMapExtension___spec__3(obj*, obj*, obj*);
@@ -80,6 +78,7 @@ obj* l_Array_anyMAux___main___at_Lean_IR_containsDecl_x_27___spec__1___boxed(obj
 extern "C" usize lean_name_hash_usize(obj*);
 extern obj* l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__3;
 obj* l_Lean_PersistentEnvExtension_getState___rarg(obj*, obj*);
+obj* l_Lean_IR_findEnvDecl_x_27___boxed(obj*, obj*, obj*);
 obj* l_HashMapImp_moveEntries___main___at___private_init_lean_compiler_ir_compilerm_4__mkEntryArray___spec__5(obj*, obj*, obj*);
 obj* l_Lean_SMap_contains___main___at_Lean_IR_containsDecl___spec__1___boxed(obj*, obj*);
 obj* l_HashMapImp_find___at_Lean_IR_findEnvDecl___spec__3___boxed(obj*, obj*);
@@ -128,6 +127,7 @@ uint8 l___private_init_lean_compiler_ir_compilerm_1__isLogEnabledFor(obj*, obj*)
 obj* l_RBNode_ins___main___at_Lean_IR_mkDeclMapExtension___spec__5(obj*, obj*, obj*);
 obj* l_Array_miterateAux___main___at_Lean_IR_Log_format___spec__1___boxed(obj*, obj*, obj*, obj*);
 obj* l_Lean_IR_declMapExt___elambda__1(obj*);
+obj* l_Array_mfindAux___main___at_Lean_IR_findEnvDecl_x_27___spec__1___boxed(obj*, obj*, obj*);
 extern obj* l_Lean_SMap_insert___main___at_Lean_Environment_add___spec__1___closed__2;
 obj* l_Lean_IR_getDecl_x_27(obj*, obj*, obj*, obj*);
 obj* l___private_init_lean_compiler_ir_compilerm_4__mkEntryArray(obj*);
@@ -165,9 +165,9 @@ obj* l_RBNode_find___main___at_Lean_IR_findEnvDecl___spec__2___boxed(obj*, obj*)
 obj* l_Lean_IR_logMessageIf___rarg(obj*, obj*, obj*, obj*, obj*);
 obj* l_Lean_IR_declMapExt___elambda__2___boxed(obj*);
 obj* l_List_foldl___main___at___private_init_lean_compiler_ir_compilerm_4__mkEntryArray___spec__8___boxed(obj*, obj*, obj*);
-obj* l_Lean_IR_findDeclAux_x_27(obj*, obj*, obj*);
 obj* l_Lean_IR_findDecl_x_27___boxed(obj*, obj*, obj*, obj*);
 uint8 l_Array_anyMAux___main___at_Lean_IR_containsDecl_x_27___spec__1(obj*, obj*, obj*);
+obj* l_Array_mfindAux___main___at_Lean_IR_findEnvDecl_x_27___spec__1(obj*, obj*, obj*);
 obj* l_Lean_IR_addDecl(obj*, obj*, obj*);
 obj* l_Lean_Name_append___main(obj*, obj*);
 namespace lean {
@@ -3535,7 +3535,7 @@ lean::dec(x_1);
 return x_3;
 }
 }
-obj* l_Array_mfindAux___main___at_Lean_IR_findDeclAux_x_27___spec__1(obj* x_0, obj* x_1, obj* x_2) {
+obj* l_Array_mfindAux___main___at_Lean_IR_findEnvDecl_x_27___spec__1(obj* x_0, obj* x_1, obj* x_2) {
 _start:
 {
 obj* x_3; uint8 x_4; 
@@ -3577,12 +3577,12 @@ return x_18;
 }
 }
 }
-obj* l_Lean_IR_findDeclAux_x_27(obj* x_0, obj* x_1, obj* x_2) {
+obj* l_Lean_IR_findEnvDecl_x_27(obj* x_0, obj* x_1, obj* x_2) {
 _start:
 {
 obj* x_3; obj* x_4; 
 x_3 = lean::mk_nat_obj(0ul);
-x_4 = l_Array_mfindAux___main___at_Lean_IR_findDeclAux_x_27___spec__1(x_1, x_2, x_3);
+x_4 = l_Array_mfindAux___main___at_Lean_IR_findEnvDecl_x_27___spec__1(x_1, x_2, x_3);
 if (lean::obj_tag(x_4) == 0)
 {
 obj* x_5; obj* x_6; obj* x_7; 
@@ -3597,21 +3597,21 @@ return x_4;
 }
 }
 }
-obj* l_Array_mfindAux___main___at_Lean_IR_findDeclAux_x_27___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2) {
+obj* l_Array_mfindAux___main___at_Lean_IR_findEnvDecl_x_27___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2) {
 _start:
 {
 obj* x_3; 
-x_3 = l_Array_mfindAux___main___at_Lean_IR_findDeclAux_x_27___spec__1(x_0, x_1, x_2);
+x_3 = l_Array_mfindAux___main___at_Lean_IR_findEnvDecl_x_27___spec__1(x_0, x_1, x_2);
 lean::dec(x_0);
 lean::dec(x_1);
 return x_3;
 }
 }
-obj* l_Lean_IR_findDeclAux_x_27___boxed(obj* x_0, obj* x_1, obj* x_2) {
+obj* l_Lean_IR_findEnvDecl_x_27___boxed(obj* x_0, obj* x_1, obj* x_2) {
 _start:
 {
 obj* x_3; 
-x_3 = l_Lean_IR_findDeclAux_x_27(x_0, x_1, x_2);
+x_3 = l_Lean_IR_findEnvDecl_x_27(x_0, x_1, x_2);
 lean::dec(x_0);
 lean::dec(x_1);
 lean::dec(x_2);
@@ -3633,7 +3633,7 @@ if (lean::is_exclusive(x_3)) {
 }
 x_7 = lean::cnstr_get(x_4, 0);
 lean::inc(x_7);
-x_9 = l_Lean_IR_findDeclAux_x_27(x_7, x_0, x_1);
+x_9 = l_Lean_IR_findEnvDecl_x_27(x_7, x_0, x_1);
 lean::dec(x_7);
 if (lean::is_scalar(x_6)) {
  x_11 = lean::alloc_cnstr(0, 2, 0);
diff --git a/src/stage0/init/lean/compiler/ir/default.cpp b/src/stage0/init/lean/compiler/ir/default.cpp
index dfe7e5841f..e469b036c7 100644
--- a/src/stage0/init/lean/compiler/ir/default.cpp
+++ b/src/stage0/init/lean/compiler/ir/default.cpp
@@ -1,6 +1,6 @@
 // Lean compiler output
 // Module: init.lean.compiler.ir.default
-// Imports: init.lean.compiler.ir.basic init.lean.compiler.ir.format init.lean.compiler.ir.compilerm init.lean.compiler.ir.pushproj init.lean.compiler.ir.elimdead init.lean.compiler.ir.simpcase init.lean.compiler.ir.resetreuse init.lean.compiler.ir.normids init.lean.compiler.ir.checker init.lean.compiler.ir.borrow init.lean.compiler.ir.boxing init.lean.compiler.ir.rc
+// Imports: init.lean.compiler.ir.basic init.lean.compiler.ir.format init.lean.compiler.ir.compilerm init.lean.compiler.ir.pushproj init.lean.compiler.ir.elimdead init.lean.compiler.ir.simpcase init.lean.compiler.ir.resetreuse init.lean.compiler.ir.normids init.lean.compiler.ir.checker init.lean.compiler.ir.borrow init.lean.compiler.ir.boxing init.lean.compiler.ir.rc init.lean.compiler.ir.emitcpp
 #include "runtime/object.h"
 #include "runtime/apply.h"
 typedef lean::object obj;    typedef lean::usize  usize;
@@ -18,7 +18,7 @@ obj* l_Array_hmmapAux___main___at___private_init_lean_compiler_ir_default_1__com
 extern obj* l_Array_empty___closed__1;
 obj* l___private_init_lean_compiler_ir_default_1__compileAux___closed__5;
 obj* l___private_init_lean_compiler_ir_default_1__compileAux___closed__2;
-obj* l_Array_mforAux___main___at_Lean_IR_checkDecls___spec__1(obj*, obj*, obj*, obj*);
+obj* l_Array_mforAux___main___at_Lean_IR_checkDecls___spec__1(obj*, obj*, obj*, obj*, obj*);
 obj* l___private_init_lean_compiler_ir_default_1__compileAux___closed__15;
 obj* l___private_init_lean_compiler_ir_compilerm_2__logDeclsAux(obj*, obj*, obj*, obj*, obj*);
 obj* l___private_init_lean_compiler_ir_default_1__compileAux___closed__16;
@@ -356,676 +356,678 @@ return x_2;
 obj* l___private_init_lean_compiler_ir_default_1__compileAux(obj* x_0, obj* x_1, obj* x_2) {
 _start:
 {
-obj* x_3; obj* x_4; 
-x_3 = lean::mk_nat_obj(0ul);
-x_4 = l_Array_mforAux___main___at_Lean_IR_checkDecls___spec__1(x_0, x_3, x_1, x_2);
-if (lean::obj_tag(x_4) == 0)
-{
-obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_14; 
-x_5 = lean::cnstr_get(x_4, 1);
-if (lean::is_exclusive(x_4)) {
- lean::cnstr_release(x_4, 0);
- x_7 = x_4;
-} else {
- lean::inc(x_5);
- lean::dec(x_4);
- x_7 = lean::box(0);
-}
-x_8 = lean::box(0);
-if (lean::is_scalar(x_7)) {
- x_9 = lean::alloc_cnstr(0, 2, 0);
-} else {
- x_9 = x_7;
-}
-lean::cnstr_set(x_9, 0, x_8);
-lean::cnstr_set(x_9, 1, x_5);
-x_10 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__1;
-x_11 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__2;
+obj* x_3; obj* x_4; obj* x_7; 
+x_3 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__1;
+x_4 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__2;
 lean::inc(x_1);
 lean::inc(x_0);
-x_14 = l___private_init_lean_compiler_ir_compilerm_2__logDeclsAux(x_10, x_11, x_0, x_1, x_9);
-if (lean::obj_tag(x_14) == 0)
+x_7 = l___private_init_lean_compiler_ir_compilerm_2__logDeclsAux(x_3, x_4, x_0, x_1, x_2);
+if (lean::obj_tag(x_7) == 0)
 {
-obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_24; 
-x_15 = lean::cnstr_get(x_14, 1);
-if (lean::is_exclusive(x_14)) {
- lean::cnstr_release(x_14, 0);
- x_17 = x_14;
+obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_15; 
+x_8 = lean::cnstr_get(x_7, 1);
+if (lean::is_exclusive(x_7)) {
+ lean::cnstr_release(x_7, 0);
+ x_10 = x_7;
 } else {
- lean::inc(x_15);
- lean::dec(x_14);
- x_17 = lean::box(0);
+ lean::inc(x_8);
+ lean::dec(x_7);
+ x_10 = lean::box(0);
 }
-if (lean::is_scalar(x_17)) {
- x_18 = lean::alloc_cnstr(0, 2, 0);
+x_11 = lean::box(0);
+if (lean::is_scalar(x_10)) {
+ x_12 = lean::alloc_cnstr(0, 2, 0);
 } else {
- x_18 = x_17;
+ x_12 = x_10;
 }
-lean::cnstr_set(x_18, 0, x_8);
-lean::cnstr_set(x_18, 1, x_15);
-x_19 = l_Array_hmmapAux___main___at___private_init_lean_compiler_ir_default_1__compileAux___spec__1(x_3, x_0);
-x_20 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__3;
-x_21 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__4;
+lean::cnstr_set(x_12, 0, x_11);
+lean::cnstr_set(x_12, 1, x_8);
+x_13 = lean::mk_nat_obj(0ul);
+lean::inc(x_0);
+x_15 = l_Array_mforAux___main___at_Lean_IR_checkDecls___spec__1(x_0, x_0, x_13, x_1, x_12);
+if (lean::obj_tag(x_15) == 0)
+{
+obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_25; 
+x_16 = lean::cnstr_get(x_15, 1);
+if (lean::is_exclusive(x_15)) {
+ lean::cnstr_release(x_15, 0);
+ x_18 = x_15;
+} else {
+ lean::inc(x_16);
+ lean::dec(x_15);
+ x_18 = lean::box(0);
+}
+if (lean::is_scalar(x_18)) {
+ x_19 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_19 = x_18;
+}
+lean::cnstr_set(x_19, 0, x_11);
+lean::cnstr_set(x_19, 1, x_16);
+x_20 = l_Array_hmmapAux___main___at___private_init_lean_compiler_ir_default_1__compileAux___spec__1(x_13, x_0);
+x_21 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__3;
+x_22 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__4;
 lean::inc(x_1);
-lean::inc(x_19);
-x_24 = l___private_init_lean_compiler_ir_compilerm_2__logDeclsAux(x_20, x_21, x_19, x_1, x_18);
-if (lean::obj_tag(x_24) == 0)
+lean::inc(x_20);
+x_25 = l___private_init_lean_compiler_ir_compilerm_2__logDeclsAux(x_21, x_22, x_20, x_1, x_19);
+if (lean::obj_tag(x_25) == 0)
 {
-obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_34; 
-x_25 = lean::cnstr_get(x_24, 1);
-if (lean::is_exclusive(x_24)) {
- lean::cnstr_release(x_24, 0);
- x_27 = x_24;
+obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_35; 
+x_26 = lean::cnstr_get(x_25, 1);
+if (lean::is_exclusive(x_25)) {
+ lean::cnstr_release(x_25, 0);
+ x_28 = x_25;
 } else {
- lean::inc(x_25);
- lean::dec(x_24);
- x_27 = lean::box(0);
+ lean::inc(x_26);
+ lean::dec(x_25);
+ x_28 = lean::box(0);
 }
-if (lean::is_scalar(x_27)) {
- x_28 = lean::alloc_cnstr(0, 2, 0);
+if (lean::is_scalar(x_28)) {
+ x_29 = lean::alloc_cnstr(0, 2, 0);
 } else {
- x_28 = x_27;
+ x_29 = x_28;
 }
-lean::cnstr_set(x_28, 0, x_8);
-lean::cnstr_set(x_28, 1, x_25);
-x_29 = l_Array_hmmapAux___main___at___private_init_lean_compiler_ir_default_1__compileAux___spec__2(x_3, x_19);
-x_30 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__5;
-x_31 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__6;
+lean::cnstr_set(x_29, 0, x_11);
+lean::cnstr_set(x_29, 1, x_26);
+x_30 = l_Array_hmmapAux___main___at___private_init_lean_compiler_ir_default_1__compileAux___spec__2(x_13, x_20);
+x_31 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__5;
+x_32 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__6;
 lean::inc(x_1);
-lean::inc(x_29);
-x_34 = l___private_init_lean_compiler_ir_compilerm_2__logDeclsAux(x_30, x_31, x_29, x_1, x_28);
-if (lean::obj_tag(x_34) == 0)
+lean::inc(x_30);
+x_35 = l___private_init_lean_compiler_ir_compilerm_2__logDeclsAux(x_31, x_32, x_30, x_1, x_29);
+if (lean::obj_tag(x_35) == 0)
 {
-obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_44; 
-x_35 = lean::cnstr_get(x_34, 1);
-if (lean::is_exclusive(x_34)) {
- lean::cnstr_release(x_34, 0);
- x_37 = x_34;
+obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_45; 
+x_36 = lean::cnstr_get(x_35, 1);
+if (lean::is_exclusive(x_35)) {
+ lean::cnstr_release(x_35, 0);
+ x_38 = x_35;
 } else {
- lean::inc(x_35);
- lean::dec(x_34);
- x_37 = lean::box(0);
+ lean::inc(x_36);
+ lean::dec(x_35);
+ x_38 = lean::box(0);
 }
-if (lean::is_scalar(x_37)) {
- x_38 = lean::alloc_cnstr(0, 2, 0);
+if (lean::is_scalar(x_38)) {
+ x_39 = lean::alloc_cnstr(0, 2, 0);
 } else {
- x_38 = x_37;
+ x_39 = x_38;
 }
-lean::cnstr_set(x_38, 0, x_8);
-lean::cnstr_set(x_38, 1, x_35);
-x_39 = l_Array_hmmapAux___main___at___private_init_lean_compiler_ir_default_1__compileAux___spec__3(x_3, x_29);
-x_40 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__7;
-x_41 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__8;
+lean::cnstr_set(x_39, 0, x_11);
+lean::cnstr_set(x_39, 1, x_36);
+x_40 = l_Array_hmmapAux___main___at___private_init_lean_compiler_ir_default_1__compileAux___spec__3(x_13, x_30);
+x_41 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__7;
+x_42 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__8;
 lean::inc(x_1);
-lean::inc(x_39);
-x_44 = l___private_init_lean_compiler_ir_compilerm_2__logDeclsAux(x_40, x_41, x_39, x_1, x_38);
-if (lean::obj_tag(x_44) == 0)
+lean::inc(x_40);
+x_45 = l___private_init_lean_compiler_ir_compilerm_2__logDeclsAux(x_41, x_42, x_40, x_1, x_39);
+if (lean::obj_tag(x_45) == 0)
 {
-obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_54; 
-x_45 = lean::cnstr_get(x_44, 1);
-if (lean::is_exclusive(x_44)) {
- lean::cnstr_release(x_44, 0);
- x_47 = x_44;
+obj* x_46; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_55; 
+x_46 = lean::cnstr_get(x_45, 1);
+if (lean::is_exclusive(x_45)) {
+ lean::cnstr_release(x_45, 0);
+ x_48 = x_45;
 } else {
- lean::inc(x_45);
- lean::dec(x_44);
- x_47 = lean::box(0);
+ lean::inc(x_46);
+ lean::dec(x_45);
+ x_48 = lean::box(0);
 }
-if (lean::is_scalar(x_47)) {
- x_48 = lean::alloc_cnstr(0, 2, 0);
+if (lean::is_scalar(x_48)) {
+ x_49 = lean::alloc_cnstr(0, 2, 0);
 } else {
- x_48 = x_47;
+ x_49 = x_48;
 }
-lean::cnstr_set(x_48, 0, x_8);
-lean::cnstr_set(x_48, 1, x_45);
-x_49 = l_Array_hmmapAux___main___at___private_init_lean_compiler_ir_default_1__compileAux___spec__4(x_3, x_39);
-x_50 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__9;
-x_51 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__10;
+lean::cnstr_set(x_49, 0, x_11);
+lean::cnstr_set(x_49, 1, x_46);
+x_50 = l_Array_hmmapAux___main___at___private_init_lean_compiler_ir_default_1__compileAux___spec__4(x_13, x_40);
+x_51 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__9;
+x_52 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__10;
 lean::inc(x_1);
-lean::inc(x_49);
-x_54 = l___private_init_lean_compiler_ir_compilerm_2__logDeclsAux(x_50, x_51, x_49, x_1, x_48);
-if (lean::obj_tag(x_54) == 0)
+lean::inc(x_50);
+x_55 = l___private_init_lean_compiler_ir_compilerm_2__logDeclsAux(x_51, x_52, x_50, x_1, x_49);
+if (lean::obj_tag(x_55) == 0)
 {
-obj* x_55; obj* x_57; obj* x_58; obj* x_59; obj* x_60; 
-x_55 = lean::cnstr_get(x_54, 1);
-if (lean::is_exclusive(x_54)) {
- lean::cnstr_release(x_54, 0);
- x_57 = x_54;
+obj* x_56; obj* x_58; obj* x_59; obj* x_60; obj* x_61; 
+x_56 = lean::cnstr_get(x_55, 1);
+if (lean::is_exclusive(x_55)) {
+ lean::cnstr_release(x_55, 0);
+ x_58 = x_55;
 } else {
- lean::inc(x_55);
- lean::dec(x_54);
- x_57 = lean::box(0);
+ lean::inc(x_56);
+ lean::dec(x_55);
+ x_58 = lean::box(0);
 }
-if (lean::is_scalar(x_57)) {
- x_58 = lean::alloc_cnstr(0, 2, 0);
+if (lean::is_scalar(x_58)) {
+ x_59 = lean::alloc_cnstr(0, 2, 0);
 } else {
- x_58 = x_57;
+ x_59 = x_58;
 }
-lean::cnstr_set(x_58, 0, x_8);
-lean::cnstr_set(x_58, 1, x_55);
-x_59 = l_Array_hmmapAux___main___at_Lean_IR_inferBorrow___spec__1(x_3, x_49);
-x_60 = l_Lean_IR_inferBorrow(x_59, x_1, x_58);
-if (lean::obj_tag(x_60) == 0)
+lean::cnstr_set(x_59, 0, x_11);
+lean::cnstr_set(x_59, 1, x_56);
+x_60 = l_Array_hmmapAux___main___at_Lean_IR_inferBorrow___spec__1(x_13, x_50);
+x_61 = l_Lean_IR_inferBorrow(x_60, x_1, x_59);
+if (lean::obj_tag(x_61) == 0)
 {
-obj* x_61; obj* x_63; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_71; 
-x_61 = lean::cnstr_get(x_60, 0);
-x_63 = lean::cnstr_get(x_60, 1);
-if (lean::is_exclusive(x_60)) {
- x_65 = x_60;
+obj* x_62; obj* x_64; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_72; 
+x_62 = lean::cnstr_get(x_61, 0);
+x_64 = lean::cnstr_get(x_61, 1);
+if (lean::is_exclusive(x_61)) {
+ x_66 = x_61;
 } else {
- lean::inc(x_61);
- lean::inc(x_63);
- lean::dec(x_60);
- x_65 = lean::box(0);
+ lean::inc(x_62);
+ lean::inc(x_64);
+ lean::dec(x_61);
+ x_66 = lean::box(0);
 }
-if (lean::is_scalar(x_65)) {
- x_66 = lean::alloc_cnstr(0, 2, 0);
+if (lean::is_scalar(x_66)) {
+ x_67 = lean::alloc_cnstr(0, 2, 0);
 } else {
- x_66 = x_65;
+ x_67 = x_66;
 }
-lean::cnstr_set(x_66, 0, x_8);
-lean::cnstr_set(x_66, 1, x_63);
-x_67 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__11;
-x_68 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__12;
+lean::cnstr_set(x_67, 0, x_11);
+lean::cnstr_set(x_67, 1, x_64);
+x_68 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__11;
+x_69 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__12;
 lean::inc(x_1);
-lean::inc(x_61);
-x_71 = l___private_init_lean_compiler_ir_compilerm_2__logDeclsAux(x_67, x_68, x_61, x_1, x_66);
-if (lean::obj_tag(x_71) == 0)
+lean::inc(x_62);
+x_72 = l___private_init_lean_compiler_ir_compilerm_2__logDeclsAux(x_68, x_69, x_62, x_1, x_67);
+if (lean::obj_tag(x_72) == 0)
 {
-obj* x_72; obj* x_74; obj* x_75; obj* x_76; 
-x_72 = lean::cnstr_get(x_71, 1);
-if (lean::is_exclusive(x_71)) {
- lean::cnstr_release(x_71, 0);
- x_74 = x_71;
+obj* x_73; obj* x_75; obj* x_76; obj* x_77; 
+x_73 = lean::cnstr_get(x_72, 1);
+if (lean::is_exclusive(x_72)) {
+ lean::cnstr_release(x_72, 0);
+ x_75 = x_72;
 } else {
- lean::inc(x_72);
- lean::dec(x_71);
- x_74 = lean::box(0);
+ lean::inc(x_73);
+ lean::dec(x_72);
+ x_75 = lean::box(0);
 }
-if (lean::is_scalar(x_74)) {
- x_75 = lean::alloc_cnstr(0, 2, 0);
+if (lean::is_scalar(x_75)) {
+ x_76 = lean::alloc_cnstr(0, 2, 0);
 } else {
- x_75 = x_74;
+ x_76 = x_75;
 }
-lean::cnstr_set(x_75, 0, x_8);
-lean::cnstr_set(x_75, 1, x_72);
-x_76 = l_Lean_IR_explicitBoxing(x_61, x_1, x_75);
-if (lean::obj_tag(x_76) == 0)
+lean::cnstr_set(x_76, 0, x_11);
+lean::cnstr_set(x_76, 1, x_73);
+x_77 = l_Lean_IR_explicitBoxing(x_62, x_1, x_76);
+if (lean::obj_tag(x_77) == 0)
 {
-obj* x_77; obj* x_79; obj* x_81; obj* x_82; obj* x_83; obj* x_84; obj* x_87; 
-x_77 = lean::cnstr_get(x_76, 0);
-x_79 = lean::cnstr_get(x_76, 1);
-if (lean::is_exclusive(x_76)) {
- x_81 = x_76;
+obj* x_78; obj* x_80; obj* x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_88; 
+x_78 = lean::cnstr_get(x_77, 0);
+x_80 = lean::cnstr_get(x_77, 1);
+if (lean::is_exclusive(x_77)) {
+ x_82 = x_77;
 } else {
- lean::inc(x_77);
- lean::inc(x_79);
- lean::dec(x_76);
- x_81 = lean::box(0);
+ lean::inc(x_78);
+ lean::inc(x_80);
+ lean::dec(x_77);
+ x_82 = lean::box(0);
 }
-if (lean::is_scalar(x_81)) {
- x_82 = lean::alloc_cnstr(0, 2, 0);
+if (lean::is_scalar(x_82)) {
+ x_83 = lean::alloc_cnstr(0, 2, 0);
 } else {
- x_82 = x_81;
+ x_83 = x_82;
 }
-lean::cnstr_set(x_82, 0, x_8);
-lean::cnstr_set(x_82, 1, x_79);
-x_83 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__13;
-x_84 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__14;
+lean::cnstr_set(x_83, 0, x_11);
+lean::cnstr_set(x_83, 1, x_80);
+x_84 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__13;
+x_85 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__14;
 lean::inc(x_1);
-lean::inc(x_77);
-x_87 = l___private_init_lean_compiler_ir_compilerm_2__logDeclsAux(x_83, x_84, x_77, x_1, x_82);
-if (lean::obj_tag(x_87) == 0)
+lean::inc(x_78);
+x_88 = l___private_init_lean_compiler_ir_compilerm_2__logDeclsAux(x_84, x_85, x_78, x_1, x_83);
+if (lean::obj_tag(x_88) == 0)
 {
-obj* x_88; obj* x_90; obj* x_91; obj* x_92; 
-x_88 = lean::cnstr_get(x_87, 1);
-if (lean::is_exclusive(x_87)) {
- lean::cnstr_release(x_87, 0);
- x_90 = x_87;
+obj* x_89; obj* x_91; obj* x_92; obj* x_93; 
+x_89 = lean::cnstr_get(x_88, 1);
+if (lean::is_exclusive(x_88)) {
+ lean::cnstr_release(x_88, 0);
+ x_91 = x_88;
 } else {
- lean::inc(x_88);
- lean::dec(x_87);
- x_90 = lean::box(0);
+ lean::inc(x_89);
+ lean::dec(x_88);
+ x_91 = lean::box(0);
 }
-if (lean::is_scalar(x_90)) {
- x_91 = lean::alloc_cnstr(0, 2, 0);
+if (lean::is_scalar(x_91)) {
+ x_92 = lean::alloc_cnstr(0, 2, 0);
 } else {
- x_91 = x_90;
+ x_92 = x_91;
 }
-lean::cnstr_set(x_91, 0, x_8);
-lean::cnstr_set(x_91, 1, x_88);
-x_92 = l_Lean_IR_explicitRC(x_77, x_1, x_91);
-if (lean::obj_tag(x_92) == 0)
+lean::cnstr_set(x_92, 0, x_11);
+lean::cnstr_set(x_92, 1, x_89);
+x_93 = l_Lean_IR_explicitRC(x_78, x_1, x_92);
+if (lean::obj_tag(x_93) == 0)
 {
-obj* x_93; obj* x_95; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_103; 
-x_93 = lean::cnstr_get(x_92, 0);
-x_95 = lean::cnstr_get(x_92, 1);
-if (lean::is_exclusive(x_92)) {
- x_97 = x_92;
+obj* x_94; obj* x_96; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_104; 
+x_94 = lean::cnstr_get(x_93, 0);
+x_96 = lean::cnstr_get(x_93, 1);
+if (lean::is_exclusive(x_93)) {
+ x_98 = x_93;
 } else {
- lean::inc(x_93);
- lean::inc(x_95);
- lean::dec(x_92);
- x_97 = lean::box(0);
+ lean::inc(x_94);
+ lean::inc(x_96);
+ lean::dec(x_93);
+ x_98 = lean::box(0);
 }
-if (lean::is_scalar(x_97)) {
- x_98 = lean::alloc_cnstr(0, 2, 0);
+if (lean::is_scalar(x_98)) {
+ x_99 = lean::alloc_cnstr(0, 2, 0);
 } else {
- x_98 = x_97;
+ x_99 = x_98;
 }
-lean::cnstr_set(x_98, 0, x_8);
-lean::cnstr_set(x_98, 1, x_95);
-x_99 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__15;
-x_100 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__16;
+lean::cnstr_set(x_99, 0, x_11);
+lean::cnstr_set(x_99, 1, x_96);
+x_100 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__15;
+x_101 = l___private_init_lean_compiler_ir_default_1__compileAux___closed__16;
 lean::inc(x_1);
-lean::inc(x_93);
-x_103 = l___private_init_lean_compiler_ir_compilerm_2__logDeclsAux(x_99, x_100, x_93, x_1, x_98);
-if (lean::obj_tag(x_103) == 0)
+lean::inc(x_94);
+x_104 = l___private_init_lean_compiler_ir_compilerm_2__logDeclsAux(x_100, x_101, x_94, x_1, x_99);
+if (lean::obj_tag(x_104) == 0)
 {
-obj* x_104; obj* x_106; obj* x_107; obj* x_108; 
-x_104 = lean::cnstr_get(x_103, 1);
-if (lean::is_exclusive(x_103)) {
- lean::cnstr_release(x_103, 0);
- x_106 = x_103;
+obj* x_105; obj* x_107; obj* x_108; obj* x_110; 
+x_105 = lean::cnstr_get(x_104, 1);
+if (lean::is_exclusive(x_104)) {
+ lean::cnstr_release(x_104, 0);
+ x_107 = x_104;
 } else {
- lean::inc(x_104);
- lean::dec(x_103);
- x_106 = lean::box(0);
+ lean::inc(x_105);
+ lean::dec(x_104);
+ x_107 = lean::box(0);
 }
-if (lean::is_scalar(x_106)) {
- x_107 = lean::alloc_cnstr(0, 2, 0);
+if (lean::is_scalar(x_107)) {
+ x_108 = lean::alloc_cnstr(0, 2, 0);
 } else {
- x_107 = x_106;
+ x_108 = x_107;
 }
-lean::cnstr_set(x_107, 0, x_8);
-lean::cnstr_set(x_107, 1, x_104);
-x_108 = l_Array_mforAux___main___at_Lean_IR_checkDecls___spec__1(x_93, x_3, x_1, x_107);
-if (lean::obj_tag(x_108) == 0)
+lean::cnstr_set(x_108, 0, x_11);
+lean::cnstr_set(x_108, 1, x_105);
+lean::inc(x_94);
+x_110 = l_Array_mforAux___main___at_Lean_IR_checkDecls___spec__1(x_94, x_94, x_13, x_1, x_108);
+if (lean::obj_tag(x_110) == 0)
 {
-obj* x_109; obj* x_111; obj* x_112; obj* x_113; 
-x_109 = lean::cnstr_get(x_108, 1);
-if (lean::is_exclusive(x_108)) {
- lean::cnstr_release(x_108, 0);
- x_111 = x_108;
+obj* x_111; obj* x_113; obj* x_114; obj* x_115; 
+x_111 = lean::cnstr_get(x_110, 1);
+if (lean::is_exclusive(x_110)) {
+ lean::cnstr_release(x_110, 0);
+ x_113 = x_110;
 } else {
- lean::inc(x_109);
- lean::dec(x_108);
- x_111 = lean::box(0);
+ lean::inc(x_111);
+ lean::dec(x_110);
+ x_113 = lean::box(0);
 }
-if (lean::is_scalar(x_111)) {
- x_112 = lean::alloc_cnstr(0, 2, 0);
+if (lean::is_scalar(x_113)) {
+ x_114 = lean::alloc_cnstr(0, 2, 0);
 } else {
- x_112 = x_111;
+ x_114 = x_113;
 }
-lean::cnstr_set(x_112, 0, x_8);
-lean::cnstr_set(x_112, 1, x_109);
-x_113 = l_Array_mforAux___main___at_Lean_IR_addDecls___spec__1(x_93, x_3, x_1, x_112);
+lean::cnstr_set(x_114, 0, x_11);
+lean::cnstr_set(x_114, 1, x_111);
+x_115 = l_Array_mforAux___main___at_Lean_IR_addDecls___spec__1(x_94, x_13, x_1, x_114);
 lean::dec(x_1);
-lean::dec(x_93);
-if (lean::obj_tag(x_113) == 0)
+lean::dec(x_94);
+if (lean::obj_tag(x_115) == 0)
 {
-obj* x_116; obj* x_118; obj* x_119; 
-x_116 = lean::cnstr_get(x_113, 1);
-if (lean::is_exclusive(x_113)) {
- lean::cnstr_release(x_113, 0);
- x_118 = x_113;
+obj* x_118; obj* x_120; obj* x_121; 
+x_118 = lean::cnstr_get(x_115, 1);
+if (lean::is_exclusive(x_115)) {
+ lean::cnstr_release(x_115, 0);
+ x_120 = x_115;
 } else {
- lean::inc(x_116);
- lean::dec(x_113);
- x_118 = lean::box(0);
+ lean::inc(x_118);
+ lean::dec(x_115);
+ x_120 = lean::box(0);
 }
-if (lean::is_scalar(x_118)) {
- x_119 = lean::alloc_cnstr(0, 2, 0);
+if (lean::is_scalar(x_120)) {
+ x_121 = lean::alloc_cnstr(0, 2, 0);
 } else {
- x_119 = x_118;
+ x_121 = x_120;
 }
-lean::cnstr_set(x_119, 0, x_8);
-lean::cnstr_set(x_119, 1, x_116);
-return x_119;
+lean::cnstr_set(x_121, 0, x_11);
+lean::cnstr_set(x_121, 1, x_118);
+return x_121;
 }
 else
 {
-obj* x_120; obj* x_122; obj* x_124; obj* x_125; 
-x_120 = lean::cnstr_get(x_113, 0);
-x_122 = lean::cnstr_get(x_113, 1);
-if (lean::is_exclusive(x_113)) {
- x_124 = x_113;
+obj* x_122; obj* x_124; obj* x_126; obj* x_127; 
+x_122 = lean::cnstr_get(x_115, 0);
+x_124 = lean::cnstr_get(x_115, 1);
+if (lean::is_exclusive(x_115)) {
+ x_126 = x_115;
 } else {
- lean::inc(x_120);
  lean::inc(x_122);
- lean::dec(x_113);
- x_124 = lean::box(0);
+ lean::inc(x_124);
+ lean::dec(x_115);
+ x_126 = lean::box(0);
 }
-if (lean::is_scalar(x_124)) {
- x_125 = lean::alloc_cnstr(1, 2, 0);
+if (lean::is_scalar(x_126)) {
+ x_127 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_125 = x_124;
+ x_127 = x_126;
 }
-lean::cnstr_set(x_125, 0, x_120);
-lean::cnstr_set(x_125, 1, x_122);
-return x_125;
+lean::cnstr_set(x_127, 0, x_122);
+lean::cnstr_set(x_127, 1, x_124);
+return x_127;
 }
 }
 else
 {
-obj* x_128; obj* x_130; obj* x_132; obj* x_133; 
+obj* x_130; obj* x_132; obj* x_134; obj* x_135; 
 lean::dec(x_1);
-lean::dec(x_93);
-x_128 = lean::cnstr_get(x_108, 0);
-x_130 = lean::cnstr_get(x_108, 1);
-if (lean::is_exclusive(x_108)) {
- x_132 = x_108;
+lean::dec(x_94);
+x_130 = lean::cnstr_get(x_110, 0);
+x_132 = lean::cnstr_get(x_110, 1);
+if (lean::is_exclusive(x_110)) {
+ x_134 = x_110;
 } else {
- lean::inc(x_128);
  lean::inc(x_130);
- lean::dec(x_108);
- x_132 = lean::box(0);
+ lean::inc(x_132);
+ lean::dec(x_110);
+ x_134 = lean::box(0);
 }
-if (lean::is_scalar(x_132)) {
- x_133 = lean::alloc_cnstr(1, 2, 0);
+if (lean::is_scalar(x_134)) {
+ x_135 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_133 = x_132;
+ x_135 = x_134;
 }
-lean::cnstr_set(x_133, 0, x_128);
-lean::cnstr_set(x_133, 1, x_130);
-return x_133;
+lean::cnstr_set(x_135, 0, x_130);
+lean::cnstr_set(x_135, 1, x_132);
+return x_135;
 }
 }
 else
 {
-obj* x_136; obj* x_138; obj* x_140; obj* x_141; 
+obj* x_138; obj* x_140; obj* x_142; obj* x_143; 
 lean::dec(x_1);
-lean::dec(x_93);
-x_136 = lean::cnstr_get(x_103, 0);
-x_138 = lean::cnstr_get(x_103, 1);
-if (lean::is_exclusive(x_103)) {
- x_140 = x_103;
+lean::dec(x_94);
+x_138 = lean::cnstr_get(x_104, 0);
+x_140 = lean::cnstr_get(x_104, 1);
+if (lean::is_exclusive(x_104)) {
+ x_142 = x_104;
 } else {
- lean::inc(x_136);
  lean::inc(x_138);
- lean::dec(x_103);
- x_140 = lean::box(0);
+ lean::inc(x_140);
+ lean::dec(x_104);
+ x_142 = lean::box(0);
 }
-if (lean::is_scalar(x_140)) {
- x_141 = lean::alloc_cnstr(1, 2, 0);
+if (lean::is_scalar(x_142)) {
+ x_143 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_141 = x_140;
+ x_143 = x_142;
 }
-lean::cnstr_set(x_141, 0, x_136);
-lean::cnstr_set(x_141, 1, x_138);
-return x_141;
+lean::cnstr_set(x_143, 0, x_138);
+lean::cnstr_set(x_143, 1, x_140);
+return x_143;
 }
 }
 else
 {
-obj* x_143; obj* x_145; obj* x_147; obj* x_148; 
+obj* x_145; obj* x_147; obj* x_149; obj* x_150; 
 lean::dec(x_1);
-x_143 = lean::cnstr_get(x_92, 0);
-x_145 = lean::cnstr_get(x_92, 1);
-if (lean::is_exclusive(x_92)) {
- x_147 = x_92;
+x_145 = lean::cnstr_get(x_93, 0);
+x_147 = lean::cnstr_get(x_93, 1);
+if (lean::is_exclusive(x_93)) {
+ x_149 = x_93;
 } else {
- lean::inc(x_143);
  lean::inc(x_145);
- lean::dec(x_92);
- x_147 = lean::box(0);
+ lean::inc(x_147);
+ lean::dec(x_93);
+ x_149 = lean::box(0);
 }
-if (lean::is_scalar(x_147)) {
- x_148 = lean::alloc_cnstr(1, 2, 0);
+if (lean::is_scalar(x_149)) {
+ x_150 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_148 = x_147;
+ x_150 = x_149;
 }
-lean::cnstr_set(x_148, 0, x_143);
-lean::cnstr_set(x_148, 1, x_145);
-return x_148;
+lean::cnstr_set(x_150, 0, x_145);
+lean::cnstr_set(x_150, 1, x_147);
+return x_150;
 }
 }
 else
 {
-obj* x_151; obj* x_153; obj* x_155; obj* x_156; 
+obj* x_153; obj* x_155; obj* x_157; obj* x_158; 
 lean::dec(x_1);
-lean::dec(x_77);
-x_151 = lean::cnstr_get(x_87, 0);
-x_153 = lean::cnstr_get(x_87, 1);
-if (lean::is_exclusive(x_87)) {
- x_155 = x_87;
+lean::dec(x_78);
+x_153 = lean::cnstr_get(x_88, 0);
+x_155 = lean::cnstr_get(x_88, 1);
+if (lean::is_exclusive(x_88)) {
+ x_157 = x_88;
 } else {
- lean::inc(x_151);
  lean::inc(x_153);
- lean::dec(x_87);
- x_155 = lean::box(0);
+ lean::inc(x_155);
+ lean::dec(x_88);
+ x_157 = lean::box(0);
 }
-if (lean::is_scalar(x_155)) {
- x_156 = lean::alloc_cnstr(1, 2, 0);
+if (lean::is_scalar(x_157)) {
+ x_158 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_156 = x_155;
+ x_158 = x_157;
 }
-lean::cnstr_set(x_156, 0, x_151);
-lean::cnstr_set(x_156, 1, x_153);
-return x_156;
+lean::cnstr_set(x_158, 0, x_153);
+lean::cnstr_set(x_158, 1, x_155);
+return x_158;
 }
 }
 else
 {
-obj* x_158; obj* x_160; obj* x_162; obj* x_163; 
+obj* x_160; obj* x_162; obj* x_164; obj* x_165; 
 lean::dec(x_1);
-x_158 = lean::cnstr_get(x_76, 0);
-x_160 = lean::cnstr_get(x_76, 1);
-if (lean::is_exclusive(x_76)) {
- x_162 = x_76;
+x_160 = lean::cnstr_get(x_77, 0);
+x_162 = lean::cnstr_get(x_77, 1);
+if (lean::is_exclusive(x_77)) {
+ x_164 = x_77;
 } else {
- lean::inc(x_158);
  lean::inc(x_160);
- lean::dec(x_76);
- x_162 = lean::box(0);
+ lean::inc(x_162);
+ lean::dec(x_77);
+ x_164 = lean::box(0);
 }
-if (lean::is_scalar(x_162)) {
- x_163 = lean::alloc_cnstr(1, 2, 0);
+if (lean::is_scalar(x_164)) {
+ x_165 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_163 = x_162;
+ x_165 = x_164;
 }
-lean::cnstr_set(x_163, 0, x_158);
-lean::cnstr_set(x_163, 1, x_160);
-return x_163;
+lean::cnstr_set(x_165, 0, x_160);
+lean::cnstr_set(x_165, 1, x_162);
+return x_165;
 }
 }
 else
 {
-obj* x_166; obj* x_168; obj* x_170; obj* x_171; 
+obj* x_168; obj* x_170; obj* x_172; obj* x_173; 
 lean::dec(x_1);
-lean::dec(x_61);
-x_166 = lean::cnstr_get(x_71, 0);
-x_168 = lean::cnstr_get(x_71, 1);
-if (lean::is_exclusive(x_71)) {
- x_170 = x_71;
+lean::dec(x_62);
+x_168 = lean::cnstr_get(x_72, 0);
+x_170 = lean::cnstr_get(x_72, 1);
+if (lean::is_exclusive(x_72)) {
+ x_172 = x_72;
 } else {
- lean::inc(x_166);
  lean::inc(x_168);
- lean::dec(x_71);
- x_170 = lean::box(0);
+ lean::inc(x_170);
+ lean::dec(x_72);
+ x_172 = lean::box(0);
 }
-if (lean::is_scalar(x_170)) {
- x_171 = lean::alloc_cnstr(1, 2, 0);
+if (lean::is_scalar(x_172)) {
+ x_173 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_171 = x_170;
+ x_173 = x_172;
 }
-lean::cnstr_set(x_171, 0, x_166);
-lean::cnstr_set(x_171, 1, x_168);
-return x_171;
+lean::cnstr_set(x_173, 0, x_168);
+lean::cnstr_set(x_173, 1, x_170);
+return x_173;
 }
 }
 else
 {
-obj* x_173; obj* x_175; obj* x_177; obj* x_178; 
+obj* x_175; obj* x_177; obj* x_179; obj* x_180; 
 lean::dec(x_1);
-x_173 = lean::cnstr_get(x_60, 0);
-x_175 = lean::cnstr_get(x_60, 1);
-if (lean::is_exclusive(x_60)) {
- x_177 = x_60;
+x_175 = lean::cnstr_get(x_61, 0);
+x_177 = lean::cnstr_get(x_61, 1);
+if (lean::is_exclusive(x_61)) {
+ x_179 = x_61;
 } else {
- lean::inc(x_173);
  lean::inc(x_175);
- lean::dec(x_60);
- x_177 = lean::box(0);
+ lean::inc(x_177);
+ lean::dec(x_61);
+ x_179 = lean::box(0);
 }
-if (lean::is_scalar(x_177)) {
- x_178 = lean::alloc_cnstr(1, 2, 0);
+if (lean::is_scalar(x_179)) {
+ x_180 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_178 = x_177;
+ x_180 = x_179;
 }
-lean::cnstr_set(x_178, 0, x_173);
-lean::cnstr_set(x_178, 1, x_175);
-return x_178;
+lean::cnstr_set(x_180, 0, x_175);
+lean::cnstr_set(x_180, 1, x_177);
+return x_180;
 }
 }
 else
 {
-obj* x_181; obj* x_183; obj* x_185; obj* x_186; 
+obj* x_183; obj* x_185; obj* x_187; obj* x_188; 
 lean::dec(x_1);
-lean::dec(x_49);
-x_181 = lean::cnstr_get(x_54, 0);
-x_183 = lean::cnstr_get(x_54, 1);
-if (lean::is_exclusive(x_54)) {
- x_185 = x_54;
+lean::dec(x_50);
+x_183 = lean::cnstr_get(x_55, 0);
+x_185 = lean::cnstr_get(x_55, 1);
+if (lean::is_exclusive(x_55)) {
+ x_187 = x_55;
 } else {
- lean::inc(x_181);
  lean::inc(x_183);
- lean::dec(x_54);
- x_185 = lean::box(0);
+ lean::inc(x_185);
+ lean::dec(x_55);
+ x_187 = lean::box(0);
 }
-if (lean::is_scalar(x_185)) {
- x_186 = lean::alloc_cnstr(1, 2, 0);
+if (lean::is_scalar(x_187)) {
+ x_188 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_186 = x_185;
+ x_188 = x_187;
 }
-lean::cnstr_set(x_186, 0, x_181);
-lean::cnstr_set(x_186, 1, x_183);
-return x_186;
+lean::cnstr_set(x_188, 0, x_183);
+lean::cnstr_set(x_188, 1, x_185);
+return x_188;
 }
 }
 else
 {
-obj* x_189; obj* x_191; obj* x_193; obj* x_194; 
+obj* x_191; obj* x_193; obj* x_195; obj* x_196; 
 lean::dec(x_1);
-lean::dec(x_39);
-x_189 = lean::cnstr_get(x_44, 0);
-x_191 = lean::cnstr_get(x_44, 1);
-if (lean::is_exclusive(x_44)) {
- x_193 = x_44;
+lean::dec(x_40);
+x_191 = lean::cnstr_get(x_45, 0);
+x_193 = lean::cnstr_get(x_45, 1);
+if (lean::is_exclusive(x_45)) {
+ x_195 = x_45;
 } else {
- lean::inc(x_189);
  lean::inc(x_191);
- lean::dec(x_44);
- x_193 = lean::box(0);
+ lean::inc(x_193);
+ lean::dec(x_45);
+ x_195 = lean::box(0);
 }
-if (lean::is_scalar(x_193)) {
- x_194 = lean::alloc_cnstr(1, 2, 0);
+if (lean::is_scalar(x_195)) {
+ x_196 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_194 = x_193;
+ x_196 = x_195;
 }
-lean::cnstr_set(x_194, 0, x_189);
-lean::cnstr_set(x_194, 1, x_191);
-return x_194;
+lean::cnstr_set(x_196, 0, x_191);
+lean::cnstr_set(x_196, 1, x_193);
+return x_196;
 }
 }
 else
 {
-obj* x_197; obj* x_199; obj* x_201; obj* x_202; 
+obj* x_199; obj* x_201; obj* x_203; obj* x_204; 
 lean::dec(x_1);
-lean::dec(x_29);
-x_197 = lean::cnstr_get(x_34, 0);
-x_199 = lean::cnstr_get(x_34, 1);
-if (lean::is_exclusive(x_34)) {
- x_201 = x_34;
+lean::dec(x_30);
+x_199 = lean::cnstr_get(x_35, 0);
+x_201 = lean::cnstr_get(x_35, 1);
+if (lean::is_exclusive(x_35)) {
+ x_203 = x_35;
 } else {
- lean::inc(x_197);
  lean::inc(x_199);
- lean::dec(x_34);
- x_201 = lean::box(0);
+ lean::inc(x_201);
+ lean::dec(x_35);
+ x_203 = lean::box(0);
 }
-if (lean::is_scalar(x_201)) {
- x_202 = lean::alloc_cnstr(1, 2, 0);
+if (lean::is_scalar(x_203)) {
+ x_204 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_202 = x_201;
+ x_204 = x_203;
 }
-lean::cnstr_set(x_202, 0, x_197);
-lean::cnstr_set(x_202, 1, x_199);
-return x_202;
+lean::cnstr_set(x_204, 0, x_199);
+lean::cnstr_set(x_204, 1, x_201);
+return x_204;
 }
 }
 else
 {
-obj* x_205; obj* x_207; obj* x_209; obj* x_210; 
+obj* x_207; obj* x_209; obj* x_211; obj* x_212; 
 lean::dec(x_1);
-lean::dec(x_19);
-x_205 = lean::cnstr_get(x_24, 0);
-x_207 = lean::cnstr_get(x_24, 1);
-if (lean::is_exclusive(x_24)) {
- x_209 = x_24;
+lean::dec(x_20);
+x_207 = lean::cnstr_get(x_25, 0);
+x_209 = lean::cnstr_get(x_25, 1);
+if (lean::is_exclusive(x_25)) {
+ x_211 = x_25;
 } else {
- lean::inc(x_205);
  lean::inc(x_207);
- lean::dec(x_24);
- x_209 = lean::box(0);
+ lean::inc(x_209);
+ lean::dec(x_25);
+ x_211 = lean::box(0);
 }
-if (lean::is_scalar(x_209)) {
- x_210 = lean::alloc_cnstr(1, 2, 0);
+if (lean::is_scalar(x_211)) {
+ x_212 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_210 = x_209;
+ x_212 = x_211;
 }
-lean::cnstr_set(x_210, 0, x_205);
-lean::cnstr_set(x_210, 1, x_207);
-return x_210;
+lean::cnstr_set(x_212, 0, x_207);
+lean::cnstr_set(x_212, 1, x_209);
+return x_212;
 }
 }
 else
 {
-obj* x_213; obj* x_215; obj* x_217; obj* x_218; 
+obj* x_215; obj* x_217; obj* x_219; obj* x_220; 
 lean::dec(x_1);
 lean::dec(x_0);
-x_213 = lean::cnstr_get(x_14, 0);
-x_215 = lean::cnstr_get(x_14, 1);
-if (lean::is_exclusive(x_14)) {
- x_217 = x_14;
+x_215 = lean::cnstr_get(x_15, 0);
+x_217 = lean::cnstr_get(x_15, 1);
+if (lean::is_exclusive(x_15)) {
+ x_219 = x_15;
 } else {
- lean::inc(x_213);
  lean::inc(x_215);
- lean::dec(x_14);
- x_217 = lean::box(0);
+ lean::inc(x_217);
+ lean::dec(x_15);
+ x_219 = lean::box(0);
 }
-if (lean::is_scalar(x_217)) {
- x_218 = lean::alloc_cnstr(1, 2, 0);
+if (lean::is_scalar(x_219)) {
+ x_220 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_218 = x_217;
+ x_220 = x_219;
 }
-lean::cnstr_set(x_218, 0, x_213);
-lean::cnstr_set(x_218, 1, x_215);
-return x_218;
+lean::cnstr_set(x_220, 0, x_215);
+lean::cnstr_set(x_220, 1, x_217);
+return x_220;
 }
 }
 else
 {
-obj* x_221; obj* x_223; obj* x_225; obj* x_226; 
+obj* x_223; obj* x_225; obj* x_227; obj* x_228; 
 lean::dec(x_1);
 lean::dec(x_0);
-x_221 = lean::cnstr_get(x_4, 0);
-x_223 = lean::cnstr_get(x_4, 1);
-if (lean::is_exclusive(x_4)) {
- x_225 = x_4;
+x_223 = lean::cnstr_get(x_7, 0);
+x_225 = lean::cnstr_get(x_7, 1);
+if (lean::is_exclusive(x_7)) {
+ x_227 = x_7;
 } else {
- lean::inc(x_221);
  lean::inc(x_223);
- lean::dec(x_4);
- x_225 = lean::box(0);
+ lean::inc(x_225);
+ lean::dec(x_7);
+ x_227 = lean::box(0);
 }
-if (lean::is_scalar(x_225)) {
- x_226 = lean::alloc_cnstr(1, 2, 0);
+if (lean::is_scalar(x_227)) {
+ x_228 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_226 = x_225;
+ x_228 = x_227;
 }
-lean::cnstr_set(x_226, 0, x_221);
-lean::cnstr_set(x_226, 1, x_223);
-return x_226;
+lean::cnstr_set(x_228, 0, x_223);
+lean::cnstr_set(x_228, 1, x_225);
+return x_228;
 }
 }
 }
@@ -1095,6 +1097,7 @@ obj* initialize_init_lean_compiler_ir_checker(obj*);
 obj* initialize_init_lean_compiler_ir_borrow(obj*);
 obj* initialize_init_lean_compiler_ir_boxing(obj*);
 obj* initialize_init_lean_compiler_ir_rc(obj*);
+obj* initialize_init_lean_compiler_ir_emitcpp(obj*);
 static bool _G_initialized = false;
 obj* initialize_init_lean_compiler_ir_default(obj* w) {
  if (_G_initialized) return w;
@@ -1123,6 +1126,8 @@ if (io_result_is_error(w)) return w;
 w = initialize_init_lean_compiler_ir_boxing(w);
 if (io_result_is_error(w)) return w;
 w = initialize_init_lean_compiler_ir_rc(w);
+if (io_result_is_error(w)) return w;
+w = initialize_init_lean_compiler_ir_emitcpp(w);
 if (io_result_is_error(w)) return w;
  l___private_init_lean_compiler_ir_default_1__compileAux___closed__1 = _init_l___private_init_lean_compiler_ir_default_1__compileAux___closed__1();
 lean::mark_persistent(l___private_init_lean_compiler_ir_default_1__compileAux___closed__1);
diff --git a/src/stage0/init/lean/compiler/ir/emitcpp.cpp b/src/stage0/init/lean/compiler/ir/emitcpp.cpp
index 1216b93c6c..d2bfaa0461 100644
--- a/src/stage0/init/lean/compiler/ir/emitcpp.cpp
+++ b/src/stage0/init/lean/compiler/ir/emitcpp.cpp
@@ -1,6 +1,6 @@
 // Lean compiler output
 // Module: init.lean.compiler.ir.emitcpp
-// Imports: init.control.conditional init.lean.name_mangling init.lean.compiler.ir.compilerm init.lean.compiler.ir.emitutil
+// Imports: init.control.conditional init.lean.name_mangling init.lean.compiler.initattr init.lean.compiler.ir.compilerm init.lean.compiler.ir.emitutil init.lean.compiler.ir.normids
 #include "runtime/object.h"
 #include "runtime/apply.h"
 typedef lean::object obj;    typedef lean::usize  usize;
@@ -14,77 +14,425 @@ typedef lean::uint32 uint32; typedef lean::uint64 uint64;
 #pragma GCC diagnostic ignored "-Wunused-label"
 #pragma GCC diagnostic ignored "-Wunused-but-set-variable"
 #endif
-obj* l_Lean_IR_EmitCpp_emitMainFn___closed__24;
+obj* l_Lean_IR_EmitCpp_emitProj___closed__1;
 extern obj* l_Lean_IR_getDecl___closed__1;
+obj* l_Lean_Name_mangle(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_isObj(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_declareVars(obj*, uint8, obj*, obj*);
+obj* l_HashMapImp_find___at_Lean_IR_EmitCpp_getJPParams___spec__1___boxed(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_toCppType___main___closed__1;
+obj* l_Lean_IR_EmitCpp_emitNumLit___closed__1;
 obj* l_Lean_IR_EmitCpp_leanMainFn;
 obj* l_Lean_IR_EmitCpp_emit(obj*);
+obj* l_List_mfor___main___at_Lean_IR_EmitCpp_emitMainFn___spec__2(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_openNamespacesAux___main___closed__1;
+obj* l_Lean_getExternNameFor(obj*, obj*, obj*);
 extern "C" uint8 lean_name_dec_eq(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitLns___rarg___boxed(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitArgs___boxed(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitFileHeader___closed__5;
+obj* l_Lean_IR_EmitCpp_emitOffset___closed__2;
 obj* l_Lean_IR_EmitCpp_emit___rarg___boxed(obj*, obj*, obj*, obj*);
-obj* l_Lean_IR_EmitCpp_emitMainFn___closed__15;
+obj* l_Lean_IR_EmitCpp_getJPParams___closed__1;
+obj* l_Lean_IR_EmitCpp_throwInvalidExportName___rarg___boxed(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_toCppType(uint8);
+obj* l_List_map___main___at_Lean_IR_EmitCpp_toStringArgs___spec__1(obj*);
 extern obj* l_Array_empty___closed__1;
-obj* l_Lean_IR_EmitCpp_emitMainFn___closed__16;
+namespace lean {
+obj* nat_sub(obj*, obj*);
+}
+obj* l_Lean_IR_EmitCpp_emitJmp___closed__1;
 obj* l_Lean_IR_EmitCpp_emitMainFn___closed__14;
+obj* l_Lean_IR_EmitCpp_emitReset___boxed(obj*, obj*, obj*, obj*);
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitFnDeclAux___spec__1___boxed(obj*, obj*, obj*, obj*, obj*);
 obj* l_Lean_IR_EmitCpp_emitMainFn___closed__1;
 obj* l_Lean_IR_EmitCpp_emitMainFn___closed__8;
+obj* l_Lean_IR_EmitCpp_emitSProj___boxed(obj*, obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_closeNamespacesFor(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitUSet___boxed(obj*, obj*, obj*, obj*, obj*);
+obj* l_List_foldl___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__1(obj*, obj*);
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitDeclAux___spec__1___boxed(obj*, obj*, obj*, obj*, obj*);
+extern obj* l_Lean_IR_JoinPointId_HasToString___closed__1;
+obj* l_Lean_IR_EmitCpp_emitArg___boxed(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitSProj___rarg(obj*);
+obj* l_List_mfor___main___at_Lean_IR_EmitCpp_emitFns___spec__1(obj*, obj*, obj*);
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitFnDeclAux___spec__1(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitDec(obj*, obj*, uint8, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_closeNamespacesAux(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitIf___closed__2;
+obj* l_Lean_IR_EmitCpp_emitBox___closed__4;
+obj* l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitFileHeader___spec__1___boxed(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_declareVars___main___boxed(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_closeNamespaces___boxed(obj*, obj*, obj*);
+obj* l_HashMapImp_find___at_Lean_IR_EmitCpp_isObj___spec__1___boxed(obj*, obj*);
 obj* l_Lean_IR_EmitCpp_emit___rarg(obj*, obj*, obj*, obj*);
-obj* l___private_init_lean_name__mangling_2__Name_mangleAux___main(obj*, obj*);
+extern obj* l_Char_quoteCore___closed__3;
+obj* l_Lean_IR_EmitCpp_emitBlock___main___closed__1;
+obj* l_Lean_IR_EmitCpp_openNamespacesAux___boxed(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_closeNamespaces(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitLit___boxed(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitLns___boxed(obj*);
 obj* l_Lean_IR_EmitCpp_emitMainFn___closed__11;
+obj* l_Lean_IR_EmitCpp_emitUProj(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_toCppType___main___closed__7;
+obj* l_Lean_IR_EmitCpp_emitApp(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitInc___closed__2;
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitPartialApp___spec__1___closed__1;
+obj* l_Lean_IR_Decl_normalizeIds(obj*);
 obj* l_Lean_PersistentEnvExtension_getEntries___rarg(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitIsTaggedPtr___closed__1;
+obj* l_Lean_IR_EmitCpp_emitJPs(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitReset___rarg(obj*);
+uint8 l_Lean_IR_Decl_resultType___main(obj*);
+obj* l_Lean_IR_EmitCpp_emitVDecl(obj*, uint8, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_closeNamespacesFor___boxed(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitFnDeclAux___closed__3;
+obj* l_Lean_IR_EmitCpp_emitDeclAux___closed__1;
+obj* l_List_reverse___rarg(obj*);
+namespace lean {
+obj* mk_extern_call_core(obj*, obj*, obj*);
+}
 obj* l_Lean_IR_EmitCpp_emitMainFn___closed__13;
 obj* l_Lean_IR_EmitCpp_emitLn___boxed(obj*);
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitDeclAux___spec__1(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_isIf(obj*);
+obj* l_List_foldr___main___at_Lean_IR_EmitCpp_hasMainFn___spec__1___boxed(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_closeNamespacesAux___main(obj*, obj*, obj*);
+obj* l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1(obj*, obj*, obj*, obj*, obj*);
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitJmp___spec__1___closed__1;
+uint8 l_List_foldr___main___at_Lean_IR_EmitCpp_hasMainFn___spec__1(uint8, obj*);
+obj* l_Lean_IR_EmitCpp_emitUnbox___closed__2;
+namespace lean {
+namespace ir {
+obj* decl_to_string_core(obj*);
+}}
+obj* l_Lean_IR_EmitCpp_emitDecl(obj*, obj*, obj*);
 obj* l_Lean_Name_toStringWithSep___main(obj*, obj*);
-uint8 l_List_foldr___main___at_Lean_IR_EmitCpp_main___spec__1(uint8, obj*);
+obj* l_Lean_IR_EmitCpp_openNamespaces___boxed(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_isObj___boxed(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitRelease___boxed(obj*, obj*, obj*, obj*);
+obj* l_String_foldlAux___main___at_Lean_IR_EmitCpp_quoteString___spec__1(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitCase___closed__1;
+obj* l_Lean_IR_EmitCpp_emitFileHeader(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitUnbox___closed__3;
 obj* l_Lean_IR_EmitCpp_emitLn___rarg(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitFnDecl(obj*, uint8, obj*, obj*);
+uint8 l_Lean_IR_IRType_isObj___main(uint8);
+obj* l_Lean_IR_EmitCpp_emitJmp___closed__2;
+extern obj* l_uint32Sz;
+obj* l_Lean_IR_EmitCpp_emitBox___closed__1;
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitPartialApp___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*);
+obj* l_String_foldlAux___main___at_Lean_IR_EmitCpp_quoteString___spec__1___boxed(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitIsTaggedPtr(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_throwUnknownVar___rarg___closed__1;
+obj* l_Lean_IR_EmitCpp_emitBlock___main(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitInc___closed__1;
+obj* l_AssocList_find___main___at_Lean_IR_EmitCpp_getJPParams___spec__2___boxed(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitSSet___boxed(obj*, obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_toBaseCppName(obj*, obj*, obj*);
 obj* l_Lean_IR_emitCpp___closed__1;
+obj* l_Lean_IR_EmitCpp_emitCase___boxed(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_toCppType___main___closed__5;
+obj* l_Lean_IR_EmitCpp_emitNumLit___boxed(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitBox___closed__5;
+extern obj* l_Char_quoteCore___closed__1;
+extern "C" obj* lean_get_export_name_for(obj*, obj*);
+namespace lean {
+obj* string_push(obj*, uint32);
+}
+obj* l_Lean_IR_EmitCpp_emitSet___closed__1;
+obj* l_Lean_IR_EmitCpp_getJPParams___boxed(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitReset(obj*, obj*, obj*, obj*);
+obj* l_Array_toList___rarg(obj*);
+obj* l_Lean_IR_EmitCpp_emitLhs(obj*, obj*, obj*);
 obj* l_Lean_IR_usesLeanNamespace___main(obj*, obj*);
+uint8 l_Lean_NameSet_contains(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_hasMainFn(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitNumLit___closed__2;
+obj* l_Lean_IR_EmitCpp_emitPartialApp___boxed(obj*, obj*, obj*, obj*, obj*);
+obj* l_Nat_repr(obj*);
+obj* l_Lean_IR_EmitCpp_closeNamespacesAux___main___closed__1;
+extern obj* l_String_quote___closed__1;
+obj* l_Lean_IR_EmitCpp_declareParams___boxed(obj*, obj*, obj*);
+uint8 l_Lean_hasInitAttr(obj*, obj*);
+obj* l_RBNode_insert___at_Lean_NameSet_insert___spec__1(obj*, obj*, obj*);
 obj* l_Lean_IR_EmitCpp_emit___boxed(obj*);
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitArgs___spec__1(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_mkVarJPMaps(obj*);
+obj* l_Lean_IR_EmitCpp_emitJPs___main(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitFileHeader___closed__7;
+obj* l_Lean_IR_EmitCpp_closeNamespacesAux___main___boxed(obj*, obj*, obj*);
 obj* l_Lean_IR_EmitCpp_emitMainFn___closed__6;
+obj* l_Lean_IR_EmitCpp_emitInc___boxed(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitIsShared___boxed(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_throwInvalidExportName___rarg___closed__1;
+obj* l_Lean_IR_EmitCpp_toCppType___main___closed__4;
+obj* l_Lean_IR_EmitCpp_emitApp___boxed(obj*, obj*, obj*, obj*);
 obj* l_Lean_IR_EmitCpp_emitMainFn___closed__7;
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitArgs___spec__1___boxed(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitFnDecls(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_closeNamespacesAux___boxed(obj*, obj*, obj*);
+extern obj* l_Char_quoteCore___closed__2;
+obj* l_Lean_IR_EmitCpp_emitOffset___closed__1;
+obj* l_Lean_IR_EmitCpp_emitExternDeclAux___closed__2;
+obj* l_Lean_IR_EmitCpp_emitFileHeader___closed__4;
 namespace lean {
 obj* string_append(obj*, obj*);
 }
+obj* l_Lean_IR_EmitCpp_emitOffset(obj*, obj*, obj*, obj*);
+obj* l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___boxed(obj*, obj*, obj*, obj*, obj*);
 obj* l_Lean_IR_EmitCpp_getDecl(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitTag___closed__1;
+obj* l_Lean_IR_EmitCpp_emitUnbox(obj*, uint8, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitLns___at_Lean_IR_EmitCpp_emitMainFn___spec__1(obj*, obj*, obj*);
+extern obj* l_List_reprAux___main___rarg___closed__1;
+obj* l_List_mfor___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__5___boxed(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitUnbox___closed__4;
+obj* l_Lean_IR_EmitCpp_emitNumLit(uint8, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitExternDeclAux___boxed(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitUSet(obj*, obj*, obj*, obj*, obj*);
 obj* l_Lean_IR_EmitCpp_emitLn(obj*);
-obj* l_Lean_IR_EmitCpp_emitMainFn___closed__17;
+obj* l_Lean_IR_EmitCpp_emitFnDeclAux___closed__2;
+extern obj* l_Option_HasRepr___rarg___closed__3;
+namespace lean {
+uint8 nat_dec_lt(obj*, obj*);
+}
 obj* l_Lean_IR_EmitCpp_emitMainFn(obj*, obj*);
+uint8 l_Lean_isExternC(obj*, obj*);
+obj* l_Array_mforAux___main___at_Lean_IR_EmitCpp_declareParams___spec__1___boxed(obj*, obj*, obj*, obj*);
+obj* l_RBTree_toList___at_Lean_IR_EmitCpp_emitFnDecls___spec__3(obj*);
+obj* l_Lean_IR_EmitCpp_emitCase___closed__2;
+namespace lean {
+obj* nat_mod(obj*, obj*);
+}
+obj* l_HashMapImp_find___at_Lean_IR_EmitCpp_isObj___spec__1(obj*, obj*);
+uint8 l_Lean_IR_FnBody_isTerminal___main(obj*);
+obj* l_Lean_IR_EmitCpp_emitLit(obj*, uint8, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitApp___rarg(obj*);
+obj* l_Lean_IR_EmitCpp_emitFns(obj*, obj*);
 extern obj* l_Char_HasRepr___closed__1;
+obj* l_Lean_IR_EmitCpp_emitProj___boxed(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitReuse___boxed(obj*, obj*, obj*, obj*, obj*, obj*);
 extern obj* l_Lean_IR_declMapExt;
+obj* l_Lean_IR_EmitCpp_openNamespacesAux___main___closed__3;
 extern "C" obj* lean_name_mk_string(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_openNamespacesAux(obj*, obj*, obj*);
 obj* l_Lean_IR_Decl_name___main(obj*);
+obj* l_Lean_IR_EmitCpp_toCppType___main(uint8);
+obj* l_Lean_IR_EmitCpp_argToCppString(obj*);
+obj* l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___closed__1;
+extern obj* l_Char_quoteCore___closed__5;
+namespace lean {
+obj* nat_add(obj*, obj*);
+}
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitJmp___spec__1(obj*, obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_getExportNameFor___boxed(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitBlock___main___closed__2;
 namespace lean {
 uint8 nat_dec_eq(obj*, obj*);
 }
-obj* l_Lean_IR_EmitCpp_emitMainFn___closed__20;
+obj* l_Lean_IR_EmitCpp_emitJmp(obj*, obj*, obj*, obj*);
+extern obj* l_Prod_HasRepr___rarg___closed__1;
+extern obj* l_Lean_IR_paramInh;
+obj* l_Lean_IR_EmitCpp_openNamespacesAux___main___closed__2;
+uint8 l_Array_isEmpty___rarg(obj*);
+obj* l_Lean_IR_EmitCpp_emitIsTaggedPtr___boxed(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitProj(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_argToCppString___closed__1;
+obj* l_Lean_IR_EmitCpp_emitCase(obj*, obj*, obj*, obj*, obj*);
 obj* l_Lean_IR_EmitCpp_emitMainFn___closed__12;
+obj* l_Lean_IR_EmitCpp_emitSet(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitFnDeclAux(obj*, obj*, uint8, obj*, obj*);
 obj* l_Lean_IR_EmitCpp_emitMainFn___closed__2;
+obj* l_Lean_IR_EmitCpp_emitFullApp___closed__1;
 obj* l_Lean_IR_EmitCpp_emitMainFn___closed__3;
+extern obj* l_Lean_IR_altInh;
 obj* l_Lean_IR_EmitCpp_emitMainFn___closed__4;
-obj* l_Lean_IR_EmitCpp_emitMainFn___closed__26;
-obj* l_Lean_IR_EmitCpp_emitMainFn___closed__21;
-obj* l_Lean_IR_EmitCpp_emitMainFn___closed__23;
-obj* l_List_foldr___main___at_Lean_IR_EmitCpp_main___spec__1___boxed(obj*, obj*);
-obj* l_Lean_IR_EmitCpp_emitMainFn___closed__22;
+obj* l_Lean_IR_EmitCpp_throwUnknownVar___boxed(obj*);
+namespace lean {
+uint32 string_utf8_get(obj*, obj*);
+}
+obj* l_Lean_IR_EmitCpp_emitJmp___boxed(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitCtor___rarg(obj*);
+obj* l_List_mfor___main___at_Lean_IR_EmitCpp_emitLns___spec__1___rarg(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitFileHeader___closed__2;
+obj* l_Lean_IR_collectUsedDecls(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitBox(obj*, obj*, uint8, obj*, obj*);
+obj* l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___closed__2;
+obj* l_Lean_IR_EmitCpp_toCppInitName___closed__1;
+obj* l_Lean_IR_EmitCpp_emitVDecl___boxed(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_declareVars___boxed(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitUProj___rarg(obj*);
+obj* l_Lean_IR_EmitCpp_emitArg(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitInc___closed__3;
+obj* l_Lean_IR_EmitCpp_emitBox___closed__2;
+obj* l_Lean_IR_EmitCpp_emitSProj(obj*, uint8, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_toCppType___main___boxed(obj*);
+obj* l_Lean_IR_EmitCpp_quoteString___boxed(obj*);
+obj* l_Lean_IR_EmitCpp_emitLhs___boxed(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitBox___boxed(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitBlock(obj*, obj*, obj*, obj*);
+obj* l_HashMapImp_find___at_Lean_IR_EmitCpp_getJPParams___spec__1(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitLit___closed__1;
+obj* l_Lean_IR_EmitCpp_emitFnBody___main___closed__1;
+obj* l_Lean_IR_EmitCpp_toBaseCppName___closed__2;
 obj* l_Lean_IR_EmitCpp_main(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitExternDeclAux___closed__1;
+obj* l_Lean_IR_EmitCpp_cppQualifiedNameToName(obj*);
+obj* l_Lean_IR_EmitCpp_emitTag___boxed(obj*, obj*, obj*);
+obj* l_String_split(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitFnBody___main___closed__2;
+obj* l_Lean_IR_EmitCpp_emitReuse___rarg(obj*);
+obj* l_Lean_IR_EmitCpp_emitCtor(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_AltCore_body___main(obj*);
+obj* l_Lean_IR_EmitCpp_emitLns___rarg(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_toCppInitName(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitOffset___boxed(obj*, obj*, obj*, obj*);
 obj* l_Lean_IR_findEnvDecl(obj*, obj*);
+namespace lean {
+usize usize_modn(usize, obj*);
+}
+obj* l_Lean_IR_EmitCpp_toCppName(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_getJPParams(obj*, obj*, obj*);
+obj* l_AssocList_find___main___at_Lean_IR_EmitCpp_isObj___spec__2(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitFnBody___main(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_throwUnknownVar(obj*);
+obj* l_Lean_IR_EmitCpp_emitIsShared(obj*, obj*, obj*, obj*);
+obj* l_Array_mforAux___main___at_Lean_IR_EmitCpp_declareParams___spec__1(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitIf___closed__1;
 obj* l_Lean_IR_EmitCpp_getModName(obj*, obj*);
+extern obj* l_HashMap_Inhabited___closed__1;
+obj* l_Lean_IR_EmitCpp_emitFnDeclAux___boxed(obj*, obj*, obj*, obj*, obj*);
 obj* l_Lean_IR_EmitCpp_emitLn___rarg___boxed(obj*, obj*, obj*, obj*);
+obj* l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___closed__3;
+obj* l_Lean_IR_EmitCpp_emitPartialApp___closed__1;
+extern obj* l_Lean_IR_VarId_HasToString___closed__1;
+obj* l_Lean_IR_Decl_params___main(obj*);
 obj* l_Lean_IR_EmitCpp_emitMainFn___closed__5;
-obj* l_Lean_IR_EmitCpp_emitMainFn___closed__27;
-obj* l_Lean_IR_EmitCpp_emitMainFn___closed__29;
-obj* l_Lean_IR_EmitCpp_emitMainFn___closed__19;
-obj* l_Lean_IR_EmitCpp_emitMainFn___closed__28;
+obj* l_Lean_IR_EmitCpp_emitIf___closed__3;
+obj* l_List_mfor___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__5___closed__1;
+obj* l_Lean_IR_EmitCpp_emitSet___boxed(obj*, obj*, obj*, obj*, obj*);
+obj* l_List_foldl___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__1___boxed(obj*, obj*);
+obj* l_RBNode_revFold___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__4(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_openNamespacesFor___boxed(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitRelease(obj*, obj*, obj*, obj*);
+obj* l_List_foldl___main___at_Lean_IR_EmitCpp_cppQualifiedNameToName___spec__1(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitFileHeader___closed__6;
+obj* l_Lean_IR_EmitCpp_emitReuse(obj*, obj*, obj*, uint8, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_toBaseCppName___closed__1;
+obj* l_Lean_Name_getPrefix___main(obj*);
+obj* l_Lean_IR_EmitCpp_emitFullApp(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_toCppType___main___closed__3;
+obj* l_List_mfor___main___at_Lean_IR_EmitCpp_emitMainFn___spec__2___boxed(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_throwUnknownVar___rarg(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_toCppName___closed__1;
+obj* l_AssocList_find___main___at_Lean_IR_EmitCpp_getJPParams___spec__2(obj*, obj*);
+obj* l_List_foldl___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__2(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitArgs(obj*, obj*, obj*);
+obj* l_List_mfor___main___at_Lean_IR_EmitCpp_emitLns___spec__1___boxed(obj*);
+obj* l_Lean_IR_EmitCpp_toCppType___main___closed__2;
+namespace lean {
+obj* string_utf8_next(obj*, obj*);
+}
+obj* l_Lean_IR_EmitCpp_emitCtor___boxed(obj*, obj*, obj*, obj*);
+namespace lean {
+uint32 uint32_of_nat(obj*);
+}
+obj* l_Lean_IR_FnBody_body___main(obj*);
 extern obj* l_Lean_Name_toString___closed__1;
-obj* l_Lean_IR_EmitCpp_emitMainFn___closed__25;
+obj* l_Lean_IR_EmitCpp_emitDec___closed__2;
+obj* l_Lean_IR_EmitCpp_declareVar(obj*, uint8, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_toCppType___boxed(obj*);
+obj* l_Lean_IR_EmitCpp_openNamespacesFor(obj*, obj*, obj*);
+namespace lean {
+uint8 nat_dec_le(obj*, obj*);
+}
+obj* l_AssocList_find___main___at_Lean_IR_EmitCpp_isObj___spec__2___boxed(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_toStringArgs___boxed(obj*);
+obj* l_List_mfor___main___at_Lean_IR_EmitCpp_emitLns___spec__1(obj*);
+obj* l_Lean_IR_EmitCpp_emitFileHeader___closed__3;
+namespace lean {
+usize usize_of_nat(obj*);
+}
+obj* l_Lean_IR_EmitCpp_declareVar___closed__1;
+obj* l_Lean_IR_EmitCpp_openNamespaces(obj*, obj*, obj*);
+obj* l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitFileHeader___spec__1(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitPartialApp(obj*, obj*, obj*, obj*, obj*);
+namespace lean {
+obj* string_utf8_byte_size(obj*);
+}
+namespace lean {
+obj* nat_div(obj*, obj*);
+}
+obj* l_Lean_IR_EmitCpp_emitDec___boxed(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitIsShared___closed__1;
+obj* l_Lean_IR_EmitCpp_emitFnBody(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitUnbox___closed__1;
+namespace lean {
+obj* uint32_to_nat(uint32);
+}
+obj* l_Lean_IR_EmitCpp_emitRelease___closed__1;
+obj* l_Lean_IR_EmitCpp_quoteString(obj*);
+obj* l_Lean_IR_EmitCpp_emitLns___at_Lean_IR_EmitCpp_emitMainFn___spec__1___boxed(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitInc(obj*, obj*, uint8, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitUSet___closed__1;
+uint32 l_Nat_digitChar(obj*);
+obj* l_Lean_IR_EmitCpp_toHexDigit___boxed(obj*);
+obj* l_Lean_IR_EmitCpp_emitExternDeclAux(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_declareVar___boxed(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_declareParams(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitDecl___closed__1;
+obj* l_Lean_IR_EmitCpp_emitTag(obj*, obj*, obj*);
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitPartialApp___spec__1(obj*, obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitDec___closed__1;
+obj* l_Lean_IR_EmitCpp_emitDeclAux(obj*, obj*, obj*);
+obj* l_List_mfor___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__5(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_throwInvalidExportName___boxed(obj*);
+obj* l_Lean_IR_EmitCpp_emitFullApp___boxed(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_throwInvalidExportName___rarg(obj*, obj*, obj*);
 obj* l_Lean_IR_EmitCpp_emitMainFn___closed__10;
+obj* l_Lean_IR_EmitCpp_emitFnDecl___boxed(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_declareVars___main(obj*, uint8, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_toCppType___main___closed__6;
 namespace lean {
 namespace ir {
 obj* emit_cpp_core(obj*, obj*);
 }}
+obj* l_Lean_IR_EmitCpp_throwInvalidExportName(obj*);
+obj* l_Lean_IR_EmitCpp_emitSSet(obj*, obj*, obj*, obj*, obj*, obj*);
 obj* l_Lean_IR_EmitCpp_emitMainFn___closed__9;
+obj* l_Lean_IR_EmitCpp_emitIf(obj*, obj*, obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_toStringArgs(obj*);
 extern obj* l_IO_println___rarg___closed__1;
-obj* l_Lean_IR_EmitCpp_emitMainFn___closed__18;
+obj* l_Lean_IR_EmitCpp_emitFileHeader___closed__1;
+obj* l_Lean_IR_EmitCpp_openNamespacesAux___main___boxed(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitUProj___boxed(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitMainFnIfNeeded(obj*, obj*);
+obj* l_Lean_IR_EmitCpp_throwUnknownVar___rarg___boxed(obj*, obj*, obj*);
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitJmp___spec__1___boxed(obj*, obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_toHexDigit(obj*);
+obj* l_Lean_IR_EmitCpp_openNamespacesAux___main(obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_isIf___boxed(obj*);
+obj* l_Lean_IR_EmitCpp_emitUnbox___boxed(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_EmitCpp_emitFnDeclAux___closed__1;
+obj* l_Lean_IR_EmitCpp_emitLns(obj*);
+extern obj* l_Lean_IR_Arg_Inhabited;
+extern obj* l_Unit_HasRepr___closed__1;
+obj* l_Lean_IR_EmitCpp_emitPartialApp___closed__2;
+obj* l_List_mfor___main___at_Lean_IR_EmitCpp_emitLns___spec__1___rarg___boxed(obj*, obj*, obj*, obj*);
 obj* l_Lean_IR_EmitCpp_getEnv(obj*, obj*);
 extern obj* l_String_splitAux___main___closed__1;
+obj* l_Lean_IR_EmitCpp_emitBox___closed__3;
+obj* l_Lean_IR_getExportNameFor___boxed(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; 
+x_2 = lean_get_export_name_for(x_0, x_1);
+lean::dec(x_0);
+lean::dec(x_1);
+return x_2;
+}
+}
 obj* _init_l_Lean_IR_EmitCpp_leanMainFn() {
 _start:
 {
@@ -132,7 +480,7 @@ if (lean::is_exclusive(x_1)) {
  lean::dec(x_1);
  x_4 = lean::box(0);
 }
-x_5 = lean::cnstr_get(x_0, 2);
+x_5 = lean::cnstr_get(x_0, 1);
 lean::inc(x_5);
 lean::dec(x_0);
 if (lean::is_scalar(x_4)) {
@@ -337,7 +685,606 @@ lean::dec(x_0);
 return x_1;
 }
 }
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__1() {
+obj* l_List_mfor___main___at_Lean_IR_EmitCpp_emitLns___spec__1___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+if (lean::obj_tag(x_1) == 0)
+{
+obj* x_5; obj* x_7; obj* x_8; obj* x_9; 
+lean::dec(x_0);
+x_5 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ lean::cnstr_release(x_3, 0);
+ x_7 = x_3;
+} else {
+ lean::inc(x_5);
+ lean::dec(x_3);
+ x_7 = lean::box(0);
+}
+x_8 = lean::box(0);
+if (lean::is_scalar(x_7)) {
+ x_9 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_9 = x_7;
+}
+lean::cnstr_set(x_9, 0, x_8);
+lean::cnstr_set(x_9, 1, x_5);
+return x_9;
+}
+else
+{
+obj* x_10; obj* x_12; obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 
+x_10 = lean::cnstr_get(x_1, 0);
+lean::inc(x_10);
+x_12 = lean::cnstr_get(x_1, 1);
+lean::inc(x_12);
+lean::dec(x_1);
+x_15 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ lean::cnstr_release(x_3, 0);
+ x_17 = x_3;
+} else {
+ lean::inc(x_15);
+ lean::dec(x_3);
+ x_17 = lean::box(0);
+}
+lean::inc(x_0);
+x_19 = lean::apply_1(x_0, x_10);
+x_20 = lean::string_append(x_15, x_19);
+lean::dec(x_19);
+x_22 = l_IO_println___rarg___closed__1;
+x_23 = lean::string_append(x_20, x_22);
+x_24 = lean::box(0);
+if (lean::is_scalar(x_17)) {
+ x_25 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_25 = x_17;
+}
+lean::cnstr_set(x_25, 0, x_24);
+lean::cnstr_set(x_25, 1, x_23);
+x_1 = x_12;
+x_3 = x_25;
+goto _start;
+}
+}
+}
+obj* l_List_mfor___main___at_Lean_IR_EmitCpp_emitLns___spec__1(obj* x_0) {
+_start:
+{
+obj* x_1; 
+x_1 = lean::alloc_closure(reinterpret_cast<void*>(l_List_mfor___main___at_Lean_IR_EmitCpp_emitLns___spec__1___rarg___boxed), 4, 0);
+return x_1;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitLns___rarg(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_List_mfor___main___at_Lean_IR_EmitCpp_emitLns___spec__1___rarg(x_0, x_1, x_2, x_3);
+return x_4;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitLns(obj* x_0) {
+_start:
+{
+obj* x_1; 
+x_1 = lean::alloc_closure(reinterpret_cast<void*>(l_Lean_IR_EmitCpp_emitLns___rarg___boxed), 4, 0);
+return x_1;
+}
+}
+obj* l_List_mfor___main___at_Lean_IR_EmitCpp_emitLns___spec__1___rarg___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_List_mfor___main___at_Lean_IR_EmitCpp_emitLns___spec__1___rarg(x_0, x_1, x_2, x_3);
+lean::dec(x_2);
+return x_4;
+}
+}
+obj* l_List_mfor___main___at_Lean_IR_EmitCpp_emitLns___spec__1___boxed(obj* x_0) {
+_start:
+{
+obj* x_1; 
+x_1 = l_List_mfor___main___at_Lean_IR_EmitCpp_emitLns___spec__1(x_0);
+lean::dec(x_0);
+return x_1;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitLns___rarg___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Lean_IR_EmitCpp_emitLns___rarg(x_0, x_1, x_2, x_3);
+lean::dec(x_2);
+return x_4;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitLns___boxed(obj* x_0) {
+_start:
+{
+obj* x_1; 
+x_1 = l_Lean_IR_EmitCpp_emitLns(x_0);
+lean::dec(x_0);
+return x_1;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_argToCppString___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::box(0)");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_argToCppString(obj* x_0) {
+_start:
+{
+if (lean::obj_tag(x_0) == 0)
+{
+obj* x_1; obj* x_4; obj* x_5; obj* x_6; 
+x_1 = lean::cnstr_get(x_0, 0);
+lean::inc(x_1);
+lean::dec(x_0);
+x_4 = l_Nat_repr(x_1);
+x_5 = l_Lean_IR_VarId_HasToString___closed__1;
+x_6 = lean::string_append(x_5, x_4);
+lean::dec(x_4);
+return x_6;
+}
+else
+{
+obj* x_8; 
+x_8 = l_Lean_IR_EmitCpp_argToCppString___closed__1;
+return x_8;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitArg(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_9; obj* x_10; 
+x_3 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ lean::cnstr_release(x_2, 0);
+ x_5 = x_2;
+} else {
+ lean::inc(x_3);
+ lean::dec(x_2);
+ x_5 = lean::box(0);
+}
+x_6 = l_Lean_IR_EmitCpp_argToCppString(x_0);
+x_7 = lean::string_append(x_3, x_6);
+lean::dec(x_6);
+x_9 = lean::box(0);
+if (lean::is_scalar(x_5)) {
+ x_10 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_10 = x_5;
+}
+lean::cnstr_set(x_10, 0, x_9);
+lean::cnstr_set(x_10, 1, x_7);
+return x_10;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitArg___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_emitArg(x_0, x_1, x_2);
+lean::dec(x_1);
+return x_3;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_toCppType___main___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("double");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_toCppType___main___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("uint8");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_toCppType___main___closed__3() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("uint16");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_toCppType___main___closed__4() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("uint32");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_toCppType___main___closed__5() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("uint64");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_toCppType___main___closed__6() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("usize");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_toCppType___main___closed__7() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("obj*");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_toCppType___main(uint8 x_0) {
+_start:
+{
+switch (x_0) {
+case 0:
+{
+obj* x_1; 
+x_1 = l_Lean_IR_EmitCpp_toCppType___main___closed__1;
+return x_1;
+}
+case 1:
+{
+obj* x_2; 
+x_2 = l_Lean_IR_EmitCpp_toCppType___main___closed__2;
+return x_2;
+}
+case 2:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_toCppType___main___closed__3;
+return x_3;
+}
+case 3:
+{
+obj* x_4; 
+x_4 = l_Lean_IR_EmitCpp_toCppType___main___closed__4;
+return x_4;
+}
+case 4:
+{
+obj* x_5; 
+x_5 = l_Lean_IR_EmitCpp_toCppType___main___closed__5;
+return x_5;
+}
+case 5:
+{
+obj* x_6; 
+x_6 = l_Lean_IR_EmitCpp_toCppType___main___closed__6;
+return x_6;
+}
+default:
+{
+obj* x_7; 
+x_7 = l_Lean_IR_EmitCpp_toCppType___main___closed__7;
+return x_7;
+}
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_toCppType___main___boxed(obj* x_0) {
+_start:
+{
+uint8 x_1; obj* x_2; 
+x_1 = lean::unbox(x_0);
+x_2 = l_Lean_IR_EmitCpp_toCppType___main(x_1);
+return x_2;
+}
+}
+obj* l_Lean_IR_EmitCpp_toCppType(uint8 x_0) {
+_start:
+{
+obj* x_1; 
+x_1 = l_Lean_IR_EmitCpp_toCppType___main(x_0);
+return x_1;
+}
+}
+obj* l_Lean_IR_EmitCpp_toCppType___boxed(obj* x_0) {
+_start:
+{
+uint8 x_1; obj* x_2; 
+x_1 = lean::unbox(x_0);
+x_2 = l_Lean_IR_EmitCpp_toCppType(x_1);
+return x_2;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_openNamespacesAux___main___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("namespace ");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_openNamespacesAux___main___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string(" {");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_openNamespacesAux___main___closed__3() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("invalid namespace '");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_openNamespacesAux___main(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+switch (lean::obj_tag(x_0)) {
+case 0:
+{
+obj* x_3; obj* x_5; obj* x_6; obj* x_7; 
+x_3 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ lean::cnstr_release(x_2, 0);
+ x_5 = x_2;
+} else {
+ lean::inc(x_3);
+ lean::dec(x_2);
+ x_5 = lean::box(0);
+}
+x_6 = lean::box(0);
+if (lean::is_scalar(x_5)) {
+ x_7 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_7 = x_5;
+}
+lean::cnstr_set(x_7, 0, x_6);
+lean::cnstr_set(x_7, 1, x_3);
+return x_7;
+}
+case 1:
+{
+obj* x_8; obj* x_10; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; 
+x_8 = lean::cnstr_get(x_0, 0);
+lean::inc(x_8);
+x_10 = lean::cnstr_get(x_0, 1);
+lean::inc(x_10);
+lean::dec(x_0);
+x_13 = l_Lean_IR_EmitCpp_openNamespacesAux___main___closed__1;
+x_14 = lean::string_append(x_13, x_10);
+lean::dec(x_10);
+x_16 = l_Lean_IR_EmitCpp_openNamespacesAux___main___closed__2;
+x_17 = lean::string_append(x_14, x_16);
+x_18 = l_Lean_IR_EmitCpp_openNamespacesAux___main(x_8, x_1, x_2);
+if (lean::obj_tag(x_18) == 0)
+{
+obj* x_19; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; 
+x_19 = lean::cnstr_get(x_18, 1);
+if (lean::is_exclusive(x_18)) {
+ lean::cnstr_release(x_18, 0);
+ x_21 = x_18;
+} else {
+ lean::inc(x_19);
+ lean::dec(x_18);
+ x_21 = lean::box(0);
+}
+x_22 = lean::string_append(x_19, x_17);
+lean::dec(x_17);
+x_24 = l_IO_println___rarg___closed__1;
+x_25 = lean::string_append(x_22, x_24);
+x_26 = lean::box(0);
+if (lean::is_scalar(x_21)) {
+ x_27 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_27 = x_21;
+}
+lean::cnstr_set(x_27, 0, x_26);
+lean::cnstr_set(x_27, 1, x_25);
+return x_27;
+}
+else
+{
+obj* x_29; obj* x_31; obj* x_33; obj* x_34; 
+lean::dec(x_17);
+x_29 = lean::cnstr_get(x_18, 0);
+x_31 = lean::cnstr_get(x_18, 1);
+if (lean::is_exclusive(x_18)) {
+ x_33 = x_18;
+} else {
+ lean::inc(x_29);
+ lean::inc(x_31);
+ lean::dec(x_18);
+ x_33 = lean::box(0);
+}
+if (lean::is_scalar(x_33)) {
+ x_34 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_34 = x_33;
+}
+lean::cnstr_set(x_34, 0, x_29);
+lean::cnstr_set(x_34, 1, x_31);
+return x_34;
+}
+}
+default:
+{
+obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_43; obj* x_44; obj* x_45; 
+x_35 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ lean::cnstr_release(x_2, 0);
+ x_37 = x_2;
+} else {
+ lean::inc(x_35);
+ lean::dec(x_2);
+ x_37 = lean::box(0);
+}
+x_38 = l_Lean_Name_toString___closed__1;
+x_39 = l_Lean_Name_toStringWithSep___main(x_38, x_0);
+x_40 = l_Lean_IR_EmitCpp_openNamespacesAux___main___closed__3;
+x_41 = lean::string_append(x_40, x_39);
+lean::dec(x_39);
+x_43 = l_Char_HasRepr___closed__1;
+x_44 = lean::string_append(x_41, x_43);
+if (lean::is_scalar(x_37)) {
+ x_45 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_45 = x_37;
+ lean::cnstr_set_tag(x_37, 1);
+}
+lean::cnstr_set(x_45, 0, x_44);
+lean::cnstr_set(x_45, 1, x_35);
+return x_45;
+}
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_openNamespacesAux___main___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_openNamespacesAux___main(x_0, x_1, x_2);
+lean::dec(x_1);
+return x_3;
+}
+}
+obj* l_Lean_IR_EmitCpp_openNamespacesAux(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_openNamespacesAux___main(x_0, x_1, x_2);
+return x_3;
+}
+}
+obj* l_Lean_IR_EmitCpp_openNamespacesAux___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_openNamespacesAux(x_0, x_1, x_2);
+lean::dec(x_1);
+return x_3;
+}
+}
+obj* l_Lean_IR_EmitCpp_openNamespaces(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; obj* x_4; 
+x_3 = l_Lean_Name_getPrefix___main(x_0);
+x_4 = l_Lean_IR_EmitCpp_openNamespacesAux___main(x_3, x_1, x_2);
+return x_4;
+}
+}
+obj* l_Lean_IR_EmitCpp_openNamespaces___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_openNamespaces(x_0, x_1, x_2);
+lean::dec(x_0);
+lean::dec(x_1);
+return x_3;
+}
+}
+obj* l_Lean_IR_EmitCpp_openNamespacesFor(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_4; 
+lean::inc(x_1);
+x_4 = l_Lean_IR_EmitCpp_getEnv(x_1, x_2);
+if (lean::obj_tag(x_4) == 0)
+{
+obj* x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_13; 
+x_5 = lean::cnstr_get(x_4, 0);
+x_7 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ x_9 = x_4;
+} else {
+ lean::inc(x_5);
+ lean::inc(x_7);
+ lean::dec(x_4);
+ x_9 = lean::box(0);
+}
+x_10 = lean::box(0);
+lean::inc(x_7);
+if (lean::is_scalar(x_9)) {
+ x_12 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_12 = x_9;
+}
+lean::cnstr_set(x_12, 0, x_10);
+lean::cnstr_set(x_12, 1, x_7);
+x_13 = lean_get_export_name_for(x_5, x_0);
+lean::dec(x_5);
+if (lean::obj_tag(x_13) == 0)
+{
+obj* x_17; 
+lean::dec(x_1);
+lean::dec(x_12);
+x_17 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_17, 0, x_10);
+lean::cnstr_set(x_17, 1, x_7);
+return x_17;
+}
+else
+{
+obj* x_19; obj* x_22; 
+lean::dec(x_7);
+x_19 = lean::cnstr_get(x_13, 0);
+lean::inc(x_19);
+lean::dec(x_13);
+x_22 = l_Lean_IR_EmitCpp_openNamespaces(x_19, x_1, x_12);
+lean::dec(x_1);
+lean::dec(x_19);
+return x_22;
+}
+}
+else
+{
+obj* x_26; obj* x_28; obj* x_30; obj* x_31; 
+lean::dec(x_1);
+x_26 = lean::cnstr_get(x_4, 0);
+x_28 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ x_30 = x_4;
+} else {
+ lean::inc(x_26);
+ lean::inc(x_28);
+ lean::dec(x_4);
+ x_30 = lean::box(0);
+}
+if (lean::is_scalar(x_30)) {
+ x_31 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_31 = x_30;
+}
+lean::cnstr_set(x_31, 0, x_26);
+lean::cnstr_set(x_31, 1, x_28);
+return x_31;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_openNamespacesFor___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_openNamespacesFor(x_0, x_1, x_2);
+lean::dec(x_0);
+return x_3;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_closeNamespacesAux___main___closed__1() {
 _start:
 {
 obj* x_0; 
@@ -345,63 +1292,293 @@ x_0 = lean::mk_string("}");
 return x_0;
 }
 }
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__2() {
+obj* l_Lean_IR_EmitCpp_closeNamespacesAux___main(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+switch (lean::obj_tag(x_0)) {
+case 0:
+{
+obj* x_3; obj* x_5; obj* x_6; obj* x_7; 
+x_3 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ lean::cnstr_release(x_2, 0);
+ x_5 = x_2;
+} else {
+ lean::inc(x_3);
+ lean::dec(x_2);
+ x_5 = lean::box(0);
+}
+x_6 = lean::box(0);
+if (lean::is_scalar(x_5)) {
+ x_7 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_7 = x_5;
+}
+lean::cnstr_set(x_7, 0, x_6);
+lean::cnstr_set(x_7, 1, x_3);
+return x_7;
+}
+case 1:
+{
+obj* x_8; obj* x_11; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; 
+x_8 = lean::cnstr_get(x_0, 0);
+lean::inc(x_8);
+lean::dec(x_0);
+x_11 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ lean::cnstr_release(x_2, 0);
+ x_13 = x_2;
+} else {
+ lean::inc(x_11);
+ lean::dec(x_2);
+ x_13 = lean::box(0);
+}
+x_14 = l_Lean_IR_EmitCpp_closeNamespacesAux___main___closed__1;
+x_15 = lean::string_append(x_11, x_14);
+x_16 = l_IO_println___rarg___closed__1;
+x_17 = lean::string_append(x_15, x_16);
+x_18 = lean::box(0);
+if (lean::is_scalar(x_13)) {
+ x_19 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_19 = x_13;
+}
+lean::cnstr_set(x_19, 0, x_18);
+lean::cnstr_set(x_19, 1, x_17);
+x_0 = x_8;
+x_2 = x_19;
+goto _start;
+}
+default:
+{
+obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_31; 
+x_21 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ lean::cnstr_release(x_2, 0);
+ x_23 = x_2;
+} else {
+ lean::inc(x_21);
+ lean::dec(x_2);
+ x_23 = lean::box(0);
+}
+x_24 = l_Lean_Name_toString___closed__1;
+x_25 = l_Lean_Name_toStringWithSep___main(x_24, x_0);
+x_26 = l_Lean_IR_EmitCpp_openNamespacesAux___main___closed__3;
+x_27 = lean::string_append(x_26, x_25);
+lean::dec(x_25);
+x_29 = l_Char_HasRepr___closed__1;
+x_30 = lean::string_append(x_27, x_29);
+if (lean::is_scalar(x_23)) {
+ x_31 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_31 = x_23;
+ lean::cnstr_set_tag(x_23, 1);
+}
+lean::cnstr_set(x_31, 0, x_30);
+lean::cnstr_set(x_31, 1, x_21);
+return x_31;
+}
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_closeNamespacesAux___main___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_closeNamespacesAux___main(x_0, x_1, x_2);
+lean::dec(x_1);
+return x_3;
+}
+}
+obj* l_Lean_IR_EmitCpp_closeNamespacesAux(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_closeNamespacesAux___main(x_0, x_1, x_2);
+return x_3;
+}
+}
+obj* l_Lean_IR_EmitCpp_closeNamespacesAux___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_closeNamespacesAux(x_0, x_1, x_2);
+lean::dec(x_1);
+return x_3;
+}
+}
+obj* l_Lean_IR_EmitCpp_closeNamespaces(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; obj* x_4; 
+x_3 = l_Lean_Name_getPrefix___main(x_0);
+x_4 = l_Lean_IR_EmitCpp_closeNamespacesAux___main(x_3, x_1, x_2);
+return x_4;
+}
+}
+obj* l_Lean_IR_EmitCpp_closeNamespaces___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_closeNamespaces(x_0, x_1, x_2);
+lean::dec(x_0);
+lean::dec(x_1);
+return x_3;
+}
+}
+obj* l_Lean_IR_EmitCpp_closeNamespacesFor(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_4; 
+lean::inc(x_1);
+x_4 = l_Lean_IR_EmitCpp_getEnv(x_1, x_2);
+if (lean::obj_tag(x_4) == 0)
+{
+obj* x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_13; 
+x_5 = lean::cnstr_get(x_4, 0);
+x_7 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ x_9 = x_4;
+} else {
+ lean::inc(x_5);
+ lean::inc(x_7);
+ lean::dec(x_4);
+ x_9 = lean::box(0);
+}
+x_10 = lean::box(0);
+lean::inc(x_7);
+if (lean::is_scalar(x_9)) {
+ x_12 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_12 = x_9;
+}
+lean::cnstr_set(x_12, 0, x_10);
+lean::cnstr_set(x_12, 1, x_7);
+x_13 = lean_get_export_name_for(x_5, x_0);
+lean::dec(x_5);
+if (lean::obj_tag(x_13) == 0)
+{
+obj* x_17; 
+lean::dec(x_1);
+lean::dec(x_12);
+x_17 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_17, 0, x_10);
+lean::cnstr_set(x_17, 1, x_7);
+return x_17;
+}
+else
+{
+obj* x_19; obj* x_22; 
+lean::dec(x_7);
+x_19 = lean::cnstr_get(x_13, 0);
+lean::inc(x_19);
+lean::dec(x_13);
+x_22 = l_Lean_IR_EmitCpp_closeNamespaces(x_19, x_1, x_12);
+lean::dec(x_1);
+lean::dec(x_19);
+return x_22;
+}
+}
+else
+{
+obj* x_26; obj* x_28; obj* x_30; obj* x_31; 
+lean::dec(x_1);
+x_26 = lean::cnstr_get(x_4, 0);
+x_28 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ x_30 = x_4;
+} else {
+ lean::inc(x_26);
+ lean::inc(x_28);
+ lean::dec(x_4);
+ x_30 = lean::box(0);
+}
+if (lean::is_scalar(x_30)) {
+ x_31 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_31 = x_30;
+}
+lean::cnstr_set(x_31, 0, x_26);
+lean::cnstr_set(x_31, 1, x_28);
+return x_31;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_closeNamespacesFor___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_closeNamespacesFor(x_0, x_1, x_2);
+lean::dec(x_0);
+return x_3;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_throwInvalidExportName___rarg___closed__1() {
 _start:
 {
 obj* x_0; 
-x_0 = lean::mk_string("if (io_result_is_ok(w)) {");
+x_0 = lean::mk_string("invalid export name '");
 return x_0;
 }
 }
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__3() {
+obj* l_Lean_IR_EmitCpp_throwInvalidExportName___rarg(obj* x_0, obj* x_1, obj* x_2) {
 _start:
 {
-obj* x_0; 
-x_0 = lean::mk_string("  int ret = lean::unbox(io_result_get_value(w));");
-return x_0;
+obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; 
+x_3 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ lean::cnstr_release(x_2, 0);
+ x_5 = x_2;
+} else {
+ lean::inc(x_3);
+ lean::dec(x_2);
+ x_5 = lean::box(0);
+}
+x_6 = l_Lean_Name_toString___closed__1;
+x_7 = l_Lean_Name_toStringWithSep___main(x_6, x_0);
+x_8 = l_Lean_IR_EmitCpp_throwInvalidExportName___rarg___closed__1;
+x_9 = lean::string_append(x_8, x_7);
+lean::dec(x_7);
+x_11 = l_Char_HasRepr___closed__1;
+x_12 = lean::string_append(x_9, x_11);
+if (lean::is_scalar(x_5)) {
+ x_13 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_13 = x_5;
+ lean::cnstr_set_tag(x_5, 1);
+}
+lean::cnstr_set(x_13, 0, x_12);
+lean::cnstr_set(x_13, 1, x_3);
+return x_13;
 }
 }
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__4() {
+obj* l_Lean_IR_EmitCpp_throwInvalidExportName(obj* x_0) {
 _start:
 {
-obj* x_0; 
-x_0 = lean::mk_string("  lean::dec_ref(w);");
-return x_0;
+obj* x_1; 
+x_1 = lean::alloc_closure(reinterpret_cast<void*>(l_Lean_IR_EmitCpp_throwInvalidExportName___rarg___boxed), 3, 0);
+return x_1;
 }
 }
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__5() {
+obj* l_Lean_IR_EmitCpp_throwInvalidExportName___rarg___boxed(obj* x_0, obj* x_1, obj* x_2) {
 _start:
 {
-obj* x_0; 
-x_0 = lean::mk_string("  return ret;");
-return x_0;
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_throwInvalidExportName___rarg(x_0, x_1, x_2);
+lean::dec(x_1);
+return x_3;
 }
 }
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__6() {
+obj* l_Lean_IR_EmitCpp_throwInvalidExportName___boxed(obj* x_0) {
 _start:
 {
-obj* x_0; 
-x_0 = lean::mk_string("} else {");
-return x_0;
+obj* x_1; 
+x_1 = l_Lean_IR_EmitCpp_throwInvalidExportName(x_0);
+lean::dec(x_0);
+return x_1;
 }
 }
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__7() {
-_start:
-{
-obj* x_0; 
-x_0 = lean::mk_string("  lean::io_result_show_error(w);");
-return x_0;
-}
-}
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__8() {
-_start:
-{
-obj* x_0; 
-x_0 = lean::mk_string("  return 1;");
-return x_0;
-}
-}
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__9() {
+obj* _init_l_Lean_IR_EmitCpp_toBaseCppName___closed__1() {
 _start:
 {
 obj* x_0; obj* x_1; obj* x_2; 
@@ -411,7 +1588,1688 @@ x_2 = lean_name_mk_string(x_0, x_1);
 return x_2;
 }
 }
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__10() {
+obj* _init_l_Lean_IR_EmitCpp_toBaseCppName___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("l_");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_toBaseCppName(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_4; 
+lean::inc(x_1);
+x_4 = l_Lean_IR_EmitCpp_getEnv(x_1, x_2);
+if (lean::obj_tag(x_4) == 0)
+{
+obj* x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_13; 
+x_5 = lean::cnstr_get(x_4, 0);
+x_7 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ x_9 = x_4;
+} else {
+ lean::inc(x_5);
+ lean::inc(x_7);
+ lean::dec(x_4);
+ x_9 = lean::box(0);
+}
+x_10 = lean::box(0);
+lean::inc(x_7);
+if (lean::is_scalar(x_9)) {
+ x_12 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_12 = x_9;
+}
+lean::cnstr_set(x_12, 0, x_10);
+lean::cnstr_set(x_12, 1, x_7);
+x_13 = lean_get_export_name_for(x_5, x_0);
+lean::dec(x_5);
+if (lean::obj_tag(x_13) == 0)
+{
+obj* x_17; uint8 x_18; 
+lean::dec(x_1);
+lean::dec(x_12);
+x_17 = l_Lean_IR_EmitCpp_toBaseCppName___closed__1;
+x_18 = lean_name_dec_eq(x_0, x_17);
+if (x_18 == 0)
+{
+obj* x_19; obj* x_20; obj* x_21; 
+x_19 = l_Lean_IR_EmitCpp_toBaseCppName___closed__2;
+x_20 = l_Lean_Name_mangle(x_0, x_19);
+x_21 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_21, 0, x_20);
+lean::cnstr_set(x_21, 1, x_7);
+return x_21;
+}
+else
+{
+obj* x_23; obj* x_24; 
+lean::dec(x_0);
+x_23 = l_Lean_IR_EmitCpp_leanMainFn;
+x_24 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_24, 0, x_23);
+lean::cnstr_set(x_24, 1, x_7);
+return x_24;
+}
+}
+else
+{
+obj* x_25; 
+x_25 = lean::cnstr_get(x_13, 0);
+lean::inc(x_25);
+lean::dec(x_13);
+switch (lean::obj_tag(x_25)) {
+case 0:
+{
+obj* x_29; 
+lean::dec(x_7);
+x_29 = l_Lean_IR_EmitCpp_throwInvalidExportName___rarg(x_0, x_1, x_12);
+lean::dec(x_1);
+return x_29;
+}
+case 1:
+{
+obj* x_34; obj* x_37; 
+lean::dec(x_1);
+lean::dec(x_0);
+lean::dec(x_12);
+x_34 = lean::cnstr_get(x_25, 1);
+lean::inc(x_34);
+lean::dec(x_25);
+x_37 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_37, 0, x_34);
+lean::cnstr_set(x_37, 1, x_7);
+return x_37;
+}
+default:
+{
+obj* x_40; 
+lean::dec(x_7);
+lean::dec(x_25);
+x_40 = l_Lean_IR_EmitCpp_throwInvalidExportName___rarg(x_0, x_1, x_12);
+lean::dec(x_1);
+return x_40;
+}
+}
+}
+}
+else
+{
+obj* x_44; obj* x_46; obj* x_48; obj* x_49; 
+lean::dec(x_1);
+lean::dec(x_0);
+x_44 = lean::cnstr_get(x_4, 0);
+x_46 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ x_48 = x_4;
+} else {
+ lean::inc(x_44);
+ lean::inc(x_46);
+ lean::dec(x_4);
+ x_48 = lean::box(0);
+}
+if (lean::is_scalar(x_48)) {
+ x_49 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_49 = x_48;
+}
+lean::cnstr_set(x_49, 0, x_44);
+lean::cnstr_set(x_49, 1, x_46);
+return x_49;
+}
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_toCppName___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("::");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_toCppName(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_getEnv(x_1, x_2);
+if (lean::obj_tag(x_3) == 0)
+{
+obj* x_4; obj* x_6; obj* x_8; obj* x_9; 
+x_4 = lean::cnstr_get(x_3, 0);
+x_6 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ lean::cnstr_set(x_3, 0, lean::box(0));
+ lean::cnstr_set(x_3, 1, lean::box(0));
+ x_8 = x_3;
+} else {
+ lean::inc(x_4);
+ lean::inc(x_6);
+ lean::dec(x_3);
+ x_8 = lean::box(0);
+}
+x_9 = lean_get_export_name_for(x_4, x_0);
+lean::dec(x_4);
+if (lean::obj_tag(x_9) == 0)
+{
+obj* x_11; uint8 x_12; 
+x_11 = l_Lean_IR_EmitCpp_toBaseCppName___closed__1;
+x_12 = lean_name_dec_eq(x_0, x_11);
+if (x_12 == 0)
+{
+obj* x_13; obj* x_14; obj* x_15; 
+x_13 = l_Lean_IR_EmitCpp_toBaseCppName___closed__2;
+x_14 = l_Lean_Name_mangle(x_0, x_13);
+if (lean::is_scalar(x_8)) {
+ x_15 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_15 = x_8;
+}
+lean::cnstr_set(x_15, 0, x_14);
+lean::cnstr_set(x_15, 1, x_6);
+return x_15;
+}
+else
+{
+obj* x_17; obj* x_18; 
+lean::dec(x_0);
+x_17 = l_Lean_IR_EmitCpp_leanMainFn;
+if (lean::is_scalar(x_8)) {
+ x_18 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_18 = x_8;
+}
+lean::cnstr_set(x_18, 0, x_17);
+lean::cnstr_set(x_18, 1, x_6);
+return x_18;
+}
+}
+else
+{
+obj* x_20; obj* x_23; obj* x_24; obj* x_25; 
+lean::dec(x_0);
+x_20 = lean::cnstr_get(x_9, 0);
+lean::inc(x_20);
+lean::dec(x_9);
+x_23 = l_Lean_IR_EmitCpp_toCppName___closed__1;
+x_24 = l_Lean_Name_toStringWithSep___main(x_23, x_20);
+if (lean::is_scalar(x_8)) {
+ x_25 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_25 = x_8;
+}
+lean::cnstr_set(x_25, 0, x_24);
+lean::cnstr_set(x_25, 1, x_6);
+return x_25;
+}
+}
+else
+{
+obj* x_27; obj* x_29; obj* x_31; obj* x_32; 
+lean::dec(x_0);
+x_27 = lean::cnstr_get(x_3, 0);
+x_29 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ x_31 = x_3;
+} else {
+ lean::inc(x_27);
+ lean::inc(x_29);
+ lean::dec(x_3);
+ x_31 = lean::box(0);
+}
+if (lean::is_scalar(x_31)) {
+ x_32 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_32 = x_31;
+}
+lean::cnstr_set(x_32, 0, x_27);
+lean::cnstr_set(x_32, 1, x_29);
+return x_32;
+}
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_toCppInitName___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("_init_");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_toCppInitName(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_4; 
+lean::inc(x_1);
+x_4 = l_Lean_IR_EmitCpp_getEnv(x_1, x_2);
+if (lean::obj_tag(x_4) == 0)
+{
+obj* x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_13; 
+x_5 = lean::cnstr_get(x_4, 0);
+x_7 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ x_9 = x_4;
+} else {
+ lean::inc(x_5);
+ lean::inc(x_7);
+ lean::dec(x_4);
+ x_9 = lean::box(0);
+}
+x_10 = lean::box(0);
+lean::inc(x_7);
+if (lean::is_scalar(x_9)) {
+ x_12 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_12 = x_9;
+}
+lean::cnstr_set(x_12, 0, x_10);
+lean::cnstr_set(x_12, 1, x_7);
+x_13 = lean_get_export_name_for(x_5, x_0);
+lean::dec(x_5);
+if (lean::obj_tag(x_13) == 0)
+{
+obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; 
+lean::dec(x_1);
+lean::dec(x_12);
+x_17 = l_Lean_IR_EmitCpp_toBaseCppName___closed__2;
+x_18 = l_Lean_Name_mangle(x_0, x_17);
+x_19 = l_Lean_IR_EmitCpp_toCppInitName___closed__1;
+x_20 = lean::string_append(x_19, x_18);
+lean::dec(x_18);
+x_22 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_22, 0, x_20);
+lean::cnstr_set(x_22, 1, x_7);
+return x_22;
+}
+else
+{
+obj* x_23; 
+x_23 = lean::cnstr_get(x_13, 0);
+lean::inc(x_23);
+lean::dec(x_13);
+switch (lean::obj_tag(x_23)) {
+case 0:
+{
+obj* x_27; 
+lean::dec(x_7);
+x_27 = l_Lean_IR_EmitCpp_throwInvalidExportName___rarg(x_0, x_1, x_12);
+lean::dec(x_1);
+return x_27;
+}
+case 1:
+{
+obj* x_32; obj* x_34; obj* x_37; obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_43; 
+lean::dec(x_1);
+lean::dec(x_0);
+lean::dec(x_12);
+x_32 = lean::cnstr_get(x_23, 0);
+lean::inc(x_32);
+x_34 = lean::cnstr_get(x_23, 1);
+lean::inc(x_34);
+lean::dec(x_23);
+x_37 = l_Lean_IR_EmitCpp_toCppInitName___closed__1;
+x_38 = lean::string_append(x_37, x_34);
+lean::dec(x_34);
+x_40 = lean_name_mk_string(x_32, x_38);
+x_41 = l_Lean_IR_EmitCpp_toCppName___closed__1;
+x_42 = l_Lean_Name_toStringWithSep___main(x_41, x_40);
+x_43 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_43, 0, x_42);
+lean::cnstr_set(x_43, 1, x_7);
+return x_43;
+}
+default:
+{
+obj* x_46; 
+lean::dec(x_7);
+lean::dec(x_23);
+x_46 = l_Lean_IR_EmitCpp_throwInvalidExportName___rarg(x_0, x_1, x_12);
+lean::dec(x_1);
+return x_46;
+}
+}
+}
+}
+else
+{
+obj* x_50; obj* x_52; obj* x_54; obj* x_55; 
+lean::dec(x_1);
+lean::dec(x_0);
+x_50 = lean::cnstr_get(x_4, 0);
+x_52 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ x_54 = x_4;
+} else {
+ lean::inc(x_50);
+ lean::inc(x_52);
+ lean::dec(x_4);
+ x_54 = lean::box(0);
+}
+if (lean::is_scalar(x_54)) {
+ x_55 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_55 = x_54;
+}
+lean::cnstr_set(x_55, 0, x_50);
+lean::cnstr_set(x_55, 1, x_52);
+return x_55;
+}
+}
+}
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitFnDeclAux___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; uint8 x_6; 
+x_5 = lean::mk_nat_obj(0ul);
+x_6 = lean::nat_dec_eq(x_2, x_5);
+if (x_6 == 0)
+{
+obj* x_7; obj* x_8; obj* x_10; obj* x_11; uint8 x_13; 
+x_7 = lean::mk_nat_obj(1ul);
+x_8 = lean::nat_sub(x_2, x_7);
+lean::dec(x_2);
+x_10 = lean::nat_sub(x_1, x_8);
+x_11 = lean::nat_sub(x_10, x_7);
+lean::dec(x_10);
+x_13 = lean::nat_dec_lt(x_5, x_11);
+if (x_13 == 0)
+{
+obj* x_14; obj* x_16; obj* x_17; obj* x_18; uint8 x_20; obj* x_22; obj* x_23; obj* x_25; obj* x_26; 
+x_14 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ x_16 = x_4;
+} else {
+ lean::inc(x_14);
+ lean::dec(x_4);
+ x_16 = lean::box(0);
+}
+x_17 = l_Lean_IR_paramInh;
+x_18 = lean::array_get(x_17, x_0, x_11);
+lean::dec(x_11);
+x_20 = lean::cnstr_get_scalar<uint8>(x_18, sizeof(void*)*1 + 1);
+lean::dec(x_18);
+x_22 = l_Lean_IR_EmitCpp_toCppType___main(x_20);
+x_23 = lean::string_append(x_14, x_22);
+lean::dec(x_22);
+x_25 = lean::box(0);
+if (lean::is_scalar(x_16)) {
+ x_26 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_26 = x_16;
+}
+lean::cnstr_set(x_26, 0, x_25);
+lean::cnstr_set(x_26, 1, x_23);
+x_2 = x_8;
+x_4 = x_26;
+goto _start;
+}
+else
+{
+obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_34; uint8 x_36; obj* x_38; obj* x_39; obj* x_41; obj* x_42; 
+x_28 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ x_30 = x_4;
+} else {
+ lean::inc(x_28);
+ lean::dec(x_4);
+ x_30 = lean::box(0);
+}
+x_31 = l_List_reprAux___main___rarg___closed__1;
+x_32 = lean::string_append(x_28, x_31);
+x_33 = l_Lean_IR_paramInh;
+x_34 = lean::array_get(x_33, x_0, x_11);
+lean::dec(x_11);
+x_36 = lean::cnstr_get_scalar<uint8>(x_34, sizeof(void*)*1 + 1);
+lean::dec(x_34);
+x_38 = l_Lean_IR_EmitCpp_toCppType___main(x_36);
+x_39 = lean::string_append(x_32, x_38);
+lean::dec(x_38);
+x_41 = lean::box(0);
+if (lean::is_scalar(x_30)) {
+ x_42 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_42 = x_30;
+}
+lean::cnstr_set(x_42, 0, x_41);
+lean::cnstr_set(x_42, 1, x_39);
+x_2 = x_8;
+x_4 = x_42;
+goto _start;
+}
+}
+else
+{
+obj* x_45; obj* x_47; obj* x_48; obj* x_49; 
+lean::dec(x_2);
+x_45 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ x_47 = x_4;
+} else {
+ lean::inc(x_45);
+ lean::dec(x_4);
+ x_47 = lean::box(0);
+}
+x_48 = lean::box(0);
+if (lean::is_scalar(x_47)) {
+ x_49 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_49 = x_47;
+}
+lean::cnstr_set(x_49, 0, x_48);
+lean::cnstr_set(x_49, 1, x_45);
+return x_49;
+}
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitFnDeclAux___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string(" ");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitFnDeclAux___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string(";");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitFnDeclAux___closed__3() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("extern ");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitFnDeclAux(obj* x_0, obj* x_1, uint8 x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; uint8 x_6; obj* x_7; 
+x_5 = l_Lean_IR_Decl_params___main(x_0);
+x_6 = l_Array_isEmpty___rarg(x_5);
+if (x_6 == 0)
+{
+obj* x_9; 
+x_9 = lean::cnstr_get(x_4, 1);
+lean::inc(x_9);
+lean::dec(x_4);
+x_7 = x_9;
+goto lbl_8;
+}
+else
+{
+if (x_2 == 0)
+{
+obj* x_12; 
+x_12 = lean::cnstr_get(x_4, 1);
+lean::inc(x_12);
+lean::dec(x_4);
+x_7 = x_12;
+goto lbl_8;
+}
+else
+{
+obj* x_15; obj* x_18; obj* x_19; 
+x_15 = lean::cnstr_get(x_4, 1);
+lean::inc(x_15);
+lean::dec(x_4);
+x_18 = l_Lean_IR_EmitCpp_emitFnDeclAux___closed__3;
+x_19 = lean::string_append(x_15, x_18);
+x_7 = x_19;
+goto lbl_8;
+}
+}
+lbl_8:
+{
+uint8 x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 
+x_20 = l_Lean_IR_Decl_resultType___main(x_0);
+x_21 = l_Lean_IR_EmitCpp_toCppType___main(x_20);
+x_22 = l_Lean_IR_EmitCpp_emitFnDeclAux___closed__1;
+x_23 = lean::string_append(x_21, x_22);
+x_24 = lean::string_append(x_23, x_1);
+x_25 = lean::string_append(x_7, x_24);
+lean::dec(x_24);
+if (x_6 == 0)
+{
+obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_33; 
+x_27 = l_Prod_HasRepr___rarg___closed__1;
+x_28 = lean::string_append(x_25, x_27);
+x_29 = lean::box(0);
+x_30 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_30, 0, x_29);
+lean::cnstr_set(x_30, 1, x_28);
+x_31 = lean::array_get_size(x_5);
+lean::inc(x_31);
+x_33 = l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitFnDeclAux___spec__1(x_5, x_31, x_31, x_3, x_30);
+lean::dec(x_31);
+lean::dec(x_5);
+if (lean::obj_tag(x_33) == 0)
+{
+obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; 
+x_36 = lean::cnstr_get(x_33, 1);
+if (lean::is_exclusive(x_33)) {
+ lean::cnstr_release(x_33, 0);
+ x_38 = x_33;
+} else {
+ lean::inc(x_36);
+ lean::dec(x_33);
+ x_38 = lean::box(0);
+}
+x_39 = l_Option_HasRepr___rarg___closed__3;
+x_40 = lean::string_append(x_36, x_39);
+x_41 = l_Lean_IR_EmitCpp_emitFnDeclAux___closed__2;
+x_42 = lean::string_append(x_40, x_41);
+x_43 = l_IO_println___rarg___closed__1;
+x_44 = lean::string_append(x_42, x_43);
+if (lean::is_scalar(x_38)) {
+ x_45 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_45 = x_38;
+}
+lean::cnstr_set(x_45, 0, x_29);
+lean::cnstr_set(x_45, 1, x_44);
+return x_45;
+}
+else
+{
+obj* x_46; obj* x_48; obj* x_50; obj* x_51; 
+x_46 = lean::cnstr_get(x_33, 0);
+x_48 = lean::cnstr_get(x_33, 1);
+if (lean::is_exclusive(x_33)) {
+ x_50 = x_33;
+} else {
+ lean::inc(x_46);
+ lean::inc(x_48);
+ lean::dec(x_33);
+ x_50 = lean::box(0);
+}
+if (lean::is_scalar(x_50)) {
+ x_51 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_51 = x_50;
+}
+lean::cnstr_set(x_51, 0, x_46);
+lean::cnstr_set(x_51, 1, x_48);
+return x_51;
+}
+}
+else
+{
+obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; 
+lean::dec(x_5);
+x_53 = l_Lean_IR_EmitCpp_emitFnDeclAux___closed__2;
+x_54 = lean::string_append(x_25, x_53);
+x_55 = l_IO_println___rarg___closed__1;
+x_56 = lean::string_append(x_54, x_55);
+x_57 = lean::box(0);
+x_58 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_58, 0, x_57);
+lean::cnstr_set(x_58, 1, x_56);
+return x_58;
+}
+}
+}
+}
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitFnDeclAux___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; 
+x_5 = l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitFnDeclAux___spec__1(x_0, x_1, x_2, x_3, x_4);
+lean::dec(x_0);
+lean::dec(x_1);
+lean::dec(x_3);
+return x_5;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitFnDeclAux___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+uint8 x_5; obj* x_6; 
+x_5 = lean::unbox(x_2);
+x_6 = l_Lean_IR_EmitCpp_emitFnDeclAux(x_0, x_1, x_5, x_3, x_4);
+lean::dec(x_0);
+lean::dec(x_1);
+lean::dec(x_3);
+return x_6;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitFnDecl(obj* x_0, uint8 x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; obj* x_6; 
+x_4 = l_Lean_IR_Decl_name___main(x_0);
+lean::inc(x_2);
+x_6 = l_Lean_IR_EmitCpp_openNamespacesFor(x_4, x_2, x_3);
+if (lean::obj_tag(x_6) == 0)
+{
+obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_14; 
+x_7 = lean::cnstr_get(x_6, 1);
+if (lean::is_exclusive(x_6)) {
+ lean::cnstr_release(x_6, 0);
+ x_9 = x_6;
+} else {
+ lean::inc(x_7);
+ lean::dec(x_6);
+ x_9 = lean::box(0);
+}
+x_10 = lean::box(0);
+if (lean::is_scalar(x_9)) {
+ x_11 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_11 = x_9;
+}
+lean::cnstr_set(x_11, 0, x_10);
+lean::cnstr_set(x_11, 1, x_7);
+lean::inc(x_2);
+lean::inc(x_4);
+x_14 = l_Lean_IR_EmitCpp_toBaseCppName(x_4, x_2, x_11);
+if (lean::obj_tag(x_14) == 0)
+{
+obj* x_15; obj* x_17; obj* x_19; obj* x_20; obj* x_21; 
+x_15 = lean::cnstr_get(x_14, 0);
+x_17 = lean::cnstr_get(x_14, 1);
+if (lean::is_exclusive(x_14)) {
+ x_19 = x_14;
+} else {
+ lean::inc(x_15);
+ lean::inc(x_17);
+ lean::dec(x_14);
+ x_19 = lean::box(0);
+}
+if (lean::is_scalar(x_19)) {
+ x_20 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_20 = x_19;
+}
+lean::cnstr_set(x_20, 0, x_10);
+lean::cnstr_set(x_20, 1, x_17);
+x_21 = l_Lean_IR_EmitCpp_emitFnDeclAux(x_0, x_15, x_1, x_2, x_20);
+lean::dec(x_15);
+if (lean::obj_tag(x_21) == 0)
+{
+obj* x_23; obj* x_25; obj* x_26; obj* x_27; 
+x_23 = lean::cnstr_get(x_21, 1);
+if (lean::is_exclusive(x_21)) {
+ lean::cnstr_release(x_21, 0);
+ x_25 = x_21;
+} else {
+ lean::inc(x_23);
+ lean::dec(x_21);
+ x_25 = lean::box(0);
+}
+if (lean::is_scalar(x_25)) {
+ x_26 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_26 = x_25;
+}
+lean::cnstr_set(x_26, 0, x_10);
+lean::cnstr_set(x_26, 1, x_23);
+x_27 = l_Lean_IR_EmitCpp_closeNamespacesFor(x_4, x_2, x_26);
+lean::dec(x_4);
+return x_27;
+}
+else
+{
+obj* x_31; obj* x_33; obj* x_35; obj* x_36; 
+lean::dec(x_4);
+lean::dec(x_2);
+x_31 = lean::cnstr_get(x_21, 0);
+x_33 = lean::cnstr_get(x_21, 1);
+if (lean::is_exclusive(x_21)) {
+ x_35 = x_21;
+} else {
+ lean::inc(x_31);
+ lean::inc(x_33);
+ lean::dec(x_21);
+ x_35 = lean::box(0);
+}
+if (lean::is_scalar(x_35)) {
+ x_36 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_36 = x_35;
+}
+lean::cnstr_set(x_36, 0, x_31);
+lean::cnstr_set(x_36, 1, x_33);
+return x_36;
+}
+}
+else
+{
+obj* x_39; obj* x_41; obj* x_43; obj* x_44; 
+lean::dec(x_4);
+lean::dec(x_2);
+x_39 = lean::cnstr_get(x_14, 0);
+x_41 = lean::cnstr_get(x_14, 1);
+if (lean::is_exclusive(x_14)) {
+ x_43 = x_14;
+} else {
+ lean::inc(x_39);
+ lean::inc(x_41);
+ lean::dec(x_14);
+ x_43 = lean::box(0);
+}
+if (lean::is_scalar(x_43)) {
+ x_44 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_44 = x_43;
+}
+lean::cnstr_set(x_44, 0, x_39);
+lean::cnstr_set(x_44, 1, x_41);
+return x_44;
+}
+}
+else
+{
+obj* x_47; obj* x_49; obj* x_51; obj* x_52; 
+lean::dec(x_4);
+lean::dec(x_2);
+x_47 = lean::cnstr_get(x_6, 0);
+x_49 = lean::cnstr_get(x_6, 1);
+if (lean::is_exclusive(x_6)) {
+ x_51 = x_6;
+} else {
+ lean::inc(x_47);
+ lean::inc(x_49);
+ lean::dec(x_6);
+ x_51 = lean::box(0);
+}
+if (lean::is_scalar(x_51)) {
+ x_52 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_52 = x_51;
+}
+lean::cnstr_set(x_52, 0, x_47);
+lean::cnstr_set(x_52, 1, x_49);
+return x_52;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitFnDecl___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+uint8 x_4; obj* x_5; 
+x_4 = lean::unbox(x_1);
+x_5 = l_Lean_IR_EmitCpp_emitFnDecl(x_0, x_4, x_2, x_3);
+lean::dec(x_0);
+return x_5;
+}
+}
+obj* l_List_foldl___main___at_Lean_IR_EmitCpp_cppQualifiedNameToName___spec__1(obj* x_0, obj* x_1) {
+_start:
+{
+if (lean::obj_tag(x_1) == 0)
+{
+return x_0;
+}
+else
+{
+obj* x_2; obj* x_4; obj* x_7; 
+x_2 = lean::cnstr_get(x_1, 0);
+lean::inc(x_2);
+x_4 = lean::cnstr_get(x_1, 1);
+lean::inc(x_4);
+lean::dec(x_1);
+x_7 = lean_name_mk_string(x_0, x_2);
+x_0 = x_7;
+x_1 = x_4;
+goto _start;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_cppQualifiedNameToName(obj* x_0) {
+_start:
+{
+obj* x_1; obj* x_2; obj* x_3; obj* x_4; 
+x_1 = l_Lean_IR_EmitCpp_toCppName___closed__1;
+x_2 = l_String_split(x_0, x_1);
+x_3 = lean::box(0);
+x_4 = l_List_foldl___main___at_Lean_IR_EmitCpp_cppQualifiedNameToName___spec__1(x_3, x_2);
+return x_4;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitExternDeclAux___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("invalid name");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitExternDeclAux___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("extern \"C\" ");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitExternDeclAux(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; obj* x_5; 
+x_4 = l_Lean_IR_EmitCpp_cppQualifiedNameToName(x_1);
+x_5 = l_Lean_IR_EmitCpp_openNamespaces(x_4, x_2, x_3);
+if (lean::obj_tag(x_5) == 0)
+{
+obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; 
+x_6 = lean::cnstr_get(x_5, 1);
+if (lean::is_exclusive(x_5)) {
+ lean::cnstr_release(x_5, 0);
+ x_8 = x_5;
+} else {
+ lean::inc(x_6);
+ lean::dec(x_5);
+ x_8 = lean::box(0);
+}
+x_9 = lean::box(0);
+if (lean::is_scalar(x_8)) {
+ x_10 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_10 = x_8;
+}
+lean::cnstr_set(x_10, 0, x_9);
+lean::cnstr_set(x_10, 1, x_6);
+lean::inc(x_2);
+x_12 = l_Lean_IR_EmitCpp_getEnv(x_2, x_10);
+if (lean::obj_tag(x_12) == 0)
+{
+obj* x_13; obj* x_15; obj* x_17; obj* x_18; uint8 x_19; 
+x_13 = lean::cnstr_get(x_12, 0);
+x_15 = lean::cnstr_get(x_12, 1);
+if (lean::is_exclusive(x_12)) {
+ lean::cnstr_set(x_12, 0, lean::box(0));
+ lean::cnstr_set(x_12, 1, lean::box(0));
+ x_17 = x_12;
+} else {
+ lean::inc(x_13);
+ lean::inc(x_15);
+ lean::dec(x_12);
+ x_17 = lean::box(0);
+}
+x_18 = l_Lean_IR_Decl_name___main(x_0);
+x_19 = l_Lean_isExternC(x_13, x_18);
+lean::dec(x_18);
+lean::dec(x_13);
+if (x_19 == 0)
+{
+switch (lean::obj_tag(x_4)) {
+case 0:
+{
+obj* x_23; obj* x_24; 
+lean::dec(x_2);
+x_23 = l_Lean_IR_EmitCpp_emitExternDeclAux___closed__1;
+if (lean::is_scalar(x_17)) {
+ x_24 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_24 = x_17;
+ lean::cnstr_set_tag(x_17, 1);
+}
+lean::cnstr_set(x_24, 0, x_23);
+lean::cnstr_set(x_24, 1, x_15);
+return x_24;
+}
+case 1:
+{
+obj* x_25; obj* x_27; uint8 x_28; obj* x_29; 
+x_25 = lean::cnstr_get(x_4, 1);
+lean::inc(x_25);
+if (lean::is_scalar(x_17)) {
+ x_27 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_27 = x_17;
+}
+lean::cnstr_set(x_27, 0, x_9);
+lean::cnstr_set(x_27, 1, x_15);
+x_28 = 1;
+x_29 = l_Lean_IR_EmitCpp_emitFnDeclAux(x_0, x_25, x_28, x_2, x_27);
+lean::dec(x_25);
+if (lean::obj_tag(x_29) == 0)
+{
+obj* x_31; obj* x_33; obj* x_34; obj* x_35; 
+x_31 = lean::cnstr_get(x_29, 1);
+if (lean::is_exclusive(x_29)) {
+ lean::cnstr_release(x_29, 0);
+ x_33 = x_29;
+} else {
+ lean::inc(x_31);
+ lean::dec(x_29);
+ x_33 = lean::box(0);
+}
+if (lean::is_scalar(x_33)) {
+ x_34 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_34 = x_33;
+}
+lean::cnstr_set(x_34, 0, x_9);
+lean::cnstr_set(x_34, 1, x_31);
+x_35 = l_Lean_IR_EmitCpp_closeNamespaces(x_4, x_2, x_34);
+lean::dec(x_2);
+lean::dec(x_4);
+return x_35;
+}
+else
+{
+obj* x_40; obj* x_42; obj* x_44; obj* x_45; 
+lean::dec(x_4);
+lean::dec(x_2);
+x_40 = lean::cnstr_get(x_29, 0);
+x_42 = lean::cnstr_get(x_29, 1);
+if (lean::is_exclusive(x_29)) {
+ x_44 = x_29;
+} else {
+ lean::inc(x_40);
+ lean::inc(x_42);
+ lean::dec(x_29);
+ x_44 = lean::box(0);
+}
+if (lean::is_scalar(x_44)) {
+ x_45 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_45 = x_44;
+}
+lean::cnstr_set(x_45, 0, x_40);
+lean::cnstr_set(x_45, 1, x_42);
+return x_45;
+}
+}
+default:
+{
+obj* x_48; obj* x_49; 
+lean::dec(x_4);
+lean::dec(x_2);
+x_48 = l_Lean_IR_EmitCpp_emitExternDeclAux___closed__1;
+if (lean::is_scalar(x_17)) {
+ x_49 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_49 = x_17;
+ lean::cnstr_set_tag(x_17, 1);
+}
+lean::cnstr_set(x_49, 0, x_48);
+lean::cnstr_set(x_49, 1, x_15);
+return x_49;
+}
+}
+}
+else
+{
+obj* x_50; obj* x_51; 
+x_50 = l_Lean_IR_EmitCpp_emitExternDeclAux___closed__2;
+x_51 = lean::string_append(x_15, x_50);
+switch (lean::obj_tag(x_4)) {
+case 0:
+{
+obj* x_53; obj* x_54; 
+lean::dec(x_2);
+x_53 = l_Lean_IR_EmitCpp_emitExternDeclAux___closed__1;
+if (lean::is_scalar(x_17)) {
+ x_54 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_54 = x_17;
+ lean::cnstr_set_tag(x_17, 1);
+}
+lean::cnstr_set(x_54, 0, x_53);
+lean::cnstr_set(x_54, 1, x_51);
+return x_54;
+}
+case 1:
+{
+obj* x_55; obj* x_57; uint8 x_58; obj* x_59; 
+x_55 = lean::cnstr_get(x_4, 1);
+lean::inc(x_55);
+if (lean::is_scalar(x_17)) {
+ x_57 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_57 = x_17;
+}
+lean::cnstr_set(x_57, 0, x_9);
+lean::cnstr_set(x_57, 1, x_51);
+x_58 = 0;
+x_59 = l_Lean_IR_EmitCpp_emitFnDeclAux(x_0, x_55, x_58, x_2, x_57);
+lean::dec(x_55);
+if (lean::obj_tag(x_59) == 0)
+{
+obj* x_61; obj* x_63; obj* x_64; obj* x_65; 
+x_61 = lean::cnstr_get(x_59, 1);
+if (lean::is_exclusive(x_59)) {
+ lean::cnstr_release(x_59, 0);
+ x_63 = x_59;
+} else {
+ lean::inc(x_61);
+ lean::dec(x_59);
+ x_63 = lean::box(0);
+}
+if (lean::is_scalar(x_63)) {
+ x_64 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_64 = x_63;
+}
+lean::cnstr_set(x_64, 0, x_9);
+lean::cnstr_set(x_64, 1, x_61);
+x_65 = l_Lean_IR_EmitCpp_closeNamespaces(x_4, x_2, x_64);
+lean::dec(x_2);
+lean::dec(x_4);
+return x_65;
+}
+else
+{
+obj* x_70; obj* x_72; obj* x_74; obj* x_75; 
+lean::dec(x_4);
+lean::dec(x_2);
+x_70 = lean::cnstr_get(x_59, 0);
+x_72 = lean::cnstr_get(x_59, 1);
+if (lean::is_exclusive(x_59)) {
+ x_74 = x_59;
+} else {
+ lean::inc(x_70);
+ lean::inc(x_72);
+ lean::dec(x_59);
+ x_74 = lean::box(0);
+}
+if (lean::is_scalar(x_74)) {
+ x_75 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_75 = x_74;
+}
+lean::cnstr_set(x_75, 0, x_70);
+lean::cnstr_set(x_75, 1, x_72);
+return x_75;
+}
+}
+default:
+{
+obj* x_78; obj* x_79; 
+lean::dec(x_4);
+lean::dec(x_2);
+x_78 = l_Lean_IR_EmitCpp_emitExternDeclAux___closed__1;
+if (lean::is_scalar(x_17)) {
+ x_79 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_79 = x_17;
+ lean::cnstr_set_tag(x_17, 1);
+}
+lean::cnstr_set(x_79, 0, x_78);
+lean::cnstr_set(x_79, 1, x_51);
+return x_79;
+}
+}
+}
+}
+else
+{
+obj* x_82; obj* x_84; obj* x_86; obj* x_87; 
+lean::dec(x_4);
+lean::dec(x_2);
+x_82 = lean::cnstr_get(x_12, 0);
+x_84 = lean::cnstr_get(x_12, 1);
+if (lean::is_exclusive(x_12)) {
+ x_86 = x_12;
+} else {
+ lean::inc(x_82);
+ lean::inc(x_84);
+ lean::dec(x_12);
+ x_86 = lean::box(0);
+}
+if (lean::is_scalar(x_86)) {
+ x_87 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_87 = x_86;
+}
+lean::cnstr_set(x_87, 0, x_82);
+lean::cnstr_set(x_87, 1, x_84);
+return x_87;
+}
+}
+else
+{
+obj* x_90; obj* x_92; obj* x_94; obj* x_95; 
+lean::dec(x_4);
+lean::dec(x_2);
+x_90 = lean::cnstr_get(x_5, 0);
+x_92 = lean::cnstr_get(x_5, 1);
+if (lean::is_exclusive(x_5)) {
+ x_94 = x_5;
+} else {
+ lean::inc(x_90);
+ lean::inc(x_92);
+ lean::dec(x_5);
+ x_94 = lean::box(0);
+}
+if (lean::is_scalar(x_94)) {
+ x_95 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_95 = x_94;
+}
+lean::cnstr_set(x_95, 0, x_90);
+lean::cnstr_set(x_95, 1, x_92);
+return x_95;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitExternDeclAux___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Lean_IR_EmitCpp_emitExternDeclAux(x_0, x_1, x_2, x_3);
+lean::dec(x_0);
+return x_4;
+}
+}
+obj* l_List_foldl___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__1(obj* x_0, obj* x_1) {
+_start:
+{
+if (lean::obj_tag(x_1) == 0)
+{
+return x_0;
+}
+else
+{
+obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; 
+x_2 = lean::cnstr_get(x_1, 0);
+x_3 = lean::cnstr_get(x_1, 1);
+x_4 = l_Lean_IR_Decl_name___main(x_2);
+x_5 = lean::box(0);
+x_6 = l_RBNode_insert___at_Lean_NameSet_insert___spec__1(x_0, x_4, x_5);
+x_0 = x_6;
+x_1 = x_3;
+goto _start;
+}
+}
+}
+obj* l_List_foldl___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__2(obj* x_0, obj* x_1) {
+_start:
+{
+if (lean::obj_tag(x_1) == 0)
+{
+return x_0;
+}
+else
+{
+obj* x_2; obj* x_4; obj* x_7; obj* x_8; obj* x_9; obj* x_10; 
+x_2 = lean::cnstr_get(x_1, 0);
+lean::inc(x_2);
+x_4 = lean::cnstr_get(x_1, 1);
+lean::inc(x_4);
+lean::dec(x_1);
+x_7 = l_Lean_IR_Decl_name___main(x_2);
+x_8 = lean::box(0);
+x_9 = l_RBNode_insert___at_Lean_NameSet_insert___spec__1(x_0, x_7, x_8);
+x_10 = l_Lean_IR_collectUsedDecls(x_2, x_9);
+x_0 = x_10;
+x_1 = x_4;
+goto _start;
+}
+}
+}
+obj* l_RBNode_revFold___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__4(obj* x_0, obj* x_1) {
+_start:
+{
+if (lean::obj_tag(x_1) == 0)
+{
+return x_0;
+}
+else
+{
+obj* x_2; obj* x_4; obj* x_6; obj* x_9; obj* x_10; 
+x_2 = lean::cnstr_get(x_1, 0);
+lean::inc(x_2);
+x_4 = lean::cnstr_get(x_1, 1);
+lean::inc(x_4);
+x_6 = lean::cnstr_get(x_1, 3);
+lean::inc(x_6);
+lean::dec(x_1);
+x_9 = l_RBNode_revFold___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__4(x_0, x_6);
+x_10 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_10, 0, x_4);
+lean::cnstr_set(x_10, 1, x_9);
+x_0 = x_10;
+x_1 = x_2;
+goto _start;
+}
+}
+}
+obj* l_RBTree_toList___at_Lean_IR_EmitCpp_emitFnDecls___spec__3(obj* x_0) {
+_start:
+{
+obj* x_1; obj* x_2; 
+x_1 = lean::box(0);
+x_2 = l_RBNode_revFold___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__4(x_1, x_0);
+return x_2;
+}
+}
+obj* _init_l_List_mfor___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__5___closed__1() {
+_start:
+{
+obj* x_0; obj* x_1; obj* x_2; 
+x_0 = lean::box(0);
+x_1 = lean::mk_string("cpp");
+x_2 = lean_name_mk_string(x_0, x_1);
+return x_2;
+}
+}
+obj* l_List_mfor___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__5(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+if (lean::obj_tag(x_2) == 0)
+{
+obj* x_7; obj* x_9; obj* x_10; obj* x_11; 
+lean::dec(x_1);
+lean::dec(x_3);
+x_7 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ x_9 = x_4;
+} else {
+ lean::inc(x_7);
+ lean::dec(x_4);
+ x_9 = lean::box(0);
+}
+x_10 = lean::box(0);
+if (lean::is_scalar(x_9)) {
+ x_11 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_11 = x_9;
+}
+lean::cnstr_set(x_11, 0, x_10);
+lean::cnstr_set(x_11, 1, x_7);
+return x_11;
+}
+else
+{
+obj* x_12; obj* x_14; obj* x_19; 
+x_12 = lean::cnstr_get(x_2, 0);
+lean::inc(x_12);
+x_14 = lean::cnstr_get(x_2, 1);
+lean::inc(x_14);
+lean::dec(x_2);
+lean::inc(x_3);
+lean::inc(x_12);
+x_19 = l_Lean_IR_EmitCpp_getDecl(x_12, x_3, x_4);
+if (lean::obj_tag(x_19) == 0)
+{
+obj* x_20; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; 
+x_20 = lean::cnstr_get(x_19, 0);
+x_22 = lean::cnstr_get(x_19, 1);
+if (lean::is_exclusive(x_19)) {
+ x_24 = x_19;
+} else {
+ lean::inc(x_20);
+ lean::inc(x_22);
+ lean::dec(x_19);
+ x_24 = lean::box(0);
+}
+x_25 = lean::box(0);
+if (lean::is_scalar(x_24)) {
+ x_26 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_26 = x_24;
+}
+lean::cnstr_set(x_26, 0, x_25);
+lean::cnstr_set(x_26, 1, x_22);
+x_27 = l_Lean_IR_Decl_name___main(x_20);
+x_28 = l_List_mfor___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__5___closed__1;
+x_29 = l_Lean_getExternNameFor(x_0, x_28, x_27);
+lean::dec(x_27);
+if (lean::obj_tag(x_29) == 0)
+{
+uint8 x_32; 
+lean::inc(x_1);
+x_32 = l_Lean_NameSet_contains(x_1, x_12);
+lean::dec(x_12);
+if (x_32 == 0)
+{
+uint8 x_34; obj* x_36; 
+x_34 = 1;
+lean::inc(x_3);
+x_36 = l_Lean_IR_EmitCpp_emitFnDecl(x_20, x_34, x_3, x_26);
+lean::dec(x_20);
+if (lean::obj_tag(x_36) == 0)
+{
+obj* x_38; obj* x_40; obj* x_41; 
+x_38 = lean::cnstr_get(x_36, 1);
+if (lean::is_exclusive(x_36)) {
+ lean::cnstr_release(x_36, 0);
+ x_40 = x_36;
+} else {
+ lean::inc(x_38);
+ lean::dec(x_36);
+ x_40 = lean::box(0);
+}
+if (lean::is_scalar(x_40)) {
+ x_41 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_41 = x_40;
+}
+lean::cnstr_set(x_41, 0, x_25);
+lean::cnstr_set(x_41, 1, x_38);
+x_2 = x_14;
+x_4 = x_41;
+goto _start;
+}
+else
+{
+obj* x_46; obj* x_48; obj* x_50; obj* x_51; 
+lean::dec(x_14);
+lean::dec(x_1);
+lean::dec(x_3);
+x_46 = lean::cnstr_get(x_36, 0);
+x_48 = lean::cnstr_get(x_36, 1);
+if (lean::is_exclusive(x_36)) {
+ x_50 = x_36;
+} else {
+ lean::inc(x_46);
+ lean::inc(x_48);
+ lean::dec(x_36);
+ x_50 = lean::box(0);
+}
+if (lean::is_scalar(x_50)) {
+ x_51 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_51 = x_50;
+}
+lean::cnstr_set(x_51, 0, x_46);
+lean::cnstr_set(x_51, 1, x_48);
+return x_51;
+}
+}
+else
+{
+uint8 x_52; obj* x_54; 
+x_52 = 0;
+lean::inc(x_3);
+x_54 = l_Lean_IR_EmitCpp_emitFnDecl(x_20, x_52, x_3, x_26);
+lean::dec(x_20);
+if (lean::obj_tag(x_54) == 0)
+{
+obj* x_56; obj* x_58; obj* x_59; 
+x_56 = lean::cnstr_get(x_54, 1);
+if (lean::is_exclusive(x_54)) {
+ lean::cnstr_release(x_54, 0);
+ x_58 = x_54;
+} else {
+ lean::inc(x_56);
+ lean::dec(x_54);
+ x_58 = lean::box(0);
+}
+if (lean::is_scalar(x_58)) {
+ x_59 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_59 = x_58;
+}
+lean::cnstr_set(x_59, 0, x_25);
+lean::cnstr_set(x_59, 1, x_56);
+x_2 = x_14;
+x_4 = x_59;
+goto _start;
+}
+else
+{
+obj* x_64; obj* x_66; obj* x_68; obj* x_69; 
+lean::dec(x_14);
+lean::dec(x_1);
+lean::dec(x_3);
+x_64 = lean::cnstr_get(x_54, 0);
+x_66 = lean::cnstr_get(x_54, 1);
+if (lean::is_exclusive(x_54)) {
+ x_68 = x_54;
+} else {
+ lean::inc(x_64);
+ lean::inc(x_66);
+ lean::dec(x_54);
+ x_68 = lean::box(0);
+}
+if (lean::is_scalar(x_68)) {
+ x_69 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_69 = x_68;
+}
+lean::cnstr_set(x_69, 0, x_64);
+lean::cnstr_set(x_69, 1, x_66);
+return x_69;
+}
+}
+}
+else
+{
+obj* x_71; obj* x_75; 
+lean::dec(x_12);
+x_71 = lean::cnstr_get(x_29, 0);
+lean::inc(x_71);
+lean::dec(x_29);
+lean::inc(x_3);
+x_75 = l_Lean_IR_EmitCpp_emitExternDeclAux(x_20, x_71, x_3, x_26);
+lean::dec(x_20);
+if (lean::obj_tag(x_75) == 0)
+{
+obj* x_77; obj* x_79; obj* x_80; 
+x_77 = lean::cnstr_get(x_75, 1);
+if (lean::is_exclusive(x_75)) {
+ lean::cnstr_release(x_75, 0);
+ x_79 = x_75;
+} else {
+ lean::inc(x_77);
+ lean::dec(x_75);
+ x_79 = lean::box(0);
+}
+if (lean::is_scalar(x_79)) {
+ x_80 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_80 = x_79;
+}
+lean::cnstr_set(x_80, 0, x_25);
+lean::cnstr_set(x_80, 1, x_77);
+x_2 = x_14;
+x_4 = x_80;
+goto _start;
+}
+else
+{
+obj* x_85; obj* x_87; obj* x_89; obj* x_90; 
+lean::dec(x_14);
+lean::dec(x_1);
+lean::dec(x_3);
+x_85 = lean::cnstr_get(x_75, 0);
+x_87 = lean::cnstr_get(x_75, 1);
+if (lean::is_exclusive(x_75)) {
+ x_89 = x_75;
+} else {
+ lean::inc(x_85);
+ lean::inc(x_87);
+ lean::dec(x_75);
+ x_89 = lean::box(0);
+}
+if (lean::is_scalar(x_89)) {
+ x_90 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_90 = x_89;
+}
+lean::cnstr_set(x_90, 0, x_85);
+lean::cnstr_set(x_90, 1, x_87);
+return x_90;
+}
+}
+}
+else
+{
+obj* x_95; obj* x_97; obj* x_99; obj* x_100; 
+lean::dec(x_12);
+lean::dec(x_14);
+lean::dec(x_1);
+lean::dec(x_3);
+x_95 = lean::cnstr_get(x_19, 0);
+x_97 = lean::cnstr_get(x_19, 1);
+if (lean::is_exclusive(x_19)) {
+ x_99 = x_19;
+} else {
+ lean::inc(x_95);
+ lean::inc(x_97);
+ lean::dec(x_19);
+ x_99 = lean::box(0);
+}
+if (lean::is_scalar(x_99)) {
+ x_100 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_100 = x_99;
+}
+lean::cnstr_set(x_100, 0, x_95);
+lean::cnstr_set(x_100, 1, x_97);
+return x_100;
+}
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitFnDecls(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_3; 
+lean::inc(x_0);
+x_3 = l_Lean_IR_EmitCpp_getEnv(x_0, x_1);
+if (lean::obj_tag(x_3) == 0)
+{
+obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; 
+x_4 = lean::cnstr_get(x_3, 0);
+x_6 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ x_8 = x_3;
+} else {
+ lean::inc(x_4);
+ lean::inc(x_6);
+ lean::dec(x_3);
+ x_8 = lean::box(0);
+}
+x_9 = lean::box(0);
+if (lean::is_scalar(x_8)) {
+ x_10 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_10 = x_8;
+}
+lean::cnstr_set(x_10, 0, x_9);
+lean::cnstr_set(x_10, 1, x_6);
+x_11 = l_Lean_IR_declMapExt;
+x_12 = l_Lean_PersistentEnvExtension_getEntries___rarg(x_11, x_4);
+x_13 = lean::box(0);
+x_14 = l_List_foldl___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__1(x_13, x_12);
+x_15 = l_List_foldl___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__2(x_13, x_12);
+x_16 = l_RBTree_toList___at_Lean_IR_EmitCpp_emitFnDecls___spec__3(x_15);
+x_17 = l_List_mfor___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__5(x_4, x_14, x_16, x_0, x_10);
+lean::dec(x_4);
+return x_17;
+}
+else
+{
+obj* x_20; obj* x_22; obj* x_24; obj* x_25; 
+lean::dec(x_0);
+x_20 = lean::cnstr_get(x_3, 0);
+x_22 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ x_24 = x_3;
+} else {
+ lean::inc(x_20);
+ lean::inc(x_22);
+ lean::dec(x_3);
+ x_24 = lean::box(0);
+}
+if (lean::is_scalar(x_24)) {
+ x_25 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_25 = x_24;
+}
+lean::cnstr_set(x_25, 0, x_20);
+lean::cnstr_set(x_25, 1, x_22);
+return x_25;
+}
+}
+}
+obj* l_List_foldl___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__1___boxed(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; 
+x_2 = l_List_foldl___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__1(x_0, x_1);
+lean::dec(x_1);
+return x_2;
+}
+}
+obj* l_List_mfor___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__5___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; 
+x_5 = l_List_mfor___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__5(x_0, x_1, x_2, x_3, x_4);
+lean::dec(x_0);
+return x_5;
+}
+}
+obj* l_List_mfor___main___at_Lean_IR_EmitCpp_emitMainFn___spec__2(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+if (lean::obj_tag(x_0) == 0)
+{
+obj* x_3; obj* x_5; obj* x_6; obj* x_7; 
+x_3 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ lean::cnstr_release(x_2, 0);
+ x_5 = x_2;
+} else {
+ lean::inc(x_3);
+ lean::dec(x_2);
+ x_5 = lean::box(0);
+}
+x_6 = lean::box(0);
+if (lean::is_scalar(x_5)) {
+ x_7 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_7 = x_5;
+}
+lean::cnstr_set(x_7, 0, x_6);
+lean::cnstr_set(x_7, 1, x_3);
+return x_7;
+}
+else
+{
+obj* x_8; obj* x_9; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; 
+x_8 = lean::cnstr_get(x_0, 0);
+x_9 = lean::cnstr_get(x_0, 1);
+x_10 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ lean::cnstr_release(x_2, 0);
+ x_12 = x_2;
+} else {
+ lean::inc(x_10);
+ lean::dec(x_2);
+ x_12 = lean::box(0);
+}
+x_13 = lean::string_append(x_10, x_8);
+x_14 = l_IO_println___rarg___closed__1;
+x_15 = lean::string_append(x_13, x_14);
+x_16 = lean::box(0);
+if (lean::is_scalar(x_12)) {
+ x_17 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_17 = x_12;
+}
+lean::cnstr_set(x_17, 0, x_16);
+lean::cnstr_set(x_17, 1, x_15);
+x_0 = x_9;
+x_2 = x_17;
+goto _start;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitLns___at_Lean_IR_EmitCpp_emitMainFn___spec__1(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_List_mfor___main___at_Lean_IR_EmitCpp_emitMainFn___spec__2(x_0, x_1, x_2);
+return x_3;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__1() {
 _start:
 {
 obj* x_0; 
@@ -419,7 +3277,7 @@ x_0 = lean::mk_string("invalid main function, incorrect arity when generating co
 return x_0;
 }
 }
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__11() {
+obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__2() {
 _start:
 {
 obj* x_0; 
@@ -427,7 +3285,7 @@ x_0 = lean::mk_string("obj * w = lean::io_mk_world();");
 return x_0;
 }
 }
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__12() {
+obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__3() {
 _start:
 {
 obj* x_0; 
@@ -435,7 +3293,7 @@ x_0 = lean::mk_string("w = initialize_");
 return x_0;
 }
 }
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__13() {
+obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__4() {
 _start:
 {
 obj* x_0; 
@@ -443,31 +3301,27 @@ x_0 = lean::mk_string("(w);");
 return x_0;
 }
 }
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__14() {
+obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__5() {
 _start:
 {
-obj* x_0; 
-x_0 = lean::mk_string("lean::io_mark_end_initialization();");
-return x_0;
+obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; 
+x_0 = lean::box(0);
+x_1 = lean::mk_string("lean::scoped_task_manager tmanager(lean::hardware_concurrency());");
+x_2 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_2, 0, x_1);
+lean::cnstr_set(x_2, 1, x_0);
+x_3 = lean::mk_string("if (io_result_is_ok(w)) {");
+x_4 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_4, 0, x_3);
+lean::cnstr_set(x_4, 1, x_2);
+x_5 = lean::mk_string("lean::io_mark_end_initialization();");
+x_6 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_6, 0, x_5);
+lean::cnstr_set(x_6, 1, x_4);
+return x_6;
 }
 }
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__15() {
-_start:
-{
-obj* x_0; 
-x_0 = lean::mk_string("if (io_result_is_ok(w)) {\n");
-return x_0;
-}
-}
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__16() {
-_start:
-{
-obj* x_0; 
-x_0 = lean::mk_string("lean::scoped_task_manager tmanager(lean::hardware_concurrency());");
-return x_0;
-}
-}
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__17() {
+obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__6() {
 _start:
 {
 obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; 
@@ -480,7 +3334,51 @@ lean::dec(x_3);
 return x_4;
 }
 }
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__18() {
+obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__7() {
+_start:
+{
+obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; 
+x_0 = lean::box(0);
+x_1 = lean::mk_string("}");
+x_2 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_2, 0, x_1);
+lean::cnstr_set(x_2, 1, x_0);
+x_3 = lean::mk_string("  return 1;");
+x_4 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_4, 0, x_3);
+lean::cnstr_set(x_4, 1, x_2);
+x_5 = lean::mk_string("  lean::dec_ref(w);");
+lean::inc(x_5);
+x_7 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_7, 0, x_5);
+lean::cnstr_set(x_7, 1, x_4);
+x_8 = lean::mk_string("  lean::io_result_show_error(w);");
+x_9 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_9, 0, x_8);
+lean::cnstr_set(x_9, 1, x_7);
+x_10 = lean::mk_string("} else {");
+x_11 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_11, 0, x_10);
+lean::cnstr_set(x_11, 1, x_9);
+x_12 = lean::mk_string("  return ret;");
+x_13 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_13, 0, x_12);
+lean::cnstr_set(x_13, 1, x_11);
+x_14 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_14, 0, x_5);
+lean::cnstr_set(x_14, 1, x_13);
+x_15 = lean::mk_string("  int ret = lean::unbox(io_result_get_value(w));");
+x_16 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_16, 0, x_15);
+lean::cnstr_set(x_16, 1, x_14);
+x_17 = lean::mk_string("if (io_result_is_ok(w)) {");
+x_18 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_18, 0, x_17);
+lean::cnstr_set(x_18, 1, x_16);
+return x_18;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__8() {
 _start:
 {
 obj* x_0; 
@@ -488,7 +3386,7 @@ x_0 = lean::mk_string("int main(int argc, char ** argv) {");
 return x_0;
 }
 }
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__19() {
+obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__9() {
 _start:
 {
 obj* x_0; 
@@ -496,7 +3394,7 @@ x_0 = lean::mk_string("lean::initialize_runtime_module();");
 return x_0;
 }
 }
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__20() {
+obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__10() {
 _start:
 {
 obj* x_0; 
@@ -504,7 +3402,7 @@ x_0 = lean::mk_string("namespace lean { void initialize(); }");
 return x_0;
 }
 }
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__21() {
+obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__11() {
 _start:
 {
 obj* x_0; 
@@ -512,55 +3410,43 @@ x_0 = lean::mk_string("lean::initialize();");
 return x_0;
 }
 }
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__22() {
+obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__12() {
 _start:
 {
-obj* x_0; 
-x_0 = lean::mk_string("obj* in = lean::box(0);");
-return x_0;
+obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; 
+x_0 = lean::box(0);
+x_1 = lean::mk_string("}");
+x_2 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_2, 0, x_1);
+lean::cnstr_set(x_2, 1, x_0);
+x_3 = lean::mk_string(" in = n;");
+x_4 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_4, 0, x_3);
+lean::cnstr_set(x_4, 1, x_2);
+x_5 = lean::mk_string(" obj* n = lean::alloc_cnstr(1,2,0); lean::cnstr_set(n, 0, lean::mk_string(argv[i])); lean::cnstr_set(n, 1, in);");
+x_6 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_6, 0, x_5);
+lean::cnstr_set(x_6, 1, x_4);
+x_7 = lean::mk_string(" i--;");
+x_8 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_8, 0, x_7);
+lean::cnstr_set(x_8, 1, x_6);
+x_9 = lean::mk_string("while (i > 1) {");
+x_10 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_10, 0, x_9);
+lean::cnstr_set(x_10, 1, x_8);
+x_11 = lean::mk_string("int i = argc;");
+x_12 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_12, 0, x_11);
+lean::cnstr_set(x_12, 1, x_10);
+x_13 = lean::mk_string("obj* in = lean::box(0);");
+x_14 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_14, 0, x_13);
+lean::cnstr_set(x_14, 1, x_12);
+return x_14;
 }
 }
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__23() {
-_start:
-{
-obj* x_0; 
-x_0 = lean::mk_string("int i = argc;\n");
-return x_0;
-}
-}
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__24() {
-_start:
-{
-obj* x_0; 
-x_0 = lean::mk_string("while (i > 1) {");
-return x_0;
-}
-}
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__25() {
-_start:
-{
-obj* x_0; 
-x_0 = lean::mk_string(" i--;");
-return x_0;
-}
-}
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__26() {
-_start:
-{
-obj* x_0; 
-x_0 = lean::mk_string(" obj* n = lean::alloc_cnstr(1,2,0); lean::cnstr_set(n, 0, lean::mk_string(argv[i])); lean::cnstr_set(n, 1, in);");
-return x_0;
-}
-}
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__27() {
-_start:
-{
-obj* x_0; 
-x_0 = lean::mk_string(" in = n;");
-return x_0;
-}
-}
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__28() {
+obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__13() {
 _start:
 {
 obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; 
@@ -573,7 +3459,7 @@ lean::dec(x_3);
 return x_4;
 }
 }
-obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__29() {
+obj* _init_l_Lean_IR_EmitCpp_emitMainFn___closed__14() {
 _start:
 {
 obj* x_0; 
@@ -584,464 +3470,666 @@ return x_0;
 obj* l_Lean_IR_EmitCpp_emitMainFn(obj* x_0, obj* x_1) {
 _start:
 {
-obj* x_2; obj* x_4; obj* x_6; 
-x_4 = l_Lean_IR_EmitCpp_emitMainFn___closed__9;
+obj* x_2; obj* x_4; 
+x_2 = l_Lean_IR_EmitCpp_toBaseCppName___closed__1;
 lean::inc(x_0);
-x_6 = l_Lean_IR_EmitCpp_getDecl(x_4, x_0, x_1);
-if (lean::obj_tag(x_6) == 0)
+x_4 = l_Lean_IR_EmitCpp_getDecl(x_2, x_0, x_1);
+if (lean::obj_tag(x_4) == 0)
 {
-obj* x_7; 
-x_7 = lean::cnstr_get(x_6, 0);
-lean::inc(x_7);
-if (lean::obj_tag(x_7) == 0)
+obj* x_5; 
+x_5 = lean::cnstr_get(x_4, 0);
+lean::inc(x_5);
+if (lean::obj_tag(x_5) == 0)
 {
-obj* x_9; obj* x_11; obj* x_12; obj* x_14; obj* x_16; uint8 x_17; 
-x_9 = lean::cnstr_get(x_6, 1);
-if (lean::is_exclusive(x_6)) {
- lean::cnstr_release(x_6, 0);
- lean::cnstr_set(x_6, 1, lean::box(0));
- x_11 = x_6;
+obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_14; uint8 x_15; 
+x_7 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ lean::cnstr_set(x_4, 1, lean::box(0));
+ x_9 = x_4;
 } else {
- lean::inc(x_9);
- lean::dec(x_6);
- x_11 = lean::box(0);
+ lean::inc(x_7);
+ lean::dec(x_4);
+ x_9 = lean::box(0);
 }
-x_12 = lean::cnstr_get(x_7, 1);
-lean::inc(x_12);
-x_14 = lean::array_get_size(x_12);
+x_10 = lean::cnstr_get(x_5, 1);
+lean::inc(x_10);
+x_12 = lean::array_get_size(x_10);
+lean::dec(x_10);
+x_14 = lean::mk_nat_obj(2ul);
+x_15 = lean::nat_dec_eq(x_12, x_14);
+if (x_15 == 0)
+{
+obj* x_16; uint8 x_17; 
+x_16 = lean::mk_nat_obj(1ul);
+x_17 = lean::nat_dec_eq(x_12, x_16);
 lean::dec(x_12);
-x_16 = lean::mk_nat_obj(2ul);
-x_17 = lean::nat_dec_eq(x_14, x_16);
 if (x_17 == 0)
 {
-obj* x_18; uint8 x_19; 
-x_18 = lean::mk_nat_obj(1ul);
-x_19 = lean::nat_dec_eq(x_14, x_18);
-lean::dec(x_14);
-if (x_19 == 0)
-{
-obj* x_23; obj* x_24; 
-lean::dec(x_7);
+obj* x_21; obj* x_22; 
+lean::dec(x_5);
 lean::dec(x_0);
-x_23 = l_Lean_IR_EmitCpp_emitMainFn___closed__10;
-if (lean::is_scalar(x_11)) {
- x_24 = lean::alloc_cnstr(1, 2, 0);
+x_21 = l_Lean_IR_EmitCpp_emitMainFn___closed__1;
+if (lean::is_scalar(x_9)) {
+ x_22 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_24 = x_11;
- lean::cnstr_set_tag(x_11, 1);
+ x_22 = x_9;
+ lean::cnstr_set_tag(x_9, 1);
+}
+lean::cnstr_set(x_22, 0, x_21);
+lean::cnstr_set(x_22, 1, x_7);
+return x_22;
+}
+else
+{
+obj* x_23; obj* x_24; obj* x_25; obj* x_28; 
+x_23 = lean::box(0);
+if (lean::is_scalar(x_9)) {
+ x_24 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_24 = x_9;
 }
 lean::cnstr_set(x_24, 0, x_23);
-lean::cnstr_set(x_24, 1, x_9);
-return x_24;
-}
-else
-{
-obj* x_25; obj* x_26; obj* x_27; obj* x_30; 
-x_25 = lean::box(0);
-if (lean::is_scalar(x_11)) {
- x_26 = lean::alloc_cnstr(0, 2, 0);
-} else {
- x_26 = x_11;
-}
-lean::cnstr_set(x_26, 0, x_25);
-lean::cnstr_set(x_26, 1, x_9);
+lean::cnstr_set(x_24, 1, x_7);
 lean::inc(x_0);
-x_30 = l_Lean_IR_EmitCpp_getEnv(x_0, x_26);
-if (lean::obj_tag(x_30) == 0)
+x_28 = l_Lean_IR_EmitCpp_getEnv(x_0, x_24);
+if (lean::obj_tag(x_28) == 0)
 {
-obj* x_31; obj* x_33; obj* x_36; uint8 x_38; 
-x_31 = lean::cnstr_get(x_30, 0);
+obj* x_29; obj* x_31; obj* x_34; uint8 x_36; 
+x_29 = lean::cnstr_get(x_28, 0);
+lean::inc(x_29);
+x_31 = lean::cnstr_get(x_28, 1);
 lean::inc(x_31);
-x_33 = lean::cnstr_get(x_30, 1);
-lean::inc(x_33);
-lean::dec(x_30);
-x_36 = l_Lean_IR_usesLeanNamespace___main(x_31, x_7);
-lean::dec(x_31);
-x_38 = lean::unbox(x_36);
-if (x_38 == 0)
+lean::dec(x_28);
+x_34 = l_Lean_IR_usesLeanNamespace___main(x_29, x_5);
+lean::dec(x_29);
+x_36 = lean::unbox(x_34);
+if (x_36 == 0)
 {
-obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; 
-x_39 = l_Lean_IR_EmitCpp_emitMainFn___closed__18;
-x_40 = lean::string_append(x_33, x_39);
-x_41 = l_IO_println___rarg___closed__1;
+obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; 
+x_37 = l_Lean_IR_EmitCpp_emitMainFn___closed__8;
+x_38 = lean::string_append(x_31, x_37);
+x_39 = l_IO_println___rarg___closed__1;
+x_40 = lean::string_append(x_38, x_39);
+x_41 = l_Lean_IR_EmitCpp_emitMainFn___closed__9;
 x_42 = lean::string_append(x_40, x_41);
-x_43 = l_Lean_IR_EmitCpp_emitMainFn___closed__19;
-x_44 = lean::string_append(x_42, x_43);
-x_45 = lean::string_append(x_44, x_41);
-x_27 = x_45;
-goto lbl_28;
+x_43 = lean::string_append(x_42, x_39);
+x_25 = x_43;
+goto lbl_26;
 }
 else
 {
-obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; obj* x_55; 
-x_46 = l_Lean_IR_EmitCpp_emitMainFn___closed__20;
-x_47 = lean::string_append(x_33, x_46);
-x_48 = l_IO_println___rarg___closed__1;
+obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; 
+x_44 = l_Lean_IR_EmitCpp_emitMainFn___closed__10;
+x_45 = lean::string_append(x_31, x_44);
+x_46 = l_IO_println___rarg___closed__1;
+x_47 = lean::string_append(x_45, x_46);
+x_48 = l_Lean_IR_EmitCpp_emitMainFn___closed__8;
 x_49 = lean::string_append(x_47, x_48);
-x_50 = l_Lean_IR_EmitCpp_emitMainFn___closed__18;
-x_51 = lean::string_append(x_49, x_50);
-x_52 = lean::string_append(x_51, x_48);
-x_53 = l_Lean_IR_EmitCpp_emitMainFn___closed__21;
-x_54 = lean::string_append(x_52, x_53);
-x_55 = lean::string_append(x_54, x_48);
-x_27 = x_55;
-goto lbl_28;
+x_50 = lean::string_append(x_49, x_46);
+x_51 = l_Lean_IR_EmitCpp_emitMainFn___closed__11;
+x_52 = lean::string_append(x_50, x_51);
+x_53 = lean::string_append(x_52, x_46);
+x_25 = x_53;
+goto lbl_26;
 }
 }
 else
 {
-obj* x_58; obj* x_60; obj* x_62; obj* x_63; 
-lean::dec(x_7);
+obj* x_56; obj* x_58; obj* x_60; obj* x_61; 
+lean::dec(x_5);
 lean::dec(x_0);
-x_58 = lean::cnstr_get(x_30, 0);
-x_60 = lean::cnstr_get(x_30, 1);
-if (lean::is_exclusive(x_30)) {
- x_62 = x_30;
+x_56 = lean::cnstr_get(x_28, 0);
+x_58 = lean::cnstr_get(x_28, 1);
+if (lean::is_exclusive(x_28)) {
+ x_60 = x_28;
 } else {
+ lean::inc(x_56);
  lean::inc(x_58);
- lean::inc(x_60);
- lean::dec(x_30);
- x_62 = lean::box(0);
+ lean::dec(x_28);
+ x_60 = lean::box(0);
 }
-if (lean::is_scalar(x_62)) {
- x_63 = lean::alloc_cnstr(1, 2, 0);
+if (lean::is_scalar(x_60)) {
+ x_61 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_63 = x_62;
+ x_61 = x_60;
 }
-lean::cnstr_set(x_63, 0, x_58);
-lean::cnstr_set(x_63, 1, x_60);
-return x_63;
+lean::cnstr_set(x_61, 0, x_56);
+lean::cnstr_set(x_61, 1, x_58);
+return x_61;
 }
-lbl_28:
+lbl_26:
 {
-obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; 
-x_64 = l_Lean_IR_EmitCpp_emitMainFn___closed__11;
-x_65 = lean::string_append(x_27, x_64);
-x_66 = l_IO_println___rarg___closed__1;
-x_67 = lean::string_append(x_65, x_66);
-x_68 = lean::alloc_cnstr(0, 2, 0);
-lean::cnstr_set(x_68, 0, x_25);
-lean::cnstr_set(x_68, 1, x_67);
-x_69 = l_Lean_IR_EmitCpp_getModName(x_0, x_68);
-if (lean::obj_tag(x_69) == 0)
+obj* x_62; obj* x_63; obj* x_64; obj* x_65; obj* x_66; obj* x_68; 
+x_62 = l_Lean_IR_EmitCpp_emitMainFn___closed__2;
+x_63 = lean::string_append(x_25, x_62);
+x_64 = l_IO_println___rarg___closed__1;
+x_65 = lean::string_append(x_63, x_64);
+x_66 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_66, 0, x_23);
+lean::cnstr_set(x_66, 1, x_65);
+lean::inc(x_0);
+x_68 = l_Lean_IR_EmitCpp_getModName(x_0, x_66);
+if (lean::obj_tag(x_68) == 0)
 {
-obj* x_70; obj* x_72; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_80; obj* x_81; obj* x_82; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; 
-x_70 = lean::cnstr_get(x_69, 0);
-lean::inc(x_70);
-x_72 = lean::cnstr_get(x_69, 1);
-lean::inc(x_72);
-lean::dec(x_69);
-x_75 = l_String_splitAux___main___closed__1;
-x_76 = l___private_init_lean_name__mangling_2__Name_mangleAux___main(x_75, x_70);
-x_77 = l_Lean_IR_EmitCpp_emitMainFn___closed__12;
-x_78 = lean::string_append(x_77, x_76);
-lean::dec(x_76);
-x_80 = l_Lean_IR_EmitCpp_emitMainFn___closed__13;
-x_81 = lean::string_append(x_78, x_80);
-x_82 = lean::string_append(x_72, x_81);
-lean::dec(x_81);
-x_84 = lean::string_append(x_82, x_66);
-x_85 = l_Lean_IR_EmitCpp_emitMainFn___closed__14;
-x_86 = lean::string_append(x_84, x_85);
-x_87 = lean::string_append(x_86, x_66);
-x_88 = l_Lean_IR_EmitCpp_emitMainFn___closed__15;
-x_89 = lean::string_append(x_87, x_88);
-x_90 = lean::string_append(x_89, x_66);
-x_91 = l_Lean_IR_EmitCpp_emitMainFn___closed__16;
-x_92 = lean::string_append(x_90, x_91);
-x_93 = lean::string_append(x_92, x_66);
-x_94 = l_Lean_IR_EmitCpp_emitMainFn___closed__17;
-x_95 = lean::string_append(x_93, x_94);
-x_96 = lean::string_append(x_95, x_66);
-x_2 = x_96;
-goto lbl_3;
-}
-else
-{
-obj* x_97; obj* x_99; obj* x_101; obj* x_102; 
-x_97 = lean::cnstr_get(x_69, 0);
-x_99 = lean::cnstr_get(x_69, 1);
-if (lean::is_exclusive(x_69)) {
- x_101 = x_69;
+obj* x_69; obj* x_71; obj* x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_79; obj* x_80; obj* x_81; obj* x_83; obj* x_84; obj* x_85; obj* x_86; 
+x_69 = lean::cnstr_get(x_68, 0);
+x_71 = lean::cnstr_get(x_68, 1);
+if (lean::is_exclusive(x_68)) {
+ x_73 = x_68;
 } else {
- lean::inc(x_97);
- lean::inc(x_99);
- lean::dec(x_69);
- x_101 = lean::box(0);
+ lean::inc(x_69);
+ lean::inc(x_71);
+ lean::dec(x_68);
+ x_73 = lean::box(0);
 }
-if (lean::is_scalar(x_101)) {
- x_102 = lean::alloc_cnstr(1, 2, 0);
+x_74 = l_String_splitAux___main___closed__1;
+x_75 = l_Lean_Name_mangle(x_69, x_74);
+x_76 = l_Lean_IR_EmitCpp_emitMainFn___closed__3;
+x_77 = lean::string_append(x_76, x_75);
+lean::dec(x_75);
+x_79 = l_Lean_IR_EmitCpp_emitMainFn___closed__4;
+x_80 = lean::string_append(x_77, x_79);
+x_81 = lean::string_append(x_71, x_80);
+lean::dec(x_80);
+x_83 = lean::string_append(x_81, x_64);
+if (lean::is_scalar(x_73)) {
+ x_84 = lean::alloc_cnstr(0, 2, 0);
 } else {
- x_102 = x_101;
+ x_84 = x_73;
 }
-lean::cnstr_set(x_102, 0, x_97);
-lean::cnstr_set(x_102, 1, x_99);
-return x_102;
-}
-}
-}
-}
-else
+lean::cnstr_set(x_84, 0, x_23);
+lean::cnstr_set(x_84, 1, x_83);
+x_85 = l_Lean_IR_EmitCpp_emitMainFn___closed__5;
+x_86 = l_List_mfor___main___at_Lean_IR_EmitCpp_emitMainFn___spec__2(x_85, x_0, x_84);
+if (lean::obj_tag(x_86) == 0)
 {
-obj* x_104; obj* x_105; obj* x_106; obj* x_109; 
-lean::dec(x_14);
-x_104 = lean::box(0);
-if (lean::is_scalar(x_11)) {
+obj* x_87; obj* x_89; obj* x_90; obj* x_91; obj* x_92; obj* x_93; obj* x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; 
+x_87 = lean::cnstr_get(x_86, 1);
+if (lean::is_exclusive(x_86)) {
+ lean::cnstr_release(x_86, 0);
+ x_89 = x_86;
+} else {
+ lean::inc(x_87);
+ lean::dec(x_86);
+ x_89 = lean::box(0);
+}
+x_90 = l_Lean_IR_EmitCpp_emitMainFn___closed__6;
+x_91 = lean::string_append(x_87, x_90);
+x_92 = lean::string_append(x_91, x_64);
+x_93 = l_Lean_IR_EmitCpp_closeNamespacesAux___main___closed__1;
+x_94 = lean::string_append(x_92, x_93);
+x_95 = lean::string_append(x_94, x_64);
+if (lean::is_scalar(x_89)) {
+ x_96 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_96 = x_89;
+}
+lean::cnstr_set(x_96, 0, x_23);
+lean::cnstr_set(x_96, 1, x_95);
+x_97 = l_Lean_IR_EmitCpp_emitMainFn___closed__7;
+x_98 = l_List_mfor___main___at_Lean_IR_EmitCpp_emitMainFn___spec__2(x_97, x_0, x_96);
+lean::dec(x_0);
+if (lean::obj_tag(x_98) == 0)
+{
+obj* x_100; obj* x_102; obj* x_103; obj* x_104; obj* x_105; 
+x_100 = lean::cnstr_get(x_98, 1);
+if (lean::is_exclusive(x_98)) {
+ lean::cnstr_release(x_98, 0);
+ x_102 = x_98;
+} else {
+ lean::inc(x_100);
+ lean::dec(x_98);
+ x_102 = lean::box(0);
+}
+x_103 = lean::string_append(x_100, x_93);
+x_104 = lean::string_append(x_103, x_64);
+if (lean::is_scalar(x_102)) {
  x_105 = lean::alloc_cnstr(0, 2, 0);
 } else {
- x_105 = x_11;
+ x_105 = x_102;
 }
-lean::cnstr_set(x_105, 0, x_104);
-lean::cnstr_set(x_105, 1, x_9);
-lean::inc(x_0);
-x_109 = l_Lean_IR_EmitCpp_getEnv(x_0, x_105);
-if (lean::obj_tag(x_109) == 0)
-{
-obj* x_110; obj* x_112; obj* x_115; uint8 x_117; 
-x_110 = lean::cnstr_get(x_109, 0);
-lean::inc(x_110);
-x_112 = lean::cnstr_get(x_109, 1);
-lean::inc(x_112);
-lean::dec(x_109);
-x_115 = l_Lean_IR_usesLeanNamespace___main(x_110, x_7);
-lean::dec(x_110);
-x_117 = lean::unbox(x_115);
-if (x_117 == 0)
-{
-obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; 
-x_118 = l_Lean_IR_EmitCpp_emitMainFn___closed__18;
-x_119 = lean::string_append(x_112, x_118);
-x_120 = l_IO_println___rarg___closed__1;
-x_121 = lean::string_append(x_119, x_120);
-x_122 = l_Lean_IR_EmitCpp_emitMainFn___closed__19;
-x_123 = lean::string_append(x_121, x_122);
-x_124 = lean::string_append(x_123, x_120);
-x_106 = x_124;
-goto lbl_107;
+lean::cnstr_set(x_105, 0, x_23);
+lean::cnstr_set(x_105, 1, x_104);
+return x_105;
 }
 else
 {
-obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; 
-x_125 = l_Lean_IR_EmitCpp_emitMainFn___closed__20;
-x_126 = lean::string_append(x_112, x_125);
-x_127 = l_IO_println___rarg___closed__1;
-x_128 = lean::string_append(x_126, x_127);
-x_129 = l_Lean_IR_EmitCpp_emitMainFn___closed__18;
-x_130 = lean::string_append(x_128, x_129);
-x_131 = lean::string_append(x_130, x_127);
-x_132 = l_Lean_IR_EmitCpp_emitMainFn___closed__21;
-x_133 = lean::string_append(x_131, x_132);
-x_134 = lean::string_append(x_133, x_127);
-x_106 = x_134;
-goto lbl_107;
+obj* x_106; obj* x_108; obj* x_110; obj* x_111; 
+x_106 = lean::cnstr_get(x_98, 0);
+x_108 = lean::cnstr_get(x_98, 1);
+if (lean::is_exclusive(x_98)) {
+ x_110 = x_98;
+} else {
+ lean::inc(x_106);
+ lean::inc(x_108);
+ lean::dec(x_98);
+ x_110 = lean::box(0);
+}
+if (lean::is_scalar(x_110)) {
+ x_111 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_111 = x_110;
+}
+lean::cnstr_set(x_111, 0, x_106);
+lean::cnstr_set(x_111, 1, x_108);
+return x_111;
 }
 }
 else
 {
-obj* x_137; obj* x_139; obj* x_141; obj* x_142; 
-lean::dec(x_7);
+obj* x_113; obj* x_115; obj* x_117; obj* x_118; 
 lean::dec(x_0);
-x_137 = lean::cnstr_get(x_109, 0);
-x_139 = lean::cnstr_get(x_109, 1);
-if (lean::is_exclusive(x_109)) {
- x_141 = x_109;
+x_113 = lean::cnstr_get(x_86, 0);
+x_115 = lean::cnstr_get(x_86, 1);
+if (lean::is_exclusive(x_86)) {
+ x_117 = x_86;
 } else {
- lean::inc(x_137);
- lean::inc(x_139);
- lean::dec(x_109);
- x_141 = lean::box(0);
+ lean::inc(x_113);
+ lean::inc(x_115);
+ lean::dec(x_86);
+ x_117 = lean::box(0);
 }
-if (lean::is_scalar(x_141)) {
- x_142 = lean::alloc_cnstr(1, 2, 0);
+if (lean::is_scalar(x_117)) {
+ x_118 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_142 = x_141;
+ x_118 = x_117;
 }
-lean::cnstr_set(x_142, 0, x_137);
-lean::cnstr_set(x_142, 1, x_139);
-return x_142;
+lean::cnstr_set(x_118, 0, x_113);
+lean::cnstr_set(x_118, 1, x_115);
+return x_118;
 }
-lbl_107:
-{
-obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; 
-x_143 = l_Lean_IR_EmitCpp_emitMainFn___closed__11;
-x_144 = lean::string_append(x_106, x_143);
-x_145 = l_IO_println___rarg___closed__1;
-x_146 = lean::string_append(x_144, x_145);
-x_147 = lean::alloc_cnstr(0, 2, 0);
-lean::cnstr_set(x_147, 0, x_104);
-lean::cnstr_set(x_147, 1, x_146);
-x_148 = l_Lean_IR_EmitCpp_getModName(x_0, x_147);
-if (lean::obj_tag(x_148) == 0)
-{
-obj* x_149; obj* x_151; obj* x_154; obj* x_155; obj* x_156; obj* x_157; obj* x_159; obj* x_160; obj* x_161; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_171; obj* x_172; obj* x_173; obj* x_174; obj* x_175; obj* x_176; obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; obj* x_188; obj* x_189; obj* x_190; obj* x_191; obj* x_192; obj* x_193; obj* x_194; obj* x_195; obj* x_196; 
-x_149 = lean::cnstr_get(x_148, 0);
-lean::inc(x_149);
-x_151 = lean::cnstr_get(x_148, 1);
-lean::inc(x_151);
-lean::dec(x_148);
-x_154 = l_String_splitAux___main___closed__1;
-x_155 = l___private_init_lean_name__mangling_2__Name_mangleAux___main(x_154, x_149);
-x_156 = l_Lean_IR_EmitCpp_emitMainFn___closed__12;
-x_157 = lean::string_append(x_156, x_155);
-lean::dec(x_155);
-x_159 = l_Lean_IR_EmitCpp_emitMainFn___closed__13;
-x_160 = lean::string_append(x_157, x_159);
-x_161 = lean::string_append(x_151, x_160);
-lean::dec(x_160);
-x_163 = lean::string_append(x_161, x_145);
-x_164 = l_Lean_IR_EmitCpp_emitMainFn___closed__14;
-x_165 = lean::string_append(x_163, x_164);
-x_166 = lean::string_append(x_165, x_145);
-x_167 = l_Lean_IR_EmitCpp_emitMainFn___closed__15;
-x_168 = lean::string_append(x_166, x_167);
-x_169 = lean::string_append(x_168, x_145);
-x_170 = l_Lean_IR_EmitCpp_emitMainFn___closed__16;
-x_171 = lean::string_append(x_169, x_170);
-x_172 = lean::string_append(x_171, x_145);
-x_173 = l_Lean_IR_EmitCpp_emitMainFn___closed__22;
-x_174 = lean::string_append(x_172, x_173);
-x_175 = lean::string_append(x_174, x_145);
-x_176 = l_Lean_IR_EmitCpp_emitMainFn___closed__23;
-x_177 = lean::string_append(x_175, x_176);
-x_178 = lean::string_append(x_177, x_145);
-x_179 = l_Lean_IR_EmitCpp_emitMainFn___closed__24;
-x_180 = lean::string_append(x_178, x_179);
-x_181 = lean::string_append(x_180, x_145);
-x_182 = l_Lean_IR_EmitCpp_emitMainFn___closed__25;
-x_183 = lean::string_append(x_181, x_182);
-x_184 = lean::string_append(x_183, x_145);
-x_185 = l_Lean_IR_EmitCpp_emitMainFn___closed__26;
-x_186 = lean::string_append(x_184, x_185);
-x_187 = lean::string_append(x_186, x_145);
-x_188 = l_Lean_IR_EmitCpp_emitMainFn___closed__27;
-x_189 = lean::string_append(x_187, x_188);
-x_190 = lean::string_append(x_189, x_145);
-x_191 = l_Lean_IR_EmitCpp_emitMainFn___closed__1;
-x_192 = lean::string_append(x_190, x_191);
-x_193 = lean::string_append(x_192, x_145);
-x_194 = l_Lean_IR_EmitCpp_emitMainFn___closed__28;
-x_195 = lean::string_append(x_193, x_194);
-x_196 = lean::string_append(x_195, x_145);
-x_2 = x_196;
-goto lbl_3;
 }
 else
 {
-obj* x_197; obj* x_199; obj* x_201; obj* x_202; 
-x_197 = lean::cnstr_get(x_148, 0);
-x_199 = lean::cnstr_get(x_148, 1);
-if (lean::is_exclusive(x_148)) {
- x_201 = x_148;
+obj* x_120; obj* x_122; obj* x_124; obj* x_125; 
+lean::dec(x_0);
+x_120 = lean::cnstr_get(x_68, 0);
+x_122 = lean::cnstr_get(x_68, 1);
+if (lean::is_exclusive(x_68)) {
+ x_124 = x_68;
+} else {
+ lean::inc(x_120);
+ lean::inc(x_122);
+ lean::dec(x_68);
+ x_124 = lean::box(0);
+}
+if (lean::is_scalar(x_124)) {
+ x_125 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_125 = x_124;
+}
+lean::cnstr_set(x_125, 0, x_120);
+lean::cnstr_set(x_125, 1, x_122);
+return x_125;
+}
+}
+}
+}
+else
+{
+obj* x_127; obj* x_128; obj* x_129; obj* x_132; 
+lean::dec(x_12);
+x_127 = lean::box(0);
+if (lean::is_scalar(x_9)) {
+ x_128 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_128 = x_9;
+}
+lean::cnstr_set(x_128, 0, x_127);
+lean::cnstr_set(x_128, 1, x_7);
+lean::inc(x_0);
+x_132 = l_Lean_IR_EmitCpp_getEnv(x_0, x_128);
+if (lean::obj_tag(x_132) == 0)
+{
+obj* x_133; obj* x_135; obj* x_138; uint8 x_140; 
+x_133 = lean::cnstr_get(x_132, 0);
+lean::inc(x_133);
+x_135 = lean::cnstr_get(x_132, 1);
+lean::inc(x_135);
+lean::dec(x_132);
+x_138 = l_Lean_IR_usesLeanNamespace___main(x_133, x_5);
+lean::dec(x_133);
+x_140 = lean::unbox(x_138);
+if (x_140 == 0)
+{
+obj* x_141; obj* x_142; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; 
+x_141 = l_Lean_IR_EmitCpp_emitMainFn___closed__8;
+x_142 = lean::string_append(x_135, x_141);
+x_143 = l_IO_println___rarg___closed__1;
+x_144 = lean::string_append(x_142, x_143);
+x_145 = l_Lean_IR_EmitCpp_emitMainFn___closed__9;
+x_146 = lean::string_append(x_144, x_145);
+x_147 = lean::string_append(x_146, x_143);
+x_129 = x_147;
+goto lbl_130;
+}
+else
+{
+obj* x_148; obj* x_149; obj* x_150; obj* x_151; obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; 
+x_148 = l_Lean_IR_EmitCpp_emitMainFn___closed__10;
+x_149 = lean::string_append(x_135, x_148);
+x_150 = l_IO_println___rarg___closed__1;
+x_151 = lean::string_append(x_149, x_150);
+x_152 = l_Lean_IR_EmitCpp_emitMainFn___closed__8;
+x_153 = lean::string_append(x_151, x_152);
+x_154 = lean::string_append(x_153, x_150);
+x_155 = l_Lean_IR_EmitCpp_emitMainFn___closed__11;
+x_156 = lean::string_append(x_154, x_155);
+x_157 = lean::string_append(x_156, x_150);
+x_129 = x_157;
+goto lbl_130;
+}
+}
+else
+{
+obj* x_160; obj* x_162; obj* x_164; obj* x_165; 
+lean::dec(x_5);
+lean::dec(x_0);
+x_160 = lean::cnstr_get(x_132, 0);
+x_162 = lean::cnstr_get(x_132, 1);
+if (lean::is_exclusive(x_132)) {
+ x_164 = x_132;
+} else {
+ lean::inc(x_160);
+ lean::inc(x_162);
+ lean::dec(x_132);
+ x_164 = lean::box(0);
+}
+if (lean::is_scalar(x_164)) {
+ x_165 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_165 = x_164;
+}
+lean::cnstr_set(x_165, 0, x_160);
+lean::cnstr_set(x_165, 1, x_162);
+return x_165;
+}
+lbl_130:
+{
+obj* x_166; obj* x_167; obj* x_168; obj* x_169; obj* x_170; obj* x_172; 
+x_166 = l_Lean_IR_EmitCpp_emitMainFn___closed__2;
+x_167 = lean::string_append(x_129, x_166);
+x_168 = l_IO_println___rarg___closed__1;
+x_169 = lean::string_append(x_167, x_168);
+x_170 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_170, 0, x_127);
+lean::cnstr_set(x_170, 1, x_169);
+lean::inc(x_0);
+x_172 = l_Lean_IR_EmitCpp_getModName(x_0, x_170);
+if (lean::obj_tag(x_172) == 0)
+{
+obj* x_173; obj* x_175; obj* x_177; obj* x_178; obj* x_179; obj* x_180; obj* x_181; obj* x_183; obj* x_184; obj* x_185; obj* x_187; obj* x_188; obj* x_189; obj* x_190; 
+x_173 = lean::cnstr_get(x_172, 0);
+x_175 = lean::cnstr_get(x_172, 1);
+if (lean::is_exclusive(x_172)) {
+ x_177 = x_172;
+} else {
+ lean::inc(x_173);
+ lean::inc(x_175);
+ lean::dec(x_172);
+ x_177 = lean::box(0);
+}
+x_178 = l_String_splitAux___main___closed__1;
+x_179 = l_Lean_Name_mangle(x_173, x_178);
+x_180 = l_Lean_IR_EmitCpp_emitMainFn___closed__3;
+x_181 = lean::string_append(x_180, x_179);
+lean::dec(x_179);
+x_183 = l_Lean_IR_EmitCpp_emitMainFn___closed__4;
+x_184 = lean::string_append(x_181, x_183);
+x_185 = lean::string_append(x_175, x_184);
+lean::dec(x_184);
+x_187 = lean::string_append(x_185, x_168);
+if (lean::is_scalar(x_177)) {
+ x_188 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_188 = x_177;
+}
+lean::cnstr_set(x_188, 0, x_127);
+lean::cnstr_set(x_188, 1, x_187);
+x_189 = l_Lean_IR_EmitCpp_emitMainFn___closed__5;
+x_190 = l_List_mfor___main___at_Lean_IR_EmitCpp_emitMainFn___spec__2(x_189, x_0, x_188);
+if (lean::obj_tag(x_190) == 0)
+{
+obj* x_191; obj* x_193; obj* x_194; obj* x_195; obj* x_196; 
+x_191 = lean::cnstr_get(x_190, 1);
+if (lean::is_exclusive(x_190)) {
+ lean::cnstr_release(x_190, 0);
+ x_193 = x_190;
+} else {
+ lean::inc(x_191);
+ lean::dec(x_190);
+ x_193 = lean::box(0);
+}
+if (lean::is_scalar(x_193)) {
+ x_194 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_194 = x_193;
+}
+lean::cnstr_set(x_194, 0, x_127);
+lean::cnstr_set(x_194, 1, x_191);
+x_195 = l_Lean_IR_EmitCpp_emitMainFn___closed__12;
+x_196 = l_List_mfor___main___at_Lean_IR_EmitCpp_emitMainFn___spec__2(x_195, x_0, x_194);
+if (lean::obj_tag(x_196) == 0)
+{
+obj* x_197; obj* x_199; obj* x_200; obj* x_201; obj* x_202; obj* x_203; obj* x_204; obj* x_205; obj* x_206; obj* x_207; obj* x_208; 
+x_197 = lean::cnstr_get(x_196, 1);
+if (lean::is_exclusive(x_196)) {
+ lean::cnstr_release(x_196, 0);
+ x_199 = x_196;
 } else {
  lean::inc(x_197);
- lean::inc(x_199);
- lean::dec(x_148);
- x_201 = lean::box(0);
+ lean::dec(x_196);
+ x_199 = lean::box(0);
 }
-if (lean::is_scalar(x_201)) {
- x_202 = lean::alloc_cnstr(1, 2, 0);
+x_200 = l_Lean_IR_EmitCpp_emitMainFn___closed__13;
+x_201 = lean::string_append(x_197, x_200);
+x_202 = lean::string_append(x_201, x_168);
+x_203 = l_Lean_IR_EmitCpp_closeNamespacesAux___main___closed__1;
+x_204 = lean::string_append(x_202, x_203);
+x_205 = lean::string_append(x_204, x_168);
+if (lean::is_scalar(x_199)) {
+ x_206 = lean::alloc_cnstr(0, 2, 0);
 } else {
- x_202 = x_201;
+ x_206 = x_199;
 }
-lean::cnstr_set(x_202, 0, x_197);
-lean::cnstr_set(x_202, 1, x_199);
-return x_202;
+lean::cnstr_set(x_206, 0, x_127);
+lean::cnstr_set(x_206, 1, x_205);
+x_207 = l_Lean_IR_EmitCpp_emitMainFn___closed__7;
+x_208 = l_List_mfor___main___at_Lean_IR_EmitCpp_emitMainFn___spec__2(x_207, x_0, x_206);
+lean::dec(x_0);
+if (lean::obj_tag(x_208) == 0)
+{
+obj* x_210; obj* x_212; obj* x_213; obj* x_214; obj* x_215; 
+x_210 = lean::cnstr_get(x_208, 1);
+if (lean::is_exclusive(x_208)) {
+ lean::cnstr_release(x_208, 0);
+ x_212 = x_208;
+} else {
+ lean::inc(x_210);
+ lean::dec(x_208);
+ x_212 = lean::box(0);
+}
+x_213 = lean::string_append(x_210, x_203);
+x_214 = lean::string_append(x_213, x_168);
+if (lean::is_scalar(x_212)) {
+ x_215 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_215 = x_212;
+}
+lean::cnstr_set(x_215, 0, x_127);
+lean::cnstr_set(x_215, 1, x_214);
+return x_215;
+}
+else
+{
+obj* x_216; obj* x_218; obj* x_220; obj* x_221; 
+x_216 = lean::cnstr_get(x_208, 0);
+x_218 = lean::cnstr_get(x_208, 1);
+if (lean::is_exclusive(x_208)) {
+ x_220 = x_208;
+} else {
+ lean::inc(x_216);
+ lean::inc(x_218);
+ lean::dec(x_208);
+ x_220 = lean::box(0);
+}
+if (lean::is_scalar(x_220)) {
+ x_221 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_221 = x_220;
+}
+lean::cnstr_set(x_221, 0, x_216);
+lean::cnstr_set(x_221, 1, x_218);
+return x_221;
+}
+}
+else
+{
+obj* x_223; obj* x_225; obj* x_227; obj* x_228; 
+lean::dec(x_0);
+x_223 = lean::cnstr_get(x_196, 0);
+x_225 = lean::cnstr_get(x_196, 1);
+if (lean::is_exclusive(x_196)) {
+ x_227 = x_196;
+} else {
+ lean::inc(x_223);
+ lean::inc(x_225);
+ lean::dec(x_196);
+ x_227 = lean::box(0);
+}
+if (lean::is_scalar(x_227)) {
+ x_228 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_228 = x_227;
+}
+lean::cnstr_set(x_228, 0, x_223);
+lean::cnstr_set(x_228, 1, x_225);
+return x_228;
+}
+}
+else
+{
+obj* x_230; obj* x_232; obj* x_234; obj* x_235; 
+lean::dec(x_0);
+x_230 = lean::cnstr_get(x_190, 0);
+x_232 = lean::cnstr_get(x_190, 1);
+if (lean::is_exclusive(x_190)) {
+ x_234 = x_190;
+} else {
+ lean::inc(x_230);
+ lean::inc(x_232);
+ lean::dec(x_190);
+ x_234 = lean::box(0);
+}
+if (lean::is_scalar(x_234)) {
+ x_235 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_235 = x_234;
+}
+lean::cnstr_set(x_235, 0, x_230);
+lean::cnstr_set(x_235, 1, x_232);
+return x_235;
+}
+}
+else
+{
+obj* x_237; obj* x_239; obj* x_241; obj* x_242; 
+lean::dec(x_0);
+x_237 = lean::cnstr_get(x_172, 0);
+x_239 = lean::cnstr_get(x_172, 1);
+if (lean::is_exclusive(x_172)) {
+ x_241 = x_172;
+} else {
+ lean::inc(x_237);
+ lean::inc(x_239);
+ lean::dec(x_172);
+ x_241 = lean::box(0);
+}
+if (lean::is_scalar(x_241)) {
+ x_242 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_242 = x_241;
+}
+lean::cnstr_set(x_242, 0, x_237);
+lean::cnstr_set(x_242, 1, x_239);
+return x_242;
 }
 }
 }
 }
 else
 {
-obj* x_205; obj* x_207; obj* x_208; obj* x_209; 
-lean::dec(x_7);
+obj* x_245; obj* x_247; obj* x_248; obj* x_249; 
+lean::dec(x_5);
 lean::dec(x_0);
-x_205 = lean::cnstr_get(x_6, 1);
-if (lean::is_exclusive(x_6)) {
- lean::cnstr_release(x_6, 0);
- x_207 = x_6;
+x_245 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ x_247 = x_4;
 } else {
- lean::inc(x_205);
- lean::dec(x_6);
- x_207 = lean::box(0);
+ lean::inc(x_245);
+ lean::dec(x_4);
+ x_247 = lean::box(0);
 }
-x_208 = l_Lean_IR_EmitCpp_emitMainFn___closed__29;
-if (lean::is_scalar(x_207)) {
- x_209 = lean::alloc_cnstr(1, 2, 0);
+x_248 = l_Lean_IR_EmitCpp_emitMainFn___closed__14;
+if (lean::is_scalar(x_247)) {
+ x_249 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_209 = x_207;
- lean::cnstr_set_tag(x_207, 1);
+ x_249 = x_247;
+ lean::cnstr_set_tag(x_247, 1);
 }
-lean::cnstr_set(x_209, 0, x_208);
-lean::cnstr_set(x_209, 1, x_205);
-return x_209;
-}
-}
-else
-{
-obj* x_211; obj* x_213; obj* x_215; obj* x_216; 
-lean::dec(x_0);
-x_211 = lean::cnstr_get(x_6, 0);
-x_213 = lean::cnstr_get(x_6, 1);
-if (lean::is_exclusive(x_6)) {
- x_215 = x_6;
-} else {
- lean::inc(x_211);
- lean::inc(x_213);
- lean::dec(x_6);
- x_215 = lean::box(0);
-}
-if (lean::is_scalar(x_215)) {
- x_216 = lean::alloc_cnstr(1, 2, 0);
-} else {
- x_216 = x_215;
-}
-lean::cnstr_set(x_216, 0, x_211);
-lean::cnstr_set(x_216, 1, x_213);
-return x_216;
-}
-lbl_3:
-{
-obj* x_217; obj* x_218; obj* x_219; obj* x_220; obj* x_221; obj* x_222; obj* x_223; obj* x_224; obj* x_225; obj* x_226; obj* x_227; obj* x_228; obj* x_229; obj* x_230; obj* x_231; obj* x_232; obj* x_233; obj* x_234; obj* x_235; obj* x_236; obj* x_237; obj* x_238; obj* x_239; obj* x_240; obj* x_241; obj* x_242; obj* x_243; obj* x_244; obj* x_245; obj* x_246; obj* x_247; obj* x_248; obj* x_249; 
-x_217 = l_Lean_IR_EmitCpp_emitMainFn___closed__1;
-x_218 = lean::string_append(x_2, x_217);
-x_219 = l_IO_println___rarg___closed__1;
-x_220 = lean::string_append(x_218, x_219);
-x_221 = l_Lean_IR_EmitCpp_emitMainFn___closed__2;
-x_222 = lean::string_append(x_220, x_221);
-x_223 = lean::string_append(x_222, x_219);
-x_224 = l_Lean_IR_EmitCpp_emitMainFn___closed__3;
-x_225 = lean::string_append(x_223, x_224);
-x_226 = lean::string_append(x_225, x_219);
-x_227 = l_Lean_IR_EmitCpp_emitMainFn___closed__4;
-x_228 = lean::string_append(x_226, x_227);
-x_229 = lean::string_append(x_228, x_219);
-x_230 = l_Lean_IR_EmitCpp_emitMainFn___closed__5;
-x_231 = lean::string_append(x_229, x_230);
-x_232 = lean::string_append(x_231, x_219);
-x_233 = l_Lean_IR_EmitCpp_emitMainFn___closed__6;
-x_234 = lean::string_append(x_232, x_233);
-x_235 = lean::string_append(x_234, x_219);
-x_236 = l_Lean_IR_EmitCpp_emitMainFn___closed__7;
-x_237 = lean::string_append(x_235, x_236);
-x_238 = lean::string_append(x_237, x_219);
-x_239 = lean::string_append(x_238, x_227);
-x_240 = lean::string_append(x_239, x_219);
-x_241 = l_Lean_IR_EmitCpp_emitMainFn___closed__8;
-x_242 = lean::string_append(x_240, x_241);
-x_243 = lean::string_append(x_242, x_219);
-x_244 = lean::string_append(x_243, x_217);
-x_245 = lean::string_append(x_244, x_219);
-x_246 = lean::string_append(x_245, x_217);
-x_247 = lean::string_append(x_246, x_219);
-x_248 = lean::box(0);
-x_249 = lean::alloc_cnstr(0, 2, 0);
 lean::cnstr_set(x_249, 0, x_248);
-lean::cnstr_set(x_249, 1, x_247);
+lean::cnstr_set(x_249, 1, x_245);
 return x_249;
 }
 }
+else
+{
+obj* x_251; obj* x_253; obj* x_255; obj* x_256; 
+lean::dec(x_0);
+x_251 = lean::cnstr_get(x_4, 0);
+x_253 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ x_255 = x_4;
+} else {
+ lean::inc(x_251);
+ lean::inc(x_253);
+ lean::dec(x_4);
+ x_255 = lean::box(0);
 }
-uint8 l_List_foldr___main___at_Lean_IR_EmitCpp_main___spec__1(uint8 x_0, obj* x_1) {
+if (lean::is_scalar(x_255)) {
+ x_256 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_256 = x_255;
+}
+lean::cnstr_set(x_256, 0, x_251);
+lean::cnstr_set(x_256, 1, x_253);
+return x_256;
+}
+}
+}
+obj* l_List_mfor___main___at_Lean_IR_EmitCpp_emitMainFn___spec__2___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_List_mfor___main___at_Lean_IR_EmitCpp_emitMainFn___spec__2(x_0, x_1, x_2);
+lean::dec(x_0);
+lean::dec(x_1);
+return x_3;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitLns___at_Lean_IR_EmitCpp_emitMainFn___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_emitLns___at_Lean_IR_EmitCpp_emitMainFn___spec__1(x_0, x_1, x_2);
+lean::dec(x_0);
+lean::dec(x_1);
+return x_3;
+}
+}
+uint8 l_List_foldr___main___at_Lean_IR_EmitCpp_hasMainFn___spec__1(uint8 x_0, obj* x_1) {
 _start:
 {
 if (lean::obj_tag(x_1) == 0)
@@ -1053,9 +4141,9 @@ else
 obj* x_2; obj* x_3; uint8 x_4; obj* x_5; obj* x_6; uint8 x_7; 
 x_2 = lean::cnstr_get(x_1, 0);
 x_3 = lean::cnstr_get(x_1, 1);
-x_4 = l_List_foldr___main___at_Lean_IR_EmitCpp_main___spec__1(x_0, x_3);
+x_4 = l_List_foldr___main___at_Lean_IR_EmitCpp_hasMainFn___spec__1(x_0, x_3);
 x_5 = l_Lean_IR_Decl_name___main(x_2);
-x_6 = l_Lean_IR_EmitCpp_emitMainFn___closed__9;
+x_6 = l_Lean_IR_EmitCpp_toBaseCppName___closed__1;
 x_7 = lean_name_dec_eq(x_5, x_6);
 lean::dec(x_5);
 if (x_7 == 0)
@@ -1071,7 +4159,327 @@ return x_9;
 }
 }
 }
-obj* l_Lean_IR_EmitCpp_main(obj* x_0, obj* x_1) {
+obj* l_Lean_IR_EmitCpp_hasMainFn(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; 
+x_2 = l_Lean_IR_EmitCpp_getEnv(x_0, x_1);
+if (lean::obj_tag(x_2) == 0)
+{
+obj* x_3; obj* x_5; obj* x_7; obj* x_8; obj* x_9; uint8 x_11; uint8 x_12; obj* x_14; obj* x_15; 
+x_3 = lean::cnstr_get(x_2, 0);
+x_5 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ x_7 = x_2;
+} else {
+ lean::inc(x_3);
+ lean::inc(x_5);
+ lean::dec(x_2);
+ x_7 = lean::box(0);
+}
+x_8 = l_Lean_IR_declMapExt;
+x_9 = l_Lean_PersistentEnvExtension_getEntries___rarg(x_8, x_3);
+lean::dec(x_3);
+x_11 = 0;
+x_12 = l_List_foldr___main___at_Lean_IR_EmitCpp_hasMainFn___spec__1(x_11, x_9);
+lean::dec(x_9);
+x_14 = lean::box(x_12);
+if (lean::is_scalar(x_7)) {
+ x_15 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_15 = x_7;
+}
+lean::cnstr_set(x_15, 0, x_14);
+lean::cnstr_set(x_15, 1, x_5);
+return x_15;
+}
+else
+{
+obj* x_16; obj* x_18; obj* x_20; obj* x_21; 
+x_16 = lean::cnstr_get(x_2, 0);
+x_18 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ x_20 = x_2;
+} else {
+ lean::inc(x_16);
+ lean::inc(x_18);
+ lean::dec(x_2);
+ x_20 = lean::box(0);
+}
+if (lean::is_scalar(x_20)) {
+ x_21 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_21 = x_20;
+}
+lean::cnstr_set(x_21, 0, x_16);
+lean::cnstr_set(x_21, 1, x_18);
+return x_21;
+}
+}
+}
+obj* l_List_foldr___main___at_Lean_IR_EmitCpp_hasMainFn___spec__1___boxed(obj* x_0, obj* x_1) {
+_start:
+{
+uint8 x_2; uint8 x_3; obj* x_4; 
+x_2 = lean::unbox(x_0);
+x_3 = l_List_foldr___main___at_Lean_IR_EmitCpp_hasMainFn___spec__1(x_2, x_1);
+x_4 = lean::box(x_3);
+lean::dec(x_1);
+return x_4;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitMainFnIfNeeded(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_3; 
+lean::inc(x_0);
+x_3 = l_Lean_IR_EmitCpp_hasMainFn(x_0, x_1);
+if (lean::obj_tag(x_3) == 0)
+{
+obj* x_4; uint8 x_6; 
+x_4 = lean::cnstr_get(x_3, 0);
+lean::inc(x_4);
+x_6 = lean::unbox(x_4);
+if (x_6 == 0)
+{
+obj* x_8; obj* x_10; obj* x_11; obj* x_12; 
+lean::dec(x_0);
+x_8 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ lean::cnstr_release(x_3, 0);
+ x_10 = x_3;
+} else {
+ lean::inc(x_8);
+ lean::dec(x_3);
+ x_10 = lean::box(0);
+}
+x_11 = lean::box(0);
+if (lean::is_scalar(x_10)) {
+ x_12 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_12 = x_10;
+}
+lean::cnstr_set(x_12, 0, x_11);
+lean::cnstr_set(x_12, 1, x_8);
+return x_12;
+}
+else
+{
+obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; 
+x_13 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ lean::cnstr_release(x_3, 0);
+ x_15 = x_3;
+} else {
+ lean::inc(x_13);
+ lean::dec(x_3);
+ x_15 = lean::box(0);
+}
+x_16 = lean::box(0);
+if (lean::is_scalar(x_15)) {
+ x_17 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_17 = x_15;
+}
+lean::cnstr_set(x_17, 0, x_16);
+lean::cnstr_set(x_17, 1, x_13);
+x_18 = l_Lean_IR_EmitCpp_emitMainFn(x_0, x_17);
+return x_18;
+}
+}
+else
+{
+obj* x_20; obj* x_22; obj* x_24; obj* x_25; 
+lean::dec(x_0);
+x_20 = lean::cnstr_get(x_3, 0);
+x_22 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ x_24 = x_3;
+} else {
+ lean::inc(x_20);
+ lean::inc(x_22);
+ lean::dec(x_3);
+ x_24 = lean::box(0);
+}
+if (lean::is_scalar(x_24)) {
+ x_25 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_25 = x_24;
+}
+lean::cnstr_set(x_25, 0, x_20);
+lean::cnstr_set(x_25, 1, x_22);
+return x_25;
+}
+}
+}
+obj* l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitFileHeader___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; uint8 x_5; 
+x_4 = lean::array_get_size(x_0);
+x_5 = lean::nat_dec_lt(x_1, x_4);
+lean::dec(x_4);
+if (x_5 == 0)
+{
+obj* x_8; obj* x_10; obj* x_11; obj* x_12; 
+lean::dec(x_1);
+x_8 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ lean::cnstr_release(x_3, 0);
+ x_10 = x_3;
+} else {
+ lean::inc(x_8);
+ lean::dec(x_3);
+ x_10 = lean::box(0);
+}
+x_11 = lean::box(0);
+if (lean::is_scalar(x_10)) {
+ x_12 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_12 = x_10;
+}
+lean::cnstr_set(x_12, 0, x_11);
+lean::cnstr_set(x_12, 1, x_8);
+return x_12;
+}
+else
+{
+obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_27; obj* x_28; 
+x_13 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ lean::cnstr_release(x_3, 0);
+ x_15 = x_3;
+} else {
+ lean::inc(x_13);
+ lean::dec(x_3);
+ x_15 = lean::box(0);
+}
+x_16 = lean::array_fget(x_0, x_1);
+x_17 = lean::mk_nat_obj(1ul);
+x_18 = lean::nat_add(x_1, x_17);
+lean::dec(x_1);
+x_20 = l_Lean_Name_toString___closed__1;
+x_21 = l_Lean_Name_toStringWithSep___main(x_20, x_16);
+x_22 = l_Lean_IR_EmitCpp_emitFnDeclAux___closed__1;
+x_23 = lean::string_append(x_22, x_21);
+lean::dec(x_21);
+x_25 = lean::string_append(x_13, x_23);
+lean::dec(x_23);
+x_27 = lean::box(0);
+if (lean::is_scalar(x_15)) {
+ x_28 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_28 = x_15;
+}
+lean::cnstr_set(x_28, 0, x_27);
+lean::cnstr_set(x_28, 1, x_25);
+x_1 = x_18;
+x_3 = x_28;
+goto _start;
+}
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitFileHeader___closed__1() {
+_start:
+{
+obj* x_0; obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; 
+x_0 = lean::box(0);
+x_1 = lean::mk_string("#endif");
+x_2 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_2, 0, x_1);
+lean::cnstr_set(x_2, 1, x_0);
+x_3 = lean::mk_string("#pragma GCC diagnostic ignored \"-Wunused-but-set-variable\"");
+x_4 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_4, 0, x_3);
+lean::cnstr_set(x_4, 1, x_2);
+x_5 = lean::mk_string("#pragma GCC diagnostic ignored \"-Wunused-label\"");
+x_6 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_6, 0, x_5);
+lean::cnstr_set(x_6, 1, x_4);
+x_7 = lean::mk_string("#pragma GCC diagnostic ignored \"-Wunused-parameter\"");
+x_8 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_8, 0, x_7);
+lean::cnstr_set(x_8, 1, x_6);
+x_9 = lean::mk_string("#elif defined(__GNUC__) && !defined(__CLANG__)");
+x_10 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_10, 0, x_9);
+lean::cnstr_set(x_10, 1, x_8);
+x_11 = lean::mk_string("#pragma clang diagnostic ignored \"-Wunused-label\"");
+x_12 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_12, 0, x_11);
+lean::cnstr_set(x_12, 1, x_10);
+x_13 = lean::mk_string("#pragma clang diagnostic ignored \"-Wunused-parameter\"");
+x_14 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_14, 0, x_13);
+lean::cnstr_set(x_14, 1, x_12);
+x_15 = lean::mk_string("#if defined(__clang__)");
+x_16 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_16, 0, x_15);
+lean::cnstr_set(x_16, 1, x_14);
+x_17 = lean::mk_string("typedef lean::uint32 uint32; typedef lean::uint64 uint64;");
+x_18 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_18, 0, x_17);
+lean::cnstr_set(x_18, 1, x_16);
+x_19 = lean::mk_string("typedef lean::uint8  uint8;  typedef lean::uint16 uint16;");
+x_20 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_20, 0, x_19);
+lean::cnstr_set(x_20, 1, x_18);
+x_21 = lean::mk_string("typedef lean::object obj;    typedef lean::usize  usize;");
+x_22 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_22, 0, x_21);
+lean::cnstr_set(x_22, 1, x_20);
+return x_22;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitFileHeader___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("// Lean compiler output");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitFileHeader___closed__3() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("// Module: ");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitFileHeader___closed__4() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("// Imports:");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitFileHeader___closed__5() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("#include \"runtime/object.h\"");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitFileHeader___closed__6() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("#include \"runtime/apply.h\"");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitFileHeader___closed__7() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("#include \"runtime/init_module.h\"");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitFileHeader(obj* x_0, obj* x_1) {
 _start:
 {
 obj* x_3; 
@@ -1079,7 +4487,7 @@ lean::inc(x_0);
 x_3 = l_Lean_IR_EmitCpp_getEnv(x_0, x_1);
 if (lean::obj_tag(x_3) == 0)
 {
-obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; uint8 x_15; uint8 x_16; 
+obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_12; 
 x_4 = lean::cnstr_get(x_3, 0);
 x_6 = lean::cnstr_get(x_3, 1);
 if (lean::is_exclusive(x_3)) {
@@ -1091,35 +4499,2932 @@ if (lean::is_exclusive(x_3)) {
  x_8 = lean::box(0);
 }
 x_9 = lean::box(0);
-lean::inc(x_6);
 if (lean::is_scalar(x_8)) {
- x_11 = lean::alloc_cnstr(0, 2, 0);
+ x_10 = lean::alloc_cnstr(0, 2, 0);
 } else {
- x_11 = x_8;
+ x_10 = x_8;
 }
-lean::cnstr_set(x_11, 0, x_9);
-lean::cnstr_set(x_11, 1, x_6);
-x_12 = l_Lean_IR_declMapExt;
-x_13 = l_Lean_PersistentEnvExtension_getEntries___rarg(x_12, x_4);
-lean::dec(x_4);
-x_15 = 0;
-x_16 = l_List_foldr___main___at_Lean_IR_EmitCpp_main___spec__1(x_15, x_13);
-lean::dec(x_13);
-if (x_16 == 0)
+lean::cnstr_set(x_10, 0, x_9);
+lean::cnstr_set(x_10, 1, x_6);
+lean::inc(x_0);
+x_12 = l_Lean_IR_EmitCpp_getModName(x_0, x_10);
+if (lean::obj_tag(x_12) == 0)
 {
-obj* x_20; 
+obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_36; obj* x_37; 
+x_13 = lean::cnstr_get(x_12, 0);
+x_15 = lean::cnstr_get(x_12, 1);
+if (lean::is_exclusive(x_12)) {
+ x_17 = x_12;
+} else {
+ lean::inc(x_13);
+ lean::inc(x_15);
+ lean::dec(x_12);
+ x_17 = lean::box(0);
+}
+x_18 = l_Lean_IR_EmitCpp_emitFileHeader___closed__2;
+x_19 = lean::string_append(x_15, x_18);
+x_20 = l_IO_println___rarg___closed__1;
+x_21 = lean::string_append(x_19, x_20);
+x_22 = l_Lean_Name_toString___closed__1;
+x_23 = l_Lean_Name_toStringWithSep___main(x_22, x_13);
+x_24 = l_Lean_IR_EmitCpp_emitFileHeader___closed__3;
+x_25 = lean::string_append(x_24, x_23);
+lean::dec(x_23);
+x_27 = lean::string_append(x_21, x_25);
+lean::dec(x_25);
+x_29 = lean::string_append(x_27, x_20);
+x_30 = l_Lean_IR_EmitCpp_emitFileHeader___closed__4;
+x_31 = lean::string_append(x_29, x_30);
+if (lean::is_scalar(x_17)) {
+ x_32 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_32 = x_17;
+}
+lean::cnstr_set(x_32, 0, x_9);
+lean::cnstr_set(x_32, 1, x_31);
+x_33 = lean::cnstr_get(x_4, 3);
+lean::inc(x_33);
+lean::dec(x_4);
+x_36 = lean::mk_nat_obj(0ul);
+x_37 = l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitFileHeader___spec__1(x_33, x_36, x_0, x_32);
+lean::dec(x_33);
+if (lean::obj_tag(x_37) == 0)
+{
+obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_53; 
+x_39 = lean::cnstr_get(x_37, 1);
+if (lean::is_exclusive(x_37)) {
+ lean::cnstr_release(x_37, 0);
+ x_41 = x_37;
+} else {
+ lean::inc(x_39);
+ lean::dec(x_37);
+ x_41 = lean::box(0);
+}
+x_42 = l_String_splitAux___main___closed__1;
+x_43 = lean::string_append(x_39, x_42);
+x_44 = lean::string_append(x_43, x_20);
+x_45 = l_Lean_IR_EmitCpp_emitFileHeader___closed__5;
+x_46 = lean::string_append(x_44, x_45);
+x_47 = lean::string_append(x_46, x_20);
+x_48 = l_Lean_IR_EmitCpp_emitFileHeader___closed__6;
+x_49 = lean::string_append(x_47, x_48);
+x_50 = lean::string_append(x_49, x_20);
+if (lean::is_scalar(x_41)) {
+ x_51 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_51 = x_41;
+}
+lean::cnstr_set(x_51, 0, x_9);
+lean::cnstr_set(x_51, 1, x_50);
+lean::inc(x_0);
+x_53 = l_Lean_IR_EmitCpp_hasMainFn(x_0, x_51);
+if (lean::obj_tag(x_53) == 0)
+{
+obj* x_54; uint8 x_56; 
+x_54 = lean::cnstr_get(x_53, 0);
+lean::inc(x_54);
+x_56 = lean::unbox(x_54);
+if (x_56 == 0)
+{
+obj* x_57; obj* x_59; obj* x_60; obj* x_61; obj* x_62; 
+x_57 = lean::cnstr_get(x_53, 1);
+if (lean::is_exclusive(x_53)) {
+ lean::cnstr_release(x_53, 0);
+ x_59 = x_53;
+} else {
+ lean::inc(x_57);
+ lean::dec(x_53);
+ x_59 = lean::box(0);
+}
+if (lean::is_scalar(x_59)) {
+ x_60 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_60 = x_59;
+}
+lean::cnstr_set(x_60, 0, x_9);
+lean::cnstr_set(x_60, 1, x_57);
+x_61 = l_Lean_IR_EmitCpp_emitFileHeader___closed__1;
+x_62 = l_List_mfor___main___at_Lean_IR_EmitCpp_emitMainFn___spec__2(x_61, x_0, x_60);
 lean::dec(x_0);
-lean::dec(x_11);
-x_20 = lean::alloc_cnstr(0, 2, 0);
-lean::cnstr_set(x_20, 0, x_9);
-lean::cnstr_set(x_20, 1, x_6);
-return x_20;
+return x_62;
 }
 else
 {
-obj* x_22; 
+obj* x_64; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; 
+x_64 = lean::cnstr_get(x_53, 1);
+if (lean::is_exclusive(x_53)) {
+ lean::cnstr_release(x_53, 0);
+ x_66 = x_53;
+} else {
+ lean::inc(x_64);
+ lean::dec(x_53);
+ x_66 = lean::box(0);
+}
+x_67 = l_Lean_IR_EmitCpp_emitFileHeader___closed__7;
+x_68 = lean::string_append(x_64, x_67);
+x_69 = lean::string_append(x_68, x_20);
+if (lean::is_scalar(x_66)) {
+ x_70 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_70 = x_66;
+}
+lean::cnstr_set(x_70, 0, x_9);
+lean::cnstr_set(x_70, 1, x_69);
+x_71 = l_Lean_IR_EmitCpp_emitFileHeader___closed__1;
+x_72 = l_List_mfor___main___at_Lean_IR_EmitCpp_emitMainFn___spec__2(x_71, x_0, x_70);
+lean::dec(x_0);
+return x_72;
+}
+}
+else
+{
+obj* x_75; obj* x_77; obj* x_79; obj* x_80; 
+lean::dec(x_0);
+x_75 = lean::cnstr_get(x_53, 0);
+x_77 = lean::cnstr_get(x_53, 1);
+if (lean::is_exclusive(x_53)) {
+ x_79 = x_53;
+} else {
+ lean::inc(x_75);
+ lean::inc(x_77);
+ lean::dec(x_53);
+ x_79 = lean::box(0);
+}
+if (lean::is_scalar(x_79)) {
+ x_80 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_80 = x_79;
+}
+lean::cnstr_set(x_80, 0, x_75);
+lean::cnstr_set(x_80, 1, x_77);
+return x_80;
+}
+}
+else
+{
+obj* x_82; obj* x_84; obj* x_86; obj* x_87; 
+lean::dec(x_0);
+x_82 = lean::cnstr_get(x_37, 0);
+x_84 = lean::cnstr_get(x_37, 1);
+if (lean::is_exclusive(x_37)) {
+ x_86 = x_37;
+} else {
+ lean::inc(x_82);
+ lean::inc(x_84);
+ lean::dec(x_37);
+ x_86 = lean::box(0);
+}
+if (lean::is_scalar(x_86)) {
+ x_87 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_87 = x_86;
+}
+lean::cnstr_set(x_87, 0, x_82);
+lean::cnstr_set(x_87, 1, x_84);
+return x_87;
+}
+}
+else
+{
+obj* x_90; obj* x_92; obj* x_94; obj* x_95; 
+lean::dec(x_4);
+lean::dec(x_0);
+x_90 = lean::cnstr_get(x_12, 0);
+x_92 = lean::cnstr_get(x_12, 1);
+if (lean::is_exclusive(x_12)) {
+ x_94 = x_12;
+} else {
+ lean::inc(x_90);
+ lean::inc(x_92);
+ lean::dec(x_12);
+ x_94 = lean::box(0);
+}
+if (lean::is_scalar(x_94)) {
+ x_95 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_95 = x_94;
+}
+lean::cnstr_set(x_95, 0, x_90);
+lean::cnstr_set(x_95, 1, x_92);
+return x_95;
+}
+}
+else
+{
+obj* x_97; obj* x_99; obj* x_101; obj* x_102; 
+lean::dec(x_0);
+x_97 = lean::cnstr_get(x_3, 0);
+x_99 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ x_101 = x_3;
+} else {
+ lean::inc(x_97);
+ lean::inc(x_99);
+ lean::dec(x_3);
+ x_101 = lean::box(0);
+}
+if (lean::is_scalar(x_101)) {
+ x_102 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_102 = x_101;
+}
+lean::cnstr_set(x_102, 0, x_97);
+lean::cnstr_set(x_102, 1, x_99);
+return x_102;
+}
+}
+}
+obj* l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitFileHeader___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitFileHeader___spec__1(x_0, x_1, x_2, x_3);
+lean::dec(x_0);
+lean::dec(x_2);
+return x_4;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_throwUnknownVar___rarg___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("unknown variable '");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_throwUnknownVar___rarg(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_13; obj* x_14; obj* x_15; 
+x_3 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ lean::cnstr_release(x_2, 0);
+ x_5 = x_2;
+} else {
+ lean::inc(x_3);
+ lean::dec(x_2);
+ x_5 = lean::box(0);
+}
+x_6 = l_Nat_repr(x_0);
+x_7 = l_Lean_IR_VarId_HasToString___closed__1;
+x_8 = lean::string_append(x_7, x_6);
 lean::dec(x_6);
-x_22 = l_Lean_IR_EmitCpp_emitMainFn(x_0, x_11);
+x_10 = l_Lean_IR_EmitCpp_throwUnknownVar___rarg___closed__1;
+x_11 = lean::string_append(x_10, x_8);
+lean::dec(x_8);
+x_13 = l_Char_HasRepr___closed__1;
+x_14 = lean::string_append(x_11, x_13);
+if (lean::is_scalar(x_5)) {
+ x_15 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_15 = x_5;
+ lean::cnstr_set_tag(x_5, 1);
+}
+lean::cnstr_set(x_15, 0, x_14);
+lean::cnstr_set(x_15, 1, x_3);
+return x_15;
+}
+}
+obj* l_Lean_IR_EmitCpp_throwUnknownVar(obj* x_0) {
+_start:
+{
+obj* x_1; 
+x_1 = lean::alloc_closure(reinterpret_cast<void*>(l_Lean_IR_EmitCpp_throwUnknownVar___rarg___boxed), 3, 0);
+return x_1;
+}
+}
+obj* l_Lean_IR_EmitCpp_throwUnknownVar___rarg___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_throwUnknownVar___rarg(x_0, x_1, x_2);
+lean::dec(x_1);
+return x_3;
+}
+}
+obj* l_Lean_IR_EmitCpp_throwUnknownVar___boxed(obj* x_0) {
+_start:
+{
+obj* x_1; 
+x_1 = l_Lean_IR_EmitCpp_throwUnknownVar(x_0);
+lean::dec(x_0);
+return x_1;
+}
+}
+obj* l_AssocList_find___main___at_Lean_IR_EmitCpp_isObj___spec__2(obj* x_0, obj* x_1) {
+_start:
+{
+if (lean::obj_tag(x_1) == 0)
+{
+obj* x_2; 
+x_2 = lean::box(0);
+return x_2;
+}
+else
+{
+obj* x_3; obj* x_5; obj* x_7; uint8 x_10; 
+x_3 = lean::cnstr_get(x_1, 0);
+lean::inc(x_3);
+x_5 = lean::cnstr_get(x_1, 1);
+lean::inc(x_5);
+x_7 = lean::cnstr_get(x_1, 2);
+lean::inc(x_7);
+lean::dec(x_1);
+x_10 = lean::nat_dec_eq(x_3, x_0);
+lean::dec(x_3);
+if (x_10 == 0)
+{
+lean::dec(x_5);
+x_1 = x_7;
+goto _start;
+}
+else
+{
+obj* x_15; 
+lean::dec(x_7);
+x_15 = lean::alloc_cnstr(1, 1, 0);
+lean::cnstr_set(x_15, 0, x_5);
+return x_15;
+}
+}
+}
+}
+obj* l_HashMapImp_find___at_Lean_IR_EmitCpp_isObj___spec__1(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; obj* x_3; usize x_4; usize x_5; obj* x_7; obj* x_8; 
+x_2 = lean::cnstr_get(x_0, 1);
+x_3 = lean::array_get_size(x_2);
+x_4 = lean::usize_of_nat(x_1);
+x_5 = lean::usize_modn(x_4, x_3);
+lean::dec(x_3);
+x_7 = lean::array_uget(x_2, x_5);
+x_8 = l_AssocList_find___main___at_Lean_IR_EmitCpp_isObj___spec__2(x_1, x_7);
+return x_8;
+}
+}
+obj* l_Lean_IR_EmitCpp_isObj(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; obj* x_5; obj* x_6; obj* x_8; obj* x_9; obj* x_10; 
+x_3 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ lean::cnstr_release(x_2, 0);
+ x_5 = x_2;
+} else {
+ lean::inc(x_3);
+ lean::dec(x_2);
+ x_5 = lean::box(0);
+}
+x_6 = lean::box(0);
+lean::inc(x_3);
+if (lean::is_scalar(x_5)) {
+ x_8 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_8 = x_5;
+}
+lean::cnstr_set(x_8, 0, x_6);
+lean::cnstr_set(x_8, 1, x_3);
+x_9 = lean::cnstr_get(x_1, 2);
+x_10 = l_HashMapImp_find___at_Lean_IR_EmitCpp_isObj___spec__1(x_9, x_0);
+if (lean::obj_tag(x_10) == 0)
+{
+obj* x_12; 
+lean::dec(x_3);
+x_12 = l_Lean_IR_EmitCpp_throwUnknownVar___rarg(x_0, x_1, x_8);
+return x_12;
+}
+else
+{
+obj* x_15; uint8 x_18; uint8 x_19; obj* x_20; obj* x_21; 
+lean::dec(x_8);
+lean::dec(x_0);
+x_15 = lean::cnstr_get(x_10, 0);
+lean::inc(x_15);
+lean::dec(x_10);
+x_18 = lean::unbox(x_15);
+x_19 = l_Lean_IR_IRType_isObj___main(x_18);
+x_20 = lean::box(x_19);
+x_21 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_21, 0, x_20);
+lean::cnstr_set(x_21, 1, x_3);
+return x_21;
+}
+}
+}
+obj* l_AssocList_find___main___at_Lean_IR_EmitCpp_isObj___spec__2___boxed(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; 
+x_2 = l_AssocList_find___main___at_Lean_IR_EmitCpp_isObj___spec__2(x_0, x_1);
+lean::dec(x_0);
+return x_2;
+}
+}
+obj* l_HashMapImp_find___at_Lean_IR_EmitCpp_isObj___spec__1___boxed(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; 
+x_2 = l_HashMapImp_find___at_Lean_IR_EmitCpp_isObj___spec__1(x_0, x_1);
+lean::dec(x_0);
+lean::dec(x_1);
+return x_2;
+}
+}
+obj* l_Lean_IR_EmitCpp_isObj___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_isObj(x_0, x_1, x_2);
+lean::dec(x_1);
+return x_3;
+}
+}
+obj* l_AssocList_find___main___at_Lean_IR_EmitCpp_getJPParams___spec__2(obj* x_0, obj* x_1) {
+_start:
+{
+if (lean::obj_tag(x_1) == 0)
+{
+obj* x_2; 
+x_2 = lean::box(0);
+return x_2;
+}
+else
+{
+obj* x_3; obj* x_5; obj* x_7; uint8 x_10; 
+x_3 = lean::cnstr_get(x_1, 0);
+lean::inc(x_3);
+x_5 = lean::cnstr_get(x_1, 1);
+lean::inc(x_5);
+x_7 = lean::cnstr_get(x_1, 2);
+lean::inc(x_7);
+lean::dec(x_1);
+x_10 = lean::nat_dec_eq(x_3, x_0);
+lean::dec(x_3);
+if (x_10 == 0)
+{
+lean::dec(x_5);
+x_1 = x_7;
+goto _start;
+}
+else
+{
+obj* x_15; 
+lean::dec(x_7);
+x_15 = lean::alloc_cnstr(1, 1, 0);
+lean::cnstr_set(x_15, 0, x_5);
+return x_15;
+}
+}
+}
+}
+obj* l_HashMapImp_find___at_Lean_IR_EmitCpp_getJPParams___spec__1(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; obj* x_3; usize x_4; usize x_5; obj* x_7; obj* x_8; 
+x_2 = lean::cnstr_get(x_0, 1);
+x_3 = lean::array_get_size(x_2);
+x_4 = lean::usize_of_nat(x_1);
+x_5 = lean::usize_modn(x_4, x_3);
+lean::dec(x_3);
+x_7 = lean::array_uget(x_2, x_5);
+x_8 = l_AssocList_find___main___at_Lean_IR_EmitCpp_getJPParams___spec__2(x_1, x_7);
+return x_8;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_getJPParams___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("unknown join point");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_getJPParams(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; obj* x_5; obj* x_6; obj* x_7; 
+x_3 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ lean::cnstr_release(x_2, 0);
+ lean::cnstr_set(x_2, 1, lean::box(0));
+ x_5 = x_2;
+} else {
+ lean::inc(x_3);
+ lean::dec(x_2);
+ x_5 = lean::box(0);
+}
+x_6 = lean::cnstr_get(x_1, 3);
+x_7 = l_HashMapImp_find___at_Lean_IR_EmitCpp_getJPParams___spec__1(x_6, x_0);
+if (lean::obj_tag(x_7) == 0)
+{
+obj* x_8; obj* x_9; 
+x_8 = l_Lean_IR_EmitCpp_getJPParams___closed__1;
+if (lean::is_scalar(x_5)) {
+ x_9 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_9 = x_5;
+ lean::cnstr_set_tag(x_5, 1);
+}
+lean::cnstr_set(x_9, 0, x_8);
+lean::cnstr_set(x_9, 1, x_3);
+return x_9;
+}
+else
+{
+obj* x_10; obj* x_13; 
+x_10 = lean::cnstr_get(x_7, 0);
+lean::inc(x_10);
+lean::dec(x_7);
+if (lean::is_scalar(x_5)) {
+ x_13 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_13 = x_5;
+}
+lean::cnstr_set(x_13, 0, x_10);
+lean::cnstr_set(x_13, 1, x_3);
+return x_13;
+}
+}
+}
+obj* l_AssocList_find___main___at_Lean_IR_EmitCpp_getJPParams___spec__2___boxed(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; 
+x_2 = l_AssocList_find___main___at_Lean_IR_EmitCpp_getJPParams___spec__2(x_0, x_1);
+lean::dec(x_0);
+return x_2;
+}
+}
+obj* l_HashMapImp_find___at_Lean_IR_EmitCpp_getJPParams___spec__1___boxed(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; 
+x_2 = l_HashMapImp_find___at_Lean_IR_EmitCpp_getJPParams___spec__1(x_0, x_1);
+lean::dec(x_0);
+lean::dec(x_1);
+return x_2;
+}
+}
+obj* l_Lean_IR_EmitCpp_getJPParams___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_getJPParams(x_0, x_1, x_2);
+lean::dec(x_0);
+lean::dec(x_1);
+return x_3;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_declareVar___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("; ");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_declareVar(obj* x_0, uint8 x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_19; obj* x_20; obj* x_21; 
+x_4 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ lean::cnstr_release(x_3, 0);
+ x_6 = x_3;
+} else {
+ lean::inc(x_4);
+ lean::dec(x_3);
+ x_6 = lean::box(0);
+}
+x_7 = l_Lean_IR_EmitCpp_toCppType___main(x_1);
+x_8 = lean::string_append(x_4, x_7);
+lean::dec(x_7);
+x_10 = l_Lean_IR_EmitCpp_emitFnDeclAux___closed__1;
+x_11 = lean::string_append(x_8, x_10);
+x_12 = l_Nat_repr(x_0);
+x_13 = l_Lean_IR_VarId_HasToString___closed__1;
+x_14 = lean::string_append(x_13, x_12);
+lean::dec(x_12);
+x_16 = lean::string_append(x_11, x_14);
+lean::dec(x_14);
+x_18 = l_Lean_IR_EmitCpp_declareVar___closed__1;
+x_19 = lean::string_append(x_16, x_18);
+x_20 = lean::box(0);
+if (lean::is_scalar(x_6)) {
+ x_21 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_21 = x_6;
+}
+lean::cnstr_set(x_21, 0, x_20);
+lean::cnstr_set(x_21, 1, x_19);
+return x_21;
+}
+}
+obj* l_Lean_IR_EmitCpp_declareVar___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+uint8 x_4; obj* x_5; 
+x_4 = lean::unbox(x_1);
+x_5 = l_Lean_IR_EmitCpp_declareVar(x_0, x_4, x_2, x_3);
+lean::dec(x_2);
+return x_5;
+}
+}
+obj* l_Array_mforAux___main___at_Lean_IR_EmitCpp_declareParams___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; uint8 x_5; 
+x_4 = lean::array_get_size(x_0);
+x_5 = lean::nat_dec_lt(x_1, x_4);
+lean::dec(x_4);
+if (x_5 == 0)
+{
+obj* x_8; obj* x_10; obj* x_11; obj* x_12; 
+lean::dec(x_1);
+x_8 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ lean::cnstr_release(x_3, 0);
+ x_10 = x_3;
+} else {
+ lean::inc(x_8);
+ lean::dec(x_3);
+ x_10 = lean::box(0);
+}
+x_11 = lean::box(0);
+if (lean::is_scalar(x_10)) {
+ x_12 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_12 = x_10;
+}
+lean::cnstr_set(x_12, 0, x_11);
+lean::cnstr_set(x_12, 1, x_8);
+return x_12;
+}
+else
+{
+obj* x_13; obj* x_14; obj* x_15; obj* x_17; uint8 x_19; obj* x_21; 
+x_13 = lean::array_fget(x_0, x_1);
+x_14 = lean::mk_nat_obj(1ul);
+x_15 = lean::nat_add(x_1, x_14);
+lean::dec(x_1);
+x_17 = lean::cnstr_get(x_13, 0);
+lean::inc(x_17);
+x_19 = lean::cnstr_get_scalar<uint8>(x_13, sizeof(void*)*1 + 1);
+lean::dec(x_13);
+x_21 = l_Lean_IR_EmitCpp_declareVar(x_17, x_19, x_2, x_3);
+if (lean::obj_tag(x_21) == 0)
+{
+obj* x_22; obj* x_24; obj* x_25; obj* x_26; 
+x_22 = lean::cnstr_get(x_21, 1);
+if (lean::is_exclusive(x_21)) {
+ lean::cnstr_release(x_21, 0);
+ x_24 = x_21;
+} else {
+ lean::inc(x_22);
+ lean::dec(x_21);
+ x_24 = lean::box(0);
+}
+x_25 = lean::box(0);
+if (lean::is_scalar(x_24)) {
+ x_26 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_26 = x_24;
+}
+lean::cnstr_set(x_26, 0, x_25);
+lean::cnstr_set(x_26, 1, x_22);
+x_1 = x_15;
+x_3 = x_26;
+goto _start;
+}
+else
+{
+obj* x_29; obj* x_31; obj* x_33; obj* x_34; 
+lean::dec(x_15);
+x_29 = lean::cnstr_get(x_21, 0);
+x_31 = lean::cnstr_get(x_21, 1);
+if (lean::is_exclusive(x_21)) {
+ x_33 = x_21;
+} else {
+ lean::inc(x_29);
+ lean::inc(x_31);
+ lean::dec(x_21);
+ x_33 = lean::box(0);
+}
+if (lean::is_scalar(x_33)) {
+ x_34 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_34 = x_33;
+}
+lean::cnstr_set(x_34, 0, x_29);
+lean::cnstr_set(x_34, 1, x_31);
+return x_34;
+}
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_declareParams(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; obj* x_4; 
+x_3 = lean::mk_nat_obj(0ul);
+x_4 = l_Array_mforAux___main___at_Lean_IR_EmitCpp_declareParams___spec__1(x_0, x_3, x_1, x_2);
+return x_4;
+}
+}
+obj* l_Array_mforAux___main___at_Lean_IR_EmitCpp_declareParams___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Array_mforAux___main___at_Lean_IR_EmitCpp_declareParams___spec__1(x_0, x_1, x_2, x_3);
+lean::dec(x_0);
+lean::dec(x_2);
+return x_4;
+}
+}
+obj* l_Lean_IR_EmitCpp_declareParams___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_declareParams(x_0, x_1, x_2);
+lean::dec(x_0);
+lean::dec(x_1);
+return x_3;
+}
+}
+obj* l_Lean_IR_EmitCpp_declareVars___main(obj* x_0, uint8 x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+switch (lean::obj_tag(x_0)) {
+case 0:
+{
+obj* x_6; uint8 x_8; obj* x_9; obj* x_12; 
+x_6 = lean::cnstr_get(x_0, 0);
+lean::inc(x_6);
+x_8 = lean::cnstr_get_scalar<uint8>(x_0, sizeof(void*)*3);
+x_9 = lean::cnstr_get(x_0, 2);
+lean::inc(x_9);
+lean::dec(x_0);
+x_12 = l_Lean_IR_EmitCpp_declareVar(x_6, x_8, x_2, x_3);
+if (lean::obj_tag(x_12) == 0)
+{
+obj* x_13; obj* x_15; obj* x_16; obj* x_17; uint8 x_18; 
+x_13 = lean::cnstr_get(x_12, 1);
+if (lean::is_exclusive(x_12)) {
+ lean::cnstr_release(x_12, 0);
+ x_15 = x_12;
+} else {
+ lean::inc(x_13);
+ lean::dec(x_12);
+ x_15 = lean::box(0);
+}
+x_16 = lean::box(0);
+if (lean::is_scalar(x_15)) {
+ x_17 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_17 = x_15;
+}
+lean::cnstr_set(x_17, 0, x_16);
+lean::cnstr_set(x_17, 1, x_13);
+x_18 = 1;
+x_0 = x_9;
+x_1 = x_18;
+x_3 = x_17;
+goto _start;
+}
+else
+{
+obj* x_21; obj* x_23; obj* x_25; obj* x_26; 
+lean::dec(x_9);
+x_21 = lean::cnstr_get(x_12, 0);
+x_23 = lean::cnstr_get(x_12, 1);
+if (lean::is_exclusive(x_12)) {
+ x_25 = x_12;
+} else {
+ lean::inc(x_21);
+ lean::inc(x_23);
+ lean::dec(x_12);
+ x_25 = lean::box(0);
+}
+if (lean::is_scalar(x_25)) {
+ x_26 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_26 = x_25;
+}
+lean::cnstr_set(x_26, 0, x_21);
+lean::cnstr_set(x_26, 1, x_23);
+return x_26;
+}
+}
+case 1:
+{
+obj* x_27; obj* x_29; obj* x_32; obj* x_33; 
+x_27 = lean::cnstr_get(x_0, 1);
+lean::inc(x_27);
+x_29 = lean::cnstr_get(x_0, 3);
+lean::inc(x_29);
+lean::dec(x_0);
+x_32 = lean::mk_nat_obj(0ul);
+x_33 = l_Array_mforAux___main___at_Lean_IR_EmitCpp_declareParams___spec__1(x_27, x_32, x_2, x_3);
+if (x_1 == 0)
+{
+if (lean::obj_tag(x_33) == 0)
+{
+obj* x_34; obj* x_36; obj* x_37; uint8 x_39; obj* x_41; obj* x_42; 
+x_34 = lean::cnstr_get(x_33, 1);
+if (lean::is_exclusive(x_33)) {
+ lean::cnstr_release(x_33, 0);
+ x_36 = x_33;
+} else {
+ lean::inc(x_34);
+ lean::dec(x_33);
+ x_36 = lean::box(0);
+}
+x_37 = lean::array_get_size(x_27);
+lean::dec(x_27);
+x_39 = lean::nat_dec_lt(x_32, x_37);
+lean::dec(x_37);
+x_41 = lean::box(0);
+if (lean::is_scalar(x_36)) {
+ x_42 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_42 = x_36;
+}
+lean::cnstr_set(x_42, 0, x_41);
+lean::cnstr_set(x_42, 1, x_34);
+x_0 = x_29;
+x_1 = x_39;
+x_3 = x_42;
+goto _start;
+}
+else
+{
+obj* x_46; obj* x_48; obj* x_50; obj* x_51; 
+lean::dec(x_27);
+lean::dec(x_29);
+x_46 = lean::cnstr_get(x_33, 0);
+x_48 = lean::cnstr_get(x_33, 1);
+if (lean::is_exclusive(x_33)) {
+ x_50 = x_33;
+} else {
+ lean::inc(x_46);
+ lean::inc(x_48);
+ lean::dec(x_33);
+ x_50 = lean::box(0);
+}
+if (lean::is_scalar(x_50)) {
+ x_51 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_51 = x_50;
+}
+lean::cnstr_set(x_51, 0, x_46);
+lean::cnstr_set(x_51, 1, x_48);
+return x_51;
+}
+}
+else
+{
+lean::dec(x_27);
+if (lean::obj_tag(x_33) == 0)
+{
+obj* x_53; obj* x_55; obj* x_56; obj* x_57; uint8 x_58; 
+x_53 = lean::cnstr_get(x_33, 1);
+if (lean::is_exclusive(x_33)) {
+ lean::cnstr_release(x_33, 0);
+ x_55 = x_33;
+} else {
+ lean::inc(x_53);
+ lean::dec(x_33);
+ x_55 = lean::box(0);
+}
+x_56 = lean::box(0);
+if (lean::is_scalar(x_55)) {
+ x_57 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_57 = x_55;
+}
+lean::cnstr_set(x_57, 0, x_56);
+lean::cnstr_set(x_57, 1, x_53);
+x_58 = 1;
+x_0 = x_29;
+x_1 = x_58;
+x_3 = x_57;
+goto _start;
+}
+else
+{
+obj* x_61; obj* x_63; obj* x_65; obj* x_66; 
+lean::dec(x_29);
+x_61 = lean::cnstr_get(x_33, 0);
+x_63 = lean::cnstr_get(x_33, 1);
+if (lean::is_exclusive(x_33)) {
+ x_65 = x_33;
+} else {
+ lean::inc(x_61);
+ lean::inc(x_63);
+ lean::dec(x_33);
+ x_65 = lean::box(0);
+}
+if (lean::is_scalar(x_65)) {
+ x_66 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_66 = x_65;
+}
+lean::cnstr_set(x_66, 0, x_61);
+lean::cnstr_set(x_66, 1, x_63);
+return x_66;
+}
+}
+}
+default:
+{
+obj* x_67; 
+x_67 = lean::box(0);
+x_4 = x_67;
+goto lbl_5;
+}
+}
+lbl_5:
+{
+uint8 x_69; 
+lean::dec(x_4);
+x_69 = l_Lean_IR_FnBody_isTerminal___main(x_0);
+if (x_69 == 0)
+{
+obj* x_70; 
+x_70 = l_Lean_IR_FnBody_body___main(x_0);
+lean::dec(x_0);
+x_0 = x_70;
+goto _start;
+}
+else
+{
+obj* x_74; obj* x_76; obj* x_77; obj* x_78; 
+lean::dec(x_0);
+x_74 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ lean::cnstr_release(x_3, 0);
+ x_76 = x_3;
+} else {
+ lean::inc(x_74);
+ lean::dec(x_3);
+ x_76 = lean::box(0);
+}
+x_77 = lean::box(x_1);
+if (lean::is_scalar(x_76)) {
+ x_78 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_78 = x_76;
+}
+lean::cnstr_set(x_78, 0, x_77);
+lean::cnstr_set(x_78, 1, x_74);
+return x_78;
+}
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_declareVars___main___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+uint8 x_4; obj* x_5; 
+x_4 = lean::unbox(x_1);
+x_5 = l_Lean_IR_EmitCpp_declareVars___main(x_0, x_4, x_2, x_3);
+lean::dec(x_2);
+return x_5;
+}
+}
+obj* l_Lean_IR_EmitCpp_declareVars(obj* x_0, uint8 x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Lean_IR_EmitCpp_declareVars___main(x_0, x_1, x_2, x_3);
+return x_4;
+}
+}
+obj* l_Lean_IR_EmitCpp_declareVars___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+uint8 x_4; obj* x_5; 
+x_4 = lean::unbox(x_1);
+x_5 = l_Lean_IR_EmitCpp_declareVars(x_0, x_4, x_2, x_3);
+lean::dec(x_2);
+return x_5;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitTag___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::obj_tag(");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitTag(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_4; 
+lean::inc(x_0);
+x_4 = l_Lean_IR_EmitCpp_isObj(x_0, x_1, x_2);
+if (lean::obj_tag(x_4) == 0)
+{
+obj* x_5; uint8 x_7; 
+x_5 = lean::cnstr_get(x_4, 0);
+lean::inc(x_5);
+x_7 = lean::unbox(x_5);
+if (x_7 == 0)
+{
+obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* x_17; obj* x_18; 
+x_8 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ x_10 = x_4;
+} else {
+ lean::inc(x_8);
+ lean::dec(x_4);
+ x_10 = lean::box(0);
+}
+x_11 = l_Nat_repr(x_0);
+x_12 = l_Lean_IR_VarId_HasToString___closed__1;
+x_13 = lean::string_append(x_12, x_11);
+lean::dec(x_11);
+x_15 = lean::string_append(x_8, x_13);
+lean::dec(x_13);
+x_17 = lean::box(0);
+if (lean::is_scalar(x_10)) {
+ x_18 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_18 = x_10;
+}
+lean::cnstr_set(x_18, 0, x_17);
+lean::cnstr_set(x_18, 1, x_15);
+return x_18;
+}
+else
+{
+obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_33; 
+x_19 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ x_21 = x_4;
+} else {
+ lean::inc(x_19);
+ lean::dec(x_4);
+ x_21 = lean::box(0);
+}
+x_22 = l_Lean_IR_EmitCpp_emitTag___closed__1;
+x_23 = lean::string_append(x_19, x_22);
+x_24 = l_Nat_repr(x_0);
+x_25 = l_Lean_IR_VarId_HasToString___closed__1;
+x_26 = lean::string_append(x_25, x_24);
+lean::dec(x_24);
+x_28 = lean::string_append(x_23, x_26);
+lean::dec(x_26);
+x_30 = l_Option_HasRepr___rarg___closed__3;
+x_31 = lean::string_append(x_28, x_30);
+x_32 = lean::box(0);
+if (lean::is_scalar(x_21)) {
+ x_33 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_33 = x_21;
+}
+lean::cnstr_set(x_33, 0, x_32);
+lean::cnstr_set(x_33, 1, x_31);
+return x_33;
+}
+}
+else
+{
+obj* x_35; obj* x_37; obj* x_39; obj* x_40; 
+lean::dec(x_0);
+x_35 = lean::cnstr_get(x_4, 0);
+x_37 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ x_39 = x_4;
+} else {
+ lean::inc(x_35);
+ lean::inc(x_37);
+ lean::dec(x_4);
+ x_39 = lean::box(0);
+}
+if (lean::is_scalar(x_39)) {
+ x_40 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_40 = x_39;
+}
+lean::cnstr_set(x_40, 0, x_35);
+lean::cnstr_set(x_40, 1, x_37);
+return x_40;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitTag___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_emitTag(x_0, x_1, x_2);
+lean::dec(x_1);
+return x_3;
+}
+}
+obj* l_Lean_IR_EmitCpp_isIf(obj* x_0) {
+_start:
+{
+obj* x_1; obj* x_2; uint8 x_3; 
+x_1 = lean::array_get_size(x_0);
+x_2 = lean::mk_nat_obj(2ul);
+x_3 = lean::nat_dec_eq(x_1, x_2);
+lean::dec(x_1);
+if (x_3 == 0)
+{
+obj* x_5; 
+x_5 = lean::box(0);
+return x_5;
+}
+else
+{
+obj* x_6; obj* x_7; obj* x_8; 
+x_6 = l_Lean_IR_altInh;
+x_7 = lean::mk_nat_obj(0ul);
+x_8 = lean::array_get(x_6, x_0, x_7);
+if (lean::obj_tag(x_8) == 0)
+{
+obj* x_9; obj* x_11; obj* x_14; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; 
+x_9 = lean::cnstr_get(x_8, 0);
+lean::inc(x_9);
+x_11 = lean::cnstr_get(x_8, 1);
+lean::inc(x_11);
+lean::dec(x_8);
+x_14 = lean::cnstr_get(x_9, 1);
+lean::inc(x_14);
+lean::dec(x_9);
+x_17 = lean::mk_nat_obj(1ul);
+x_18 = lean::array_get(x_6, x_0, x_17);
+x_19 = l_Lean_IR_AltCore_body___main(x_18);
+lean::dec(x_18);
+x_21 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_21, 0, x_11);
+lean::cnstr_set(x_21, 1, x_19);
+x_22 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_22, 0, x_14);
+lean::cnstr_set(x_22, 1, x_21);
+x_23 = lean::alloc_cnstr(1, 1, 0);
+lean::cnstr_set(x_23, 0, x_22);
+return x_23;
+}
+else
+{
+obj* x_25; 
+lean::dec(x_8);
+x_25 = lean::box(0);
+return x_25;
+}
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_isIf___boxed(obj* x_0) {
+_start:
+{
+obj* x_1; 
+x_1 = l_Lean_IR_EmitCpp_isIf(x_0);
+lean::dec(x_0);
+return x_1;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitIf___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("if (");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitIf___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string(" == ");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitIf___closed__3() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("else");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitIf(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5, obj* x_6) {
+_start:
+{
+obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; 
+x_7 = lean::cnstr_get(x_6, 1);
+if (lean::is_exclusive(x_6)) {
+ lean::cnstr_release(x_6, 0);
+ x_9 = x_6;
+} else {
+ lean::inc(x_7);
+ lean::dec(x_6);
+ x_9 = lean::box(0);
+}
+x_10 = l_Lean_IR_EmitCpp_emitIf___closed__1;
+x_11 = lean::string_append(x_7, x_10);
+x_12 = lean::box(0);
+if (lean::is_scalar(x_9)) {
+ x_13 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_13 = x_9;
+}
+lean::cnstr_set(x_13, 0, x_12);
+lean::cnstr_set(x_13, 1, x_11);
+x_14 = l_Lean_IR_EmitCpp_emitTag(x_1, x_5, x_13);
+if (lean::obj_tag(x_14) == 0)
+{
+obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_30; 
+x_15 = lean::cnstr_get(x_14, 1);
+if (lean::is_exclusive(x_14)) {
+ lean::cnstr_release(x_14, 0);
+ x_17 = x_14;
+} else {
+ lean::inc(x_15);
+ lean::dec(x_14);
+ x_17 = lean::box(0);
+}
+x_18 = l_Lean_IR_EmitCpp_emitIf___closed__2;
+x_19 = lean::string_append(x_15, x_18);
+x_20 = l_Nat_repr(x_2);
+x_21 = lean::string_append(x_19, x_20);
+lean::dec(x_20);
+x_23 = l_Option_HasRepr___rarg___closed__3;
+x_24 = lean::string_append(x_21, x_23);
+x_25 = l_IO_println___rarg___closed__1;
+x_26 = lean::string_append(x_24, x_25);
+if (lean::is_scalar(x_17)) {
+ x_27 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_27 = x_17;
+}
+lean::cnstr_set(x_27, 0, x_12);
+lean::cnstr_set(x_27, 1, x_26);
+lean::inc(x_5);
+lean::inc(x_0);
+x_30 = lean::apply_3(x_0, x_3, x_5, x_27);
+if (lean::obj_tag(x_30) == 0)
+{
+obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; obj* x_38; 
+x_31 = lean::cnstr_get(x_30, 1);
+if (lean::is_exclusive(x_30)) {
+ lean::cnstr_release(x_30, 0);
+ x_33 = x_30;
+} else {
+ lean::inc(x_31);
+ lean::dec(x_30);
+ x_33 = lean::box(0);
+}
+x_34 = l_Lean_IR_EmitCpp_emitIf___closed__3;
+x_35 = lean::string_append(x_31, x_34);
+x_36 = lean::string_append(x_35, x_25);
+if (lean::is_scalar(x_33)) {
+ x_37 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_37 = x_33;
+}
+lean::cnstr_set(x_37, 0, x_12);
+lean::cnstr_set(x_37, 1, x_36);
+x_38 = lean::apply_3(x_0, x_4, x_5, x_37);
+return x_38;
+}
+else
+{
+obj* x_42; obj* x_44; obj* x_46; obj* x_47; 
+lean::dec(x_5);
+lean::dec(x_4);
+lean::dec(x_0);
+x_42 = lean::cnstr_get(x_30, 0);
+x_44 = lean::cnstr_get(x_30, 1);
+if (lean::is_exclusive(x_30)) {
+ x_46 = x_30;
+} else {
+ lean::inc(x_42);
+ lean::inc(x_44);
+ lean::dec(x_30);
+ x_46 = lean::box(0);
+}
+if (lean::is_scalar(x_46)) {
+ x_47 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_47 = x_46;
+}
+lean::cnstr_set(x_47, 0, x_42);
+lean::cnstr_set(x_47, 1, x_44);
+return x_47;
+}
+}
+else
+{
+obj* x_53; obj* x_55; obj* x_57; obj* x_58; 
+lean::dec(x_5);
+lean::dec(x_4);
+lean::dec(x_3);
+lean::dec(x_0);
+lean::dec(x_2);
+x_53 = lean::cnstr_get(x_14, 0);
+x_55 = lean::cnstr_get(x_14, 1);
+if (lean::is_exclusive(x_14)) {
+ x_57 = x_14;
+} else {
+ lean::inc(x_53);
+ lean::inc(x_55);
+ lean::dec(x_14);
+ x_57 = lean::box(0);
+}
+if (lean::is_scalar(x_57)) {
+ x_58 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_58 = x_57;
+}
+lean::cnstr_set(x_58, 0, x_53);
+lean::cnstr_set(x_58, 1, x_55);
+return x_58;
+}
+}
+}
+obj* _init_l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("case ");
+return x_0;
+}
+}
+obj* _init_l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string(":");
+return x_0;
+}
+}
+obj* _init_l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___closed__3() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("default: ");
+return x_0;
+}
+}
+obj* l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; uint8 x_6; 
+x_5 = lean::array_get_size(x_1);
+x_6 = lean::nat_dec_lt(x_2, x_5);
+lean::dec(x_5);
+if (x_6 == 0)
+{
+obj* x_11; obj* x_13; obj* x_14; obj* x_15; 
+lean::dec(x_3);
+lean::dec(x_0);
+lean::dec(x_2);
+x_11 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ x_13 = x_4;
+} else {
+ lean::inc(x_11);
+ lean::dec(x_4);
+ x_13 = lean::box(0);
+}
+x_14 = lean::box(0);
+if (lean::is_scalar(x_13)) {
+ x_15 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_15 = x_13;
+}
+lean::cnstr_set(x_15, 0, x_14);
+lean::cnstr_set(x_15, 1, x_11);
+return x_15;
+}
+else
+{
+obj* x_16; obj* x_17; obj* x_18; 
+x_16 = lean::array_fget(x_1, x_2);
+x_17 = lean::mk_nat_obj(1ul);
+x_18 = lean::nat_add(x_2, x_17);
+lean::dec(x_2);
+if (lean::obj_tag(x_16) == 0)
+{
+obj* x_20; obj* x_22; obj* x_25; obj* x_27; obj* x_28; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_44; 
+x_20 = lean::cnstr_get(x_16, 0);
+lean::inc(x_20);
+x_22 = lean::cnstr_get(x_16, 1);
+lean::inc(x_22);
+lean::dec(x_16);
+x_25 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ x_27 = x_4;
+} else {
+ lean::inc(x_25);
+ lean::dec(x_4);
+ x_27 = lean::box(0);
+}
+x_28 = lean::cnstr_get(x_20, 1);
+lean::inc(x_28);
+lean::dec(x_20);
+x_31 = l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___closed__1;
+x_32 = lean::string_append(x_25, x_31);
+x_33 = l_Nat_repr(x_28);
+x_34 = lean::string_append(x_32, x_33);
+lean::dec(x_33);
+x_36 = l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___closed__2;
+x_37 = lean::string_append(x_34, x_36);
+x_38 = l_IO_println___rarg___closed__1;
+x_39 = lean::string_append(x_37, x_38);
+x_40 = lean::box(0);
+if (lean::is_scalar(x_27)) {
+ x_41 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_41 = x_27;
+}
+lean::cnstr_set(x_41, 0, x_40);
+lean::cnstr_set(x_41, 1, x_39);
+lean::inc(x_3);
+lean::inc(x_0);
+x_44 = lean::apply_3(x_0, x_22, x_3, x_41);
+if (lean::obj_tag(x_44) == 0)
+{
+obj* x_45; obj* x_47; obj* x_48; 
+x_45 = lean::cnstr_get(x_44, 1);
+if (lean::is_exclusive(x_44)) {
+ lean::cnstr_release(x_44, 0);
+ x_47 = x_44;
+} else {
+ lean::inc(x_45);
+ lean::dec(x_44);
+ x_47 = lean::box(0);
+}
+if (lean::is_scalar(x_47)) {
+ x_48 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_48 = x_47;
+}
+lean::cnstr_set(x_48, 0, x_40);
+lean::cnstr_set(x_48, 1, x_45);
+x_2 = x_18;
+x_4 = x_48;
+goto _start;
+}
+else
+{
+obj* x_53; obj* x_55; obj* x_57; obj* x_58; 
+lean::dec(x_3);
+lean::dec(x_0);
+lean::dec(x_18);
+x_53 = lean::cnstr_get(x_44, 0);
+x_55 = lean::cnstr_get(x_44, 1);
+if (lean::is_exclusive(x_44)) {
+ x_57 = x_44;
+} else {
+ lean::inc(x_53);
+ lean::inc(x_55);
+ lean::dec(x_44);
+ x_57 = lean::box(0);
+}
+if (lean::is_scalar(x_57)) {
+ x_58 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_58 = x_57;
+}
+lean::cnstr_set(x_58, 0, x_53);
+lean::cnstr_set(x_58, 1, x_55);
+return x_58;
+}
+}
+else
+{
+obj* x_59; obj* x_62; obj* x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_73; 
+x_59 = lean::cnstr_get(x_16, 0);
+lean::inc(x_59);
+lean::dec(x_16);
+x_62 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ x_64 = x_4;
+} else {
+ lean::inc(x_62);
+ lean::dec(x_4);
+ x_64 = lean::box(0);
+}
+x_65 = l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___closed__3;
+x_66 = lean::string_append(x_62, x_65);
+x_67 = l_IO_println___rarg___closed__1;
+x_68 = lean::string_append(x_66, x_67);
+x_69 = lean::box(0);
+if (lean::is_scalar(x_64)) {
+ x_70 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_70 = x_64;
+}
+lean::cnstr_set(x_70, 0, x_69);
+lean::cnstr_set(x_70, 1, x_68);
+lean::inc(x_3);
+lean::inc(x_0);
+x_73 = lean::apply_3(x_0, x_59, x_3, x_70);
+if (lean::obj_tag(x_73) == 0)
+{
+obj* x_74; obj* x_76; obj* x_77; 
+x_74 = lean::cnstr_get(x_73, 1);
+if (lean::is_exclusive(x_73)) {
+ lean::cnstr_release(x_73, 0);
+ x_76 = x_73;
+} else {
+ lean::inc(x_74);
+ lean::dec(x_73);
+ x_76 = lean::box(0);
+}
+if (lean::is_scalar(x_76)) {
+ x_77 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_77 = x_76;
+}
+lean::cnstr_set(x_77, 0, x_69);
+lean::cnstr_set(x_77, 1, x_74);
+x_2 = x_18;
+x_4 = x_77;
+goto _start;
+}
+else
+{
+obj* x_82; obj* x_84; obj* x_86; obj* x_87; 
+lean::dec(x_3);
+lean::dec(x_0);
+lean::dec(x_18);
+x_82 = lean::cnstr_get(x_73, 0);
+x_84 = lean::cnstr_get(x_73, 1);
+if (lean::is_exclusive(x_73)) {
+ x_86 = x_73;
+} else {
+ lean::inc(x_82);
+ lean::inc(x_84);
+ lean::dec(x_73);
+ x_86 = lean::box(0);
+}
+if (lean::is_scalar(x_86)) {
+ x_87 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_87 = x_86;
+}
+lean::cnstr_set(x_87, 0, x_82);
+lean::cnstr_set(x_87, 1, x_84);
+return x_87;
+}
+}
+}
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitCase___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("switch (");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitCase___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string(") {");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitCase(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; 
+x_5 = l_Lean_IR_EmitCpp_isIf(x_2);
+if (lean::obj_tag(x_5) == 0)
+{
+obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; 
+x_6 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ x_8 = x_4;
+} else {
+ lean::inc(x_6);
+ lean::dec(x_4);
+ x_8 = lean::box(0);
+}
+x_9 = l_Lean_IR_EmitCpp_emitCase___closed__1;
+x_10 = lean::string_append(x_6, x_9);
+x_11 = lean::box(0);
+if (lean::is_scalar(x_8)) {
+ x_12 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_12 = x_8;
+}
+lean::cnstr_set(x_12, 0, x_11);
+lean::cnstr_set(x_12, 1, x_10);
+x_13 = l_Lean_IR_EmitCpp_emitTag(x_1, x_3, x_12);
+if (lean::obj_tag(x_13) == 0)
+{
+obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_23; 
+x_14 = lean::cnstr_get(x_13, 1);
+if (lean::is_exclusive(x_13)) {
+ lean::cnstr_release(x_13, 0);
+ x_16 = x_13;
+} else {
+ lean::inc(x_14);
+ lean::dec(x_13);
+ x_16 = lean::box(0);
+}
+x_17 = l_Lean_IR_EmitCpp_emitCase___closed__2;
+x_18 = lean::string_append(x_14, x_17);
+x_19 = l_IO_println___rarg___closed__1;
+x_20 = lean::string_append(x_18, x_19);
+if (lean::is_scalar(x_16)) {
+ x_21 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_21 = x_16;
+}
+lean::cnstr_set(x_21, 0, x_11);
+lean::cnstr_set(x_21, 1, x_20);
+x_22 = lean::mk_nat_obj(0ul);
+x_23 = l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1(x_0, x_2, x_22, x_3, x_21);
+if (lean::obj_tag(x_23) == 0)
+{
+obj* x_24; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; 
+x_24 = lean::cnstr_get(x_23, 1);
+if (lean::is_exclusive(x_23)) {
+ lean::cnstr_release(x_23, 0);
+ x_26 = x_23;
+} else {
+ lean::inc(x_24);
+ lean::dec(x_23);
+ x_26 = lean::box(0);
+}
+x_27 = l_Lean_IR_EmitCpp_closeNamespacesAux___main___closed__1;
+x_28 = lean::string_append(x_24, x_27);
+x_29 = lean::string_append(x_28, x_19);
+if (lean::is_scalar(x_26)) {
+ x_30 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_30 = x_26;
+}
+lean::cnstr_set(x_30, 0, x_11);
+lean::cnstr_set(x_30, 1, x_29);
+return x_30;
+}
+else
+{
+obj* x_31; obj* x_33; obj* x_35; obj* x_36; 
+x_31 = lean::cnstr_get(x_23, 0);
+x_33 = lean::cnstr_get(x_23, 1);
+if (lean::is_exclusive(x_23)) {
+ x_35 = x_23;
+} else {
+ lean::inc(x_31);
+ lean::inc(x_33);
+ lean::dec(x_23);
+ x_35 = lean::box(0);
+}
+if (lean::is_scalar(x_35)) {
+ x_36 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_36 = x_35;
+}
+lean::cnstr_set(x_36, 0, x_31);
+lean::cnstr_set(x_36, 1, x_33);
+return x_36;
+}
+}
+else
+{
+obj* x_39; obj* x_41; obj* x_43; obj* x_44; 
+lean::dec(x_3);
+lean::dec(x_0);
+x_39 = lean::cnstr_get(x_13, 0);
+x_41 = lean::cnstr_get(x_13, 1);
+if (lean::is_exclusive(x_13)) {
+ x_43 = x_13;
+} else {
+ lean::inc(x_39);
+ lean::inc(x_41);
+ lean::dec(x_13);
+ x_43 = lean::box(0);
+}
+if (lean::is_scalar(x_43)) {
+ x_44 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_44 = x_43;
+}
+lean::cnstr_set(x_44, 0, x_39);
+lean::cnstr_set(x_44, 1, x_41);
+return x_44;
+}
+}
+else
+{
+obj* x_45; obj* x_48; obj* x_50; obj* x_53; obj* x_55; obj* x_58; 
+x_45 = lean::cnstr_get(x_5, 0);
+lean::inc(x_45);
+lean::dec(x_5);
+x_48 = lean::cnstr_get(x_45, 1);
+lean::inc(x_48);
+x_50 = lean::cnstr_get(x_45, 0);
+lean::inc(x_50);
+lean::dec(x_45);
+x_53 = lean::cnstr_get(x_48, 0);
+lean::inc(x_53);
+x_55 = lean::cnstr_get(x_48, 1);
+lean::inc(x_55);
+lean::dec(x_48);
+x_58 = l_Lean_IR_EmitCpp_emitIf(x_0, x_1, x_50, x_53, x_55, x_3, x_4);
+return x_58;
+}
+}
+}
+obj* l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; 
+x_5 = l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1(x_0, x_1, x_2, x_3, x_4);
+lean::dec(x_1);
+return x_5;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitCase___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; 
+x_5 = l_Lean_IR_EmitCpp_emitCase(x_0, x_1, x_2, x_3, x_4);
+lean::dec(x_2);
+return x_5;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitInc___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::inc_ref");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitInc___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string(");");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitInc___closed__3() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::inc");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitInc(obj* x_0, obj* x_1, uint8 x_2, obj* x_3, obj* x_4) {
+_start:
+{
+if (x_2 == 0)
+{
+obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; uint8 x_19; 
+x_5 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ lean::cnstr_set(x_4, 1, lean::box(0));
+ x_7 = x_4;
+} else {
+ lean::inc(x_5);
+ lean::dec(x_4);
+ x_7 = lean::box(0);
+}
+x_8 = l_Lean_IR_EmitCpp_emitInc___closed__1;
+x_9 = lean::string_append(x_5, x_8);
+x_10 = l_Prod_HasRepr___rarg___closed__1;
+x_11 = lean::string_append(x_9, x_10);
+x_12 = l_Nat_repr(x_0);
+x_13 = l_Lean_IR_VarId_HasToString___closed__1;
+x_14 = lean::string_append(x_13, x_12);
+lean::dec(x_12);
+x_16 = lean::string_append(x_11, x_14);
+lean::dec(x_14);
+x_18 = lean::mk_nat_obj(1ul);
+x_19 = lean::nat_dec_eq(x_1, x_18);
+if (x_19 == 0)
+{
+obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; 
+x_20 = l_List_reprAux___main___rarg___closed__1;
+x_21 = lean::string_append(x_16, x_20);
+x_22 = l_Nat_repr(x_1);
+x_23 = lean::string_append(x_21, x_22);
+lean::dec(x_22);
+x_25 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_26 = lean::string_append(x_23, x_25);
+x_27 = l_IO_println___rarg___closed__1;
+x_28 = lean::string_append(x_26, x_27);
+x_29 = lean::box(0);
+if (lean::is_scalar(x_7)) {
+ x_30 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_30 = x_7;
+}
+lean::cnstr_set(x_30, 0, x_29);
+lean::cnstr_set(x_30, 1, x_28);
+return x_30;
+}
+else
+{
+obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; 
+lean::dec(x_1);
+x_32 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_33 = lean::string_append(x_16, x_32);
+x_34 = l_IO_println___rarg___closed__1;
+x_35 = lean::string_append(x_33, x_34);
+x_36 = lean::box(0);
+if (lean::is_scalar(x_7)) {
+ x_37 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_37 = x_7;
+}
+lean::cnstr_set(x_37, 0, x_36);
+lean::cnstr_set(x_37, 1, x_35);
+return x_37;
+}
+}
+else
+{
+obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_49; obj* x_51; uint8 x_52; 
+x_38 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ lean::cnstr_set(x_4, 1, lean::box(0));
+ x_40 = x_4;
+} else {
+ lean::inc(x_38);
+ lean::dec(x_4);
+ x_40 = lean::box(0);
+}
+x_41 = l_Lean_IR_EmitCpp_emitInc___closed__3;
+x_42 = lean::string_append(x_38, x_41);
+x_43 = l_Prod_HasRepr___rarg___closed__1;
+x_44 = lean::string_append(x_42, x_43);
+x_45 = l_Nat_repr(x_0);
+x_46 = l_Lean_IR_VarId_HasToString___closed__1;
+x_47 = lean::string_append(x_46, x_45);
+lean::dec(x_45);
+x_49 = lean::string_append(x_44, x_47);
+lean::dec(x_47);
+x_51 = lean::mk_nat_obj(1ul);
+x_52 = lean::nat_dec_eq(x_1, x_51);
+if (x_52 == 0)
+{
+obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; 
+x_53 = l_List_reprAux___main___rarg___closed__1;
+x_54 = lean::string_append(x_49, x_53);
+x_55 = l_Nat_repr(x_1);
+x_56 = lean::string_append(x_54, x_55);
+lean::dec(x_55);
+x_58 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_59 = lean::string_append(x_56, x_58);
+x_60 = l_IO_println___rarg___closed__1;
+x_61 = lean::string_append(x_59, x_60);
+x_62 = lean::box(0);
+if (lean::is_scalar(x_40)) {
+ x_63 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_63 = x_40;
+}
+lean::cnstr_set(x_63, 0, x_62);
+lean::cnstr_set(x_63, 1, x_61);
+return x_63;
+}
+else
+{
+obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; 
+lean::dec(x_1);
+x_65 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_66 = lean::string_append(x_49, x_65);
+x_67 = l_IO_println___rarg___closed__1;
+x_68 = lean::string_append(x_66, x_67);
+x_69 = lean::box(0);
+if (lean::is_scalar(x_40)) {
+ x_70 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_70 = x_40;
+}
+lean::cnstr_set(x_70, 0, x_69);
+lean::cnstr_set(x_70, 1, x_68);
+return x_70;
+}
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitInc___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+uint8 x_5; obj* x_6; 
+x_5 = lean::unbox(x_2);
+x_6 = l_Lean_IR_EmitCpp_emitInc(x_0, x_1, x_5, x_3, x_4);
+lean::dec(x_3);
+return x_6;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitDec___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::dec_ref");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitDec___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::dec");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitDec(obj* x_0, obj* x_1, uint8 x_2, obj* x_3, obj* x_4) {
+_start:
+{
+if (x_2 == 0)
+{
+obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_18; uint8 x_19; 
+x_5 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ lean::cnstr_set(x_4, 1, lean::box(0));
+ x_7 = x_4;
+} else {
+ lean::inc(x_5);
+ lean::dec(x_4);
+ x_7 = lean::box(0);
+}
+x_8 = l_Lean_IR_EmitCpp_emitDec___closed__1;
+x_9 = lean::string_append(x_5, x_8);
+x_10 = l_Prod_HasRepr___rarg___closed__1;
+x_11 = lean::string_append(x_9, x_10);
+x_12 = l_Nat_repr(x_0);
+x_13 = l_Lean_IR_VarId_HasToString___closed__1;
+x_14 = lean::string_append(x_13, x_12);
+lean::dec(x_12);
+x_16 = lean::string_append(x_11, x_14);
+lean::dec(x_14);
+x_18 = lean::mk_nat_obj(1ul);
+x_19 = lean::nat_dec_eq(x_1, x_18);
+if (x_19 == 0)
+{
+obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; 
+x_20 = l_List_reprAux___main___rarg___closed__1;
+x_21 = lean::string_append(x_16, x_20);
+x_22 = l_Nat_repr(x_1);
+x_23 = lean::string_append(x_21, x_22);
+lean::dec(x_22);
+x_25 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_26 = lean::string_append(x_23, x_25);
+x_27 = l_IO_println___rarg___closed__1;
+x_28 = lean::string_append(x_26, x_27);
+x_29 = lean::box(0);
+if (lean::is_scalar(x_7)) {
+ x_30 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_30 = x_7;
+}
+lean::cnstr_set(x_30, 0, x_29);
+lean::cnstr_set(x_30, 1, x_28);
+return x_30;
+}
+else
+{
+obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; 
+lean::dec(x_1);
+x_32 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_33 = lean::string_append(x_16, x_32);
+x_34 = l_IO_println___rarg___closed__1;
+x_35 = lean::string_append(x_33, x_34);
+x_36 = lean::box(0);
+if (lean::is_scalar(x_7)) {
+ x_37 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_37 = x_7;
+}
+lean::cnstr_set(x_37, 0, x_36);
+lean::cnstr_set(x_37, 1, x_35);
+return x_37;
+}
+}
+else
+{
+obj* x_38; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_49; obj* x_51; uint8 x_52; 
+x_38 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ lean::cnstr_set(x_4, 1, lean::box(0));
+ x_40 = x_4;
+} else {
+ lean::inc(x_38);
+ lean::dec(x_4);
+ x_40 = lean::box(0);
+}
+x_41 = l_Lean_IR_EmitCpp_emitDec___closed__2;
+x_42 = lean::string_append(x_38, x_41);
+x_43 = l_Prod_HasRepr___rarg___closed__1;
+x_44 = lean::string_append(x_42, x_43);
+x_45 = l_Nat_repr(x_0);
+x_46 = l_Lean_IR_VarId_HasToString___closed__1;
+x_47 = lean::string_append(x_46, x_45);
+lean::dec(x_45);
+x_49 = lean::string_append(x_44, x_47);
+lean::dec(x_47);
+x_51 = lean::mk_nat_obj(1ul);
+x_52 = lean::nat_dec_eq(x_1, x_51);
+if (x_52 == 0)
+{
+obj* x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; 
+x_53 = l_List_reprAux___main___rarg___closed__1;
+x_54 = lean::string_append(x_49, x_53);
+x_55 = l_Nat_repr(x_1);
+x_56 = lean::string_append(x_54, x_55);
+lean::dec(x_55);
+x_58 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_59 = lean::string_append(x_56, x_58);
+x_60 = l_IO_println___rarg___closed__1;
+x_61 = lean::string_append(x_59, x_60);
+x_62 = lean::box(0);
+if (lean::is_scalar(x_40)) {
+ x_63 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_63 = x_40;
+}
+lean::cnstr_set(x_63, 0, x_62);
+lean::cnstr_set(x_63, 1, x_61);
+return x_63;
+}
+else
+{
+obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; 
+lean::dec(x_1);
+x_65 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_66 = lean::string_append(x_49, x_65);
+x_67 = l_IO_println___rarg___closed__1;
+x_68 = lean::string_append(x_66, x_67);
+x_69 = lean::box(0);
+if (lean::is_scalar(x_40)) {
+ x_70 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_70 = x_40;
+}
+lean::cnstr_set(x_70, 0, x_69);
+lean::cnstr_set(x_70, 1, x_68);
+return x_70;
+}
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitDec___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+uint8 x_5; obj* x_6; 
+x_5 = lean::unbox(x_2);
+x_6 = l_Lean_IR_EmitCpp_emitDec(x_0, x_1, x_5, x_3, x_4);
+lean::dec(x_3);
+return x_6;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitRelease___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::cnstr_release(");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitRelease(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; 
+x_4 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ lean::cnstr_release(x_3, 0);
+ x_6 = x_3;
+} else {
+ lean::inc(x_4);
+ lean::dec(x_3);
+ x_6 = lean::box(0);
+}
+x_7 = l_Lean_IR_EmitCpp_emitRelease___closed__1;
+x_8 = lean::string_append(x_4, x_7);
+x_9 = l_Nat_repr(x_0);
+x_10 = l_Lean_IR_VarId_HasToString___closed__1;
+x_11 = lean::string_append(x_10, x_9);
+lean::dec(x_9);
+x_13 = lean::string_append(x_8, x_11);
+lean::dec(x_11);
+x_15 = l_List_reprAux___main___rarg___closed__1;
+x_16 = lean::string_append(x_13, x_15);
+x_17 = l_Nat_repr(x_1);
+x_18 = lean::string_append(x_16, x_17);
+lean::dec(x_17);
+x_20 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_21 = lean::string_append(x_18, x_20);
+x_22 = l_IO_println___rarg___closed__1;
+x_23 = lean::string_append(x_21, x_22);
+x_24 = lean::box(0);
+if (lean::is_scalar(x_6)) {
+ x_25 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_25 = x_6;
+}
+lean::cnstr_set(x_25, 0, x_24);
+lean::cnstr_set(x_25, 1, x_23);
+return x_25;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitRelease___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Lean_IR_EmitCpp_emitRelease(x_0, x_1, x_2, x_3);
+lean::dec(x_2);
+return x_4;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitSet___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::cnstr_set(");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitSet(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; 
+x_5 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ x_7 = x_4;
+} else {
+ lean::inc(x_5);
+ lean::dec(x_4);
+ x_7 = lean::box(0);
+}
+x_8 = l_Lean_IR_EmitCpp_emitSet___closed__1;
+x_9 = lean::string_append(x_5, x_8);
+x_10 = l_Nat_repr(x_0);
+x_11 = l_Lean_IR_VarId_HasToString___closed__1;
+x_12 = lean::string_append(x_11, x_10);
+lean::dec(x_10);
+x_14 = lean::string_append(x_9, x_12);
+lean::dec(x_12);
+x_16 = l_List_reprAux___main___rarg___closed__1;
+x_17 = lean::string_append(x_14, x_16);
+x_18 = l_Nat_repr(x_1);
+x_19 = lean::string_append(x_17, x_18);
+lean::dec(x_18);
+x_21 = lean::string_append(x_19, x_16);
+x_22 = l_Nat_repr(x_2);
+x_23 = lean::string_append(x_11, x_22);
+lean::dec(x_22);
+x_25 = lean::string_append(x_21, x_23);
+lean::dec(x_23);
+x_27 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_28 = lean::string_append(x_25, x_27);
+x_29 = l_IO_println___rarg___closed__1;
+x_30 = lean::string_append(x_28, x_29);
+x_31 = lean::box(0);
+if (lean::is_scalar(x_7)) {
+ x_32 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_32 = x_7;
+}
+lean::cnstr_set(x_32, 0, x_31);
+lean::cnstr_set(x_32, 1, x_30);
+return x_32;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitSet___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; 
+x_5 = l_Lean_IR_EmitCpp_emitSet(x_0, x_1, x_2, x_3, x_4);
+lean::dec(x_3);
+return x_5;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitOffset___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("sizeof(void*)*");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitOffset___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string(" + ");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitOffset(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; uint8 x_5; 
+x_4 = lean::mk_nat_obj(0ul);
+x_5 = lean::nat_dec_lt(x_4, x_0);
+if (x_5 == 0)
+{
+obj* x_7; obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_14; 
+lean::dec(x_0);
+x_7 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ lean::cnstr_release(x_3, 0);
+ x_9 = x_3;
+} else {
+ lean::inc(x_7);
+ lean::dec(x_3);
+ x_9 = lean::box(0);
+}
+x_10 = l_Nat_repr(x_1);
+x_11 = lean::string_append(x_7, x_10);
+lean::dec(x_10);
+x_13 = lean::box(0);
+if (lean::is_scalar(x_9)) {
+ x_14 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_14 = x_9;
+}
+lean::cnstr_set(x_14, 0, x_13);
+lean::cnstr_set(x_14, 1, x_11);
+return x_14;
+}
+else
+{
+obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; uint8 x_23; 
+x_15 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ lean::cnstr_release(x_3, 0);
+ lean::cnstr_set(x_3, 1, lean::box(0));
+ x_17 = x_3;
+} else {
+ lean::inc(x_15);
+ lean::dec(x_3);
+ x_17 = lean::box(0);
+}
+x_18 = l_Lean_IR_EmitCpp_emitOffset___closed__1;
+x_19 = lean::string_append(x_15, x_18);
+x_20 = l_Nat_repr(x_0);
+x_21 = lean::string_append(x_19, x_20);
+lean::dec(x_20);
+x_23 = lean::nat_dec_lt(x_4, x_1);
+if (x_23 == 0)
+{
+obj* x_25; obj* x_26; 
+lean::dec(x_1);
+x_25 = lean::box(0);
+if (lean::is_scalar(x_17)) {
+ x_26 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_26 = x_17;
+}
+lean::cnstr_set(x_26, 0, x_25);
+lean::cnstr_set(x_26, 1, x_21);
+return x_26;
+}
+else
+{
+obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_32; obj* x_33; 
+x_27 = l_Lean_IR_EmitCpp_emitOffset___closed__2;
+x_28 = lean::string_append(x_21, x_27);
+x_29 = l_Nat_repr(x_1);
+x_30 = lean::string_append(x_28, x_29);
+lean::dec(x_29);
+x_32 = lean::box(0);
+if (lean::is_scalar(x_17)) {
+ x_33 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_33 = x_17;
+}
+lean::cnstr_set(x_33, 0, x_32);
+lean::cnstr_set(x_33, 1, x_30);
+return x_33;
+}
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitOffset___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Lean_IR_EmitCpp_emitOffset(x_0, x_1, x_2, x_3);
+lean::dec(x_2);
+return x_4;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitUSet___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::cnstr_set_scalar(");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitUSet(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; 
+x_5 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ x_7 = x_4;
+} else {
+ lean::inc(x_5);
+ lean::dec(x_4);
+ x_7 = lean::box(0);
+}
+x_8 = l_Lean_IR_EmitCpp_emitUSet___closed__1;
+x_9 = lean::string_append(x_5, x_8);
+x_10 = l_Nat_repr(x_0);
+x_11 = l_Lean_IR_VarId_HasToString___closed__1;
+x_12 = lean::string_append(x_11, x_10);
+lean::dec(x_10);
+x_14 = lean::string_append(x_9, x_12);
+lean::dec(x_12);
+x_16 = l_List_reprAux___main___rarg___closed__1;
+x_17 = lean::string_append(x_14, x_16);
+x_18 = lean::box(0);
+if (lean::is_scalar(x_7)) {
+ x_19 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_19 = x_7;
+}
+lean::cnstr_set(x_19, 0, x_18);
+lean::cnstr_set(x_19, 1, x_17);
+x_20 = lean::mk_nat_obj(0ul);
+x_21 = l_Lean_IR_EmitCpp_emitOffset(x_1, x_20, x_3, x_19);
+if (lean::obj_tag(x_21) == 0)
+{
+obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; 
+x_22 = lean::cnstr_get(x_21, 1);
+if (lean::is_exclusive(x_21)) {
+ lean::cnstr_release(x_21, 0);
+ x_24 = x_21;
+} else {
+ lean::inc(x_22);
+ lean::dec(x_21);
+ x_24 = lean::box(0);
+}
+x_25 = lean::string_append(x_22, x_16);
+x_26 = l_Nat_repr(x_2);
+x_27 = lean::string_append(x_11, x_26);
+lean::dec(x_26);
+x_29 = lean::string_append(x_25, x_27);
+lean::dec(x_27);
+x_31 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_32 = lean::string_append(x_29, x_31);
+x_33 = l_IO_println___rarg___closed__1;
+x_34 = lean::string_append(x_32, x_33);
+if (lean::is_scalar(x_24)) {
+ x_35 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_35 = x_24;
+}
+lean::cnstr_set(x_35, 0, x_18);
+lean::cnstr_set(x_35, 1, x_34);
+return x_35;
+}
+else
+{
+obj* x_37; obj* x_39; obj* x_41; obj* x_42; 
+lean::dec(x_2);
+x_37 = lean::cnstr_get(x_21, 0);
+x_39 = lean::cnstr_get(x_21, 1);
+if (lean::is_exclusive(x_21)) {
+ x_41 = x_21;
+} else {
+ lean::inc(x_37);
+ lean::inc(x_39);
+ lean::dec(x_21);
+ x_41 = lean::box(0);
+}
+if (lean::is_scalar(x_41)) {
+ x_42 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_42 = x_41;
+}
+lean::cnstr_set(x_42, 0, x_37);
+lean::cnstr_set(x_42, 1, x_39);
+return x_42;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitUSet___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; 
+x_5 = l_Lean_IR_EmitCpp_emitUSet(x_0, x_1, x_2, x_3, x_4);
+lean::dec(x_3);
+return x_5;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitSSet(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) {
+_start:
+{
+obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; 
+x_6 = lean::cnstr_get(x_5, 1);
+if (lean::is_exclusive(x_5)) {
+ lean::cnstr_release(x_5, 0);
+ x_8 = x_5;
+} else {
+ lean::inc(x_6);
+ lean::dec(x_5);
+ x_8 = lean::box(0);
+}
+x_9 = l_Lean_IR_EmitCpp_emitUSet___closed__1;
+x_10 = lean::string_append(x_6, x_9);
+x_11 = l_Nat_repr(x_0);
+x_12 = l_Lean_IR_VarId_HasToString___closed__1;
+x_13 = lean::string_append(x_12, x_11);
+lean::dec(x_11);
+x_15 = lean::string_append(x_10, x_13);
+lean::dec(x_13);
+x_17 = l_List_reprAux___main___rarg___closed__1;
+x_18 = lean::string_append(x_15, x_17);
+x_19 = lean::box(0);
+if (lean::is_scalar(x_8)) {
+ x_20 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_20 = x_8;
+}
+lean::cnstr_set(x_20, 0, x_19);
+lean::cnstr_set(x_20, 1, x_18);
+x_21 = l_Lean_IR_EmitCpp_emitOffset(x_1, x_2, x_4, x_20);
+if (lean::obj_tag(x_21) == 0)
+{
+obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; 
+x_22 = lean::cnstr_get(x_21, 1);
+if (lean::is_exclusive(x_21)) {
+ lean::cnstr_release(x_21, 0);
+ x_24 = x_21;
+} else {
+ lean::inc(x_22);
+ lean::dec(x_21);
+ x_24 = lean::box(0);
+}
+x_25 = lean::string_append(x_22, x_17);
+x_26 = l_Nat_repr(x_3);
+x_27 = lean::string_append(x_12, x_26);
+lean::dec(x_26);
+x_29 = lean::string_append(x_25, x_27);
+lean::dec(x_27);
+x_31 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_32 = lean::string_append(x_29, x_31);
+x_33 = l_IO_println___rarg___closed__1;
+x_34 = lean::string_append(x_32, x_33);
+if (lean::is_scalar(x_24)) {
+ x_35 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_35 = x_24;
+}
+lean::cnstr_set(x_35, 0, x_19);
+lean::cnstr_set(x_35, 1, x_34);
+return x_35;
+}
+else
+{
+obj* x_37; obj* x_39; obj* x_41; obj* x_42; 
+lean::dec(x_3);
+x_37 = lean::cnstr_get(x_21, 0);
+x_39 = lean::cnstr_get(x_21, 1);
+if (lean::is_exclusive(x_21)) {
+ x_41 = x_21;
+} else {
+ lean::inc(x_37);
+ lean::inc(x_39);
+ lean::dec(x_21);
+ x_41 = lean::box(0);
+}
+if (lean::is_scalar(x_41)) {
+ x_42 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_42 = x_41;
+}
+lean::cnstr_set(x_42, 0, x_37);
+lean::cnstr_set(x_42, 1, x_39);
+return x_42;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitSSet___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) {
+_start:
+{
+obj* x_6; 
+x_6 = l_Lean_IR_EmitCpp_emitSSet(x_0, x_1, x_2, x_3, x_4, x_5);
+lean::dec(x_4);
+return x_6;
+}
+}
+obj* _init_l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitJmp___spec__1___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string(" = ");
+return x_0;
+}
+}
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitJmp___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) {
+_start:
+{
+obj* x_6; uint8 x_7; 
+x_6 = lean::mk_nat_obj(0ul);
+x_7 = lean::nat_dec_eq(x_3, x_6);
+if (x_7 == 0)
+{
+obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; 
+x_8 = lean::cnstr_get(x_5, 1);
+if (lean::is_exclusive(x_5)) {
+ lean::cnstr_release(x_5, 0);
+ x_10 = x_5;
+} else {
+ lean::inc(x_8);
+ lean::dec(x_5);
+ x_10 = lean::box(0);
+}
+x_11 = lean::mk_nat_obj(1ul);
+x_12 = lean::nat_sub(x_3, x_11);
+lean::dec(x_3);
+x_14 = lean::nat_sub(x_2, x_12);
+x_15 = lean::nat_sub(x_14, x_11);
+lean::dec(x_14);
+x_17 = l_Lean_IR_paramInh;
+x_18 = lean::array_get(x_17, x_1, x_15);
+x_19 = l_Lean_IR_Arg_Inhabited;
+x_20 = lean::array_get(x_19, x_0, x_15);
+lean::dec(x_15);
+x_22 = lean::cnstr_get(x_18, 0);
+lean::inc(x_22);
+lean::dec(x_18);
+x_25 = l_Nat_repr(x_22);
+x_26 = l_Lean_IR_VarId_HasToString___closed__1;
+x_27 = lean::string_append(x_26, x_25);
+lean::dec(x_25);
+x_29 = lean::string_append(x_8, x_27);
+lean::dec(x_27);
+x_31 = l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitJmp___spec__1___closed__1;
+x_32 = lean::string_append(x_29, x_31);
+x_33 = lean::box(0);
+if (lean::is_scalar(x_10)) {
+ x_34 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_34 = x_10;
+}
+lean::cnstr_set(x_34, 0, x_33);
+lean::cnstr_set(x_34, 1, x_32);
+x_35 = l_Lean_IR_EmitCpp_emitArg(x_20, x_4, x_34);
+if (lean::obj_tag(x_35) == 0)
+{
+obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; 
+x_36 = lean::cnstr_get(x_35, 1);
+if (lean::is_exclusive(x_35)) {
+ lean::cnstr_release(x_35, 0);
+ x_38 = x_35;
+} else {
+ lean::inc(x_36);
+ lean::dec(x_35);
+ x_38 = lean::box(0);
+}
+x_39 = l_Lean_IR_EmitCpp_emitFnDeclAux___closed__2;
+x_40 = lean::string_append(x_36, x_39);
+x_41 = l_IO_println___rarg___closed__1;
+x_42 = lean::string_append(x_40, x_41);
+if (lean::is_scalar(x_38)) {
+ x_43 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_43 = x_38;
+}
+lean::cnstr_set(x_43, 0, x_33);
+lean::cnstr_set(x_43, 1, x_42);
+x_3 = x_12;
+x_5 = x_43;
+goto _start;
+}
+else
+{
+obj* x_46; obj* x_48; obj* x_50; obj* x_51; 
+lean::dec(x_12);
+x_46 = lean::cnstr_get(x_35, 0);
+x_48 = lean::cnstr_get(x_35, 1);
+if (lean::is_exclusive(x_35)) {
+ x_50 = x_35;
+} else {
+ lean::inc(x_46);
+ lean::inc(x_48);
+ lean::dec(x_35);
+ x_50 = lean::box(0);
+}
+if (lean::is_scalar(x_50)) {
+ x_51 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_51 = x_50;
+}
+lean::cnstr_set(x_51, 0, x_46);
+lean::cnstr_set(x_51, 1, x_48);
+return x_51;
+}
+}
+else
+{
+obj* x_53; obj* x_55; obj* x_56; obj* x_57; 
+lean::dec(x_3);
+x_53 = lean::cnstr_get(x_5, 1);
+if (lean::is_exclusive(x_5)) {
+ lean::cnstr_release(x_5, 0);
+ x_55 = x_5;
+} else {
+ lean::inc(x_53);
+ lean::dec(x_5);
+ x_55 = lean::box(0);
+}
+x_56 = lean::box(0);
+if (lean::is_scalar(x_55)) {
+ x_57 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_57 = x_55;
+}
+lean::cnstr_set(x_57, 0, x_56);
+lean::cnstr_set(x_57, 1, x_53);
+return x_57;
+}
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitJmp___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("invalid goto");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitJmp___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("goto ");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitJmp(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Lean_IR_EmitCpp_getJPParams(x_0, x_2, x_3);
+if (lean::obj_tag(x_4) == 0)
+{
+obj* x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_11; uint8 x_12; 
+x_5 = lean::cnstr_get(x_4, 0);
+x_7 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_set(x_4, 0, lean::box(0));
+ lean::cnstr_set(x_4, 1, lean::box(0));
+ x_9 = x_4;
+} else {
+ lean::inc(x_5);
+ lean::inc(x_7);
+ lean::dec(x_4);
+ x_9 = lean::box(0);
+}
+x_10 = lean::array_get_size(x_1);
+x_11 = lean::array_get_size(x_5);
+x_12 = lean::nat_dec_eq(x_10, x_11);
+lean::dec(x_11);
+if (x_12 == 0)
+{
+obj* x_17; obj* x_18; 
+lean::dec(x_5);
+lean::dec(x_0);
+lean::dec(x_10);
+x_17 = l_Lean_IR_EmitCpp_emitJmp___closed__1;
+if (lean::is_scalar(x_9)) {
+ x_18 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_18 = x_9;
+ lean::cnstr_set_tag(x_9, 1);
+}
+lean::cnstr_set(x_18, 0, x_17);
+lean::cnstr_set(x_18, 1, x_7);
+return x_18;
+}
+else
+{
+obj* x_19; obj* x_20; obj* x_22; 
+x_19 = lean::box(0);
+if (lean::is_scalar(x_9)) {
+ x_20 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_20 = x_9;
+}
+lean::cnstr_set(x_20, 0, x_19);
+lean::cnstr_set(x_20, 1, x_7);
+lean::inc(x_10);
+x_22 = l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitJmp___spec__1(x_1, x_5, x_10, x_10, x_2, x_20);
+lean::dec(x_10);
+lean::dec(x_5);
+if (lean::obj_tag(x_22) == 0)
+{
+obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_32; obj* x_34; obj* x_36; obj* x_37; obj* x_38; obj* x_39; obj* x_40; 
+x_25 = lean::cnstr_get(x_22, 1);
+if (lean::is_exclusive(x_22)) {
+ lean::cnstr_release(x_22, 0);
+ x_27 = x_22;
+} else {
+ lean::inc(x_25);
+ lean::dec(x_22);
+ x_27 = lean::box(0);
+}
+x_28 = l_Lean_IR_EmitCpp_emitJmp___closed__2;
+x_29 = lean::string_append(x_25, x_28);
+x_30 = l_Nat_repr(x_0);
+x_31 = l_Lean_IR_JoinPointId_HasToString___closed__1;
+x_32 = lean::string_append(x_31, x_30);
+lean::dec(x_30);
+x_34 = lean::string_append(x_29, x_32);
+lean::dec(x_32);
+x_36 = l_Lean_IR_EmitCpp_emitFnDeclAux___closed__2;
+x_37 = lean::string_append(x_34, x_36);
+x_38 = l_IO_println___rarg___closed__1;
+x_39 = lean::string_append(x_37, x_38);
+if (lean::is_scalar(x_27)) {
+ x_40 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_40 = x_27;
+}
+lean::cnstr_set(x_40, 0, x_19);
+lean::cnstr_set(x_40, 1, x_39);
+return x_40;
+}
+else
+{
+obj* x_42; obj* x_44; obj* x_46; obj* x_47; 
+lean::dec(x_0);
+x_42 = lean::cnstr_get(x_22, 0);
+x_44 = lean::cnstr_get(x_22, 1);
+if (lean::is_exclusive(x_22)) {
+ x_46 = x_22;
+} else {
+ lean::inc(x_42);
+ lean::inc(x_44);
+ lean::dec(x_22);
+ x_46 = lean::box(0);
+}
+if (lean::is_scalar(x_46)) {
+ x_47 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_47 = x_46;
+}
+lean::cnstr_set(x_47, 0, x_42);
+lean::cnstr_set(x_47, 1, x_44);
+return x_47;
+}
+}
+}
+else
+{
+obj* x_49; obj* x_51; obj* x_53; obj* x_54; 
+lean::dec(x_0);
+x_49 = lean::cnstr_get(x_4, 0);
+x_51 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ x_53 = x_4;
+} else {
+ lean::inc(x_49);
+ lean::inc(x_51);
+ lean::dec(x_4);
+ x_53 = lean::box(0);
+}
+if (lean::is_scalar(x_53)) {
+ x_54 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_54 = x_53;
+}
+lean::cnstr_set(x_54, 0, x_49);
+lean::cnstr_set(x_54, 1, x_51);
+return x_54;
+}
+}
+}
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitJmp___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) {
+_start:
+{
+obj* x_6; 
+x_6 = l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitJmp___spec__1(x_0, x_1, x_2, x_3, x_4, x_5);
+lean::dec(x_0);
+lean::dec(x_1);
+lean::dec(x_2);
+lean::dec(x_4);
+return x_6;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitJmp___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Lean_IR_EmitCpp_emitJmp(x_0, x_1, x_2, x_3);
+lean::dec(x_1);
+lean::dec(x_2);
+return x_4;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitLhs(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; 
+x_3 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ lean::cnstr_release(x_2, 0);
+ x_5 = x_2;
+} else {
+ lean::inc(x_3);
+ lean::dec(x_2);
+ x_5 = lean::box(0);
+}
+x_6 = l_Nat_repr(x_0);
+x_7 = l_Lean_IR_VarId_HasToString___closed__1;
+x_8 = lean::string_append(x_7, x_6);
+lean::dec(x_6);
+x_10 = lean::string_append(x_3, x_8);
+lean::dec(x_8);
+x_12 = l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitJmp___spec__1___closed__1;
+x_13 = lean::string_append(x_10, x_12);
+x_14 = lean::box(0);
+if (lean::is_scalar(x_5)) {
+ x_15 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_15 = x_5;
+}
+lean::cnstr_set(x_15, 0, x_14);
+lean::cnstr_set(x_15, 1, x_13);
+return x_15;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitLhs___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_emitLhs(x_0, x_1, x_2);
+lean::dec(x_1);
+return x_3;
+}
+}
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitArgs___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; uint8 x_6; 
+x_5 = lean::mk_nat_obj(0ul);
+x_6 = lean::nat_dec_eq(x_2, x_5);
+if (x_6 == 0)
+{
+obj* x_7; obj* x_8; obj* x_10; obj* x_11; uint8 x_13; 
+x_7 = lean::mk_nat_obj(1ul);
+x_8 = lean::nat_sub(x_2, x_7);
+lean::dec(x_2);
+x_10 = lean::nat_sub(x_1, x_8);
+x_11 = lean::nat_sub(x_10, x_7);
+lean::dec(x_10);
+x_13 = lean::nat_dec_lt(x_5, x_11);
+if (x_13 == 0)
+{
+obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; 
+x_14 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ x_16 = x_4;
+} else {
+ lean::inc(x_14);
+ lean::dec(x_4);
+ x_16 = lean::box(0);
+}
+x_17 = lean::box(0);
+if (lean::is_scalar(x_16)) {
+ x_18 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_18 = x_16;
+}
+lean::cnstr_set(x_18, 0, x_17);
+lean::cnstr_set(x_18, 1, x_14);
+x_19 = l_Lean_IR_Arg_Inhabited;
+x_20 = lean::array_get(x_19, x_0, x_11);
+lean::dec(x_11);
+x_22 = l_Lean_IR_EmitCpp_emitArg(x_20, x_3, x_18);
 if (lean::obj_tag(x_22) == 0)
 {
 obj* x_23; obj* x_25; obj* x_26; 
@@ -1137,70 +7442,4178 @@ if (lean::is_scalar(x_25)) {
 } else {
  x_26 = x_25;
 }
-lean::cnstr_set(x_26, 0, x_9);
+lean::cnstr_set(x_26, 0, x_17);
 lean::cnstr_set(x_26, 1, x_23);
-return x_26;
+x_2 = x_8;
+x_4 = x_26;
+goto _start;
 }
 else
 {
-obj* x_27; obj* x_29; obj* x_31; obj* x_32; 
-x_27 = lean::cnstr_get(x_22, 0);
-x_29 = lean::cnstr_get(x_22, 1);
+obj* x_29; obj* x_31; obj* x_33; obj* x_34; 
+lean::dec(x_8);
+x_29 = lean::cnstr_get(x_22, 0);
+x_31 = lean::cnstr_get(x_22, 1);
 if (lean::is_exclusive(x_22)) {
- x_31 = x_22;
+ x_33 = x_22;
 } else {
- lean::inc(x_27);
  lean::inc(x_29);
+ lean::inc(x_31);
  lean::dec(x_22);
- x_31 = lean::box(0);
+ x_33 = lean::box(0);
 }
-if (lean::is_scalar(x_31)) {
- x_32 = lean::alloc_cnstr(1, 2, 0);
+if (lean::is_scalar(x_33)) {
+ x_34 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_32 = x_31;
+ x_34 = x_33;
 }
-lean::cnstr_set(x_32, 0, x_27);
-lean::cnstr_set(x_32, 1, x_29);
-return x_32;
+lean::cnstr_set(x_34, 0, x_29);
+lean::cnstr_set(x_34, 1, x_31);
+return x_34;
+}
+}
+else
+{
+obj* x_35; obj* x_37; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_45; 
+x_35 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ x_37 = x_4;
+} else {
+ lean::inc(x_35);
+ lean::dec(x_4);
+ x_37 = lean::box(0);
+}
+x_38 = l_List_reprAux___main___rarg___closed__1;
+x_39 = lean::string_append(x_35, x_38);
+x_40 = lean::box(0);
+if (lean::is_scalar(x_37)) {
+ x_41 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_41 = x_37;
+}
+lean::cnstr_set(x_41, 0, x_40);
+lean::cnstr_set(x_41, 1, x_39);
+x_42 = l_Lean_IR_Arg_Inhabited;
+x_43 = lean::array_get(x_42, x_0, x_11);
+lean::dec(x_11);
+x_45 = l_Lean_IR_EmitCpp_emitArg(x_43, x_3, x_41);
+if (lean::obj_tag(x_45) == 0)
+{
+obj* x_46; obj* x_48; obj* x_49; 
+x_46 = lean::cnstr_get(x_45, 1);
+if (lean::is_exclusive(x_45)) {
+ lean::cnstr_release(x_45, 0);
+ x_48 = x_45;
+} else {
+ lean::inc(x_46);
+ lean::dec(x_45);
+ x_48 = lean::box(0);
+}
+if (lean::is_scalar(x_48)) {
+ x_49 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_49 = x_48;
+}
+lean::cnstr_set(x_49, 0, x_40);
+lean::cnstr_set(x_49, 1, x_46);
+x_2 = x_8;
+x_4 = x_49;
+goto _start;
+}
+else
+{
+obj* x_52; obj* x_54; obj* x_56; obj* x_57; 
+lean::dec(x_8);
+x_52 = lean::cnstr_get(x_45, 0);
+x_54 = lean::cnstr_get(x_45, 1);
+if (lean::is_exclusive(x_45)) {
+ x_56 = x_45;
+} else {
+ lean::inc(x_52);
+ lean::inc(x_54);
+ lean::dec(x_45);
+ x_56 = lean::box(0);
+}
+if (lean::is_scalar(x_56)) {
+ x_57 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_57 = x_56;
+}
+lean::cnstr_set(x_57, 0, x_52);
+lean::cnstr_set(x_57, 1, x_54);
+return x_57;
 }
 }
 }
 else
 {
-obj* x_34; obj* x_36; obj* x_38; obj* x_39; 
-lean::dec(x_0);
-x_34 = lean::cnstr_get(x_3, 0);
-x_36 = lean::cnstr_get(x_3, 1);
-if (lean::is_exclusive(x_3)) {
- x_38 = x_3;
+obj* x_59; obj* x_61; obj* x_62; obj* x_63; 
+lean::dec(x_2);
+x_59 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ x_61 = x_4;
 } else {
- lean::inc(x_34);
- lean::inc(x_36);
- lean::dec(x_3);
- x_38 = lean::box(0);
+ lean::inc(x_59);
+ lean::dec(x_4);
+ x_61 = lean::box(0);
 }
-if (lean::is_scalar(x_38)) {
- x_39 = lean::alloc_cnstr(1, 2, 0);
+x_62 = lean::box(0);
+if (lean::is_scalar(x_61)) {
+ x_63 = lean::alloc_cnstr(0, 2, 0);
 } else {
- x_39 = x_38;
+ x_63 = x_61;
 }
-lean::cnstr_set(x_39, 0, x_34);
-lean::cnstr_set(x_39, 1, x_36);
-return x_39;
+lean::cnstr_set(x_63, 0, x_62);
+lean::cnstr_set(x_63, 1, x_59);
+return x_63;
 }
 }
 }
-obj* l_List_foldr___main___at_Lean_IR_EmitCpp_main___spec__1___boxed(obj* x_0, obj* x_1) {
+obj* l_Lean_IR_EmitCpp_emitArgs(obj* x_0, obj* x_1, obj* x_2) {
 _start:
 {
-uint8 x_2; uint8 x_3; obj* x_4; 
-x_2 = lean::unbox(x_0);
-x_3 = l_List_foldr___main___at_Lean_IR_EmitCpp_main___spec__1(x_2, x_1);
-x_4 = lean::box(x_3);
+obj* x_3; obj* x_5; 
+x_3 = lean::array_get_size(x_0);
+lean::inc(x_3);
+x_5 = l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitArgs___spec__1(x_0, x_3, x_3, x_1, x_2);
+lean::dec(x_3);
+return x_5;
+}
+}
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitArgs___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; 
+x_5 = l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitArgs___spec__1(x_0, x_1, x_2, x_3, x_4);
+lean::dec(x_0);
+lean::dec(x_1);
+lean::dec(x_3);
+return x_5;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitArgs___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_emitArgs(x_0, x_1, x_2);
+lean::dec(x_0);
+lean::dec(x_1);
+return x_3;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitCtor___rarg(obj* x_0) {
+_start:
+{
+obj* x_1; obj* x_3; obj* x_4; obj* x_5; 
+x_1 = lean::cnstr_get(x_0, 1);
+if (lean::is_exclusive(x_0)) {
+ lean::cnstr_release(x_0, 0);
+ x_3 = x_0;
+} else {
+ lean::inc(x_1);
+ lean::dec(x_0);
+ x_3 = lean::box(0);
+}
+x_4 = lean::box(0);
+if (lean::is_scalar(x_3)) {
+ x_5 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_5 = x_3;
+}
+lean::cnstr_set(x_5, 0, x_4);
+lean::cnstr_set(x_5, 1, x_1);
+return x_5;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitCtor(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = lean::alloc_closure(reinterpret_cast<void*>(l_Lean_IR_EmitCpp_emitCtor___rarg), 1, 0);
+return x_4;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitCtor___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Lean_IR_EmitCpp_emitCtor(x_0, x_1, x_2, x_3);
+lean::dec(x_0);
+lean::dec(x_1);
+lean::dec(x_2);
+lean::dec(x_3);
+return x_4;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitReset___rarg(obj* x_0) {
+_start:
+{
+obj* x_1; obj* x_3; obj* x_4; obj* x_5; 
+x_1 = lean::cnstr_get(x_0, 1);
+if (lean::is_exclusive(x_0)) {
+ lean::cnstr_release(x_0, 0);
+ x_3 = x_0;
+} else {
+ lean::inc(x_1);
+ lean::dec(x_0);
+ x_3 = lean::box(0);
+}
+x_4 = lean::box(0);
+if (lean::is_scalar(x_3)) {
+ x_5 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_5 = x_3;
+}
+lean::cnstr_set(x_5, 0, x_4);
+lean::cnstr_set(x_5, 1, x_1);
+return x_5;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitReset(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = lean::alloc_closure(reinterpret_cast<void*>(l_Lean_IR_EmitCpp_emitReset___rarg), 1, 0);
+return x_4;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitReset___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Lean_IR_EmitCpp_emitReset(x_0, x_1, x_2, x_3);
+lean::dec(x_0);
+lean::dec(x_1);
+lean::dec(x_2);
+lean::dec(x_3);
+return x_4;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitReuse___rarg(obj* x_0) {
+_start:
+{
+obj* x_1; obj* x_3; obj* x_4; obj* x_5; 
+x_1 = lean::cnstr_get(x_0, 1);
+if (lean::is_exclusive(x_0)) {
+ lean::cnstr_release(x_0, 0);
+ x_3 = x_0;
+} else {
+ lean::inc(x_1);
+ lean::dec(x_0);
+ x_3 = lean::box(0);
+}
+x_4 = lean::box(0);
+if (lean::is_scalar(x_3)) {
+ x_5 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_5 = x_3;
+}
+lean::cnstr_set(x_5, 0, x_4);
+lean::cnstr_set(x_5, 1, x_1);
+return x_5;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitReuse(obj* x_0, obj* x_1, obj* x_2, uint8 x_3, obj* x_4, obj* x_5) {
+_start:
+{
+obj* x_6; 
+x_6 = lean::alloc_closure(reinterpret_cast<void*>(l_Lean_IR_EmitCpp_emitReuse___rarg), 1, 0);
+return x_6;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitReuse___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) {
+_start:
+{
+uint8 x_6; obj* x_7; 
+x_6 = lean::unbox(x_3);
+x_7 = l_Lean_IR_EmitCpp_emitReuse(x_0, x_1, x_2, x_6, x_4, x_5);
+lean::dec(x_0);
+lean::dec(x_1);
+lean::dec(x_2);
+lean::dec(x_4);
+lean::dec(x_5);
+return x_7;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitProj___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::cnstr_get(");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitProj(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; 
+x_5 = l_Lean_IR_EmitCpp_emitLhs(x_0, x_3, x_4);
+if (lean::obj_tag(x_5) == 0)
+{
+obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; 
+x_6 = lean::cnstr_get(x_5, 1);
+if (lean::is_exclusive(x_5)) {
+ lean::cnstr_release(x_5, 0);
+ x_8 = x_5;
+} else {
+ lean::inc(x_6);
+ lean::dec(x_5);
+ x_8 = lean::box(0);
+}
+x_9 = l_Lean_IR_EmitCpp_emitProj___closed__1;
+x_10 = lean::string_append(x_6, x_9);
+x_11 = l_Nat_repr(x_2);
+x_12 = l_Lean_IR_VarId_HasToString___closed__1;
+x_13 = lean::string_append(x_12, x_11);
+lean::dec(x_11);
+x_15 = lean::string_append(x_10, x_13);
+lean::dec(x_13);
+x_17 = l_List_reprAux___main___rarg___closed__1;
+x_18 = lean::string_append(x_15, x_17);
+x_19 = l_Nat_repr(x_1);
+x_20 = lean::string_append(x_18, x_19);
+lean::dec(x_19);
+x_22 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_23 = lean::string_append(x_20, x_22);
+x_24 = l_IO_println___rarg___closed__1;
+x_25 = lean::string_append(x_23, x_24);
+x_26 = lean::box(0);
+if (lean::is_scalar(x_8)) {
+ x_27 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_27 = x_8;
+}
+lean::cnstr_set(x_27, 0, x_26);
+lean::cnstr_set(x_27, 1, x_25);
+return x_27;
+}
+else
+{
+obj* x_30; obj* x_32; obj* x_34; obj* x_35; 
+lean::dec(x_1);
+lean::dec(x_2);
+x_30 = lean::cnstr_get(x_5, 0);
+x_32 = lean::cnstr_get(x_5, 1);
+if (lean::is_exclusive(x_5)) {
+ x_34 = x_5;
+} else {
+ lean::inc(x_30);
+ lean::inc(x_32);
+ lean::dec(x_5);
+ x_34 = lean::box(0);
+}
+if (lean::is_scalar(x_34)) {
+ x_35 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_35 = x_34;
+}
+lean::cnstr_set(x_35, 0, x_30);
+lean::cnstr_set(x_35, 1, x_32);
+return x_35;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitProj___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; 
+x_5 = l_Lean_IR_EmitCpp_emitProj(x_0, x_1, x_2, x_3, x_4);
+lean::dec(x_3);
+return x_5;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitUProj___rarg(obj* x_0) {
+_start:
+{
+obj* x_1; obj* x_3; obj* x_4; obj* x_5; 
+x_1 = lean::cnstr_get(x_0, 1);
+if (lean::is_exclusive(x_0)) {
+ lean::cnstr_release(x_0, 0);
+ x_3 = x_0;
+} else {
+ lean::inc(x_1);
+ lean::dec(x_0);
+ x_3 = lean::box(0);
+}
+x_4 = lean::box(0);
+if (lean::is_scalar(x_3)) {
+ x_5 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_5 = x_3;
+}
+lean::cnstr_set(x_5, 0, x_4);
+lean::cnstr_set(x_5, 1, x_1);
+return x_5;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitUProj(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = lean::alloc_closure(reinterpret_cast<void*>(l_Lean_IR_EmitCpp_emitUProj___rarg), 1, 0);
+return x_4;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitUProj___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Lean_IR_EmitCpp_emitUProj(x_0, x_1, x_2, x_3);
+lean::dec(x_0);
+lean::dec(x_1);
+lean::dec(x_2);
+lean::dec(x_3);
+return x_4;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitSProj___rarg(obj* x_0) {
+_start:
+{
+obj* x_1; obj* x_3; obj* x_4; obj* x_5; 
+x_1 = lean::cnstr_get(x_0, 1);
+if (lean::is_exclusive(x_0)) {
+ lean::cnstr_release(x_0, 0);
+ x_3 = x_0;
+} else {
+ lean::inc(x_1);
+ lean::dec(x_0);
+ x_3 = lean::box(0);
+}
+x_4 = lean::box(0);
+if (lean::is_scalar(x_3)) {
+ x_5 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_5 = x_3;
+}
+lean::cnstr_set(x_5, 0, x_4);
+lean::cnstr_set(x_5, 1, x_1);
+return x_5;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitSProj(obj* x_0, uint8 x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) {
+_start:
+{
+obj* x_6; 
+x_6 = lean::alloc_closure(reinterpret_cast<void*>(l_Lean_IR_EmitCpp_emitSProj___rarg), 1, 0);
+return x_6;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitSProj___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) {
+_start:
+{
+uint8 x_6; obj* x_7; 
+x_6 = lean::unbox(x_1);
+x_7 = l_Lean_IR_EmitCpp_emitSProj(x_0, x_6, x_2, x_3, x_4, x_5);
+lean::dec(x_0);
+lean::dec(x_2);
+lean::dec(x_3);
+lean::dec(x_4);
+lean::dec(x_5);
+return x_7;
+}
+}
+obj* l_List_map___main___at_Lean_IR_EmitCpp_toStringArgs___spec__1(obj* x_0) {
+_start:
+{
+if (lean::obj_tag(x_0) == 0)
+{
+obj* x_1; 
+x_1 = lean::box(0);
+return x_1;
+}
+else
+{
+obj* x_2; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; 
+x_2 = lean::cnstr_get(x_0, 0);
+x_4 = lean::cnstr_get(x_0, 1);
+if (lean::is_exclusive(x_0)) {
+ x_6 = x_0;
+} else {
+ lean::inc(x_2);
+ lean::inc(x_4);
+ lean::dec(x_0);
+ x_6 = lean::box(0);
+}
+x_7 = l_Lean_IR_EmitCpp_argToCppString(x_2);
+x_8 = l_List_map___main___at_Lean_IR_EmitCpp_toStringArgs___spec__1(x_4);
+if (lean::is_scalar(x_6)) {
+ x_9 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_9 = x_6;
+}
+lean::cnstr_set(x_9, 0, x_7);
+lean::cnstr_set(x_9, 1, x_8);
+return x_9;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_toStringArgs(obj* x_0) {
+_start:
+{
+obj* x_1; obj* x_2; 
+x_1 = l_Array_toList___rarg(x_0);
+x_2 = l_List_map___main___at_Lean_IR_EmitCpp_toStringArgs___spec__1(x_1);
+return x_2;
+}
+}
+obj* l_Lean_IR_EmitCpp_toStringArgs___boxed(obj* x_0) {
+_start:
+{
+obj* x_1; 
+x_1 = l_Lean_IR_EmitCpp_toStringArgs(x_0);
+lean::dec(x_0);
+return x_1;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitFullApp___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("failed to emit extern application");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitFullApp(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; 
+x_5 = l_Lean_IR_EmitCpp_emitLhs(x_0, x_3, x_4);
+if (lean::obj_tag(x_5) == 0)
+{
+obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_13; 
+x_6 = lean::cnstr_get(x_5, 1);
+if (lean::is_exclusive(x_5)) {
+ lean::cnstr_release(x_5, 0);
+ x_8 = x_5;
+} else {
+ lean::inc(x_6);
+ lean::dec(x_5);
+ x_8 = lean::box(0);
+}
+x_9 = lean::box(0);
+if (lean::is_scalar(x_8)) {
+ x_10 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_10 = x_8;
+}
+lean::cnstr_set(x_10, 0, x_9);
+lean::cnstr_set(x_10, 1, x_6);
+lean::inc(x_3);
+lean::inc(x_1);
+x_13 = l_Lean_IR_EmitCpp_getDecl(x_1, x_3, x_10);
+if (lean::obj_tag(x_13) == 0)
+{
+obj* x_14; 
+x_14 = lean::cnstr_get(x_13, 0);
+lean::inc(x_14);
+if (lean::obj_tag(x_14) == 0)
+{
+obj* x_17; obj* x_19; obj* x_20; obj* x_21; obj* x_22; obj* x_24; obj* x_25; obj* x_26; obj* x_27; 
+lean::dec(x_14);
+x_17 = lean::cnstr_get(x_13, 1);
+if (lean::is_exclusive(x_13)) {
+ lean::cnstr_release(x_13, 0);
+ x_19 = x_13;
+} else {
+ lean::inc(x_17);
+ lean::dec(x_13);
+ x_19 = lean::box(0);
+}
+x_20 = l_Lean_Name_toString___closed__1;
+x_21 = l_Lean_Name_toStringWithSep___main(x_20, x_1);
+x_22 = lean::string_append(x_17, x_21);
+lean::dec(x_21);
+x_24 = l_Prod_HasRepr___rarg___closed__1;
+x_25 = lean::string_append(x_22, x_24);
+if (lean::is_scalar(x_19)) {
+ x_26 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_26 = x_19;
+}
+lean::cnstr_set(x_26, 0, x_9);
+lean::cnstr_set(x_26, 1, x_25);
+x_27 = l_Lean_IR_EmitCpp_emitArgs(x_2, x_3, x_26);
+lean::dec(x_3);
+if (lean::obj_tag(x_27) == 0)
+{
+obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_34; obj* x_35; obj* x_36; 
+x_29 = lean::cnstr_get(x_27, 1);
+if (lean::is_exclusive(x_27)) {
+ lean::cnstr_release(x_27, 0);
+ x_31 = x_27;
+} else {
+ lean::inc(x_29);
+ lean::dec(x_27);
+ x_31 = lean::box(0);
+}
+x_32 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_33 = lean::string_append(x_29, x_32);
+x_34 = l_IO_println___rarg___closed__1;
+x_35 = lean::string_append(x_33, x_34);
+if (lean::is_scalar(x_31)) {
+ x_36 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_36 = x_31;
+}
+lean::cnstr_set(x_36, 0, x_9);
+lean::cnstr_set(x_36, 1, x_35);
+return x_36;
+}
+else
+{
+obj* x_37; obj* x_39; obj* x_41; obj* x_42; 
+x_37 = lean::cnstr_get(x_27, 0);
+x_39 = lean::cnstr_get(x_27, 1);
+if (lean::is_exclusive(x_27)) {
+ x_41 = x_27;
+} else {
+ lean::inc(x_37);
+ lean::inc(x_39);
+ lean::dec(x_27);
+ x_41 = lean::box(0);
+}
+if (lean::is_scalar(x_41)) {
+ x_42 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_42 = x_41;
+}
+lean::cnstr_set(x_42, 0, x_37);
+lean::cnstr_set(x_42, 1, x_39);
+return x_42;
+}
+}
+else
+{
+obj* x_45; obj* x_47; obj* x_48; obj* x_51; obj* x_52; obj* x_53; 
+lean::dec(x_1);
+lean::dec(x_3);
+x_45 = lean::cnstr_get(x_13, 1);
+if (lean::is_exclusive(x_13)) {
+ lean::cnstr_release(x_13, 0);
+ lean::cnstr_set(x_13, 1, lean::box(0));
+ x_47 = x_13;
+} else {
+ lean::inc(x_45);
+ lean::dec(x_13);
+ x_47 = lean::box(0);
+}
+x_48 = lean::cnstr_get(x_14, 2);
+lean::inc(x_48);
+lean::dec(x_14);
+x_51 = l_Lean_IR_EmitCpp_toStringArgs(x_2);
+x_52 = l_List_mfor___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__5___closed__1;
+x_53 = lean::mk_extern_call_core(x_48, x_52, x_51);
+if (lean::obj_tag(x_53) == 0)
+{
+obj* x_54; obj* x_55; 
+x_54 = l_Lean_IR_EmitCpp_emitFullApp___closed__1;
+if (lean::is_scalar(x_47)) {
+ x_55 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_55 = x_47;
+ lean::cnstr_set_tag(x_47, 1);
+}
+lean::cnstr_set(x_55, 0, x_54);
+lean::cnstr_set(x_55, 1, x_45);
+return x_55;
+}
+else
+{
+obj* x_56; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; 
+x_56 = lean::cnstr_get(x_53, 0);
+lean::inc(x_56);
+lean::dec(x_53);
+x_59 = lean::string_append(x_45, x_56);
+lean::dec(x_56);
+x_61 = l_Lean_IR_EmitCpp_emitFnDeclAux___closed__2;
+x_62 = lean::string_append(x_59, x_61);
+x_63 = l_IO_println___rarg___closed__1;
+x_64 = lean::string_append(x_62, x_63);
+if (lean::is_scalar(x_47)) {
+ x_65 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_65 = x_47;
+}
+lean::cnstr_set(x_65, 0, x_9);
+lean::cnstr_set(x_65, 1, x_64);
+return x_65;
+}
+}
+}
+else
+{
+obj* x_68; obj* x_70; obj* x_72; obj* x_73; 
+lean::dec(x_1);
+lean::dec(x_3);
+x_68 = lean::cnstr_get(x_13, 0);
+x_70 = lean::cnstr_get(x_13, 1);
+if (lean::is_exclusive(x_13)) {
+ x_72 = x_13;
+} else {
+ lean::inc(x_68);
+ lean::inc(x_70);
+ lean::dec(x_13);
+ x_72 = lean::box(0);
+}
+if (lean::is_scalar(x_72)) {
+ x_73 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_73 = x_72;
+}
+lean::cnstr_set(x_73, 0, x_68);
+lean::cnstr_set(x_73, 1, x_70);
+return x_73;
+}
+}
+else
+{
+obj* x_76; obj* x_78; obj* x_80; obj* x_81; 
+lean::dec(x_1);
+lean::dec(x_3);
+x_76 = lean::cnstr_get(x_5, 0);
+x_78 = lean::cnstr_get(x_5, 1);
+if (lean::is_exclusive(x_5)) {
+ x_80 = x_5;
+} else {
+ lean::inc(x_76);
+ lean::inc(x_78);
+ lean::dec(x_5);
+ x_80 = lean::box(0);
+}
+if (lean::is_scalar(x_80)) {
+ x_81 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_81 = x_80;
+}
+lean::cnstr_set(x_81, 0, x_76);
+lean::cnstr_set(x_81, 1, x_78);
+return x_81;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitFullApp___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; 
+x_5 = l_Lean_IR_EmitCpp_emitFullApp(x_0, x_1, x_2, x_3, x_4);
+lean::dec(x_2);
+return x_5;
+}
+}
+obj* _init_l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitPartialApp___spec__1___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::closure_set(");
+return x_0;
+}
+}
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitPartialApp___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) {
+_start:
+{
+obj* x_6; uint8 x_7; 
+x_6 = lean::mk_nat_obj(0ul);
+x_7 = lean::nat_dec_eq(x_3, x_6);
+if (x_7 == 0)
+{
+obj* x_8; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_26; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_36; 
+x_8 = lean::cnstr_get(x_5, 1);
+if (lean::is_exclusive(x_5)) {
+ lean::cnstr_release(x_5, 0);
+ x_10 = x_5;
+} else {
+ lean::inc(x_8);
+ lean::dec(x_5);
+ x_10 = lean::box(0);
+}
+x_11 = lean::mk_nat_obj(1ul);
+x_12 = lean::nat_sub(x_3, x_11);
+lean::dec(x_3);
+x_14 = lean::nat_sub(x_2, x_12);
+x_15 = lean::nat_sub(x_14, x_11);
+lean::dec(x_14);
+x_17 = l_Lean_IR_Arg_Inhabited;
+x_18 = lean::array_get(x_17, x_1, x_15);
+x_19 = l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitPartialApp___spec__1___closed__1;
+x_20 = lean::string_append(x_8, x_19);
+lean::inc(x_0);
+x_22 = l_Nat_repr(x_0);
+x_23 = l_Lean_IR_VarId_HasToString___closed__1;
+x_24 = lean::string_append(x_23, x_22);
+lean::dec(x_22);
+x_26 = lean::string_append(x_20, x_24);
+lean::dec(x_24);
+x_28 = l_List_reprAux___main___rarg___closed__1;
+x_29 = lean::string_append(x_26, x_28);
+x_30 = l_Nat_repr(x_15);
+x_31 = lean::string_append(x_29, x_30);
+lean::dec(x_30);
+x_33 = lean::string_append(x_31, x_28);
+x_34 = lean::box(0);
+if (lean::is_scalar(x_10)) {
+ x_35 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_35 = x_10;
+}
+lean::cnstr_set(x_35, 0, x_34);
+lean::cnstr_set(x_35, 1, x_33);
+x_36 = l_Lean_IR_EmitCpp_emitArg(x_18, x_4, x_35);
+if (lean::obj_tag(x_36) == 0)
+{
+obj* x_37; obj* x_39; obj* x_40; obj* x_41; obj* x_42; obj* x_43; obj* x_44; 
+x_37 = lean::cnstr_get(x_36, 1);
+if (lean::is_exclusive(x_36)) {
+ lean::cnstr_release(x_36, 0);
+ x_39 = x_36;
+} else {
+ lean::inc(x_37);
+ lean::dec(x_36);
+ x_39 = lean::box(0);
+}
+x_40 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_41 = lean::string_append(x_37, x_40);
+x_42 = l_IO_println___rarg___closed__1;
+x_43 = lean::string_append(x_41, x_42);
+if (lean::is_scalar(x_39)) {
+ x_44 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_44 = x_39;
+}
+lean::cnstr_set(x_44, 0, x_34);
+lean::cnstr_set(x_44, 1, x_43);
+x_3 = x_12;
+x_5 = x_44;
+goto _start;
+}
+else
+{
+obj* x_48; obj* x_50; obj* x_52; obj* x_53; 
+lean::dec(x_0);
+lean::dec(x_12);
+x_48 = lean::cnstr_get(x_36, 0);
+x_50 = lean::cnstr_get(x_36, 1);
+if (lean::is_exclusive(x_36)) {
+ x_52 = x_36;
+} else {
+ lean::inc(x_48);
+ lean::inc(x_50);
+ lean::dec(x_36);
+ x_52 = lean::box(0);
+}
+if (lean::is_scalar(x_52)) {
+ x_53 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_53 = x_52;
+}
+lean::cnstr_set(x_53, 0, x_48);
+lean::cnstr_set(x_53, 1, x_50);
+return x_53;
+}
+}
+else
+{
+obj* x_56; obj* x_58; obj* x_59; obj* x_60; 
+lean::dec(x_3);
+lean::dec(x_0);
+x_56 = lean::cnstr_get(x_5, 1);
+if (lean::is_exclusive(x_5)) {
+ lean::cnstr_release(x_5, 0);
+ x_58 = x_5;
+} else {
+ lean::inc(x_56);
+ lean::dec(x_5);
+ x_58 = lean::box(0);
+}
+x_59 = lean::box(0);
+if (lean::is_scalar(x_58)) {
+ x_60 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_60 = x_58;
+}
+lean::cnstr_set(x_60, 0, x_59);
+lean::cnstr_set(x_60, 1, x_56);
+return x_60;
+}
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitPartialApp___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::alloc_closure(reinterpret_cast<void*>(");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitPartialApp___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("), ");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitPartialApp(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_7; 
+lean::inc(x_3);
+lean::inc(x_1);
+x_7 = l_Lean_IR_EmitCpp_getDecl(x_1, x_3, x_4);
+if (lean::obj_tag(x_7) == 0)
+{
+obj* x_8; obj* x_10; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; obj* x_20; 
+x_8 = lean::cnstr_get(x_7, 0);
+x_10 = lean::cnstr_get(x_7, 1);
+if (lean::is_exclusive(x_7)) {
+ x_12 = x_7;
+} else {
+ lean::inc(x_8);
+ lean::inc(x_10);
+ lean::dec(x_7);
+ x_12 = lean::box(0);
+}
+x_13 = lean::box(0);
+if (lean::is_scalar(x_12)) {
+ x_14 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_14 = x_12;
+}
+lean::cnstr_set(x_14, 0, x_13);
+lean::cnstr_set(x_14, 1, x_10);
+x_15 = l_Lean_IR_Decl_params___main(x_8);
+lean::dec(x_8);
+x_17 = lean::array_get_size(x_15);
+lean::dec(x_15);
+lean::inc(x_0);
+x_20 = l_Lean_IR_EmitCpp_emitLhs(x_0, x_3, x_14);
+if (lean::obj_tag(x_20) == 0)
+{
+obj* x_21; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_30; obj* x_31; obj* x_32; obj* x_33; obj* x_35; obj* x_36; obj* x_37; obj* x_39; obj* x_40; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; obj* x_48; 
+x_21 = lean::cnstr_get(x_20, 1);
+if (lean::is_exclusive(x_20)) {
+ lean::cnstr_release(x_20, 0);
+ x_23 = x_20;
+} else {
+ lean::inc(x_21);
+ lean::dec(x_20);
+ x_23 = lean::box(0);
+}
+x_24 = l_Lean_IR_EmitCpp_emitPartialApp___closed__1;
+x_25 = lean::string_append(x_21, x_24);
+x_26 = l_Lean_Name_toString___closed__1;
+x_27 = l_Lean_Name_toStringWithSep___main(x_26, x_1);
+x_28 = lean::string_append(x_25, x_27);
+lean::dec(x_27);
+x_30 = l_Lean_IR_EmitCpp_emitPartialApp___closed__2;
+x_31 = lean::string_append(x_28, x_30);
+x_32 = l_Nat_repr(x_17);
+x_33 = lean::string_append(x_31, x_32);
+lean::dec(x_32);
+x_35 = l_List_reprAux___main___rarg___closed__1;
+x_36 = lean::string_append(x_33, x_35);
+x_37 = lean::array_get_size(x_2);
+lean::inc(x_37);
+x_39 = l_Nat_repr(x_37);
+x_40 = lean::string_append(x_36, x_39);
+lean::dec(x_39);
+x_42 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_43 = lean::string_append(x_40, x_42);
+x_44 = l_IO_println___rarg___closed__1;
+x_45 = lean::string_append(x_43, x_44);
+if (lean::is_scalar(x_23)) {
+ x_46 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_46 = x_23;
+}
+lean::cnstr_set(x_46, 0, x_13);
+lean::cnstr_set(x_46, 1, x_45);
+lean::inc(x_37);
+x_48 = l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitPartialApp___spec__1(x_0, x_2, x_37, x_37, x_3, x_46);
+lean::dec(x_3);
+lean::dec(x_37);
+return x_48;
+}
+else
+{
+obj* x_55; obj* x_57; obj* x_59; obj* x_60; 
+lean::dec(x_1);
+lean::dec(x_3);
+lean::dec(x_0);
+lean::dec(x_17);
+x_55 = lean::cnstr_get(x_20, 0);
+x_57 = lean::cnstr_get(x_20, 1);
+if (lean::is_exclusive(x_20)) {
+ x_59 = x_20;
+} else {
+ lean::inc(x_55);
+ lean::inc(x_57);
+ lean::dec(x_20);
+ x_59 = lean::box(0);
+}
+if (lean::is_scalar(x_59)) {
+ x_60 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_60 = x_59;
+}
+lean::cnstr_set(x_60, 0, x_55);
+lean::cnstr_set(x_60, 1, x_57);
+return x_60;
+}
+}
+else
+{
+obj* x_64; obj* x_66; obj* x_68; obj* x_69; 
+lean::dec(x_1);
+lean::dec(x_3);
+lean::dec(x_0);
+x_64 = lean::cnstr_get(x_7, 0);
+x_66 = lean::cnstr_get(x_7, 1);
+if (lean::is_exclusive(x_7)) {
+ x_68 = x_7;
+} else {
+ lean::inc(x_64);
+ lean::inc(x_66);
+ lean::dec(x_7);
+ x_68 = lean::box(0);
+}
+if (lean::is_scalar(x_68)) {
+ x_69 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_69 = x_68;
+}
+lean::cnstr_set(x_69, 0, x_64);
+lean::cnstr_set(x_69, 1, x_66);
+return x_69;
+}
+}
+}
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitPartialApp___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4, obj* x_5) {
+_start:
+{
+obj* x_6; 
+x_6 = l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitPartialApp___spec__1(x_0, x_1, x_2, x_3, x_4, x_5);
+lean::dec(x_1);
+lean::dec(x_2);
+lean::dec(x_4);
+return x_6;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitPartialApp___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; 
+x_5 = l_Lean_IR_EmitCpp_emitPartialApp(x_0, x_1, x_2, x_3, x_4);
+lean::dec(x_2);
+return x_5;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitApp___rarg(obj* x_0) {
+_start:
+{
+obj* x_1; obj* x_3; obj* x_4; obj* x_5; 
+x_1 = lean::cnstr_get(x_0, 1);
+if (lean::is_exclusive(x_0)) {
+ lean::cnstr_release(x_0, 0);
+ x_3 = x_0;
+} else {
+ lean::inc(x_1);
+ lean::dec(x_0);
+ x_3 = lean::box(0);
+}
+x_4 = lean::box(0);
+if (lean::is_scalar(x_3)) {
+ x_5 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_5 = x_3;
+}
+lean::cnstr_set(x_5, 0, x_4);
+lean::cnstr_set(x_5, 1, x_1);
+return x_5;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitApp(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = lean::alloc_closure(reinterpret_cast<void*>(l_Lean_IR_EmitCpp_emitApp___rarg), 1, 0);
+return x_4;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitApp___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Lean_IR_EmitCpp_emitApp(x_0, x_1, x_2, x_3);
+lean::dec(x_0);
+lean::dec(x_1);
+lean::dec(x_2);
+lean::dec(x_3);
+return x_4;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitBox___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("floats are not supported yet");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitBox___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::box");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitBox___closed__3() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::box_uint32");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitBox___closed__4() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::box_uint64");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitBox___closed__5() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::box_size_t");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitBox(obj* x_0, obj* x_1, uint8 x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; obj* x_7; 
+x_7 = l_Lean_IR_EmitCpp_emitLhs(x_0, x_3, x_4);
+if (lean::obj_tag(x_7) == 0)
+{
+switch (x_2) {
+case 0:
+{
+obj* x_9; obj* x_11; obj* x_12; obj* x_13; 
+lean::dec(x_1);
+x_9 = lean::cnstr_get(x_7, 1);
+if (lean::is_exclusive(x_7)) {
+ lean::cnstr_release(x_7, 0);
+ x_11 = x_7;
+} else {
+ lean::inc(x_9);
+ lean::dec(x_7);
+ x_11 = lean::box(0);
+}
+x_12 = l_Lean_IR_EmitCpp_emitBox___closed__1;
+if (lean::is_scalar(x_11)) {
+ x_13 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_13 = x_11;
+ lean::cnstr_set_tag(x_11, 1);
+}
+lean::cnstr_set(x_13, 0, x_12);
+lean::cnstr_set(x_13, 1, x_9);
+return x_13;
+}
+case 3:
+{
+obj* x_14; obj* x_17; obj* x_18; 
+x_14 = lean::cnstr_get(x_7, 1);
+lean::inc(x_14);
+lean::dec(x_7);
+x_17 = l_Lean_IR_EmitCpp_emitBox___closed__3;
+x_18 = lean::string_append(x_14, x_17);
+x_5 = x_18;
+goto lbl_6;
+}
+case 4:
+{
+obj* x_19; obj* x_22; obj* x_23; 
+x_19 = lean::cnstr_get(x_7, 1);
+lean::inc(x_19);
+lean::dec(x_7);
+x_22 = l_Lean_IR_EmitCpp_emitBox___closed__4;
+x_23 = lean::string_append(x_19, x_22);
+x_5 = x_23;
+goto lbl_6;
+}
+case 5:
+{
+obj* x_24; obj* x_27; obj* x_28; 
+x_24 = lean::cnstr_get(x_7, 1);
+lean::inc(x_24);
+lean::dec(x_7);
+x_27 = l_Lean_IR_EmitCpp_emitBox___closed__5;
+x_28 = lean::string_append(x_24, x_27);
+x_5 = x_28;
+goto lbl_6;
+}
+default:
+{
+obj* x_29; obj* x_32; obj* x_33; 
+x_29 = lean::cnstr_get(x_7, 1);
+lean::inc(x_29);
+lean::dec(x_7);
+x_32 = l_Lean_IR_EmitCpp_emitBox___closed__2;
+x_33 = lean::string_append(x_29, x_32);
+x_5 = x_33;
+goto lbl_6;
+}
+}
+}
+else
+{
+obj* x_35; obj* x_37; obj* x_39; obj* x_40; 
+lean::dec(x_1);
+x_35 = lean::cnstr_get(x_7, 0);
+x_37 = lean::cnstr_get(x_7, 1);
+if (lean::is_exclusive(x_7)) {
+ x_39 = x_7;
+} else {
+ lean::inc(x_35);
+ lean::inc(x_37);
+ lean::dec(x_7);
+ x_39 = lean::box(0);
+}
+if (lean::is_scalar(x_39)) {
+ x_40 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_40 = x_39;
+}
+lean::cnstr_set(x_40, 0, x_35);
+lean::cnstr_set(x_40, 1, x_37);
+return x_40;
+}
+lbl_6:
+{
+obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_47; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; 
+x_41 = l_Prod_HasRepr___rarg___closed__1;
+x_42 = lean::string_append(x_5, x_41);
+x_43 = l_Nat_repr(x_1);
+x_44 = l_Lean_IR_VarId_HasToString___closed__1;
+x_45 = lean::string_append(x_44, x_43);
+lean::dec(x_43);
+x_47 = lean::string_append(x_42, x_45);
+lean::dec(x_45);
+x_49 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_50 = lean::string_append(x_47, x_49);
+x_51 = l_IO_println___rarg___closed__1;
+x_52 = lean::string_append(x_50, x_51);
+x_53 = lean::box(0);
+x_54 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_54, 0, x_53);
+lean::cnstr_set(x_54, 1, x_52);
+return x_54;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitBox___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+uint8 x_5; obj* x_6; 
+x_5 = lean::unbox(x_2);
+x_6 = l_Lean_IR_EmitCpp_emitBox(x_0, x_1, x_5, x_3, x_4);
+lean::dec(x_3);
+return x_6;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitUnbox___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::unbox");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitUnbox___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::unbox_uint32");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitUnbox___closed__3() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::unbox_uint64");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitUnbox___closed__4() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::unbox_size_t");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitUnbox(obj* x_0, uint8 x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; obj* x_7; 
+x_7 = l_Lean_IR_EmitCpp_emitLhs(x_0, x_3, x_4);
+if (lean::obj_tag(x_7) == 0)
+{
+switch (x_1) {
+case 0:
+{
+obj* x_9; obj* x_11; obj* x_12; obj* x_13; 
+lean::dec(x_2);
+x_9 = lean::cnstr_get(x_7, 1);
+if (lean::is_exclusive(x_7)) {
+ lean::cnstr_release(x_7, 0);
+ x_11 = x_7;
+} else {
+ lean::inc(x_9);
+ lean::dec(x_7);
+ x_11 = lean::box(0);
+}
+x_12 = l_Lean_IR_EmitCpp_emitBox___closed__1;
+if (lean::is_scalar(x_11)) {
+ x_13 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_13 = x_11;
+ lean::cnstr_set_tag(x_11, 1);
+}
+lean::cnstr_set(x_13, 0, x_12);
+lean::cnstr_set(x_13, 1, x_9);
+return x_13;
+}
+case 3:
+{
+obj* x_14; obj* x_17; obj* x_18; 
+x_14 = lean::cnstr_get(x_7, 1);
+lean::inc(x_14);
+lean::dec(x_7);
+x_17 = l_Lean_IR_EmitCpp_emitUnbox___closed__2;
+x_18 = lean::string_append(x_14, x_17);
+x_5 = x_18;
+goto lbl_6;
+}
+case 4:
+{
+obj* x_19; obj* x_22; obj* x_23; 
+x_19 = lean::cnstr_get(x_7, 1);
+lean::inc(x_19);
+lean::dec(x_7);
+x_22 = l_Lean_IR_EmitCpp_emitUnbox___closed__3;
+x_23 = lean::string_append(x_19, x_22);
+x_5 = x_23;
+goto lbl_6;
+}
+case 5:
+{
+obj* x_24; obj* x_27; obj* x_28; 
+x_24 = lean::cnstr_get(x_7, 1);
+lean::inc(x_24);
+lean::dec(x_7);
+x_27 = l_Lean_IR_EmitCpp_emitUnbox___closed__4;
+x_28 = lean::string_append(x_24, x_27);
+x_5 = x_28;
+goto lbl_6;
+}
+default:
+{
+obj* x_29; obj* x_32; obj* x_33; 
+x_29 = lean::cnstr_get(x_7, 1);
+lean::inc(x_29);
+lean::dec(x_7);
+x_32 = l_Lean_IR_EmitCpp_emitUnbox___closed__1;
+x_33 = lean::string_append(x_29, x_32);
+x_5 = x_33;
+goto lbl_6;
+}
+}
+}
+else
+{
+obj* x_35; obj* x_37; obj* x_39; obj* x_40; 
+lean::dec(x_2);
+x_35 = lean::cnstr_get(x_7, 0);
+x_37 = lean::cnstr_get(x_7, 1);
+if (lean::is_exclusive(x_7)) {
+ x_39 = x_7;
+} else {
+ lean::inc(x_35);
+ lean::inc(x_37);
+ lean::dec(x_7);
+ x_39 = lean::box(0);
+}
+if (lean::is_scalar(x_39)) {
+ x_40 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_40 = x_39;
+}
+lean::cnstr_set(x_40, 0, x_35);
+lean::cnstr_set(x_40, 1, x_37);
+return x_40;
+}
+lbl_6:
+{
+obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_47; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; 
+x_41 = l_Prod_HasRepr___rarg___closed__1;
+x_42 = lean::string_append(x_5, x_41);
+x_43 = l_Nat_repr(x_2);
+x_44 = l_Lean_IR_VarId_HasToString___closed__1;
+x_45 = lean::string_append(x_44, x_43);
+lean::dec(x_43);
+x_47 = lean::string_append(x_42, x_45);
+lean::dec(x_45);
+x_49 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_50 = lean::string_append(x_47, x_49);
+x_51 = l_IO_println___rarg___closed__1;
+x_52 = lean::string_append(x_50, x_51);
+x_53 = lean::box(0);
+x_54 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_54, 0, x_53);
+lean::cnstr_set(x_54, 1, x_52);
+return x_54;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitUnbox___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+uint8 x_5; obj* x_6; 
+x_5 = lean::unbox(x_1);
+x_6 = l_Lean_IR_EmitCpp_emitUnbox(x_0, x_5, x_2, x_3, x_4);
+lean::dec(x_3);
+return x_6;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitIsShared___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("!lean::is_exclusive(");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitIsShared(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Lean_IR_EmitCpp_emitLhs(x_0, x_2, x_3);
+if (lean::obj_tag(x_4) == 0)
+{
+obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; 
+x_5 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ x_7 = x_4;
+} else {
+ lean::inc(x_5);
+ lean::dec(x_4);
+ x_7 = lean::box(0);
+}
+x_8 = l_Lean_IR_EmitCpp_emitIsShared___closed__1;
+x_9 = lean::string_append(x_5, x_8);
+x_10 = l_Nat_repr(x_1);
+x_11 = l_Lean_IR_VarId_HasToString___closed__1;
+x_12 = lean::string_append(x_11, x_10);
+lean::dec(x_10);
+x_14 = lean::string_append(x_9, x_12);
+lean::dec(x_12);
+x_16 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_17 = lean::string_append(x_14, x_16);
+x_18 = l_IO_println___rarg___closed__1;
+x_19 = lean::string_append(x_17, x_18);
+x_20 = lean::box(0);
+if (lean::is_scalar(x_7)) {
+ x_21 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_21 = x_7;
+}
+lean::cnstr_set(x_21, 0, x_20);
+lean::cnstr_set(x_21, 1, x_19);
+return x_21;
+}
+else
+{
+obj* x_23; obj* x_25; obj* x_27; obj* x_28; 
+lean::dec(x_1);
+x_23 = lean::cnstr_get(x_4, 0);
+x_25 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ x_27 = x_4;
+} else {
+ lean::inc(x_23);
+ lean::inc(x_25);
+ lean::dec(x_4);
+ x_27 = lean::box(0);
+}
+if (lean::is_scalar(x_27)) {
+ x_28 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_28 = x_27;
+}
+lean::cnstr_set(x_28, 0, x_23);
+lean::cnstr_set(x_28, 1, x_25);
+return x_28;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitIsShared___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Lean_IR_EmitCpp_emitIsShared(x_0, x_1, x_2, x_3);
+lean::dec(x_2);
+return x_4;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitIsTaggedPtr___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("!lean::is_scalar(");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitIsTaggedPtr(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Lean_IR_EmitCpp_emitLhs(x_0, x_2, x_3);
+if (lean::obj_tag(x_4) == 0)
+{
+obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_16; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; 
+x_5 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ x_7 = x_4;
+} else {
+ lean::inc(x_5);
+ lean::dec(x_4);
+ x_7 = lean::box(0);
+}
+x_8 = l_Lean_IR_EmitCpp_emitIsTaggedPtr___closed__1;
+x_9 = lean::string_append(x_5, x_8);
+x_10 = l_Nat_repr(x_1);
+x_11 = l_Lean_IR_VarId_HasToString___closed__1;
+x_12 = lean::string_append(x_11, x_10);
+lean::dec(x_10);
+x_14 = lean::string_append(x_9, x_12);
+lean::dec(x_12);
+x_16 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_17 = lean::string_append(x_14, x_16);
+x_18 = l_IO_println___rarg___closed__1;
+x_19 = lean::string_append(x_17, x_18);
+x_20 = lean::box(0);
+if (lean::is_scalar(x_7)) {
+ x_21 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_21 = x_7;
+}
+lean::cnstr_set(x_21, 0, x_20);
+lean::cnstr_set(x_21, 1, x_19);
+return x_21;
+}
+else
+{
+obj* x_23; obj* x_25; obj* x_27; obj* x_28; 
+lean::dec(x_1);
+x_23 = lean::cnstr_get(x_4, 0);
+x_25 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ x_27 = x_4;
+} else {
+ lean::inc(x_23);
+ lean::inc(x_25);
+ lean::dec(x_4);
+ x_27 = lean::box(0);
+}
+if (lean::is_scalar(x_27)) {
+ x_28 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_28 = x_27;
+}
+lean::cnstr_set(x_28, 0, x_23);
+lean::cnstr_set(x_28, 1, x_25);
+return x_28;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitIsTaggedPtr___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Lean_IR_EmitCpp_emitIsTaggedPtr(x_0, x_1, x_2, x_3);
+lean::dec(x_2);
+return x_4;
+}
+}
+obj* l_Lean_IR_EmitCpp_toHexDigit(obj* x_0) {
+_start:
+{
+uint32 x_1; obj* x_2; obj* x_3; 
+x_1 = l_Nat_digitChar(x_0);
+x_2 = l_String_splitAux___main___closed__1;
+x_3 = lean::string_push(x_2, x_1);
+return x_3;
+}
+}
+obj* l_Lean_IR_EmitCpp_toHexDigit___boxed(obj* x_0) {
+_start:
+{
+obj* x_1; 
+x_1 = l_Lean_IR_EmitCpp_toHexDigit(x_0);
+lean::dec(x_0);
+return x_1;
+}
+}
+obj* l_String_foldlAux___main___at_Lean_IR_EmitCpp_quoteString___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+uint8 x_4; 
+x_4 = lean::nat_dec_eq(x_2, x_1);
+if (x_4 == 0)
+{
+obj* x_5; uint32 x_6; uint32 x_8; uint8 x_9; 
+x_5 = lean::string_utf8_next(x_0, x_2);
+x_6 = lean::string_utf8_get(x_0, x_2);
+lean::dec(x_2);
+x_8 = 10;
+x_9 = x_6 == x_8;
+if (x_9 == 0)
+{
+uint32 x_10; uint8 x_11; 
+x_10 = 92;
+x_11 = x_6 == x_10;
+if (x_11 == 0)
+{
+uint32 x_12; uint8 x_13; 
+x_12 = 34;
+x_13 = x_6 == x_12;
+if (x_13 == 0)
+{
+obj* x_14; obj* x_15; uint8 x_16; 
+x_14 = lean::uint32_to_nat(x_6);
+x_15 = lean::mk_nat_obj(31ul);
+x_16 = lean::nat_dec_le(x_14, x_15);
+if (x_16 == 0)
+{
+obj* x_17; uint8 x_18; 
+x_17 = lean::mk_nat_obj(127ul);
+x_18 = lean::nat_dec_le(x_17, x_14);
+if (x_18 == 0)
+{
+obj* x_20; obj* x_21; obj* x_22; 
+lean::dec(x_14);
+x_20 = l_String_splitAux___main___closed__1;
+x_21 = lean::string_push(x_20, x_6);
+x_22 = lean::string_append(x_3, x_21);
+lean::dec(x_21);
+x_2 = x_5;
+x_3 = x_22;
+goto _start;
+}
+else
+{
+obj* x_25; obj* x_26; obj* x_27; obj* x_29; obj* x_30; obj* x_32; obj* x_34; obj* x_36; obj* x_38; 
+x_25 = lean::mk_nat_obj(16ul);
+x_26 = lean::nat_div(x_14, x_25);
+x_27 = l_Lean_IR_EmitCpp_toHexDigit(x_26);
+lean::dec(x_26);
+x_29 = l_Char_quoteCore___closed__1;
+x_30 = lean::string_append(x_29, x_27);
+lean::dec(x_27);
+x_32 = lean::nat_mod(x_14, x_25);
+lean::dec(x_14);
+x_34 = l_Lean_IR_EmitCpp_toHexDigit(x_32);
+lean::dec(x_32);
+x_36 = lean::string_append(x_30, x_34);
+lean::dec(x_34);
+x_38 = lean::string_append(x_3, x_36);
+lean::dec(x_36);
+x_2 = x_5;
+x_3 = x_38;
+goto _start;
+}
+}
+else
+{
+obj* x_41; obj* x_42; obj* x_43; obj* x_45; obj* x_46; obj* x_48; obj* x_50; obj* x_52; obj* x_54; 
+x_41 = lean::mk_nat_obj(16ul);
+x_42 = lean::nat_div(x_14, x_41);
+x_43 = l_Lean_IR_EmitCpp_toHexDigit(x_42);
+lean::dec(x_42);
+x_45 = l_Char_quoteCore___closed__1;
+x_46 = lean::string_append(x_45, x_43);
+lean::dec(x_43);
+x_48 = lean::nat_mod(x_14, x_41);
+lean::dec(x_14);
+x_50 = l_Lean_IR_EmitCpp_toHexDigit(x_48);
+lean::dec(x_48);
+x_52 = lean::string_append(x_46, x_50);
+lean::dec(x_50);
+x_54 = lean::string_append(x_3, x_52);
+lean::dec(x_52);
+x_2 = x_5;
+x_3 = x_54;
+goto _start;
+}
+}
+else
+{
+obj* x_57; obj* x_58; 
+x_57 = l_Char_quoteCore___closed__2;
+x_58 = lean::string_append(x_3, x_57);
+x_2 = x_5;
+x_3 = x_58;
+goto _start;
+}
+}
+else
+{
+obj* x_60; obj* x_61; 
+x_60 = l_Char_quoteCore___closed__3;
+x_61 = lean::string_append(x_3, x_60);
+x_2 = x_5;
+x_3 = x_61;
+goto _start;
+}
+}
+else
+{
+obj* x_63; obj* x_64; 
+x_63 = l_Char_quoteCore___closed__5;
+x_64 = lean::string_append(x_3, x_63);
+x_2 = x_5;
+x_3 = x_64;
+goto _start;
+}
+}
+else
+{
+lean::dec(x_2);
+return x_3;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_quoteString(obj* x_0) {
+_start:
+{
+obj* x_1; obj* x_2; obj* x_3; obj* x_4; obj* x_6; 
+x_1 = lean::string_utf8_byte_size(x_0);
+x_2 = lean::mk_nat_obj(0ul);
+x_3 = l_String_quote___closed__1;
+x_4 = l_String_foldlAux___main___at_Lean_IR_EmitCpp_quoteString___spec__1(x_0, x_1, x_2, x_3);
+lean::dec(x_1);
+x_6 = lean::string_append(x_4, x_3);
+return x_6;
+}
+}
+obj* l_String_foldlAux___main___at_Lean_IR_EmitCpp_quoteString___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_String_foldlAux___main___at_Lean_IR_EmitCpp_quoteString___spec__1(x_0, x_1, x_2, x_3);
+lean::dec(x_0);
 lean::dec(x_1);
 return x_4;
 }
 }
+obj* l_Lean_IR_EmitCpp_quoteString___boxed(obj* x_0) {
+_start:
+{
+obj* x_1; 
+x_1 = l_Lean_IR_EmitCpp_quoteString(x_0);
+lean::dec(x_0);
+return x_1;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitNumLit___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::mk_nat_obj(");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitNumLit___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::mpz(\"");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitNumLit(uint8 x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+uint8 x_4; 
+x_4 = l_Lean_IR_IRType_isObj___main(x_0);
+if (x_4 == 0)
+{
+obj* x_5; obj* x_7; obj* x_8; obj* x_9; obj* x_11; obj* x_12; 
+x_5 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ lean::cnstr_release(x_3, 0);
+ x_7 = x_3;
+} else {
+ lean::inc(x_5);
+ lean::dec(x_3);
+ x_7 = lean::box(0);
+}
+x_8 = l_Nat_repr(x_1);
+x_9 = lean::string_append(x_5, x_8);
+lean::dec(x_8);
+x_11 = lean::box(0);
+if (lean::is_scalar(x_7)) {
+ x_12 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_12 = x_7;
+}
+lean::cnstr_set(x_12, 0, x_11);
+lean::cnstr_set(x_12, 1, x_9);
+return x_12;
+}
+else
+{
+obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; uint8 x_19; 
+x_13 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ lean::cnstr_release(x_3, 0);
+ lean::cnstr_set(x_3, 1, lean::box(0));
+ x_15 = x_3;
+} else {
+ lean::inc(x_13);
+ lean::dec(x_3);
+ x_15 = lean::box(0);
+}
+x_16 = l_Lean_IR_EmitCpp_emitNumLit___closed__1;
+x_17 = lean::string_append(x_13, x_16);
+x_18 = l_uint32Sz;
+x_19 = lean::nat_dec_lt(x_1, x_18);
+if (x_19 == 0)
+{
+obj* x_20; obj* x_21; obj* x_22; obj* x_23; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; 
+x_20 = l_Lean_IR_EmitCpp_emitNumLit___closed__2;
+x_21 = lean::string_append(x_17, x_20);
+x_22 = l_Nat_repr(x_1);
+x_23 = lean::string_append(x_21, x_22);
+lean::dec(x_22);
+x_25 = l_String_quote___closed__1;
+x_26 = lean::string_append(x_23, x_25);
+x_27 = l_Option_HasRepr___rarg___closed__3;
+x_28 = lean::string_append(x_26, x_27);
+x_29 = lean::box(0);
+if (lean::is_scalar(x_15)) {
+ x_30 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_30 = x_15;
+}
+lean::cnstr_set(x_30, 0, x_29);
+lean::cnstr_set(x_30, 1, x_28);
+return x_30;
+}
+else
+{
+obj* x_31; obj* x_32; obj* x_34; obj* x_35; obj* x_36; obj* x_37; 
+x_31 = l_Nat_repr(x_1);
+x_32 = lean::string_append(x_17, x_31);
+lean::dec(x_31);
+x_34 = l_Option_HasRepr___rarg___closed__3;
+x_35 = lean::string_append(x_32, x_34);
+x_36 = lean::box(0);
+if (lean::is_scalar(x_15)) {
+ x_37 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_37 = x_15;
+}
+lean::cnstr_set(x_37, 0, x_36);
+lean::cnstr_set(x_37, 1, x_35);
+return x_37;
+}
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitNumLit___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+uint8 x_4; obj* x_5; 
+x_4 = lean::unbox(x_0);
+x_5 = l_Lean_IR_EmitCpp_emitNumLit(x_4, x_1, x_2, x_3);
+lean::dec(x_2);
+return x_5;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitLit___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean::mk_string(");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitLit(obj* x_0, uint8 x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; 
+x_5 = l_Lean_IR_EmitCpp_emitLhs(x_0, x_3, x_4);
+if (lean::obj_tag(x_5) == 0)
+{
+if (lean::obj_tag(x_2) == 0)
+{
+obj* x_6; obj* x_8; obj* x_9; obj* x_12; obj* x_13; obj* x_14; 
+x_6 = lean::cnstr_get(x_5, 1);
+if (lean::is_exclusive(x_5)) {
+ lean::cnstr_release(x_5, 0);
+ x_8 = x_5;
+} else {
+ lean::inc(x_6);
+ lean::dec(x_5);
+ x_8 = lean::box(0);
+}
+x_9 = lean::cnstr_get(x_2, 0);
+lean::inc(x_9);
+lean::dec(x_2);
+x_12 = lean::box(0);
+if (lean::is_scalar(x_8)) {
+ x_13 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_13 = x_8;
+}
+lean::cnstr_set(x_13, 0, x_12);
+lean::cnstr_set(x_13, 1, x_6);
+x_14 = l_Lean_IR_EmitCpp_emitNumLit(x_1, x_9, x_3, x_13);
+if (lean::obj_tag(x_14) == 0)
+{
+obj* x_15; obj* x_17; obj* x_18; obj* x_19; obj* x_20; obj* x_21; obj* x_22; 
+x_15 = lean::cnstr_get(x_14, 1);
+if (lean::is_exclusive(x_14)) {
+ lean::cnstr_release(x_14, 0);
+ x_17 = x_14;
+} else {
+ lean::inc(x_15);
+ lean::dec(x_14);
+ x_17 = lean::box(0);
+}
+x_18 = l_Lean_IR_EmitCpp_emitFnDeclAux___closed__2;
+x_19 = lean::string_append(x_15, x_18);
+x_20 = l_IO_println___rarg___closed__1;
+x_21 = lean::string_append(x_19, x_20);
+if (lean::is_scalar(x_17)) {
+ x_22 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_22 = x_17;
+}
+lean::cnstr_set(x_22, 0, x_12);
+lean::cnstr_set(x_22, 1, x_21);
+return x_22;
+}
+else
+{
+obj* x_23; obj* x_25; obj* x_27; obj* x_28; 
+x_23 = lean::cnstr_get(x_14, 0);
+x_25 = lean::cnstr_get(x_14, 1);
+if (lean::is_exclusive(x_14)) {
+ x_27 = x_14;
+} else {
+ lean::inc(x_23);
+ lean::inc(x_25);
+ lean::dec(x_14);
+ x_27 = lean::box(0);
+}
+if (lean::is_scalar(x_27)) {
+ x_28 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_28 = x_27;
+}
+lean::cnstr_set(x_28, 0, x_23);
+lean::cnstr_set(x_28, 1, x_25);
+return x_28;
+}
+}
+else
+{
+obj* x_29; obj* x_31; obj* x_32; obj* x_35; obj* x_36; obj* x_37; obj* x_39; obj* x_41; obj* x_42; obj* x_43; obj* x_44; obj* x_45; obj* x_46; 
+x_29 = lean::cnstr_get(x_5, 1);
+if (lean::is_exclusive(x_5)) {
+ lean::cnstr_release(x_5, 0);
+ x_31 = x_5;
+} else {
+ lean::inc(x_29);
+ lean::dec(x_5);
+ x_31 = lean::box(0);
+}
+x_32 = lean::cnstr_get(x_2, 0);
+lean::inc(x_32);
+lean::dec(x_2);
+x_35 = l_Lean_IR_EmitCpp_emitLit___closed__1;
+x_36 = lean::string_append(x_29, x_35);
+x_37 = l_Lean_IR_EmitCpp_quoteString(x_32);
+lean::dec(x_32);
+x_39 = lean::string_append(x_36, x_37);
+lean::dec(x_37);
+x_41 = l_Lean_IR_EmitCpp_emitInc___closed__2;
+x_42 = lean::string_append(x_39, x_41);
+x_43 = l_IO_println___rarg___closed__1;
+x_44 = lean::string_append(x_42, x_43);
+x_45 = lean::box(0);
+if (lean::is_scalar(x_31)) {
+ x_46 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_46 = x_31;
+}
+lean::cnstr_set(x_46, 0, x_45);
+lean::cnstr_set(x_46, 1, x_44);
+return x_46;
+}
+}
+else
+{
+obj* x_48; obj* x_50; obj* x_52; obj* x_53; 
+lean::dec(x_2);
+x_48 = lean::cnstr_get(x_5, 0);
+x_50 = lean::cnstr_get(x_5, 1);
+if (lean::is_exclusive(x_5)) {
+ x_52 = x_5;
+} else {
+ lean::inc(x_48);
+ lean::inc(x_50);
+ lean::dec(x_5);
+ x_52 = lean::box(0);
+}
+if (lean::is_scalar(x_52)) {
+ x_53 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_53 = x_52;
+}
+lean::cnstr_set(x_53, 0, x_48);
+lean::cnstr_set(x_53, 1, x_50);
+return x_53;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitLit___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+uint8 x_5; obj* x_6; 
+x_5 = lean::unbox(x_1);
+x_6 = l_Lean_IR_EmitCpp_emitLit(x_0, x_5, x_2, x_3, x_4);
+lean::dec(x_3);
+return x_6;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitVDecl(obj* x_0, uint8 x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+switch (lean::obj_tag(x_2)) {
+case 0:
+{
+obj* x_8; 
+lean::dec(x_3);
+lean::dec(x_0);
+lean::dec(x_2);
+x_8 = l_Lean_IR_EmitCpp_emitCtor___rarg(x_4);
+return x_8;
+}
+case 1:
+{
+obj* x_12; 
+lean::dec(x_3);
+lean::dec(x_0);
+lean::dec(x_2);
+x_12 = l_Lean_IR_EmitCpp_emitReset___rarg(x_4);
+return x_12;
+}
+case 2:
+{
+obj* x_16; 
+lean::dec(x_3);
+lean::dec(x_0);
+lean::dec(x_2);
+x_16 = l_Lean_IR_EmitCpp_emitReuse___rarg(x_4);
+return x_16;
+}
+case 3:
+{
+obj* x_17; obj* x_19; obj* x_22; 
+x_17 = lean::cnstr_get(x_2, 0);
+lean::inc(x_17);
+x_19 = lean::cnstr_get(x_2, 1);
+lean::inc(x_19);
+lean::dec(x_2);
+x_22 = l_Lean_IR_EmitCpp_emitProj(x_0, x_17, x_19, x_3, x_4);
+lean::dec(x_3);
+return x_22;
+}
+case 4:
+{
+obj* x_27; 
+lean::dec(x_3);
+lean::dec(x_0);
+lean::dec(x_2);
+x_27 = l_Lean_IR_EmitCpp_emitUProj___rarg(x_4);
+return x_27;
+}
+case 5:
+{
+obj* x_31; 
+lean::dec(x_3);
+lean::dec(x_0);
+lean::dec(x_2);
+x_31 = l_Lean_IR_EmitCpp_emitSProj___rarg(x_4);
+return x_31;
+}
+case 6:
+{
+obj* x_32; obj* x_34; obj* x_37; 
+x_32 = lean::cnstr_get(x_2, 0);
+lean::inc(x_32);
+x_34 = lean::cnstr_get(x_2, 1);
+lean::inc(x_34);
+lean::dec(x_2);
+x_37 = l_Lean_IR_EmitCpp_emitFullApp(x_0, x_32, x_34, x_3, x_4);
+lean::dec(x_34);
+return x_37;
+}
+case 7:
+{
+obj* x_39; obj* x_41; obj* x_44; 
+x_39 = lean::cnstr_get(x_2, 0);
+lean::inc(x_39);
+x_41 = lean::cnstr_get(x_2, 1);
+lean::inc(x_41);
+lean::dec(x_2);
+x_44 = l_Lean_IR_EmitCpp_emitPartialApp(x_0, x_39, x_41, x_3, x_4);
+lean::dec(x_41);
+return x_44;
+}
+case 8:
+{
+obj* x_49; 
+lean::dec(x_3);
+lean::dec(x_0);
+lean::dec(x_2);
+x_49 = l_Lean_IR_EmitCpp_emitApp___rarg(x_4);
+return x_49;
+}
+case 9:
+{
+uint8 x_50; obj* x_51; obj* x_54; 
+x_50 = lean::cnstr_get_scalar<uint8>(x_2, sizeof(void*)*1);
+x_51 = lean::cnstr_get(x_2, 0);
+lean::inc(x_51);
+lean::dec(x_2);
+x_54 = l_Lean_IR_EmitCpp_emitBox(x_0, x_51, x_50, x_3, x_4);
+lean::dec(x_3);
+return x_54;
+}
+case 10:
+{
+obj* x_56; obj* x_59; 
+x_56 = lean::cnstr_get(x_2, 0);
+lean::inc(x_56);
+lean::dec(x_2);
+x_59 = l_Lean_IR_EmitCpp_emitUnbox(x_0, x_1, x_56, x_3, x_4);
+lean::dec(x_3);
+return x_59;
+}
+case 11:
+{
+obj* x_61; obj* x_64; 
+x_61 = lean::cnstr_get(x_2, 0);
+lean::inc(x_61);
+lean::dec(x_2);
+x_64 = l_Lean_IR_EmitCpp_emitLit(x_0, x_1, x_61, x_3, x_4);
+lean::dec(x_3);
+return x_64;
+}
+case 12:
+{
+obj* x_66; obj* x_69; 
+x_66 = lean::cnstr_get(x_2, 0);
+lean::inc(x_66);
+lean::dec(x_2);
+x_69 = l_Lean_IR_EmitCpp_emitIsShared(x_0, x_66, x_3, x_4);
+lean::dec(x_3);
+return x_69;
+}
+default:
+{
+obj* x_71; obj* x_74; 
+x_71 = lean::cnstr_get(x_2, 0);
+lean::inc(x_71);
+lean::dec(x_2);
+x_74 = l_Lean_IR_EmitCpp_emitIsTaggedPtr(x_0, x_71, x_3, x_4);
+lean::dec(x_3);
+return x_74;
+}
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitVDecl___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+uint8 x_5; obj* x_6; 
+x_5 = lean::unbox(x_1);
+x_6 = l_Lean_IR_EmitCpp_emitVDecl(x_0, x_5, x_2, x_3, x_4);
+return x_6;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitBlock___main___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("return ");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitBlock___main___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("lean_unreachable();");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitBlock___main(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+switch (lean::obj_tag(x_1)) {
+case 0:
+{
+obj* x_4; uint8 x_6; obj* x_7; obj* x_9; obj* x_13; 
+x_4 = lean::cnstr_get(x_1, 0);
+lean::inc(x_4);
+x_6 = lean::cnstr_get_scalar<uint8>(x_1, sizeof(void*)*3);
+x_7 = lean::cnstr_get(x_1, 1);
+lean::inc(x_7);
+x_9 = lean::cnstr_get(x_1, 2);
+lean::inc(x_9);
+lean::dec(x_1);
+lean::inc(x_2);
+x_13 = l_Lean_IR_EmitCpp_emitVDecl(x_4, x_6, x_7, x_2, x_3);
+if (lean::obj_tag(x_13) == 0)
+{
+obj* x_14; obj* x_16; obj* x_17; obj* x_18; 
+x_14 = lean::cnstr_get(x_13, 1);
+if (lean::is_exclusive(x_13)) {
+ lean::cnstr_release(x_13, 0);
+ x_16 = x_13;
+} else {
+ lean::inc(x_14);
+ lean::dec(x_13);
+ x_16 = lean::box(0);
+}
+x_17 = lean::box(0);
+if (lean::is_scalar(x_16)) {
+ x_18 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_18 = x_16;
+}
+lean::cnstr_set(x_18, 0, x_17);
+lean::cnstr_set(x_18, 1, x_14);
+x_1 = x_9;
+x_3 = x_18;
+goto _start;
+}
+else
+{
+obj* x_23; obj* x_25; obj* x_27; obj* x_28; 
+lean::dec(x_9);
+lean::dec(x_0);
+lean::dec(x_2);
+x_23 = lean::cnstr_get(x_13, 0);
+x_25 = lean::cnstr_get(x_13, 1);
+if (lean::is_exclusive(x_13)) {
+ x_27 = x_13;
+} else {
+ lean::inc(x_23);
+ lean::inc(x_25);
+ lean::dec(x_13);
+ x_27 = lean::box(0);
+}
+if (lean::is_scalar(x_27)) {
+ x_28 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_28 = x_27;
+}
+lean::cnstr_set(x_28, 0, x_23);
+lean::cnstr_set(x_28, 1, x_25);
+return x_28;
+}
+}
+case 1:
+{
+obj* x_29; 
+x_29 = lean::cnstr_get(x_1, 3);
+lean::inc(x_29);
+lean::dec(x_1);
+x_1 = x_29;
+goto _start;
+}
+case 2:
+{
+obj* x_33; obj* x_35; obj* x_37; obj* x_39; obj* x_42; 
+x_33 = lean::cnstr_get(x_1, 0);
+lean::inc(x_33);
+x_35 = lean::cnstr_get(x_1, 1);
+lean::inc(x_35);
+x_37 = lean::cnstr_get(x_1, 2);
+lean::inc(x_37);
+x_39 = lean::cnstr_get(x_1, 3);
+lean::inc(x_39);
+lean::dec(x_1);
+x_42 = l_Lean_IR_EmitCpp_emitSet(x_33, x_35, x_37, x_2, x_3);
+if (lean::obj_tag(x_42) == 0)
+{
+obj* x_43; obj* x_45; obj* x_46; obj* x_47; 
+x_43 = lean::cnstr_get(x_42, 1);
+if (lean::is_exclusive(x_42)) {
+ lean::cnstr_release(x_42, 0);
+ x_45 = x_42;
+} else {
+ lean::inc(x_43);
+ lean::dec(x_42);
+ x_45 = lean::box(0);
+}
+x_46 = lean::box(0);
+if (lean::is_scalar(x_45)) {
+ x_47 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_47 = x_45;
+}
+lean::cnstr_set(x_47, 0, x_46);
+lean::cnstr_set(x_47, 1, x_43);
+x_1 = x_39;
+x_3 = x_47;
+goto _start;
+}
+else
+{
+obj* x_52; obj* x_54; obj* x_56; obj* x_57; 
+lean::dec(x_0);
+lean::dec(x_2);
+lean::dec(x_39);
+x_52 = lean::cnstr_get(x_42, 0);
+x_54 = lean::cnstr_get(x_42, 1);
+if (lean::is_exclusive(x_42)) {
+ x_56 = x_42;
+} else {
+ lean::inc(x_52);
+ lean::inc(x_54);
+ lean::dec(x_42);
+ x_56 = lean::box(0);
+}
+if (lean::is_scalar(x_56)) {
+ x_57 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_57 = x_56;
+}
+lean::cnstr_set(x_57, 0, x_52);
+lean::cnstr_set(x_57, 1, x_54);
+return x_57;
+}
+}
+case 3:
+{
+obj* x_58; obj* x_60; obj* x_62; obj* x_64; obj* x_67; 
+x_58 = lean::cnstr_get(x_1, 0);
+lean::inc(x_58);
+x_60 = lean::cnstr_get(x_1, 1);
+lean::inc(x_60);
+x_62 = lean::cnstr_get(x_1, 2);
+lean::inc(x_62);
+x_64 = lean::cnstr_get(x_1, 3);
+lean::inc(x_64);
+lean::dec(x_1);
+x_67 = l_Lean_IR_EmitCpp_emitUSet(x_58, x_60, x_62, x_2, x_3);
+if (lean::obj_tag(x_67) == 0)
+{
+obj* x_68; obj* x_70; obj* x_71; obj* x_72; 
+x_68 = lean::cnstr_get(x_67, 1);
+if (lean::is_exclusive(x_67)) {
+ lean::cnstr_release(x_67, 0);
+ x_70 = x_67;
+} else {
+ lean::inc(x_68);
+ lean::dec(x_67);
+ x_70 = lean::box(0);
+}
+x_71 = lean::box(0);
+if (lean::is_scalar(x_70)) {
+ x_72 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_72 = x_70;
+}
+lean::cnstr_set(x_72, 0, x_71);
+lean::cnstr_set(x_72, 1, x_68);
+x_1 = x_64;
+x_3 = x_72;
+goto _start;
+}
+else
+{
+obj* x_77; obj* x_79; obj* x_81; obj* x_82; 
+lean::dec(x_0);
+lean::dec(x_2);
+lean::dec(x_64);
+x_77 = lean::cnstr_get(x_67, 0);
+x_79 = lean::cnstr_get(x_67, 1);
+if (lean::is_exclusive(x_67)) {
+ x_81 = x_67;
+} else {
+ lean::inc(x_77);
+ lean::inc(x_79);
+ lean::dec(x_67);
+ x_81 = lean::box(0);
+}
+if (lean::is_scalar(x_81)) {
+ x_82 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_82 = x_81;
+}
+lean::cnstr_set(x_82, 0, x_77);
+lean::cnstr_set(x_82, 1, x_79);
+return x_82;
+}
+}
+case 4:
+{
+obj* x_83; obj* x_85; obj* x_87; obj* x_89; obj* x_91; obj* x_94; 
+x_83 = lean::cnstr_get(x_1, 0);
+lean::inc(x_83);
+x_85 = lean::cnstr_get(x_1, 1);
+lean::inc(x_85);
+x_87 = lean::cnstr_get(x_1, 2);
+lean::inc(x_87);
+x_89 = lean::cnstr_get(x_1, 3);
+lean::inc(x_89);
+x_91 = lean::cnstr_get(x_1, 4);
+lean::inc(x_91);
+lean::dec(x_1);
+x_94 = l_Lean_IR_EmitCpp_emitSSet(x_83, x_85, x_87, x_89, x_2, x_3);
+if (lean::obj_tag(x_94) == 0)
+{
+obj* x_95; obj* x_97; obj* x_98; obj* x_99; 
+x_95 = lean::cnstr_get(x_94, 1);
+if (lean::is_exclusive(x_94)) {
+ lean::cnstr_release(x_94, 0);
+ x_97 = x_94;
+} else {
+ lean::inc(x_95);
+ lean::dec(x_94);
+ x_97 = lean::box(0);
+}
+x_98 = lean::box(0);
+if (lean::is_scalar(x_97)) {
+ x_99 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_99 = x_97;
+}
+lean::cnstr_set(x_99, 0, x_98);
+lean::cnstr_set(x_99, 1, x_95);
+x_1 = x_91;
+x_3 = x_99;
+goto _start;
+}
+else
+{
+obj* x_104; obj* x_106; obj* x_108; obj* x_109; 
+lean::dec(x_0);
+lean::dec(x_2);
+lean::dec(x_91);
+x_104 = lean::cnstr_get(x_94, 0);
+x_106 = lean::cnstr_get(x_94, 1);
+if (lean::is_exclusive(x_94)) {
+ x_108 = x_94;
+} else {
+ lean::inc(x_104);
+ lean::inc(x_106);
+ lean::dec(x_94);
+ x_108 = lean::box(0);
+}
+if (lean::is_scalar(x_108)) {
+ x_109 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_109 = x_108;
+}
+lean::cnstr_set(x_109, 0, x_104);
+lean::cnstr_set(x_109, 1, x_106);
+return x_109;
+}
+}
+case 5:
+{
+obj* x_110; obj* x_112; obj* x_114; obj* x_117; 
+x_110 = lean::cnstr_get(x_1, 0);
+lean::inc(x_110);
+x_112 = lean::cnstr_get(x_1, 1);
+lean::inc(x_112);
+x_114 = lean::cnstr_get(x_1, 2);
+lean::inc(x_114);
+lean::dec(x_1);
+x_117 = l_Lean_IR_EmitCpp_emitRelease(x_110, x_112, x_2, x_3);
+if (lean::obj_tag(x_117) == 0)
+{
+obj* x_118; obj* x_120; obj* x_121; obj* x_122; 
+x_118 = lean::cnstr_get(x_117, 1);
+if (lean::is_exclusive(x_117)) {
+ lean::cnstr_release(x_117, 0);
+ x_120 = x_117;
+} else {
+ lean::inc(x_118);
+ lean::dec(x_117);
+ x_120 = lean::box(0);
+}
+x_121 = lean::box(0);
+if (lean::is_scalar(x_120)) {
+ x_122 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_122 = x_120;
+}
+lean::cnstr_set(x_122, 0, x_121);
+lean::cnstr_set(x_122, 1, x_118);
+x_1 = x_114;
+x_3 = x_122;
+goto _start;
+}
+else
+{
+obj* x_127; obj* x_129; obj* x_131; obj* x_132; 
+lean::dec(x_114);
+lean::dec(x_0);
+lean::dec(x_2);
+x_127 = lean::cnstr_get(x_117, 0);
+x_129 = lean::cnstr_get(x_117, 1);
+if (lean::is_exclusive(x_117)) {
+ x_131 = x_117;
+} else {
+ lean::inc(x_127);
+ lean::inc(x_129);
+ lean::dec(x_117);
+ x_131 = lean::box(0);
+}
+if (lean::is_scalar(x_131)) {
+ x_132 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_132 = x_131;
+}
+lean::cnstr_set(x_132, 0, x_127);
+lean::cnstr_set(x_132, 1, x_129);
+return x_132;
+}
+}
+case 6:
+{
+obj* x_133; obj* x_135; uint8 x_137; obj* x_138; obj* x_141; 
+x_133 = lean::cnstr_get(x_1, 0);
+lean::inc(x_133);
+x_135 = lean::cnstr_get(x_1, 1);
+lean::inc(x_135);
+x_137 = lean::cnstr_get_scalar<uint8>(x_1, sizeof(void*)*3);
+x_138 = lean::cnstr_get(x_1, 2);
+lean::inc(x_138);
+lean::dec(x_1);
+x_141 = l_Lean_IR_EmitCpp_emitInc(x_133, x_135, x_137, x_2, x_3);
+if (lean::obj_tag(x_141) == 0)
+{
+obj* x_142; obj* x_144; obj* x_145; obj* x_146; 
+x_142 = lean::cnstr_get(x_141, 1);
+if (lean::is_exclusive(x_141)) {
+ lean::cnstr_release(x_141, 0);
+ x_144 = x_141;
+} else {
+ lean::inc(x_142);
+ lean::dec(x_141);
+ x_144 = lean::box(0);
+}
+x_145 = lean::box(0);
+if (lean::is_scalar(x_144)) {
+ x_146 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_146 = x_144;
+}
+lean::cnstr_set(x_146, 0, x_145);
+lean::cnstr_set(x_146, 1, x_142);
+x_1 = x_138;
+x_3 = x_146;
+goto _start;
+}
+else
+{
+obj* x_151; obj* x_153; obj* x_155; obj* x_156; 
+lean::dec(x_138);
+lean::dec(x_0);
+lean::dec(x_2);
+x_151 = lean::cnstr_get(x_141, 0);
+x_153 = lean::cnstr_get(x_141, 1);
+if (lean::is_exclusive(x_141)) {
+ x_155 = x_141;
+} else {
+ lean::inc(x_151);
+ lean::inc(x_153);
+ lean::dec(x_141);
+ x_155 = lean::box(0);
+}
+if (lean::is_scalar(x_155)) {
+ x_156 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_156 = x_155;
+}
+lean::cnstr_set(x_156, 0, x_151);
+lean::cnstr_set(x_156, 1, x_153);
+return x_156;
+}
+}
+case 7:
+{
+obj* x_157; obj* x_159; uint8 x_161; obj* x_162; obj* x_165; 
+x_157 = lean::cnstr_get(x_1, 0);
+lean::inc(x_157);
+x_159 = lean::cnstr_get(x_1, 1);
+lean::inc(x_159);
+x_161 = lean::cnstr_get_scalar<uint8>(x_1, sizeof(void*)*3);
+x_162 = lean::cnstr_get(x_1, 2);
+lean::inc(x_162);
+lean::dec(x_1);
+x_165 = l_Lean_IR_EmitCpp_emitDec(x_157, x_159, x_161, x_2, x_3);
+if (lean::obj_tag(x_165) == 0)
+{
+obj* x_166; obj* x_168; obj* x_169; obj* x_170; 
+x_166 = lean::cnstr_get(x_165, 1);
+if (lean::is_exclusive(x_165)) {
+ lean::cnstr_release(x_165, 0);
+ x_168 = x_165;
+} else {
+ lean::inc(x_166);
+ lean::dec(x_165);
+ x_168 = lean::box(0);
+}
+x_169 = lean::box(0);
+if (lean::is_scalar(x_168)) {
+ x_170 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_170 = x_168;
+}
+lean::cnstr_set(x_170, 0, x_169);
+lean::cnstr_set(x_170, 1, x_166);
+x_1 = x_162;
+x_3 = x_170;
+goto _start;
+}
+else
+{
+obj* x_175; obj* x_177; obj* x_179; obj* x_180; 
+lean::dec(x_0);
+lean::dec(x_2);
+lean::dec(x_162);
+x_175 = lean::cnstr_get(x_165, 0);
+x_177 = lean::cnstr_get(x_165, 1);
+if (lean::is_exclusive(x_165)) {
+ x_179 = x_165;
+} else {
+ lean::inc(x_175);
+ lean::inc(x_177);
+ lean::dec(x_165);
+ x_179 = lean::box(0);
+}
+if (lean::is_scalar(x_179)) {
+ x_180 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_180 = x_179;
+}
+lean::cnstr_set(x_180, 0, x_175);
+lean::cnstr_set(x_180, 1, x_177);
+return x_180;
+}
+}
+case 8:
+{
+obj* x_181; 
+x_181 = lean::cnstr_get(x_1, 1);
+lean::inc(x_181);
+lean::dec(x_1);
+x_1 = x_181;
+goto _start;
+}
+case 9:
+{
+obj* x_185; obj* x_187; obj* x_190; 
+x_185 = lean::cnstr_get(x_1, 1);
+lean::inc(x_185);
+x_187 = lean::cnstr_get(x_1, 2);
+lean::inc(x_187);
+lean::dec(x_1);
+x_190 = l_Lean_IR_EmitCpp_emitCase(x_0, x_185, x_187, x_2, x_3);
+lean::dec(x_187);
+return x_190;
+}
+case 10:
+{
+obj* x_193; obj* x_196; obj* x_198; obj* x_199; obj* x_200; obj* x_201; obj* x_202; obj* x_203; 
+lean::dec(x_0);
+x_193 = lean::cnstr_get(x_1, 0);
+lean::inc(x_193);
+lean::dec(x_1);
+x_196 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ lean::cnstr_release(x_3, 0);
+ x_198 = x_3;
+} else {
+ lean::inc(x_196);
+ lean::dec(x_3);
+ x_198 = lean::box(0);
+}
+x_199 = l_Lean_IR_EmitCpp_emitBlock___main___closed__1;
+x_200 = lean::string_append(x_196, x_199);
+x_201 = lean::box(0);
+if (lean::is_scalar(x_198)) {
+ x_202 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_202 = x_198;
+}
+lean::cnstr_set(x_202, 0, x_201);
+lean::cnstr_set(x_202, 1, x_200);
+x_203 = l_Lean_IR_EmitCpp_emitArg(x_193, x_2, x_202);
+lean::dec(x_2);
+if (lean::obj_tag(x_203) == 0)
+{
+obj* x_205; obj* x_207; obj* x_208; obj* x_209; obj* x_210; obj* x_211; obj* x_212; 
+x_205 = lean::cnstr_get(x_203, 1);
+if (lean::is_exclusive(x_203)) {
+ lean::cnstr_release(x_203, 0);
+ x_207 = x_203;
+} else {
+ lean::inc(x_205);
+ lean::dec(x_203);
+ x_207 = lean::box(0);
+}
+x_208 = l_Lean_IR_EmitCpp_emitFnDeclAux___closed__2;
+x_209 = lean::string_append(x_205, x_208);
+x_210 = l_IO_println___rarg___closed__1;
+x_211 = lean::string_append(x_209, x_210);
+if (lean::is_scalar(x_207)) {
+ x_212 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_212 = x_207;
+}
+lean::cnstr_set(x_212, 0, x_201);
+lean::cnstr_set(x_212, 1, x_211);
+return x_212;
+}
+else
+{
+obj* x_213; obj* x_215; obj* x_217; obj* x_218; 
+x_213 = lean::cnstr_get(x_203, 0);
+x_215 = lean::cnstr_get(x_203, 1);
+if (lean::is_exclusive(x_203)) {
+ x_217 = x_203;
+} else {
+ lean::inc(x_213);
+ lean::inc(x_215);
+ lean::dec(x_203);
+ x_217 = lean::box(0);
+}
+if (lean::is_scalar(x_217)) {
+ x_218 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_218 = x_217;
+}
+lean::cnstr_set(x_218, 0, x_213);
+lean::cnstr_set(x_218, 1, x_215);
+return x_218;
+}
+}
+case 11:
+{
+obj* x_220; obj* x_222; obj* x_225; 
+lean::dec(x_0);
+x_220 = lean::cnstr_get(x_1, 0);
+lean::inc(x_220);
+x_222 = lean::cnstr_get(x_1, 1);
+lean::inc(x_222);
+lean::dec(x_1);
+x_225 = l_Lean_IR_EmitCpp_emitJmp(x_220, x_222, x_2, x_3);
+lean::dec(x_2);
+lean::dec(x_222);
+return x_225;
+}
+default:
+{
+obj* x_230; obj* x_232; obj* x_233; obj* x_234; obj* x_235; obj* x_236; obj* x_237; obj* x_238; 
+lean::dec(x_0);
+lean::dec(x_2);
+x_230 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ lean::cnstr_release(x_3, 0);
+ x_232 = x_3;
+} else {
+ lean::inc(x_230);
+ lean::dec(x_3);
+ x_232 = lean::box(0);
+}
+x_233 = l_Lean_IR_EmitCpp_emitBlock___main___closed__2;
+x_234 = lean::string_append(x_230, x_233);
+x_235 = l_IO_println___rarg___closed__1;
+x_236 = lean::string_append(x_234, x_235);
+x_237 = lean::box(0);
+if (lean::is_scalar(x_232)) {
+ x_238 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_238 = x_232;
+}
+lean::cnstr_set(x_238, 0, x_237);
+lean::cnstr_set(x_238, 1, x_236);
+return x_238;
+}
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitBlock(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Lean_IR_EmitCpp_emitBlock___main(x_0, x_1, x_2, x_3);
+return x_4;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitJPs___main(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+switch (lean::obj_tag(x_1)) {
+case 1:
+{
+obj* x_6; obj* x_8; obj* x_10; obj* x_13; obj* x_15; obj* x_16; obj* x_17; obj* x_18; obj* x_20; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_30; 
+x_6 = lean::cnstr_get(x_1, 0);
+lean::inc(x_6);
+x_8 = lean::cnstr_get(x_1, 2);
+lean::inc(x_8);
+x_10 = lean::cnstr_get(x_1, 3);
+lean::inc(x_10);
+lean::dec(x_1);
+x_13 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ lean::cnstr_release(x_3, 0);
+ x_15 = x_3;
+} else {
+ lean::inc(x_13);
+ lean::dec(x_3);
+ x_15 = lean::box(0);
+}
+x_16 = l_Nat_repr(x_6);
+x_17 = l_Lean_IR_JoinPointId_HasToString___closed__1;
+x_18 = lean::string_append(x_17, x_16);
+lean::dec(x_16);
+x_20 = lean::string_append(x_13, x_18);
+lean::dec(x_18);
+x_22 = l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___closed__2;
+x_23 = lean::string_append(x_20, x_22);
+x_24 = l_IO_println___rarg___closed__1;
+x_25 = lean::string_append(x_23, x_24);
+x_26 = lean::box(0);
+if (lean::is_scalar(x_15)) {
+ x_27 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_27 = x_15;
+}
+lean::cnstr_set(x_27, 0, x_26);
+lean::cnstr_set(x_27, 1, x_25);
+lean::inc(x_2);
+lean::inc(x_0);
+x_30 = lean::apply_3(x_0, x_8, x_2, x_27);
+if (lean::obj_tag(x_30) == 0)
+{
+obj* x_31; obj* x_33; obj* x_34; 
+x_31 = lean::cnstr_get(x_30, 1);
+if (lean::is_exclusive(x_30)) {
+ lean::cnstr_release(x_30, 0);
+ x_33 = x_30;
+} else {
+ lean::inc(x_31);
+ lean::dec(x_30);
+ x_33 = lean::box(0);
+}
+if (lean::is_scalar(x_33)) {
+ x_34 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_34 = x_33;
+}
+lean::cnstr_set(x_34, 0, x_26);
+lean::cnstr_set(x_34, 1, x_31);
+x_1 = x_10;
+x_3 = x_34;
+goto _start;
+}
+else
+{
+obj* x_39; obj* x_41; obj* x_43; obj* x_44; 
+lean::dec(x_0);
+lean::dec(x_2);
+lean::dec(x_10);
+x_39 = lean::cnstr_get(x_30, 0);
+x_41 = lean::cnstr_get(x_30, 1);
+if (lean::is_exclusive(x_30)) {
+ x_43 = x_30;
+} else {
+ lean::inc(x_39);
+ lean::inc(x_41);
+ lean::dec(x_30);
+ x_43 = lean::box(0);
+}
+if (lean::is_scalar(x_43)) {
+ x_44 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_44 = x_43;
+}
+lean::cnstr_set(x_44, 0, x_39);
+lean::cnstr_set(x_44, 1, x_41);
+return x_44;
+}
+}
+default:
+{
+obj* x_45; 
+x_45 = lean::box(0);
+x_4 = x_45;
+goto lbl_5;
+}
+}
+lbl_5:
+{
+uint8 x_47; 
+lean::dec(x_4);
+x_47 = l_Lean_IR_FnBody_isTerminal___main(x_1);
+if (x_47 == 0)
+{
+obj* x_48; 
+x_48 = l_Lean_IR_FnBody_body___main(x_1);
+lean::dec(x_1);
+x_1 = x_48;
+goto _start;
+}
+else
+{
+obj* x_54; obj* x_56; obj* x_57; obj* x_58; 
+lean::dec(x_1);
+lean::dec(x_0);
+lean::dec(x_2);
+x_54 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ lean::cnstr_release(x_3, 0);
+ x_56 = x_3;
+} else {
+ lean::inc(x_54);
+ lean::dec(x_3);
+ x_56 = lean::box(0);
+}
+x_57 = lean::box(0);
+if (lean::is_scalar(x_56)) {
+ x_58 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_58 = x_56;
+}
+lean::cnstr_set(x_58, 0, x_57);
+lean::cnstr_set(x_58, 1, x_54);
+return x_58;
+}
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitJPs(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Lean_IR_EmitCpp_emitJPs___main(x_0, x_1, x_2, x_3);
+return x_4;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitFnBody___main___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("{");
+return x_0;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitFnBody___main___closed__2() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::alloc_closure(reinterpret_cast<void*>(l_Lean_IR_EmitCpp_emitFnBody___main), 3, 0);
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitFnBody___main(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; obj* x_5; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; obj* x_11; uint8 x_12; obj* x_14; 
+x_3 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ lean::cnstr_release(x_2, 0);
+ x_5 = x_2;
+} else {
+ lean::inc(x_3);
+ lean::dec(x_2);
+ x_5 = lean::box(0);
+}
+x_6 = l_Lean_IR_EmitCpp_emitFnBody___main___closed__1;
+x_7 = lean::string_append(x_3, x_6);
+x_8 = l_IO_println___rarg___closed__1;
+x_9 = lean::string_append(x_7, x_8);
+x_10 = lean::box(0);
+if (lean::is_scalar(x_5)) {
+ x_11 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_11 = x_5;
+}
+lean::cnstr_set(x_11, 0, x_10);
+lean::cnstr_set(x_11, 1, x_9);
+x_12 = 0;
+lean::inc(x_0);
+x_14 = l_Lean_IR_EmitCpp_declareVars___main(x_0, x_12, x_1, x_11);
+if (lean::obj_tag(x_14) == 0)
+{
+obj* x_15; uint8 x_17; 
+x_15 = lean::cnstr_get(x_14, 0);
+lean::inc(x_15);
+x_17 = lean::unbox(x_15);
+if (x_17 == 0)
+{
+obj* x_18; obj* x_20; obj* x_21; obj* x_22; obj* x_25; 
+x_18 = lean::cnstr_get(x_14, 1);
+if (lean::is_exclusive(x_14)) {
+ lean::cnstr_release(x_14, 0);
+ x_20 = x_14;
+} else {
+ lean::inc(x_18);
+ lean::dec(x_14);
+ x_20 = lean::box(0);
+}
+if (lean::is_scalar(x_20)) {
+ x_21 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_21 = x_20;
+}
+lean::cnstr_set(x_21, 0, x_10);
+lean::cnstr_set(x_21, 1, x_18);
+x_22 = l_Lean_IR_EmitCpp_emitFnBody___main___closed__2;
+lean::inc(x_1);
+lean::inc(x_0);
+x_25 = l_Lean_IR_EmitCpp_emitBlock___main(x_22, x_0, x_1, x_21);
+if (lean::obj_tag(x_25) == 0)
+{
+obj* x_26; obj* x_28; obj* x_29; obj* x_30; 
+x_26 = lean::cnstr_get(x_25, 1);
+if (lean::is_exclusive(x_25)) {
+ lean::cnstr_release(x_25, 0);
+ x_28 = x_25;
+} else {
+ lean::inc(x_26);
+ lean::dec(x_25);
+ x_28 = lean::box(0);
+}
+if (lean::is_scalar(x_28)) {
+ x_29 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_29 = x_28;
+}
+lean::cnstr_set(x_29, 0, x_10);
+lean::cnstr_set(x_29, 1, x_26);
+x_30 = l_Lean_IR_EmitCpp_emitJPs___main(x_22, x_0, x_1, x_29);
+if (lean::obj_tag(x_30) == 0)
+{
+obj* x_31; obj* x_33; obj* x_34; obj* x_35; obj* x_36; obj* x_37; 
+x_31 = lean::cnstr_get(x_30, 1);
+if (lean::is_exclusive(x_30)) {
+ lean::cnstr_release(x_30, 0);
+ x_33 = x_30;
+} else {
+ lean::inc(x_31);
+ lean::dec(x_30);
+ x_33 = lean::box(0);
+}
+x_34 = l_Lean_IR_EmitCpp_closeNamespacesAux___main___closed__1;
+x_35 = lean::string_append(x_31, x_34);
+x_36 = lean::string_append(x_35, x_8);
+if (lean::is_scalar(x_33)) {
+ x_37 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_37 = x_33;
+}
+lean::cnstr_set(x_37, 0, x_10);
+lean::cnstr_set(x_37, 1, x_36);
+return x_37;
+}
+else
+{
+obj* x_38; obj* x_40; obj* x_42; obj* x_43; 
+x_38 = lean::cnstr_get(x_30, 0);
+x_40 = lean::cnstr_get(x_30, 1);
+if (lean::is_exclusive(x_30)) {
+ x_42 = x_30;
+} else {
+ lean::inc(x_38);
+ lean::inc(x_40);
+ lean::dec(x_30);
+ x_42 = lean::box(0);
+}
+if (lean::is_scalar(x_42)) {
+ x_43 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_43 = x_42;
+}
+lean::cnstr_set(x_43, 0, x_38);
+lean::cnstr_set(x_43, 1, x_40);
+return x_43;
+}
+}
+else
+{
+obj* x_46; obj* x_48; obj* x_50; obj* x_51; 
+lean::dec(x_1);
+lean::dec(x_0);
+x_46 = lean::cnstr_get(x_25, 0);
+x_48 = lean::cnstr_get(x_25, 1);
+if (lean::is_exclusive(x_25)) {
+ x_50 = x_25;
+} else {
+ lean::inc(x_46);
+ lean::inc(x_48);
+ lean::dec(x_25);
+ x_50 = lean::box(0);
+}
+if (lean::is_scalar(x_50)) {
+ x_51 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_51 = x_50;
+}
+lean::cnstr_set(x_51, 0, x_46);
+lean::cnstr_set(x_51, 1, x_48);
+return x_51;
+}
+}
+else
+{
+obj* x_52; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_62; 
+x_52 = lean::cnstr_get(x_14, 1);
+if (lean::is_exclusive(x_14)) {
+ lean::cnstr_release(x_14, 0);
+ x_54 = x_14;
+} else {
+ lean::inc(x_52);
+ lean::dec(x_14);
+ x_54 = lean::box(0);
+}
+x_55 = l_String_splitAux___main___closed__1;
+x_56 = lean::string_append(x_52, x_55);
+x_57 = lean::string_append(x_56, x_8);
+if (lean::is_scalar(x_54)) {
+ x_58 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_58 = x_54;
+}
+lean::cnstr_set(x_58, 0, x_10);
+lean::cnstr_set(x_58, 1, x_57);
+x_59 = l_Lean_IR_EmitCpp_emitFnBody___main___closed__2;
+lean::inc(x_1);
+lean::inc(x_0);
+x_62 = l_Lean_IR_EmitCpp_emitBlock___main(x_59, x_0, x_1, x_58);
+if (lean::obj_tag(x_62) == 0)
+{
+obj* x_63; obj* x_65; obj* x_66; obj* x_67; 
+x_63 = lean::cnstr_get(x_62, 1);
+if (lean::is_exclusive(x_62)) {
+ lean::cnstr_release(x_62, 0);
+ x_65 = x_62;
+} else {
+ lean::inc(x_63);
+ lean::dec(x_62);
+ x_65 = lean::box(0);
+}
+if (lean::is_scalar(x_65)) {
+ x_66 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_66 = x_65;
+}
+lean::cnstr_set(x_66, 0, x_10);
+lean::cnstr_set(x_66, 1, x_63);
+x_67 = l_Lean_IR_EmitCpp_emitJPs___main(x_59, x_0, x_1, x_66);
+if (lean::obj_tag(x_67) == 0)
+{
+obj* x_68; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; 
+x_68 = lean::cnstr_get(x_67, 1);
+if (lean::is_exclusive(x_67)) {
+ lean::cnstr_release(x_67, 0);
+ x_70 = x_67;
+} else {
+ lean::inc(x_68);
+ lean::dec(x_67);
+ x_70 = lean::box(0);
+}
+x_71 = l_Lean_IR_EmitCpp_closeNamespacesAux___main___closed__1;
+x_72 = lean::string_append(x_68, x_71);
+x_73 = lean::string_append(x_72, x_8);
+if (lean::is_scalar(x_70)) {
+ x_74 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_74 = x_70;
+}
+lean::cnstr_set(x_74, 0, x_10);
+lean::cnstr_set(x_74, 1, x_73);
+return x_74;
+}
+else
+{
+obj* x_75; obj* x_77; obj* x_79; obj* x_80; 
+x_75 = lean::cnstr_get(x_67, 0);
+x_77 = lean::cnstr_get(x_67, 1);
+if (lean::is_exclusive(x_67)) {
+ x_79 = x_67;
+} else {
+ lean::inc(x_75);
+ lean::inc(x_77);
+ lean::dec(x_67);
+ x_79 = lean::box(0);
+}
+if (lean::is_scalar(x_79)) {
+ x_80 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_80 = x_79;
+}
+lean::cnstr_set(x_80, 0, x_75);
+lean::cnstr_set(x_80, 1, x_77);
+return x_80;
+}
+}
+else
+{
+obj* x_83; obj* x_85; obj* x_87; obj* x_88; 
+lean::dec(x_1);
+lean::dec(x_0);
+x_83 = lean::cnstr_get(x_62, 0);
+x_85 = lean::cnstr_get(x_62, 1);
+if (lean::is_exclusive(x_62)) {
+ x_87 = x_62;
+} else {
+ lean::inc(x_83);
+ lean::inc(x_85);
+ lean::dec(x_62);
+ x_87 = lean::box(0);
+}
+if (lean::is_scalar(x_87)) {
+ x_88 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_88 = x_87;
+}
+lean::cnstr_set(x_88, 0, x_83);
+lean::cnstr_set(x_88, 1, x_85);
+return x_88;
+}
+}
+}
+else
+{
+obj* x_91; obj* x_93; obj* x_95; obj* x_96; 
+lean::dec(x_1);
+lean::dec(x_0);
+x_91 = lean::cnstr_get(x_14, 0);
+x_93 = lean::cnstr_get(x_14, 1);
+if (lean::is_exclusive(x_14)) {
+ x_95 = x_14;
+} else {
+ lean::inc(x_91);
+ lean::inc(x_93);
+ lean::dec(x_14);
+ x_95 = lean::box(0);
+}
+if (lean::is_scalar(x_95)) {
+ x_96 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_96 = x_95;
+}
+lean::cnstr_set(x_96, 0, x_91);
+lean::cnstr_set(x_96, 1, x_93);
+return x_96;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitFnBody(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_IR_EmitCpp_emitFnBody___main(x_0, x_1, x_2);
+return x_3;
+}
+}
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitDeclAux___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; uint8 x_6; 
+x_5 = lean::mk_nat_obj(0ul);
+x_6 = lean::nat_dec_eq(x_2, x_5);
+if (x_6 == 0)
+{
+obj* x_7; obj* x_8; obj* x_10; obj* x_11; obj* x_13; uint8 x_15; 
+x_7 = lean::mk_nat_obj(1ul);
+x_8 = lean::nat_sub(x_2, x_7);
+lean::dec(x_2);
+x_10 = lean::nat_sub(x_1, x_8);
+x_11 = lean::nat_sub(x_10, x_7);
+lean::dec(x_10);
+x_15 = lean::nat_dec_lt(x_5, x_11);
+if (x_15 == 0)
+{
+obj* x_16; 
+x_16 = lean::cnstr_get(x_4, 1);
+lean::inc(x_16);
+lean::dec(x_4);
+x_13 = x_16;
+goto lbl_14;
+}
+else
+{
+obj* x_19; obj* x_22; obj* x_23; 
+x_19 = lean::cnstr_get(x_4, 1);
+lean::inc(x_19);
+lean::dec(x_4);
+x_22 = l_List_reprAux___main___rarg___closed__1;
+x_23 = lean::string_append(x_19, x_22);
+x_13 = x_23;
+goto lbl_14;
+}
+lbl_14:
+{
+obj* x_24; obj* x_25; uint8 x_27; obj* x_28; obj* x_29; obj* x_31; obj* x_32; obj* x_33; obj* x_36; obj* x_37; obj* x_38; obj* x_40; obj* x_42; obj* x_43; 
+x_24 = l_Lean_IR_paramInh;
+x_25 = lean::array_get(x_24, x_0, x_11);
+lean::dec(x_11);
+x_27 = lean::cnstr_get_scalar<uint8>(x_25, sizeof(void*)*1 + 1);
+x_28 = l_Lean_IR_EmitCpp_toCppType___main(x_27);
+x_29 = lean::string_append(x_13, x_28);
+lean::dec(x_28);
+x_31 = l_Lean_IR_EmitCpp_emitFnDeclAux___closed__1;
+x_32 = lean::string_append(x_29, x_31);
+x_33 = lean::cnstr_get(x_25, 0);
+lean::inc(x_33);
+lean::dec(x_25);
+x_36 = l_Nat_repr(x_33);
+x_37 = l_Lean_IR_VarId_HasToString___closed__1;
+x_38 = lean::string_append(x_37, x_36);
+lean::dec(x_36);
+x_40 = lean::string_append(x_32, x_38);
+lean::dec(x_38);
+x_42 = lean::box(0);
+x_43 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_43, 0, x_42);
+lean::cnstr_set(x_43, 1, x_40);
+x_2 = x_8;
+x_4 = x_43;
+goto _start;
+}
+}
+else
+{
+obj* x_46; obj* x_48; obj* x_49; obj* x_50; 
+lean::dec(x_2);
+x_46 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ lean::cnstr_release(x_4, 0);
+ x_48 = x_4;
+} else {
+ lean::inc(x_46);
+ lean::dec(x_4);
+ x_48 = lean::box(0);
+}
+x_49 = lean::box(0);
+if (lean::is_scalar(x_48)) {
+ x_50 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_50 = x_48;
+}
+lean::cnstr_set(x_50, 0, x_49);
+lean::cnstr_set(x_50, 1, x_46);
+return x_50;
+}
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitDeclAux___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("_start:");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitDeclAux(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_4; 
+lean::inc(x_1);
+x_4 = l_Lean_IR_EmitCpp_getEnv(x_1, x_2);
+if (lean::obj_tag(x_4) == 0)
+{
+obj* x_5; obj* x_7; obj* x_9; obj* x_10; obj* x_12; obj* x_14; obj* x_15; obj* x_17; obj* x_20; uint8 x_21; uint8 x_24; 
+x_5 = lean::cnstr_get(x_4, 0);
+x_7 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ x_9 = x_4;
+} else {
+ lean::inc(x_5);
+ lean::inc(x_7);
+ lean::dec(x_4);
+ x_9 = lean::box(0);
+}
+x_10 = lean::box(0);
+lean::inc(x_7);
+if (lean::is_scalar(x_9)) {
+ x_12 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_12 = x_9;
+}
+lean::cnstr_set(x_12, 0, x_10);
+lean::cnstr_set(x_12, 1, x_7);
+lean::inc(x_0);
+x_14 = l_Lean_IR_mkVarJPMaps(x_0);
+x_15 = lean::cnstr_get(x_14, 0);
+lean::inc(x_15);
+x_17 = lean::cnstr_get(x_14, 1);
+lean::inc(x_17);
+lean::dec(x_14);
+x_20 = l_Lean_IR_Decl_name___main(x_0);
+x_21 = l_Lean_hasInitAttr(x_5, x_20);
+lean::dec(x_20);
+lean::dec(x_5);
+if (x_21 == 0)
+{
+uint8 x_26; 
+x_26 = 0;
+x_24 = x_26;
+goto lbl_25;
+}
+else
+{
+uint8 x_27; 
+x_27 = 1;
+x_24 = x_27;
+goto lbl_25;
+}
+lbl_25:
+{
+if (x_24 == 0)
+{
+if (lean::obj_tag(x_0) == 0)
+{
+uint8 x_29; obj* x_30; obj* x_32; obj* x_34; obj* x_37; obj* x_39; obj* x_41; obj* x_43; obj* x_45; obj* x_50; obj* x_52; 
+lean::dec(x_7);
+x_29 = lean::cnstr_get_scalar<uint8>(x_0, sizeof(void*)*3);
+x_30 = lean::cnstr_get(x_0, 0);
+lean::inc(x_30);
+x_32 = lean::cnstr_get(x_0, 1);
+lean::inc(x_32);
+x_34 = lean::cnstr_get(x_0, 2);
+lean::inc(x_34);
+lean::dec(x_0);
+x_37 = lean::cnstr_get(x_1, 0);
+x_39 = lean::cnstr_get(x_1, 1);
+x_41 = lean::cnstr_get(x_1, 4);
+x_43 = lean::cnstr_get(x_1, 5);
+if (lean::is_exclusive(x_1)) {
+ lean::cnstr_release(x_1, 2);
+ lean::cnstr_release(x_1, 3);
+ x_45 = x_1;
+} else {
+ lean::inc(x_37);
+ lean::inc(x_39);
+ lean::inc(x_41);
+ lean::inc(x_43);
+ lean::dec(x_1);
+ x_45 = lean::box(0);
+}
+lean::inc(x_17);
+lean::inc(x_15);
+lean::inc(x_39);
+lean::inc(x_37);
+if (lean::is_scalar(x_45)) {
+ x_50 = lean::alloc_cnstr(0, 6, 0);
+} else {
+ x_50 = x_45;
+}
+lean::cnstr_set(x_50, 0, x_37);
+lean::cnstr_set(x_50, 1, x_39);
+lean::cnstr_set(x_50, 2, x_15);
+lean::cnstr_set(x_50, 3, x_17);
+lean::cnstr_set(x_50, 4, x_41);
+lean::cnstr_set(x_50, 5, x_43);
+lean::inc(x_50);
+x_52 = l_Lean_IR_EmitCpp_openNamespacesFor(x_30, x_50, x_12);
+if (lean::obj_tag(x_52) == 0)
+{
+obj* x_53; obj* x_55; obj* x_56; obj* x_57; obj* x_61; 
+x_53 = lean::cnstr_get(x_52, 1);
+if (lean::is_exclusive(x_52)) {
+ lean::cnstr_release(x_52, 0);
+ x_55 = x_52;
+} else {
+ lean::inc(x_53);
+ lean::dec(x_52);
+ x_55 = lean::box(0);
+}
+if (lean::is_scalar(x_55)) {
+ x_56 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_56 = x_55;
+}
+lean::cnstr_set(x_56, 0, x_10);
+lean::cnstr_set(x_56, 1, x_53);
+lean::inc(x_50);
+lean::inc(x_30);
+x_61 = l_Lean_IR_EmitCpp_toBaseCppName(x_30, x_50, x_56);
+if (lean::obj_tag(x_61) == 0)
+{
+obj* x_62; obj* x_64; obj* x_66; obj* x_67; obj* x_68; obj* x_70; obj* x_71; obj* x_72; obj* x_73; uint8 x_74; 
+x_62 = lean::cnstr_get(x_61, 0);
+x_64 = lean::cnstr_get(x_61, 1);
+if (lean::is_exclusive(x_61)) {
+ lean::cnstr_set(x_61, 0, lean::box(0));
+ lean::cnstr_set(x_61, 1, lean::box(0));
+ x_66 = x_61;
+} else {
+ lean::inc(x_62);
+ lean::inc(x_64);
+ lean::dec(x_61);
+ x_66 = lean::box(0);
+}
+x_67 = l_Lean_IR_EmitCpp_toCppType___main(x_29);
+x_68 = lean::string_append(x_64, x_67);
+lean::dec(x_67);
+x_70 = l_Lean_IR_EmitCpp_emitFnDeclAux___closed__1;
+x_71 = lean::string_append(x_68, x_70);
+x_72 = lean::array_get_size(x_32);
+x_73 = lean::mk_nat_obj(0ul);
+x_74 = lean::nat_dec_lt(x_73, x_72);
+if (x_74 == 0)
+{
+obj* x_77; obj* x_78; obj* x_80; obj* x_81; obj* x_82; 
+lean::dec(x_66);
+lean::dec(x_72);
+x_77 = l_Lean_IR_EmitCpp_toCppInitName___closed__1;
+x_78 = lean::string_append(x_77, x_62);
+lean::dec(x_62);
+x_80 = l_Unit_HasRepr___closed__1;
+x_81 = lean::string_append(x_78, x_80);
+x_82 = lean::string_append(x_71, x_81);
+lean::dec(x_81);
+x_57 = x_82;
+goto lbl_58;
+}
+else
+{
+obj* x_84; obj* x_86; obj* x_87; obj* x_88; obj* x_90; 
+x_84 = lean::string_append(x_71, x_62);
+lean::dec(x_62);
+x_86 = l_Prod_HasRepr___rarg___closed__1;
+x_87 = lean::string_append(x_84, x_86);
+if (lean::is_scalar(x_66)) {
+ x_88 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_88 = x_66;
+}
+lean::cnstr_set(x_88, 0, x_10);
+lean::cnstr_set(x_88, 1, x_87);
+lean::inc(x_72);
+x_90 = l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitDeclAux___spec__1(x_32, x_72, x_72, x_50, x_88);
+lean::dec(x_72);
+if (lean::obj_tag(x_90) == 0)
+{
+obj* x_92; obj* x_95; obj* x_96; 
+x_92 = lean::cnstr_get(x_90, 1);
+lean::inc(x_92);
+lean::dec(x_90);
+x_95 = l_Option_HasRepr___rarg___closed__3;
+x_96 = lean::string_append(x_92, x_95);
+x_57 = x_96;
+goto lbl_58;
+}
+else
+{
+obj* x_105; obj* x_107; obj* x_109; obj* x_110; 
+lean::dec(x_15);
+lean::dec(x_30);
+lean::dec(x_32);
+lean::dec(x_17);
+lean::dec(x_34);
+lean::dec(x_50);
+lean::dec(x_37);
+lean::dec(x_39);
+x_105 = lean::cnstr_get(x_90, 0);
+x_107 = lean::cnstr_get(x_90, 1);
+if (lean::is_exclusive(x_90)) {
+ x_109 = x_90;
+} else {
+ lean::inc(x_105);
+ lean::inc(x_107);
+ lean::dec(x_90);
+ x_109 = lean::box(0);
+}
+if (lean::is_scalar(x_109)) {
+ x_110 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_110 = x_109;
+}
+lean::cnstr_set(x_110, 0, x_105);
+lean::cnstr_set(x_110, 1, x_107);
+return x_110;
+}
+}
+}
+else
+{
+obj* x_119; obj* x_121; obj* x_123; obj* x_124; 
+lean::dec(x_15);
+lean::dec(x_30);
+lean::dec(x_32);
+lean::dec(x_17);
+lean::dec(x_34);
+lean::dec(x_50);
+lean::dec(x_37);
+lean::dec(x_39);
+x_119 = lean::cnstr_get(x_61, 0);
+x_121 = lean::cnstr_get(x_61, 1);
+if (lean::is_exclusive(x_61)) {
+ x_123 = x_61;
+} else {
+ lean::inc(x_119);
+ lean::inc(x_121);
+ lean::dec(x_61);
+ x_123 = lean::box(0);
+}
+if (lean::is_scalar(x_123)) {
+ x_124 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_124 = x_123;
+}
+lean::cnstr_set(x_124, 0, x_119);
+lean::cnstr_set(x_124, 1, x_121);
+return x_124;
+}
+lbl_58:
+{
+obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_134; obj* x_135; 
+x_125 = l_Lean_IR_EmitCpp_openNamespacesAux___main___closed__2;
+x_126 = lean::string_append(x_57, x_125);
+x_127 = l_IO_println___rarg___closed__1;
+x_128 = lean::string_append(x_126, x_127);
+x_129 = l_Lean_IR_EmitCpp_emitDeclAux___closed__1;
+x_130 = lean::string_append(x_128, x_129);
+x_131 = lean::string_append(x_130, x_127);
+x_132 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_132, 0, x_10);
+lean::cnstr_set(x_132, 1, x_131);
+lean::inc(x_30);
+x_134 = lean::alloc_cnstr(0, 6, 0);
+lean::cnstr_set(x_134, 0, x_37);
+lean::cnstr_set(x_134, 1, x_39);
+lean::cnstr_set(x_134, 2, x_15);
+lean::cnstr_set(x_134, 3, x_17);
+lean::cnstr_set(x_134, 4, x_30);
+lean::cnstr_set(x_134, 5, x_32);
+x_135 = l_Lean_IR_EmitCpp_emitFnBody___main(x_34, x_134, x_132);
+if (lean::obj_tag(x_135) == 0)
+{
+obj* x_136; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_143; 
+x_136 = lean::cnstr_get(x_135, 1);
+if (lean::is_exclusive(x_135)) {
+ lean::cnstr_release(x_135, 0);
+ x_138 = x_135;
+} else {
+ lean::inc(x_136);
+ lean::dec(x_135);
+ x_138 = lean::box(0);
+}
+x_139 = l_Lean_IR_EmitCpp_closeNamespacesAux___main___closed__1;
+x_140 = lean::string_append(x_136, x_139);
+x_141 = lean::string_append(x_140, x_127);
+if (lean::is_scalar(x_138)) {
+ x_142 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_142 = x_138;
+}
+lean::cnstr_set(x_142, 0, x_10);
+lean::cnstr_set(x_142, 1, x_141);
+x_143 = l_Lean_IR_EmitCpp_closeNamespacesFor(x_30, x_50, x_142);
+lean::dec(x_30);
+return x_143;
+}
+else
+{
+obj* x_147; obj* x_149; obj* x_151; obj* x_152; 
+lean::dec(x_30);
+lean::dec(x_50);
+x_147 = lean::cnstr_get(x_135, 0);
+x_149 = lean::cnstr_get(x_135, 1);
+if (lean::is_exclusive(x_135)) {
+ x_151 = x_135;
+} else {
+ lean::inc(x_147);
+ lean::inc(x_149);
+ lean::dec(x_135);
+ x_151 = lean::box(0);
+}
+if (lean::is_scalar(x_151)) {
+ x_152 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_152 = x_151;
+}
+lean::cnstr_set(x_152, 0, x_147);
+lean::cnstr_set(x_152, 1, x_149);
+return x_152;
+}
+}
+}
+else
+{
+obj* x_161; obj* x_163; obj* x_165; obj* x_166; 
+lean::dec(x_15);
+lean::dec(x_30);
+lean::dec(x_32);
+lean::dec(x_17);
+lean::dec(x_34);
+lean::dec(x_50);
+lean::dec(x_37);
+lean::dec(x_39);
+x_161 = lean::cnstr_get(x_52, 0);
+x_163 = lean::cnstr_get(x_52, 1);
+if (lean::is_exclusive(x_52)) {
+ x_165 = x_52;
+} else {
+ lean::inc(x_161);
+ lean::inc(x_163);
+ lean::dec(x_52);
+ x_165 = lean::box(0);
+}
+if (lean::is_scalar(x_165)) {
+ x_166 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_166 = x_165;
+}
+lean::cnstr_set(x_166, 0, x_161);
+lean::cnstr_set(x_166, 1, x_163);
+return x_166;
+}
+}
+else
+{
+obj* x_172; 
+lean::dec(x_15);
+lean::dec(x_1);
+lean::dec(x_0);
+lean::dec(x_12);
+lean::dec(x_17);
+x_172 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_172, 0, x_10);
+lean::cnstr_set(x_172, 1, x_7);
+return x_172;
+}
+}
+else
+{
+obj* x_178; 
+lean::dec(x_15);
+lean::dec(x_1);
+lean::dec(x_0);
+lean::dec(x_12);
+lean::dec(x_17);
+x_178 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_178, 0, x_10);
+lean::cnstr_set(x_178, 1, x_7);
+return x_178;
+}
+}
+}
+else
+{
+obj* x_181; obj* x_183; obj* x_185; obj* x_186; 
+lean::dec(x_1);
+lean::dec(x_0);
+x_181 = lean::cnstr_get(x_4, 0);
+x_183 = lean::cnstr_get(x_4, 1);
+if (lean::is_exclusive(x_4)) {
+ x_185 = x_4;
+} else {
+ lean::inc(x_181);
+ lean::inc(x_183);
+ lean::dec(x_4);
+ x_185 = lean::box(0);
+}
+if (lean::is_scalar(x_185)) {
+ x_186 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_186 = x_185;
+}
+lean::cnstr_set(x_186, 0, x_181);
+lean::cnstr_set(x_186, 1, x_183);
+return x_186;
+}
+}
+}
+obj* l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitDeclAux___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
+_start:
+{
+obj* x_5; 
+x_5 = l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitDeclAux___spec__1(x_0, x_1, x_2, x_3, x_4);
+lean::dec(x_0);
+lean::dec(x_1);
+lean::dec(x_3);
+return x_5;
+}
+}
+obj* _init_l_Lean_IR_EmitCpp_emitDecl___closed__1() {
+_start:
+{
+obj* x_0; 
+x_0 = lean::mk_string("\ncompiling:\n");
+return x_0;
+}
+}
+obj* l_Lean_IR_EmitCpp_emitDecl(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; obj* x_5; 
+x_3 = l_Lean_IR_Decl_normalizeIds(x_0);
+lean::inc(x_3);
+x_5 = l_Lean_IR_EmitCpp_emitDeclAux(x_3, x_1, x_2);
+if (lean::obj_tag(x_5) == 0)
+{
+lean::dec(x_3);
+return x_5;
+}
+else
+{
+obj* x_7; obj* x_9; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_15; obj* x_17; 
+x_7 = lean::cnstr_get(x_5, 0);
+x_9 = lean::cnstr_get(x_5, 1);
+if (lean::is_exclusive(x_5)) {
+ x_11 = x_5;
+} else {
+ lean::inc(x_7);
+ lean::inc(x_9);
+ lean::dec(x_5);
+ x_11 = lean::box(0);
+}
+x_12 = l_Lean_IR_EmitCpp_emitDecl___closed__1;
+x_13 = lean::string_append(x_7, x_12);
+x_14 = lean::ir::decl_to_string_core(x_3);
+x_15 = lean::string_append(x_13, x_14);
+lean::dec(x_14);
+if (lean::is_scalar(x_11)) {
+ x_17 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_17 = x_11;
+}
+lean::cnstr_set(x_17, 0, x_15);
+lean::cnstr_set(x_17, 1, x_9);
+return x_17;
+}
+}
+}
+obj* l_List_mfor___main___at_Lean_IR_EmitCpp_emitFns___spec__1(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+if (lean::obj_tag(x_0) == 0)
+{
+obj* x_4; obj* x_6; obj* x_7; obj* x_8; 
+lean::dec(x_1);
+x_4 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ lean::cnstr_release(x_2, 0);
+ x_6 = x_2;
+} else {
+ lean::inc(x_4);
+ lean::dec(x_2);
+ x_6 = lean::box(0);
+}
+x_7 = lean::box(0);
+if (lean::is_scalar(x_6)) {
+ x_8 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_8 = x_6;
+}
+lean::cnstr_set(x_8, 0, x_7);
+lean::cnstr_set(x_8, 1, x_4);
+return x_8;
+}
+else
+{
+obj* x_9; obj* x_11; obj* x_15; 
+x_9 = lean::cnstr_get(x_0, 0);
+lean::inc(x_9);
+x_11 = lean::cnstr_get(x_0, 1);
+lean::inc(x_11);
+lean::dec(x_0);
+lean::inc(x_1);
+x_15 = l_Lean_IR_EmitCpp_emitDecl(x_9, x_1, x_2);
+if (lean::obj_tag(x_15) == 0)
+{
+obj* x_16; obj* x_18; obj* x_19; obj* x_20; 
+x_16 = lean::cnstr_get(x_15, 1);
+if (lean::is_exclusive(x_15)) {
+ lean::cnstr_release(x_15, 0);
+ x_18 = x_15;
+} else {
+ lean::inc(x_16);
+ lean::dec(x_15);
+ x_18 = lean::box(0);
+}
+x_19 = lean::box(0);
+if (lean::is_scalar(x_18)) {
+ x_20 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_20 = x_18;
+}
+lean::cnstr_set(x_20, 0, x_19);
+lean::cnstr_set(x_20, 1, x_16);
+x_0 = x_11;
+x_2 = x_20;
+goto _start;
+}
+else
+{
+obj* x_24; obj* x_26; obj* x_28; obj* x_29; 
+lean::dec(x_1);
+lean::dec(x_11);
+x_24 = lean::cnstr_get(x_15, 0);
+x_26 = lean::cnstr_get(x_15, 1);
+if (lean::is_exclusive(x_15)) {
+ x_28 = x_15;
+} else {
+ lean::inc(x_24);
+ lean::inc(x_26);
+ lean::dec(x_15);
+ x_28 = lean::box(0);
+}
+if (lean::is_scalar(x_28)) {
+ x_29 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_29 = x_28;
+}
+lean::cnstr_set(x_29, 0, x_24);
+lean::cnstr_set(x_29, 1, x_26);
+return x_29;
+}
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_emitFns(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_3; 
+lean::inc(x_0);
+x_3 = l_Lean_IR_EmitCpp_getEnv(x_0, x_1);
+if (lean::obj_tag(x_3) == 0)
+{
+obj* x_4; obj* x_6; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_14; obj* x_15; 
+x_4 = lean::cnstr_get(x_3, 0);
+x_6 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ x_8 = x_3;
+} else {
+ lean::inc(x_4);
+ lean::inc(x_6);
+ lean::dec(x_3);
+ x_8 = lean::box(0);
+}
+x_9 = lean::box(0);
+if (lean::is_scalar(x_8)) {
+ x_10 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_10 = x_8;
+}
+lean::cnstr_set(x_10, 0, x_9);
+lean::cnstr_set(x_10, 1, x_6);
+x_11 = l_Lean_IR_declMapExt;
+x_12 = l_Lean_PersistentEnvExtension_getEntries___rarg(x_11, x_4);
+lean::dec(x_4);
+x_14 = l_List_reverse___rarg(x_12);
+x_15 = l_List_mfor___main___at_Lean_IR_EmitCpp_emitFns___spec__1(x_14, x_0, x_10);
+return x_15;
+}
+else
+{
+obj* x_17; obj* x_19; obj* x_21; obj* x_22; 
+lean::dec(x_0);
+x_17 = lean::cnstr_get(x_3, 0);
+x_19 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ x_21 = x_3;
+} else {
+ lean::inc(x_17);
+ lean::inc(x_19);
+ lean::dec(x_3);
+ x_21 = lean::box(0);
+}
+if (lean::is_scalar(x_21)) {
+ x_22 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_22 = x_21;
+}
+lean::cnstr_set(x_22, 0, x_17);
+lean::cnstr_set(x_22, 1, x_19);
+return x_22;
+}
+}
+}
+obj* l_Lean_IR_EmitCpp_main(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_3; 
+lean::inc(x_0);
+x_3 = l_Lean_IR_EmitCpp_emitFileHeader(x_0, x_1);
+if (lean::obj_tag(x_3) == 0)
+{
+obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_10; 
+x_4 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ lean::cnstr_release(x_3, 0);
+ x_6 = x_3;
+} else {
+ lean::inc(x_4);
+ lean::dec(x_3);
+ x_6 = lean::box(0);
+}
+x_7 = lean::box(0);
+if (lean::is_scalar(x_6)) {
+ x_8 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_8 = x_6;
+}
+lean::cnstr_set(x_8, 0, x_7);
+lean::cnstr_set(x_8, 1, x_4);
+lean::inc(x_0);
+x_10 = l_Lean_IR_EmitCpp_emitFnDecls(x_0, x_8);
+if (lean::obj_tag(x_10) == 0)
+{
+obj* x_11; obj* x_13; obj* x_14; obj* x_16; 
+x_11 = lean::cnstr_get(x_10, 1);
+if (lean::is_exclusive(x_10)) {
+ lean::cnstr_release(x_10, 0);
+ x_13 = x_10;
+} else {
+ lean::inc(x_11);
+ lean::dec(x_10);
+ x_13 = lean::box(0);
+}
+if (lean::is_scalar(x_13)) {
+ x_14 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_14 = x_13;
+}
+lean::cnstr_set(x_14, 0, x_7);
+lean::cnstr_set(x_14, 1, x_11);
+lean::inc(x_0);
+x_16 = l_Lean_IR_EmitCpp_emitFns(x_0, x_14);
+if (lean::obj_tag(x_16) == 0)
+{
+obj* x_17; obj* x_19; obj* x_20; obj* x_21; 
+x_17 = lean::cnstr_get(x_16, 1);
+if (lean::is_exclusive(x_16)) {
+ lean::cnstr_release(x_16, 0);
+ x_19 = x_16;
+} else {
+ lean::inc(x_17);
+ lean::dec(x_16);
+ x_19 = lean::box(0);
+}
+if (lean::is_scalar(x_19)) {
+ x_20 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_20 = x_19;
+}
+lean::cnstr_set(x_20, 0, x_7);
+lean::cnstr_set(x_20, 1, x_17);
+x_21 = l_Lean_IR_EmitCpp_emitMainFnIfNeeded(x_0, x_20);
+return x_21;
+}
+else
+{
+obj* x_23; obj* x_25; obj* x_27; obj* x_28; 
+lean::dec(x_0);
+x_23 = lean::cnstr_get(x_16, 0);
+x_25 = lean::cnstr_get(x_16, 1);
+if (lean::is_exclusive(x_16)) {
+ x_27 = x_16;
+} else {
+ lean::inc(x_23);
+ lean::inc(x_25);
+ lean::dec(x_16);
+ x_27 = lean::box(0);
+}
+if (lean::is_scalar(x_27)) {
+ x_28 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_28 = x_27;
+}
+lean::cnstr_set(x_28, 0, x_23);
+lean::cnstr_set(x_28, 1, x_25);
+return x_28;
+}
+}
+else
+{
+obj* x_30; obj* x_32; obj* x_34; obj* x_35; 
+lean::dec(x_0);
+x_30 = lean::cnstr_get(x_10, 0);
+x_32 = lean::cnstr_get(x_10, 1);
+if (lean::is_exclusive(x_10)) {
+ x_34 = x_10;
+} else {
+ lean::inc(x_30);
+ lean::inc(x_32);
+ lean::dec(x_10);
+ x_34 = lean::box(0);
+}
+if (lean::is_scalar(x_34)) {
+ x_35 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_35 = x_34;
+}
+lean::cnstr_set(x_35, 0, x_30);
+lean::cnstr_set(x_35, 1, x_32);
+return x_35;
+}
+}
+else
+{
+obj* x_37; obj* x_39; obj* x_41; obj* x_42; 
+lean::dec(x_0);
+x_37 = lean::cnstr_get(x_3, 0);
+x_39 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ x_41 = x_3;
+} else {
+ lean::inc(x_37);
+ lean::inc(x_39);
+ lean::dec(x_3);
+ x_41 = lean::box(0);
+}
+if (lean::is_scalar(x_41)) {
+ x_42 = lean::alloc_cnstr(1, 2, 0);
+} else {
+ x_42 = x_41;
+}
+lean::cnstr_set(x_42, 0, x_37);
+lean::cnstr_set(x_42, 1, x_39);
+return x_42;
+}
+}
+}
 obj* _init_l_Lean_IR_emitCpp___closed__1() {
 _start:
 {
@@ -1219,15 +11632,16 @@ obj* emit_cpp_core(obj* x_0, obj* x_1) {
 _start:
 {
 obj* x_2; obj* x_3; obj* x_4; obj* x_5; obj* x_6; obj* x_7; 
-x_2 = lean::box(0);
+x_2 = l_HashMap_Inhabited___closed__1;
 x_3 = lean::box(0);
 x_4 = l_Array_empty___closed__1;
-x_5 = lean::alloc_cnstr(0, 5, 0);
+x_5 = lean::alloc_cnstr(0, 6, 0);
 lean::cnstr_set(x_5, 0, x_0);
-lean::cnstr_set(x_5, 1, x_2);
-lean::cnstr_set(x_5, 2, x_1);
-lean::cnstr_set(x_5, 3, x_3);
-lean::cnstr_set(x_5, 4, x_4);
+lean::cnstr_set(x_5, 1, x_1);
+lean::cnstr_set(x_5, 2, x_2);
+lean::cnstr_set(x_5, 3, x_2);
+lean::cnstr_set(x_5, 4, x_3);
+lean::cnstr_set(x_5, 5, x_4);
 x_6 = l_Lean_IR_emitCpp___closed__1;
 x_7 = l_Lean_IR_EmitCpp_main(x_5, x_6);
 if (lean::obj_tag(x_7) == 0)
@@ -1255,8 +11669,10 @@ return x_15;
 }}
 obj* initialize_init_control_conditional(obj*);
 obj* initialize_init_lean_name__mangling(obj*);
+obj* initialize_init_lean_compiler_initattr(obj*);
 obj* initialize_init_lean_compiler_ir_compilerm(obj*);
 obj* initialize_init_lean_compiler_ir_emitutil(obj*);
+obj* initialize_init_lean_compiler_ir_normids(obj*);
 static bool _G_initialized = false;
 obj* initialize_init_lean_compiler_ir_emitcpp(obj* w) {
  if (_G_initialized) return w;
@@ -1266,12 +11682,62 @@ w = initialize_init_control_conditional(w);
 if (io_result_is_error(w)) return w;
 w = initialize_init_lean_name__mangling(w);
 if (io_result_is_error(w)) return w;
+w = initialize_init_lean_compiler_initattr(w);
+if (io_result_is_error(w)) return w;
 w = initialize_init_lean_compiler_ir_compilerm(w);
 if (io_result_is_error(w)) return w;
 w = initialize_init_lean_compiler_ir_emitutil(w);
+if (io_result_is_error(w)) return w;
+w = initialize_init_lean_compiler_ir_normids(w);
 if (io_result_is_error(w)) return w;
  l_Lean_IR_EmitCpp_leanMainFn = _init_l_Lean_IR_EmitCpp_leanMainFn();
 lean::mark_persistent(l_Lean_IR_EmitCpp_leanMainFn);
+ l_Lean_IR_EmitCpp_argToCppString___closed__1 = _init_l_Lean_IR_EmitCpp_argToCppString___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_argToCppString___closed__1);
+ l_Lean_IR_EmitCpp_toCppType___main___closed__1 = _init_l_Lean_IR_EmitCpp_toCppType___main___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_toCppType___main___closed__1);
+ l_Lean_IR_EmitCpp_toCppType___main___closed__2 = _init_l_Lean_IR_EmitCpp_toCppType___main___closed__2();
+lean::mark_persistent(l_Lean_IR_EmitCpp_toCppType___main___closed__2);
+ l_Lean_IR_EmitCpp_toCppType___main___closed__3 = _init_l_Lean_IR_EmitCpp_toCppType___main___closed__3();
+lean::mark_persistent(l_Lean_IR_EmitCpp_toCppType___main___closed__3);
+ l_Lean_IR_EmitCpp_toCppType___main___closed__4 = _init_l_Lean_IR_EmitCpp_toCppType___main___closed__4();
+lean::mark_persistent(l_Lean_IR_EmitCpp_toCppType___main___closed__4);
+ l_Lean_IR_EmitCpp_toCppType___main___closed__5 = _init_l_Lean_IR_EmitCpp_toCppType___main___closed__5();
+lean::mark_persistent(l_Lean_IR_EmitCpp_toCppType___main___closed__5);
+ l_Lean_IR_EmitCpp_toCppType___main___closed__6 = _init_l_Lean_IR_EmitCpp_toCppType___main___closed__6();
+lean::mark_persistent(l_Lean_IR_EmitCpp_toCppType___main___closed__6);
+ l_Lean_IR_EmitCpp_toCppType___main___closed__7 = _init_l_Lean_IR_EmitCpp_toCppType___main___closed__7();
+lean::mark_persistent(l_Lean_IR_EmitCpp_toCppType___main___closed__7);
+ l_Lean_IR_EmitCpp_openNamespacesAux___main___closed__1 = _init_l_Lean_IR_EmitCpp_openNamespacesAux___main___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_openNamespacesAux___main___closed__1);
+ l_Lean_IR_EmitCpp_openNamespacesAux___main___closed__2 = _init_l_Lean_IR_EmitCpp_openNamespacesAux___main___closed__2();
+lean::mark_persistent(l_Lean_IR_EmitCpp_openNamespacesAux___main___closed__2);
+ l_Lean_IR_EmitCpp_openNamespacesAux___main___closed__3 = _init_l_Lean_IR_EmitCpp_openNamespacesAux___main___closed__3();
+lean::mark_persistent(l_Lean_IR_EmitCpp_openNamespacesAux___main___closed__3);
+ l_Lean_IR_EmitCpp_closeNamespacesAux___main___closed__1 = _init_l_Lean_IR_EmitCpp_closeNamespacesAux___main___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_closeNamespacesAux___main___closed__1);
+ l_Lean_IR_EmitCpp_throwInvalidExportName___rarg___closed__1 = _init_l_Lean_IR_EmitCpp_throwInvalidExportName___rarg___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_throwInvalidExportName___rarg___closed__1);
+ l_Lean_IR_EmitCpp_toBaseCppName___closed__1 = _init_l_Lean_IR_EmitCpp_toBaseCppName___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_toBaseCppName___closed__1);
+ l_Lean_IR_EmitCpp_toBaseCppName___closed__2 = _init_l_Lean_IR_EmitCpp_toBaseCppName___closed__2();
+lean::mark_persistent(l_Lean_IR_EmitCpp_toBaseCppName___closed__2);
+ l_Lean_IR_EmitCpp_toCppName___closed__1 = _init_l_Lean_IR_EmitCpp_toCppName___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_toCppName___closed__1);
+ l_Lean_IR_EmitCpp_toCppInitName___closed__1 = _init_l_Lean_IR_EmitCpp_toCppInitName___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_toCppInitName___closed__1);
+ l_Lean_IR_EmitCpp_emitFnDeclAux___closed__1 = _init_l_Lean_IR_EmitCpp_emitFnDeclAux___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitFnDeclAux___closed__1);
+ l_Lean_IR_EmitCpp_emitFnDeclAux___closed__2 = _init_l_Lean_IR_EmitCpp_emitFnDeclAux___closed__2();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitFnDeclAux___closed__2);
+ l_Lean_IR_EmitCpp_emitFnDeclAux___closed__3 = _init_l_Lean_IR_EmitCpp_emitFnDeclAux___closed__3();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitFnDeclAux___closed__3);
+ l_Lean_IR_EmitCpp_emitExternDeclAux___closed__1 = _init_l_Lean_IR_EmitCpp_emitExternDeclAux___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitExternDeclAux___closed__1);
+ l_Lean_IR_EmitCpp_emitExternDeclAux___closed__2 = _init_l_Lean_IR_EmitCpp_emitExternDeclAux___closed__2();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitExternDeclAux___closed__2);
+ l_List_mfor___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__5___closed__1 = _init_l_List_mfor___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__5___closed__1();
+lean::mark_persistent(l_List_mfor___main___at_Lean_IR_EmitCpp_emitFnDecls___spec__5___closed__1);
  l_Lean_IR_EmitCpp_emitMainFn___closed__1 = _init_l_Lean_IR_EmitCpp_emitMainFn___closed__1();
 lean::mark_persistent(l_Lean_IR_EmitCpp_emitMainFn___closed__1);
  l_Lean_IR_EmitCpp_emitMainFn___closed__2 = _init_l_Lean_IR_EmitCpp_emitMainFn___closed__2();
@@ -1300,36 +11766,120 @@ lean::mark_persistent(l_Lean_IR_EmitCpp_emitMainFn___closed__12);
 lean::mark_persistent(l_Lean_IR_EmitCpp_emitMainFn___closed__13);
  l_Lean_IR_EmitCpp_emitMainFn___closed__14 = _init_l_Lean_IR_EmitCpp_emitMainFn___closed__14();
 lean::mark_persistent(l_Lean_IR_EmitCpp_emitMainFn___closed__14);
- l_Lean_IR_EmitCpp_emitMainFn___closed__15 = _init_l_Lean_IR_EmitCpp_emitMainFn___closed__15();
-lean::mark_persistent(l_Lean_IR_EmitCpp_emitMainFn___closed__15);
- l_Lean_IR_EmitCpp_emitMainFn___closed__16 = _init_l_Lean_IR_EmitCpp_emitMainFn___closed__16();
-lean::mark_persistent(l_Lean_IR_EmitCpp_emitMainFn___closed__16);
- l_Lean_IR_EmitCpp_emitMainFn___closed__17 = _init_l_Lean_IR_EmitCpp_emitMainFn___closed__17();
-lean::mark_persistent(l_Lean_IR_EmitCpp_emitMainFn___closed__17);
- l_Lean_IR_EmitCpp_emitMainFn___closed__18 = _init_l_Lean_IR_EmitCpp_emitMainFn___closed__18();
-lean::mark_persistent(l_Lean_IR_EmitCpp_emitMainFn___closed__18);
- l_Lean_IR_EmitCpp_emitMainFn___closed__19 = _init_l_Lean_IR_EmitCpp_emitMainFn___closed__19();
-lean::mark_persistent(l_Lean_IR_EmitCpp_emitMainFn___closed__19);
- l_Lean_IR_EmitCpp_emitMainFn___closed__20 = _init_l_Lean_IR_EmitCpp_emitMainFn___closed__20();
-lean::mark_persistent(l_Lean_IR_EmitCpp_emitMainFn___closed__20);
- l_Lean_IR_EmitCpp_emitMainFn___closed__21 = _init_l_Lean_IR_EmitCpp_emitMainFn___closed__21();
-lean::mark_persistent(l_Lean_IR_EmitCpp_emitMainFn___closed__21);
- l_Lean_IR_EmitCpp_emitMainFn___closed__22 = _init_l_Lean_IR_EmitCpp_emitMainFn___closed__22();
-lean::mark_persistent(l_Lean_IR_EmitCpp_emitMainFn___closed__22);
- l_Lean_IR_EmitCpp_emitMainFn___closed__23 = _init_l_Lean_IR_EmitCpp_emitMainFn___closed__23();
-lean::mark_persistent(l_Lean_IR_EmitCpp_emitMainFn___closed__23);
- l_Lean_IR_EmitCpp_emitMainFn___closed__24 = _init_l_Lean_IR_EmitCpp_emitMainFn___closed__24();
-lean::mark_persistent(l_Lean_IR_EmitCpp_emitMainFn___closed__24);
- l_Lean_IR_EmitCpp_emitMainFn___closed__25 = _init_l_Lean_IR_EmitCpp_emitMainFn___closed__25();
-lean::mark_persistent(l_Lean_IR_EmitCpp_emitMainFn___closed__25);
- l_Lean_IR_EmitCpp_emitMainFn___closed__26 = _init_l_Lean_IR_EmitCpp_emitMainFn___closed__26();
-lean::mark_persistent(l_Lean_IR_EmitCpp_emitMainFn___closed__26);
- l_Lean_IR_EmitCpp_emitMainFn___closed__27 = _init_l_Lean_IR_EmitCpp_emitMainFn___closed__27();
-lean::mark_persistent(l_Lean_IR_EmitCpp_emitMainFn___closed__27);
- l_Lean_IR_EmitCpp_emitMainFn___closed__28 = _init_l_Lean_IR_EmitCpp_emitMainFn___closed__28();
-lean::mark_persistent(l_Lean_IR_EmitCpp_emitMainFn___closed__28);
- l_Lean_IR_EmitCpp_emitMainFn___closed__29 = _init_l_Lean_IR_EmitCpp_emitMainFn___closed__29();
-lean::mark_persistent(l_Lean_IR_EmitCpp_emitMainFn___closed__29);
+ l_Lean_IR_EmitCpp_emitFileHeader___closed__1 = _init_l_Lean_IR_EmitCpp_emitFileHeader___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitFileHeader___closed__1);
+ l_Lean_IR_EmitCpp_emitFileHeader___closed__2 = _init_l_Lean_IR_EmitCpp_emitFileHeader___closed__2();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitFileHeader___closed__2);
+ l_Lean_IR_EmitCpp_emitFileHeader___closed__3 = _init_l_Lean_IR_EmitCpp_emitFileHeader___closed__3();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitFileHeader___closed__3);
+ l_Lean_IR_EmitCpp_emitFileHeader___closed__4 = _init_l_Lean_IR_EmitCpp_emitFileHeader___closed__4();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitFileHeader___closed__4);
+ l_Lean_IR_EmitCpp_emitFileHeader___closed__5 = _init_l_Lean_IR_EmitCpp_emitFileHeader___closed__5();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitFileHeader___closed__5);
+ l_Lean_IR_EmitCpp_emitFileHeader___closed__6 = _init_l_Lean_IR_EmitCpp_emitFileHeader___closed__6();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitFileHeader___closed__6);
+ l_Lean_IR_EmitCpp_emitFileHeader___closed__7 = _init_l_Lean_IR_EmitCpp_emitFileHeader___closed__7();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitFileHeader___closed__7);
+ l_Lean_IR_EmitCpp_throwUnknownVar___rarg___closed__1 = _init_l_Lean_IR_EmitCpp_throwUnknownVar___rarg___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_throwUnknownVar___rarg___closed__1);
+ l_Lean_IR_EmitCpp_getJPParams___closed__1 = _init_l_Lean_IR_EmitCpp_getJPParams___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_getJPParams___closed__1);
+ l_Lean_IR_EmitCpp_declareVar___closed__1 = _init_l_Lean_IR_EmitCpp_declareVar___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_declareVar___closed__1);
+ l_Lean_IR_EmitCpp_emitTag___closed__1 = _init_l_Lean_IR_EmitCpp_emitTag___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitTag___closed__1);
+ l_Lean_IR_EmitCpp_emitIf___closed__1 = _init_l_Lean_IR_EmitCpp_emitIf___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitIf___closed__1);
+ l_Lean_IR_EmitCpp_emitIf___closed__2 = _init_l_Lean_IR_EmitCpp_emitIf___closed__2();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitIf___closed__2);
+ l_Lean_IR_EmitCpp_emitIf___closed__3 = _init_l_Lean_IR_EmitCpp_emitIf___closed__3();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitIf___closed__3);
+ l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___closed__1 = _init_l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___closed__1();
+lean::mark_persistent(l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___closed__1);
+ l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___closed__2 = _init_l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___closed__2();
+lean::mark_persistent(l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___closed__2);
+ l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___closed__3 = _init_l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___closed__3();
+lean::mark_persistent(l_Array_mforAux___main___at_Lean_IR_EmitCpp_emitCase___spec__1___closed__3);
+ l_Lean_IR_EmitCpp_emitCase___closed__1 = _init_l_Lean_IR_EmitCpp_emitCase___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitCase___closed__1);
+ l_Lean_IR_EmitCpp_emitCase___closed__2 = _init_l_Lean_IR_EmitCpp_emitCase___closed__2();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitCase___closed__2);
+ l_Lean_IR_EmitCpp_emitInc___closed__1 = _init_l_Lean_IR_EmitCpp_emitInc___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitInc___closed__1);
+ l_Lean_IR_EmitCpp_emitInc___closed__2 = _init_l_Lean_IR_EmitCpp_emitInc___closed__2();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitInc___closed__2);
+ l_Lean_IR_EmitCpp_emitInc___closed__3 = _init_l_Lean_IR_EmitCpp_emitInc___closed__3();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitInc___closed__3);
+ l_Lean_IR_EmitCpp_emitDec___closed__1 = _init_l_Lean_IR_EmitCpp_emitDec___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitDec___closed__1);
+ l_Lean_IR_EmitCpp_emitDec___closed__2 = _init_l_Lean_IR_EmitCpp_emitDec___closed__2();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitDec___closed__2);
+ l_Lean_IR_EmitCpp_emitRelease___closed__1 = _init_l_Lean_IR_EmitCpp_emitRelease___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitRelease___closed__1);
+ l_Lean_IR_EmitCpp_emitSet___closed__1 = _init_l_Lean_IR_EmitCpp_emitSet___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitSet___closed__1);
+ l_Lean_IR_EmitCpp_emitOffset___closed__1 = _init_l_Lean_IR_EmitCpp_emitOffset___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitOffset___closed__1);
+ l_Lean_IR_EmitCpp_emitOffset___closed__2 = _init_l_Lean_IR_EmitCpp_emitOffset___closed__2();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitOffset___closed__2);
+ l_Lean_IR_EmitCpp_emitUSet___closed__1 = _init_l_Lean_IR_EmitCpp_emitUSet___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitUSet___closed__1);
+ l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitJmp___spec__1___closed__1 = _init_l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitJmp___spec__1___closed__1();
+lean::mark_persistent(l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitJmp___spec__1___closed__1);
+ l_Lean_IR_EmitCpp_emitJmp___closed__1 = _init_l_Lean_IR_EmitCpp_emitJmp___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitJmp___closed__1);
+ l_Lean_IR_EmitCpp_emitJmp___closed__2 = _init_l_Lean_IR_EmitCpp_emitJmp___closed__2();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitJmp___closed__2);
+ l_Lean_IR_EmitCpp_emitProj___closed__1 = _init_l_Lean_IR_EmitCpp_emitProj___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitProj___closed__1);
+ l_Lean_IR_EmitCpp_emitFullApp___closed__1 = _init_l_Lean_IR_EmitCpp_emitFullApp___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitFullApp___closed__1);
+ l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitPartialApp___spec__1___closed__1 = _init_l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitPartialApp___spec__1___closed__1();
+lean::mark_persistent(l_Nat_mforAux___main___at_Lean_IR_EmitCpp_emitPartialApp___spec__1___closed__1);
+ l_Lean_IR_EmitCpp_emitPartialApp___closed__1 = _init_l_Lean_IR_EmitCpp_emitPartialApp___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitPartialApp___closed__1);
+ l_Lean_IR_EmitCpp_emitPartialApp___closed__2 = _init_l_Lean_IR_EmitCpp_emitPartialApp___closed__2();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitPartialApp___closed__2);
+ l_Lean_IR_EmitCpp_emitBox___closed__1 = _init_l_Lean_IR_EmitCpp_emitBox___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitBox___closed__1);
+ l_Lean_IR_EmitCpp_emitBox___closed__2 = _init_l_Lean_IR_EmitCpp_emitBox___closed__2();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitBox___closed__2);
+ l_Lean_IR_EmitCpp_emitBox___closed__3 = _init_l_Lean_IR_EmitCpp_emitBox___closed__3();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitBox___closed__3);
+ l_Lean_IR_EmitCpp_emitBox___closed__4 = _init_l_Lean_IR_EmitCpp_emitBox___closed__4();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitBox___closed__4);
+ l_Lean_IR_EmitCpp_emitBox___closed__5 = _init_l_Lean_IR_EmitCpp_emitBox___closed__5();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitBox___closed__5);
+ l_Lean_IR_EmitCpp_emitUnbox___closed__1 = _init_l_Lean_IR_EmitCpp_emitUnbox___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitUnbox___closed__1);
+ l_Lean_IR_EmitCpp_emitUnbox___closed__2 = _init_l_Lean_IR_EmitCpp_emitUnbox___closed__2();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitUnbox___closed__2);
+ l_Lean_IR_EmitCpp_emitUnbox___closed__3 = _init_l_Lean_IR_EmitCpp_emitUnbox___closed__3();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitUnbox___closed__3);
+ l_Lean_IR_EmitCpp_emitUnbox___closed__4 = _init_l_Lean_IR_EmitCpp_emitUnbox___closed__4();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitUnbox___closed__4);
+ l_Lean_IR_EmitCpp_emitIsShared___closed__1 = _init_l_Lean_IR_EmitCpp_emitIsShared___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitIsShared___closed__1);
+ l_Lean_IR_EmitCpp_emitIsTaggedPtr___closed__1 = _init_l_Lean_IR_EmitCpp_emitIsTaggedPtr___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitIsTaggedPtr___closed__1);
+ l_Lean_IR_EmitCpp_emitNumLit___closed__1 = _init_l_Lean_IR_EmitCpp_emitNumLit___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitNumLit___closed__1);
+ l_Lean_IR_EmitCpp_emitNumLit___closed__2 = _init_l_Lean_IR_EmitCpp_emitNumLit___closed__2();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitNumLit___closed__2);
+ l_Lean_IR_EmitCpp_emitLit___closed__1 = _init_l_Lean_IR_EmitCpp_emitLit___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitLit___closed__1);
+ l_Lean_IR_EmitCpp_emitBlock___main___closed__1 = _init_l_Lean_IR_EmitCpp_emitBlock___main___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitBlock___main___closed__1);
+ l_Lean_IR_EmitCpp_emitBlock___main___closed__2 = _init_l_Lean_IR_EmitCpp_emitBlock___main___closed__2();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitBlock___main___closed__2);
+ l_Lean_IR_EmitCpp_emitFnBody___main___closed__1 = _init_l_Lean_IR_EmitCpp_emitFnBody___main___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitFnBody___main___closed__1);
+ l_Lean_IR_EmitCpp_emitFnBody___main___closed__2 = _init_l_Lean_IR_EmitCpp_emitFnBody___main___closed__2();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitFnBody___main___closed__2);
+ l_Lean_IR_EmitCpp_emitDeclAux___closed__1 = _init_l_Lean_IR_EmitCpp_emitDeclAux___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitDeclAux___closed__1);
+ l_Lean_IR_EmitCpp_emitDecl___closed__1 = _init_l_Lean_IR_EmitCpp_emitDecl___closed__1();
+lean::mark_persistent(l_Lean_IR_EmitCpp_emitDecl___closed__1);
  l_Lean_IR_emitCpp___closed__1 = _init_l_Lean_IR_emitCpp___closed__1();
 lean::mark_persistent(l_Lean_IR_emitCpp___closed__1);
 return w;
diff --git a/src/stage0/init/lean/compiler/ir/emitutil.cpp b/src/stage0/init/lean/compiler/ir/emitutil.cpp
index 551ccc2df3..51ba77c4f3 100644
--- a/src/stage0/init/lean/compiler/ir/emitutil.cpp
+++ b/src/stage0/init/lean/compiler/ir/emitutil.cpp
@@ -14,12 +14,30 @@ typedef lean::uint32 uint32; typedef lean::uint64 uint64;
 #pragma GCC diagnostic ignored "-Wunused-label"
 #pragma GCC diagnostic ignored "-Wunused-but-set-variable"
 #endif
+obj* l_HashMapImp_insert___at_Lean_IR_CollectMaps_collectJP___main___spec__1(obj*, obj*, obj*);
+obj* l_Lean_IR_CollectMaps_collectFnBody___main(obj*, obj*);
+obj* l_Lean_IR_mkVarJPMaps___closed__1;
+obj* l_Lean_IR_CollectUsedDecls_collect(obj*, obj*);
+obj* l_AssocList_foldl___main___at_Lean_IR_CollectMaps_collectVar___main___spec__5(obj*, obj*);
 obj* l_Lean_IR_UsesLeanNamespace_visitFnBody(obj*, obj*, obj*);
+obj* l_AssocList_replace___main___at_Lean_IR_CollectMaps_collectVar___main___spec__6(obj*, uint8, obj*);
+obj* l_HashMapImp_insert___at_Lean_IR_CollectMaps_collectVar___main___spec__1___boxed(obj*, obj*, obj*);
+obj* l_Array_miterateAux___main___at_Lean_IR_CollectMaps_collectFnBody___main___spec__1(obj*, obj*, obj*, obj*);
+obj* l_HashMapImp_expand___at_Lean_IR_CollectMaps_collectVar___main___spec__3(obj*, obj*);
+obj* l_Lean_IR_CollectMaps_collectVar___main___boxed(obj*, obj*, obj*);
+obj* l_HashMapImp_insert___at_Lean_IR_CollectMaps_collectVar___main___spec__1(obj*, obj*, uint8);
+obj* l_Lean_IR_CollectMaps_collectDecl(obj*, obj*);
+uint8 l_AssocList_contains___main___at_Lean_IR_CollectMaps_collectVar___main___spec__2(obj*, obj*);
 obj* l_Lean_IR_usesLeanNamespace___main(obj*, obj*);
 uint8 l_Lean_NameSet_contains(obj*, obj*);
 obj* l_Lean_IR_UsesLeanNamespace_visitFnBody___main___boxed(obj*, obj*, obj*);
 obj* l_Lean_IR_UsesLeanNamespace_visitFnBody___main(obj*, obj*, obj*);
 obj* l_RBNode_insert___at_Lean_NameSet_insert___spec__1(obj*, obj*, obj*);
+obj* l_mkHashMap___at_Lean_IR_mkVarJPMaps___spec__2(obj*);
+obj* l_Lean_IR_mkVarJPMaps(obj*);
+obj* l_Lean_IR_CollectMaps_collectVar___boxed(obj*, obj*, obj*);
+uint8 l_AssocList_contains___main___at_Lean_IR_CollectMaps_collectJP___main___spec__2(obj*, obj*);
+obj* l_Array_miterateAux___main___at_Lean_IR_CollectMaps_collectFnBody___main___spec__1___boxed(obj*, obj*, obj*, obj*);
 obj* l_Lean_IR_UsesLeanNamespace_visitFnBody___boxed(obj*, obj*, obj*);
 namespace lean {
 uint8 nat_dec_lt(obj*, obj*);
@@ -30,15 +48,55 @@ extern "C" obj* lean_name_mk_string(obj*, obj*);
 namespace lean {
 obj* nat_add(obj*, obj*);
 }
+namespace lean {
+uint8 nat_dec_eq(obj*, obj*);
+}
+obj* l_Lean_IR_CollectMaps_collectJP(obj*, obj*, obj*);
+obj* l_Array_mforAux___main___at_Lean_IR_CollectUsedDecls_collectFnBody___main___spec__1(obj*, obj*, obj*);
+obj* l_Lean_IR_CollectMaps_collectJP___main(obj*, obj*, obj*);
+obj* l_Lean_IR_CollectUsedDecls_collectFnBody___main(obj*, obj*);
+obj* l_mkHashMap___at_Lean_IR_mkVarJPMaps___spec__1(obj*);
+obj* l_AssocList_replace___main___at_Lean_IR_CollectMaps_collectJP___main___spec__6(obj*, obj*, obj*);
+obj* l_Lean_IR_collectUsedDecls(obj*, obj*);
 obj* l_Array_anyMAux___main___at_Lean_IR_UsesLeanNamespace_visitFnBody___main___spec__1___boxed(obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_CollectMaps_collectVar(obj*, uint8, obj*);
+obj* l_HashMapImp_moveEntries___main___at_Lean_IR_CollectMaps_collectJP___main___spec__4(obj*, obj*, obj*);
+obj* l_Array_miterateAux___main___at_Lean_IR_CollectMaps_collectParams___spec__1___boxed(obj*, obj*, obj*, obj*);
+obj* l_HashMapImp_expand___at_Lean_IR_CollectMaps_collectJP___main___spec__3(obj*, obj*);
+obj* l_Lean_IR_CollectMaps_collectDecl___main(obj*, obj*);
 obj* l_Lean_IR_usesLeanNamespace___boxed(obj*, obj*);
+obj* l_AssocList_foldl___main___at_Lean_IR_CollectMaps_collectJP___main___spec__5(obj*, obj*);
+obj* l_Lean_IR_CollectMaps_collectVar___main(obj*, uint8, obj*);
+obj* l_Lean_IR_CollectMaps_collectFnBody(obj*, obj*);
 obj* l_Lean_IR_usesLeanNamespace(obj*, obj*);
 obj* l_Lean_IR_AltCore_body___main(obj*);
 obj* l_Lean_IR_findEnvDecl(obj*, obj*);
+namespace lean {
+usize usize_modn(usize, obj*);
+}
+obj* l_HashMapImp_moveEntries___main___at_Lean_IR_CollectMaps_collectVar___main___spec__4(obj*, obj*, obj*);
+obj* l_mkHashMapImp___rarg(obj*);
+obj* l_Lean_IR_CollectUsedDecls_collectFnBody(obj*, obj*);
+obj* l_Lean_IR_CollectMaps_collectParams___boxed(obj*, obj*);
+obj* l_Array_mforAux___main___at_Lean_IR_CollectUsedDecls_collectFnBody___main___spec__1___boxed(obj*, obj*, obj*);
 obj* l_Lean_IR_FnBody_body___main(obj*);
+namespace lean {
+uint8 nat_dec_le(obj*, obj*);
+}
+namespace lean {
+usize usize_of_nat(obj*);
+}
+obj* l_Array_miterateAux___main___at_Lean_IR_CollectMaps_collectParams___spec__1(obj*, obj*, obj*, obj*);
 uint8 l_Lean_Name_isPrefixOf___main(obj*, obj*);
+obj* l_AssocList_contains___main___at_Lean_IR_CollectMaps_collectJP___main___spec__2___boxed(obj*, obj*);
+obj* l_AssocList_contains___main___at_Lean_IR_CollectMaps_collectVar___main___spec__2___boxed(obj*, obj*);
+namespace lean {
+obj* nat_mul(obj*, obj*);
+}
 obj* l_Lean_IR_usesLeanNamespace___main___boxed(obj*, obj*);
 obj* l_Lean_IR_UsesLeanNamespace_leanNameSpacePrefix;
+obj* l_AssocList_replace___main___at_Lean_IR_CollectMaps_collectVar___main___spec__6___boxed(obj*, obj*, obj*);
+obj* l_Lean_IR_CollectMaps_collectParams(obj*, obj*);
 obj* _init_l_Lean_IR_UsesLeanNamespace_leanNameSpacePrefix() {
 _start:
 {
@@ -332,8 +390,8 @@ goto _start;
 else
 {
 uint8 x_92; obj* x_93; obj* x_94; 
-lean::dec(x_54);
 lean::dec(x_51);
+lean::dec(x_54);
 x_92 = 1;
 x_93 = lean::box(x_92);
 x_94 = lean::alloc_cnstr(0, 2, 0);
@@ -533,6 +591,1168 @@ lean::dec(x_0);
 return x_2;
 }
 }
+obj* l_Lean_IR_CollectUsedDecls_collect(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; obj* x_3; obj* x_4; 
+x_2 = lean::box(0);
+x_3 = l_RBNode_insert___at_Lean_NameSet_insert___spec__1(x_1, x_0, x_2);
+x_4 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_4, 0, x_2);
+lean::cnstr_set(x_4, 1, x_3);
+return x_4;
+}
+}
+obj* l_Array_mforAux___main___at_Lean_IR_CollectUsedDecls_collectFnBody___main___spec__1(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; uint8 x_4; 
+x_3 = lean::array_get_size(x_0);
+x_4 = lean::nat_dec_lt(x_1, x_3);
+lean::dec(x_3);
+if (x_4 == 0)
+{
+obj* x_7; obj* x_8; 
+lean::dec(x_1);
+x_7 = lean::box(0);
+x_8 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_8, 0, x_7);
+lean::cnstr_set(x_8, 1, x_2);
+return x_8;
+}
+else
+{
+obj* x_9; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; 
+x_9 = lean::array_fget(x_0, x_1);
+x_10 = lean::mk_nat_obj(1ul);
+x_11 = lean::nat_add(x_1, x_10);
+lean::dec(x_1);
+x_13 = l_Lean_IR_AltCore_body___main(x_9);
+lean::dec(x_9);
+x_15 = l_Lean_IR_CollectUsedDecls_collectFnBody___main(x_13, x_2);
+x_16 = lean::cnstr_get(x_15, 1);
+lean::inc(x_16);
+lean::dec(x_15);
+x_1 = x_11;
+x_2 = x_16;
+goto _start;
+}
+}
+}
+obj* l_Lean_IR_CollectUsedDecls_collectFnBody___main(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; 
+switch (lean::obj_tag(x_0)) {
+case 0:
+{
+obj* x_4; 
+x_4 = lean::cnstr_get(x_0, 1);
+lean::inc(x_4);
+switch (lean::obj_tag(x_4)) {
+case 6:
+{
+obj* x_6; obj* x_9; obj* x_12; obj* x_13; 
+x_6 = lean::cnstr_get(x_0, 2);
+lean::inc(x_6);
+lean::dec(x_0);
+x_9 = lean::cnstr_get(x_4, 0);
+lean::inc(x_9);
+lean::dec(x_4);
+x_12 = lean::box(0);
+x_13 = l_RBNode_insert___at_Lean_NameSet_insert___spec__1(x_1, x_9, x_12);
+x_0 = x_6;
+x_1 = x_13;
+goto _start;
+}
+case 7:
+{
+obj* x_15; obj* x_18; obj* x_21; obj* x_22; 
+x_15 = lean::cnstr_get(x_0, 2);
+lean::inc(x_15);
+lean::dec(x_0);
+x_18 = lean::cnstr_get(x_4, 0);
+lean::inc(x_18);
+lean::dec(x_4);
+x_21 = lean::box(0);
+x_22 = l_RBNode_insert___at_Lean_NameSet_insert___spec__1(x_1, x_18, x_21);
+x_0 = x_15;
+x_1 = x_22;
+goto _start;
+}
+default:
+{
+obj* x_25; 
+lean::dec(x_4);
+x_25 = lean::cnstr_get(x_0, 2);
+lean::inc(x_25);
+lean::dec(x_0);
+x_0 = x_25;
+goto _start;
+}
+}
+}
+case 1:
+{
+obj* x_29; obj* x_31; obj* x_34; obj* x_35; 
+x_29 = lean::cnstr_get(x_0, 2);
+lean::inc(x_29);
+x_31 = lean::cnstr_get(x_0, 3);
+lean::inc(x_31);
+lean::dec(x_0);
+x_34 = l_Lean_IR_CollectUsedDecls_collectFnBody___main(x_29, x_1);
+x_35 = lean::cnstr_get(x_34, 1);
+lean::inc(x_35);
+lean::dec(x_34);
+x_0 = x_31;
+x_1 = x_35;
+goto _start;
+}
+case 9:
+{
+obj* x_39; obj* x_42; obj* x_43; 
+x_39 = lean::cnstr_get(x_0, 2);
+lean::inc(x_39);
+lean::dec(x_0);
+x_42 = lean::mk_nat_obj(0ul);
+x_43 = l_Array_mforAux___main___at_Lean_IR_CollectUsedDecls_collectFnBody___main___spec__1(x_39, x_42, x_1);
+lean::dec(x_39);
+return x_43;
+}
+default:
+{
+obj* x_45; 
+x_45 = lean::box(0);
+x_2 = x_45;
+goto lbl_3;
+}
+}
+lbl_3:
+{
+uint8 x_47; 
+lean::dec(x_2);
+x_47 = l_Lean_IR_FnBody_isTerminal___main(x_0);
+if (x_47 == 0)
+{
+obj* x_48; 
+x_48 = l_Lean_IR_FnBody_body___main(x_0);
+lean::dec(x_0);
+x_0 = x_48;
+goto _start;
+}
+else
+{
+obj* x_52; obj* x_53; 
+lean::dec(x_0);
+x_52 = lean::box(0);
+x_53 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_53, 0, x_52);
+lean::cnstr_set(x_53, 1, x_1);
+return x_53;
+}
+}
+}
+}
+obj* l_Array_mforAux___main___at_Lean_IR_CollectUsedDecls_collectFnBody___main___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Array_mforAux___main___at_Lean_IR_CollectUsedDecls_collectFnBody___main___spec__1(x_0, x_1, x_2);
+lean::dec(x_0);
+return x_3;
+}
+}
+obj* l_Lean_IR_CollectUsedDecls_collectFnBody(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; 
+x_2 = l_Lean_IR_CollectUsedDecls_collectFnBody___main(x_0, x_1);
+return x_2;
+}
+}
+obj* l_Lean_IR_collectUsedDecls(obj* x_0, obj* x_1) {
+_start:
+{
+if (lean::obj_tag(x_0) == 0)
+{
+obj* x_2; obj* x_5; obj* x_6; 
+x_2 = lean::cnstr_get(x_0, 2);
+lean::inc(x_2);
+lean::dec(x_0);
+x_5 = l_Lean_IR_CollectUsedDecls_collectFnBody___main(x_2, x_1);
+x_6 = lean::cnstr_get(x_5, 1);
+lean::inc(x_6);
+lean::dec(x_5);
+return x_6;
+}
+else
+{
+lean::dec(x_0);
+return x_1;
+}
+}
+}
+uint8 l_AssocList_contains___main___at_Lean_IR_CollectMaps_collectVar___main___spec__2(obj* x_0, obj* x_1) {
+_start:
+{
+if (lean::obj_tag(x_1) == 0)
+{
+uint8 x_2; 
+x_2 = 0;
+return x_2;
+}
+else
+{
+obj* x_3; obj* x_4; uint8 x_5; 
+x_3 = lean::cnstr_get(x_1, 0);
+x_4 = lean::cnstr_get(x_1, 2);
+x_5 = lean::nat_dec_eq(x_3, x_0);
+if (x_5 == 0)
+{
+x_1 = x_4;
+goto _start;
+}
+else
+{
+uint8 x_7; 
+x_7 = 1;
+return x_7;
+}
+}
+}
+}
+obj* l_AssocList_foldl___main___at_Lean_IR_CollectMaps_collectVar___main___spec__5(obj* x_0, obj* x_1) {
+_start:
+{
+if (lean::obj_tag(x_1) == 0)
+{
+return x_0;
+}
+else
+{
+obj* x_2; obj* x_4; obj* x_6; obj* x_8; obj* x_9; usize x_10; usize x_11; obj* x_13; obj* x_14; obj* x_15; 
+x_2 = lean::cnstr_get(x_1, 0);
+x_4 = lean::cnstr_get(x_1, 1);
+x_6 = lean::cnstr_get(x_1, 2);
+if (lean::is_exclusive(x_1)) {
+ x_8 = x_1;
+} else {
+ lean::inc(x_2);
+ lean::inc(x_4);
+ lean::inc(x_6);
+ lean::dec(x_1);
+ x_8 = lean::box(0);
+}
+x_9 = lean::array_get_size(x_0);
+x_10 = lean::usize_of_nat(x_2);
+x_11 = lean::usize_modn(x_10, x_9);
+lean::dec(x_9);
+x_13 = lean::array_uget(x_0, x_11);
+if (lean::is_scalar(x_8)) {
+ x_14 = lean::alloc_cnstr(1, 3, 0);
+} else {
+ x_14 = x_8;
+}
+lean::cnstr_set(x_14, 0, x_2);
+lean::cnstr_set(x_14, 1, x_4);
+lean::cnstr_set(x_14, 2, x_13);
+x_15 = lean::array_uset(x_0, x_11, x_14);
+x_0 = x_15;
+x_1 = x_6;
+goto _start;
+}
+}
+}
+obj* l_HashMapImp_moveEntries___main___at_Lean_IR_CollectMaps_collectVar___main___spec__4(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; uint8 x_4; 
+x_3 = lean::array_get_size(x_1);
+x_4 = lean::nat_dec_lt(x_0, x_3);
+lean::dec(x_3);
+if (x_4 == 0)
+{
+lean::dec(x_1);
+lean::dec(x_0);
+return x_2;
+}
+else
+{
+obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; 
+x_8 = lean::array_fget(x_1, x_0);
+x_9 = lean::box(0);
+x_10 = lean::array_fset(x_1, x_0, x_9);
+x_11 = l_AssocList_foldl___main___at_Lean_IR_CollectMaps_collectVar___main___spec__5(x_2, x_8);
+x_12 = lean::mk_nat_obj(1ul);
+x_13 = lean::nat_add(x_0, x_12);
+lean::dec(x_0);
+x_0 = x_13;
+x_1 = x_10;
+x_2 = x_11;
+goto _start;
+}
+}
+}
+obj* l_HashMapImp_expand___at_Lean_IR_CollectMaps_collectVar___main___spec__3(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; 
+x_2 = lean::array_get_size(x_1);
+x_3 = lean::mk_nat_obj(2ul);
+x_4 = lean::nat_mul(x_2, x_3);
+lean::dec(x_2);
+x_6 = lean::box(0);
+x_7 = lean::mk_array(x_4, x_6);
+x_8 = lean::mk_nat_obj(0ul);
+x_9 = l_HashMapImp_moveEntries___main___at_Lean_IR_CollectMaps_collectVar___main___spec__4(x_8, x_1, x_7);
+x_10 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_10, 0, x_0);
+lean::cnstr_set(x_10, 1, x_9);
+return x_10;
+}
+}
+obj* l_AssocList_replace___main___at_Lean_IR_CollectMaps_collectVar___main___spec__6(obj* x_0, uint8 x_1, obj* x_2) {
+_start:
+{
+if (lean::obj_tag(x_2) == 0)
+{
+lean::dec(x_0);
+return x_2;
+}
+else
+{
+obj* x_4; obj* x_6; obj* x_8; obj* x_10; uint8 x_11; 
+x_4 = lean::cnstr_get(x_2, 0);
+x_6 = lean::cnstr_get(x_2, 1);
+x_8 = lean::cnstr_get(x_2, 2);
+if (lean::is_exclusive(x_2)) {
+ lean::cnstr_set(x_2, 0, lean::box(0));
+ lean::cnstr_set(x_2, 1, lean::box(0));
+ lean::cnstr_set(x_2, 2, lean::box(0));
+ x_10 = x_2;
+} else {
+ lean::inc(x_4);
+ lean::inc(x_6);
+ lean::inc(x_8);
+ lean::dec(x_2);
+ x_10 = lean::box(0);
+}
+x_11 = lean::nat_dec_eq(x_4, x_0);
+if (x_11 == 0)
+{
+obj* x_12; obj* x_13; 
+x_12 = l_AssocList_replace___main___at_Lean_IR_CollectMaps_collectVar___main___spec__6(x_0, x_1, x_8);
+if (lean::is_scalar(x_10)) {
+ x_13 = lean::alloc_cnstr(1, 3, 0);
+} else {
+ x_13 = x_10;
+}
+lean::cnstr_set(x_13, 0, x_4);
+lean::cnstr_set(x_13, 1, x_6);
+lean::cnstr_set(x_13, 2, x_12);
+return x_13;
+}
+else
+{
+obj* x_16; obj* x_17; 
+lean::dec(x_6);
+lean::dec(x_4);
+x_16 = lean::box(x_1);
+if (lean::is_scalar(x_10)) {
+ x_17 = lean::alloc_cnstr(1, 3, 0);
+} else {
+ x_17 = x_10;
+}
+lean::cnstr_set(x_17, 0, x_0);
+lean::cnstr_set(x_17, 1, x_16);
+lean::cnstr_set(x_17, 2, x_8);
+return x_17;
+}
+}
+}
+}
+obj* l_HashMapImp_insert___at_Lean_IR_CollectMaps_collectVar___main___spec__1(obj* x_0, obj* x_1, uint8 x_2) {
+_start:
+{
+obj* x_3; obj* x_5; obj* x_7; obj* x_8; usize x_9; usize x_10; obj* x_11; uint8 x_12; 
+x_3 = lean::cnstr_get(x_0, 0);
+x_5 = lean::cnstr_get(x_0, 1);
+if (lean::is_exclusive(x_0)) {
+ lean::cnstr_set(x_0, 0, lean::box(0));
+ lean::cnstr_set(x_0, 1, lean::box(0));
+ x_7 = x_0;
+} else {
+ lean::inc(x_3);
+ lean::inc(x_5);
+ lean::dec(x_0);
+ x_7 = lean::box(0);
+}
+x_8 = lean::array_get_size(x_5);
+x_9 = lean::usize_of_nat(x_1);
+x_10 = lean::usize_modn(x_9, x_8);
+x_11 = lean::array_uget(x_5, x_10);
+x_12 = l_AssocList_contains___main___at_Lean_IR_CollectMaps_collectVar___main___spec__2(x_1, x_11);
+if (x_12 == 0)
+{
+obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; uint8 x_19; 
+x_13 = lean::mk_nat_obj(1ul);
+x_14 = lean::nat_add(x_3, x_13);
+lean::dec(x_3);
+x_16 = lean::box(x_2);
+x_17 = lean::alloc_cnstr(1, 3, 0);
+lean::cnstr_set(x_17, 0, x_1);
+lean::cnstr_set(x_17, 1, x_16);
+lean::cnstr_set(x_17, 2, x_11);
+x_18 = lean::array_uset(x_5, x_10, x_17);
+x_19 = lean::nat_dec_le(x_14, x_8);
+lean::dec(x_8);
+if (x_19 == 0)
+{
+obj* x_22; 
+lean::dec(x_7);
+x_22 = l_HashMapImp_expand___at_Lean_IR_CollectMaps_collectVar___main___spec__3(x_14, x_18);
+return x_22;
+}
+else
+{
+obj* x_23; 
+if (lean::is_scalar(x_7)) {
+ x_23 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_23 = x_7;
+}
+lean::cnstr_set(x_23, 0, x_14);
+lean::cnstr_set(x_23, 1, x_18);
+return x_23;
+}
+}
+else
+{
+obj* x_25; obj* x_26; obj* x_27; 
+lean::dec(x_8);
+x_25 = l_AssocList_replace___main___at_Lean_IR_CollectMaps_collectVar___main___spec__6(x_1, x_2, x_11);
+x_26 = lean::array_uset(x_5, x_10, x_25);
+if (lean::is_scalar(x_7)) {
+ x_27 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_27 = x_7;
+}
+lean::cnstr_set(x_27, 0, x_3);
+lean::cnstr_set(x_27, 1, x_26);
+return x_27;
+}
+}
+}
+obj* l_Lean_IR_CollectMaps_collectVar___main(obj* x_0, uint8 x_1, obj* x_2) {
+_start:
+{
+obj* x_3; obj* x_5; obj* x_7; obj* x_8; obj* x_9; 
+x_3 = lean::cnstr_get(x_2, 0);
+x_5 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ x_7 = x_2;
+} else {
+ lean::inc(x_3);
+ lean::inc(x_5);
+ lean::dec(x_2);
+ x_7 = lean::box(0);
+}
+x_8 = l_HashMapImp_insert___at_Lean_IR_CollectMaps_collectVar___main___spec__1(x_3, x_0, x_1);
+if (lean::is_scalar(x_7)) {
+ x_9 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_9 = x_7;
+}
+lean::cnstr_set(x_9, 0, x_8);
+lean::cnstr_set(x_9, 1, x_5);
+return x_9;
+}
+}
+obj* l_AssocList_contains___main___at_Lean_IR_CollectMaps_collectVar___main___spec__2___boxed(obj* x_0, obj* x_1) {
+_start:
+{
+uint8 x_2; obj* x_3; 
+x_2 = l_AssocList_contains___main___at_Lean_IR_CollectMaps_collectVar___main___spec__2(x_0, x_1);
+x_3 = lean::box(x_2);
+lean::dec(x_0);
+lean::dec(x_1);
+return x_3;
+}
+}
+obj* l_AssocList_replace___main___at_Lean_IR_CollectMaps_collectVar___main___spec__6___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+uint8 x_3; obj* x_4; 
+x_3 = lean::unbox(x_1);
+x_4 = l_AssocList_replace___main___at_Lean_IR_CollectMaps_collectVar___main___spec__6(x_0, x_3, x_2);
+return x_4;
+}
+}
+obj* l_HashMapImp_insert___at_Lean_IR_CollectMaps_collectVar___main___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+uint8 x_3; obj* x_4; 
+x_3 = lean::unbox(x_2);
+x_4 = l_HashMapImp_insert___at_Lean_IR_CollectMaps_collectVar___main___spec__1(x_0, x_1, x_3);
+return x_4;
+}
+}
+obj* l_Lean_IR_CollectMaps_collectVar___main___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+uint8 x_3; obj* x_4; 
+x_3 = lean::unbox(x_1);
+x_4 = l_Lean_IR_CollectMaps_collectVar___main(x_0, x_3, x_2);
+return x_4;
+}
+}
+obj* l_Lean_IR_CollectMaps_collectVar(obj* x_0, uint8 x_1, obj* x_2) {
+_start:
+{
+obj* x_3; obj* x_5; obj* x_7; obj* x_8; obj* x_9; 
+x_3 = lean::cnstr_get(x_2, 0);
+x_5 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ x_7 = x_2;
+} else {
+ lean::inc(x_3);
+ lean::inc(x_5);
+ lean::dec(x_2);
+ x_7 = lean::box(0);
+}
+x_8 = l_HashMapImp_insert___at_Lean_IR_CollectMaps_collectVar___main___spec__1(x_3, x_0, x_1);
+if (lean::is_scalar(x_7)) {
+ x_9 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_9 = x_7;
+}
+lean::cnstr_set(x_9, 0, x_8);
+lean::cnstr_set(x_9, 1, x_5);
+return x_9;
+}
+}
+obj* l_Lean_IR_CollectMaps_collectVar___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+uint8 x_3; obj* x_4; 
+x_3 = lean::unbox(x_1);
+x_4 = l_Lean_IR_CollectMaps_collectVar(x_0, x_3, x_2);
+return x_4;
+}
+}
+obj* l_Array_miterateAux___main___at_Lean_IR_CollectMaps_collectParams___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; uint8 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::dec(x_2);
+return x_3;
+}
+else
+{
+obj* x_8; obj* x_9; uint8 x_11; obj* x_13; obj* x_14; obj* x_16; obj* x_18; obj* x_20; obj* x_21; obj* x_22; 
+x_8 = lean::array_fget(x_1, x_2);
+x_9 = lean::cnstr_get(x_8, 0);
+lean::inc(x_9);
+x_11 = lean::cnstr_get_scalar<uint8>(x_8, sizeof(void*)*1 + 1);
+lean::dec(x_8);
+x_13 = lean::mk_nat_obj(1ul);
+x_14 = lean::nat_add(x_2, x_13);
+lean::dec(x_2);
+x_16 = lean::cnstr_get(x_3, 0);
+x_18 = lean::cnstr_get(x_3, 1);
+if (lean::is_exclusive(x_3)) {
+ x_20 = x_3;
+} else {
+ lean::inc(x_16);
+ lean::inc(x_18);
+ lean::dec(x_3);
+ x_20 = lean::box(0);
+}
+x_21 = l_HashMapImp_insert___at_Lean_IR_CollectMaps_collectVar___main___spec__1(x_16, x_9, x_11);
+if (lean::is_scalar(x_20)) {
+ x_22 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_22 = x_20;
+}
+lean::cnstr_set(x_22, 0, x_21);
+lean::cnstr_set(x_22, 1, x_18);
+x_2 = x_14;
+x_3 = x_22;
+goto _start;
+}
+}
+}
+obj* l_Lean_IR_CollectMaps_collectParams(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; obj* x_3; 
+x_2 = lean::mk_nat_obj(0ul);
+x_3 = l_Array_miterateAux___main___at_Lean_IR_CollectMaps_collectParams___spec__1(x_0, x_0, x_2, x_1);
+return x_3;
+}
+}
+obj* l_Array_miterateAux___main___at_Lean_IR_CollectMaps_collectParams___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Array_miterateAux___main___at_Lean_IR_CollectMaps_collectParams___spec__1(x_0, x_1, x_2, x_3);
+lean::dec(x_0);
+lean::dec(x_1);
+return x_4;
+}
+}
+obj* l_Lean_IR_CollectMaps_collectParams___boxed(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; 
+x_2 = l_Lean_IR_CollectMaps_collectParams(x_0, x_1);
+lean::dec(x_0);
+return x_2;
+}
+}
+uint8 l_AssocList_contains___main___at_Lean_IR_CollectMaps_collectJP___main___spec__2(obj* x_0, obj* x_1) {
+_start:
+{
+if (lean::obj_tag(x_1) == 0)
+{
+uint8 x_2; 
+x_2 = 0;
+return x_2;
+}
+else
+{
+obj* x_3; obj* x_4; uint8 x_5; 
+x_3 = lean::cnstr_get(x_1, 0);
+x_4 = lean::cnstr_get(x_1, 2);
+x_5 = lean::nat_dec_eq(x_3, x_0);
+if (x_5 == 0)
+{
+x_1 = x_4;
+goto _start;
+}
+else
+{
+uint8 x_7; 
+x_7 = 1;
+return x_7;
+}
+}
+}
+}
+obj* l_AssocList_foldl___main___at_Lean_IR_CollectMaps_collectJP___main___spec__5(obj* x_0, obj* x_1) {
+_start:
+{
+if (lean::obj_tag(x_1) == 0)
+{
+return x_0;
+}
+else
+{
+obj* x_2; obj* x_4; obj* x_6; obj* x_8; obj* x_9; usize x_10; usize x_11; obj* x_13; obj* x_14; obj* x_15; 
+x_2 = lean::cnstr_get(x_1, 0);
+x_4 = lean::cnstr_get(x_1, 1);
+x_6 = lean::cnstr_get(x_1, 2);
+if (lean::is_exclusive(x_1)) {
+ x_8 = x_1;
+} else {
+ lean::inc(x_2);
+ lean::inc(x_4);
+ lean::inc(x_6);
+ lean::dec(x_1);
+ x_8 = lean::box(0);
+}
+x_9 = lean::array_get_size(x_0);
+x_10 = lean::usize_of_nat(x_2);
+x_11 = lean::usize_modn(x_10, x_9);
+lean::dec(x_9);
+x_13 = lean::array_uget(x_0, x_11);
+if (lean::is_scalar(x_8)) {
+ x_14 = lean::alloc_cnstr(1, 3, 0);
+} else {
+ x_14 = x_8;
+}
+lean::cnstr_set(x_14, 0, x_2);
+lean::cnstr_set(x_14, 1, x_4);
+lean::cnstr_set(x_14, 2, x_13);
+x_15 = lean::array_uset(x_0, x_11, x_14);
+x_0 = x_15;
+x_1 = x_6;
+goto _start;
+}
+}
+}
+obj* l_HashMapImp_moveEntries___main___at_Lean_IR_CollectMaps_collectJP___main___spec__4(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; uint8 x_4; 
+x_3 = lean::array_get_size(x_1);
+x_4 = lean::nat_dec_lt(x_0, x_3);
+lean::dec(x_3);
+if (x_4 == 0)
+{
+lean::dec(x_1);
+lean::dec(x_0);
+return x_2;
+}
+else
+{
+obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; 
+x_8 = lean::array_fget(x_1, x_0);
+x_9 = lean::box(0);
+x_10 = lean::array_fset(x_1, x_0, x_9);
+x_11 = l_AssocList_foldl___main___at_Lean_IR_CollectMaps_collectJP___main___spec__5(x_2, x_8);
+x_12 = lean::mk_nat_obj(1ul);
+x_13 = lean::nat_add(x_0, x_12);
+lean::dec(x_0);
+x_0 = x_13;
+x_1 = x_10;
+x_2 = x_11;
+goto _start;
+}
+}
+}
+obj* l_HashMapImp_expand___at_Lean_IR_CollectMaps_collectJP___main___spec__3(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; obj* x_3; obj* x_4; obj* x_6; obj* x_7; obj* x_8; obj* x_9; obj* x_10; 
+x_2 = lean::array_get_size(x_1);
+x_3 = lean::mk_nat_obj(2ul);
+x_4 = lean::nat_mul(x_2, x_3);
+lean::dec(x_2);
+x_6 = lean::box(0);
+x_7 = lean::mk_array(x_4, x_6);
+x_8 = lean::mk_nat_obj(0ul);
+x_9 = l_HashMapImp_moveEntries___main___at_Lean_IR_CollectMaps_collectJP___main___spec__4(x_8, x_1, x_7);
+x_10 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_10, 0, x_0);
+lean::cnstr_set(x_10, 1, x_9);
+return x_10;
+}
+}
+obj* l_AssocList_replace___main___at_Lean_IR_CollectMaps_collectJP___main___spec__6(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+if (lean::obj_tag(x_2) == 0)
+{
+lean::dec(x_1);
+lean::dec(x_0);
+return x_2;
+}
+else
+{
+obj* x_5; obj* x_7; obj* x_9; obj* x_11; uint8 x_12; 
+x_5 = lean::cnstr_get(x_2, 0);
+x_7 = lean::cnstr_get(x_2, 1);
+x_9 = lean::cnstr_get(x_2, 2);
+if (lean::is_exclusive(x_2)) {
+ lean::cnstr_set(x_2, 0, lean::box(0));
+ lean::cnstr_set(x_2, 1, lean::box(0));
+ lean::cnstr_set(x_2, 2, lean::box(0));
+ x_11 = x_2;
+} else {
+ lean::inc(x_5);
+ lean::inc(x_7);
+ lean::inc(x_9);
+ lean::dec(x_2);
+ x_11 = lean::box(0);
+}
+x_12 = lean::nat_dec_eq(x_5, x_0);
+if (x_12 == 0)
+{
+obj* x_13; obj* x_14; 
+x_13 = l_AssocList_replace___main___at_Lean_IR_CollectMaps_collectJP___main___spec__6(x_0, x_1, x_9);
+if (lean::is_scalar(x_11)) {
+ x_14 = lean::alloc_cnstr(1, 3, 0);
+} else {
+ x_14 = x_11;
+}
+lean::cnstr_set(x_14, 0, x_5);
+lean::cnstr_set(x_14, 1, x_7);
+lean::cnstr_set(x_14, 2, x_13);
+return x_14;
+}
+else
+{
+obj* x_17; 
+lean::dec(x_7);
+lean::dec(x_5);
+if (lean::is_scalar(x_11)) {
+ x_17 = lean::alloc_cnstr(1, 3, 0);
+} else {
+ x_17 = x_11;
+}
+lean::cnstr_set(x_17, 0, x_0);
+lean::cnstr_set(x_17, 1, x_1);
+lean::cnstr_set(x_17, 2, x_9);
+return x_17;
+}
+}
+}
+}
+obj* l_HashMapImp_insert___at_Lean_IR_CollectMaps_collectJP___main___spec__1(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; obj* x_5; obj* x_7; obj* x_8; usize x_9; usize x_10; obj* x_11; uint8 x_12; 
+x_3 = lean::cnstr_get(x_0, 0);
+x_5 = lean::cnstr_get(x_0, 1);
+if (lean::is_exclusive(x_0)) {
+ lean::cnstr_set(x_0, 0, lean::box(0));
+ lean::cnstr_set(x_0, 1, lean::box(0));
+ x_7 = x_0;
+} else {
+ lean::inc(x_3);
+ lean::inc(x_5);
+ lean::dec(x_0);
+ x_7 = lean::box(0);
+}
+x_8 = lean::array_get_size(x_5);
+x_9 = lean::usize_of_nat(x_1);
+x_10 = lean::usize_modn(x_9, x_8);
+x_11 = lean::array_uget(x_5, x_10);
+x_12 = l_AssocList_contains___main___at_Lean_IR_CollectMaps_collectJP___main___spec__2(x_1, x_11);
+if (x_12 == 0)
+{
+obj* x_13; obj* x_14; obj* x_16; obj* x_17; uint8 x_18; 
+x_13 = lean::mk_nat_obj(1ul);
+x_14 = lean::nat_add(x_3, x_13);
+lean::dec(x_3);
+x_16 = lean::alloc_cnstr(1, 3, 0);
+lean::cnstr_set(x_16, 0, x_1);
+lean::cnstr_set(x_16, 1, x_2);
+lean::cnstr_set(x_16, 2, x_11);
+x_17 = lean::array_uset(x_5, x_10, x_16);
+x_18 = lean::nat_dec_le(x_14, x_8);
+lean::dec(x_8);
+if (x_18 == 0)
+{
+obj* x_21; 
+lean::dec(x_7);
+x_21 = l_HashMapImp_expand___at_Lean_IR_CollectMaps_collectJP___main___spec__3(x_14, x_17);
+return x_21;
+}
+else
+{
+obj* x_22; 
+if (lean::is_scalar(x_7)) {
+ x_22 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_22 = x_7;
+}
+lean::cnstr_set(x_22, 0, x_14);
+lean::cnstr_set(x_22, 1, x_17);
+return x_22;
+}
+}
+else
+{
+obj* x_24; obj* x_25; obj* x_26; 
+lean::dec(x_8);
+x_24 = l_AssocList_replace___main___at_Lean_IR_CollectMaps_collectJP___main___spec__6(x_1, x_2, x_11);
+x_25 = lean::array_uset(x_5, x_10, x_24);
+if (lean::is_scalar(x_7)) {
+ x_26 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_26 = x_7;
+}
+lean::cnstr_set(x_26, 0, x_3);
+lean::cnstr_set(x_26, 1, x_25);
+return x_26;
+}
+}
+}
+obj* l_Lean_IR_CollectMaps_collectJP___main(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; obj* x_5; obj* x_7; obj* x_8; obj* x_9; 
+x_3 = lean::cnstr_get(x_2, 0);
+x_5 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ x_7 = x_2;
+} else {
+ lean::inc(x_3);
+ lean::inc(x_5);
+ lean::dec(x_2);
+ x_7 = lean::box(0);
+}
+x_8 = l_HashMapImp_insert___at_Lean_IR_CollectMaps_collectJP___main___spec__1(x_5, x_0, x_1);
+if (lean::is_scalar(x_7)) {
+ x_9 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_9 = x_7;
+}
+lean::cnstr_set(x_9, 0, x_3);
+lean::cnstr_set(x_9, 1, x_8);
+return x_9;
+}
+}
+obj* l_AssocList_contains___main___at_Lean_IR_CollectMaps_collectJP___main___spec__2___boxed(obj* x_0, obj* x_1) {
+_start:
+{
+uint8 x_2; obj* x_3; 
+x_2 = l_AssocList_contains___main___at_Lean_IR_CollectMaps_collectJP___main___spec__2(x_0, x_1);
+x_3 = lean::box(x_2);
+lean::dec(x_0);
+lean::dec(x_1);
+return x_3;
+}
+}
+obj* l_Lean_IR_CollectMaps_collectJP(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; obj* x_5; obj* x_7; obj* x_8; obj* x_9; 
+x_3 = lean::cnstr_get(x_2, 0);
+x_5 = lean::cnstr_get(x_2, 1);
+if (lean::is_exclusive(x_2)) {
+ x_7 = x_2;
+} else {
+ lean::inc(x_3);
+ lean::inc(x_5);
+ lean::dec(x_2);
+ x_7 = lean::box(0);
+}
+x_8 = l_HashMapImp_insert___at_Lean_IR_CollectMaps_collectJP___main___spec__1(x_5, x_0, x_1);
+if (lean::is_scalar(x_7)) {
+ x_9 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_9 = x_7;
+}
+lean::cnstr_set(x_9, 0, x_3);
+lean::cnstr_set(x_9, 1, x_8);
+return x_9;
+}
+}
+obj* l_Array_miterateAux___main___at_Lean_IR_CollectMaps_collectFnBody___main___spec__1(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; uint8 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::dec(x_2);
+return x_3;
+}
+else
+{
+obj* x_8; obj* x_9; obj* x_11; obj* x_12; obj* x_13; 
+x_8 = lean::array_fget(x_1, x_2);
+x_9 = l_Lean_IR_AltCore_body___main(x_8);
+lean::dec(x_8);
+x_11 = l_Lean_IR_CollectMaps_collectFnBody___main(x_9, x_3);
+x_12 = lean::mk_nat_obj(1ul);
+x_13 = lean::nat_add(x_2, x_12);
+lean::dec(x_2);
+x_2 = x_13;
+x_3 = x_11;
+goto _start;
+}
+}
+}
+obj* l_Lean_IR_CollectMaps_collectFnBody___main(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; 
+switch (lean::obj_tag(x_0)) {
+case 0:
+{
+obj* x_4; uint8 x_6; obj* x_7; obj* x_10; obj* x_11; obj* x_13; obj* x_15; obj* x_16; obj* x_17; 
+x_4 = lean::cnstr_get(x_0, 0);
+lean::inc(x_4);
+x_6 = lean::cnstr_get_scalar<uint8>(x_0, sizeof(void*)*3);
+x_7 = lean::cnstr_get(x_0, 2);
+lean::inc(x_7);
+lean::dec(x_0);
+x_10 = l_Lean_IR_CollectMaps_collectFnBody___main(x_7, x_1);
+x_11 = lean::cnstr_get(x_10, 0);
+x_13 = lean::cnstr_get(x_10, 1);
+if (lean::is_exclusive(x_10)) {
+ x_15 = x_10;
+} else {
+ lean::inc(x_11);
+ lean::inc(x_13);
+ lean::dec(x_10);
+ x_15 = lean::box(0);
+}
+x_16 = l_HashMapImp_insert___at_Lean_IR_CollectMaps_collectVar___main___spec__1(x_11, x_4, x_6);
+if (lean::is_scalar(x_15)) {
+ x_17 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_17 = x_15;
+}
+lean::cnstr_set(x_17, 0, x_16);
+lean::cnstr_set(x_17, 1, x_13);
+return x_17;
+}
+case 1:
+{
+obj* x_18; obj* x_20; obj* x_22; obj* x_24; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_31; obj* x_33; obj* x_35; obj* x_36; obj* x_37; 
+x_18 = lean::cnstr_get(x_0, 0);
+lean::inc(x_18);
+x_20 = lean::cnstr_get(x_0, 1);
+lean::inc(x_20);
+x_22 = lean::cnstr_get(x_0, 2);
+lean::inc(x_22);
+x_24 = lean::cnstr_get(x_0, 3);
+lean::inc(x_24);
+lean::dec(x_0);
+x_27 = l_Lean_IR_CollectMaps_collectFnBody___main(x_24, x_1);
+x_28 = l_Lean_IR_CollectMaps_collectFnBody___main(x_22, x_27);
+x_29 = lean::mk_nat_obj(0ul);
+x_30 = l_Array_miterateAux___main___at_Lean_IR_CollectMaps_collectParams___spec__1(x_20, x_20, x_29, x_28);
+x_31 = lean::cnstr_get(x_30, 0);
+x_33 = lean::cnstr_get(x_30, 1);
+if (lean::is_exclusive(x_30)) {
+ x_35 = x_30;
+} else {
+ lean::inc(x_31);
+ lean::inc(x_33);
+ lean::dec(x_30);
+ x_35 = lean::box(0);
+}
+x_36 = l_HashMapImp_insert___at_Lean_IR_CollectMaps_collectJP___main___spec__1(x_33, x_18, x_20);
+if (lean::is_scalar(x_35)) {
+ x_37 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_37 = x_35;
+}
+lean::cnstr_set(x_37, 0, x_31);
+lean::cnstr_set(x_37, 1, x_36);
+return x_37;
+}
+case 9:
+{
+obj* x_38; obj* x_41; obj* x_42; 
+x_38 = lean::cnstr_get(x_0, 2);
+lean::inc(x_38);
+lean::dec(x_0);
+x_41 = lean::mk_nat_obj(0ul);
+x_42 = l_Array_miterateAux___main___at_Lean_IR_CollectMaps_collectFnBody___main___spec__1(x_38, x_38, x_41, x_1);
+lean::dec(x_38);
+return x_42;
+}
+default:
+{
+obj* x_44; 
+x_44 = lean::box(0);
+x_2 = x_44;
+goto lbl_3;
+}
+}
+lbl_3:
+{
+uint8 x_46; 
+lean::dec(x_2);
+x_46 = l_Lean_IR_FnBody_isTerminal___main(x_0);
+if (x_46 == 0)
+{
+obj* x_47; 
+x_47 = l_Lean_IR_FnBody_body___main(x_0);
+lean::dec(x_0);
+x_0 = x_47;
+goto _start;
+}
+else
+{
+lean::dec(x_0);
+return x_1;
+}
+}
+}
+}
+obj* l_Array_miterateAux___main___at_Lean_IR_CollectMaps_collectFnBody___main___spec__1___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3) {
+_start:
+{
+obj* x_4; 
+x_4 = l_Array_miterateAux___main___at_Lean_IR_CollectMaps_collectFnBody___main___spec__1(x_0, x_1, x_2, x_3);
+lean::dec(x_0);
+lean::dec(x_1);
+return x_4;
+}
+}
+obj* l_Lean_IR_CollectMaps_collectFnBody(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; 
+x_2 = l_Lean_IR_CollectMaps_collectFnBody___main(x_0, x_1);
+return x_2;
+}
+}
+obj* l_Lean_IR_CollectMaps_collectDecl___main(obj* x_0, obj* x_1) {
+_start:
+{
+if (lean::obj_tag(x_0) == 0)
+{
+obj* x_2; obj* x_4; obj* x_7; obj* x_8; obj* x_9; 
+x_2 = lean::cnstr_get(x_0, 1);
+lean::inc(x_2);
+x_4 = lean::cnstr_get(x_0, 2);
+lean::inc(x_4);
+lean::dec(x_0);
+x_7 = l_Lean_IR_CollectMaps_collectFnBody___main(x_4, x_1);
+x_8 = lean::mk_nat_obj(0ul);
+x_9 = l_Array_miterateAux___main___at_Lean_IR_CollectMaps_collectParams___spec__1(x_2, x_2, x_8, x_7);
+lean::dec(x_2);
+return x_9;
+}
+else
+{
+lean::dec(x_0);
+return x_1;
+}
+}
+}
+obj* l_Lean_IR_CollectMaps_collectDecl(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; 
+x_2 = l_Lean_IR_CollectMaps_collectDecl___main(x_0, x_1);
+return x_2;
+}
+}
+obj* l_mkHashMap___at_Lean_IR_mkVarJPMaps___spec__1(obj* x_0) {
+_start:
+{
+obj* x_1; 
+x_1 = l_mkHashMapImp___rarg(x_0);
+return x_1;
+}
+}
+obj* l_mkHashMap___at_Lean_IR_mkVarJPMaps___spec__2(obj* x_0) {
+_start:
+{
+obj* x_1; 
+x_1 = l_mkHashMapImp___rarg(x_0);
+return x_1;
+}
+}
+obj* _init_l_Lean_IR_mkVarJPMaps___closed__1() {
+_start:
+{
+obj* x_0; obj* x_1; obj* x_3; 
+x_0 = lean::mk_nat_obj(8ul);
+x_1 = l_mkHashMapImp___rarg(x_0);
+lean::inc(x_1);
+x_3 = lean::alloc_cnstr(0, 2, 0);
+lean::cnstr_set(x_3, 0, x_1);
+lean::cnstr_set(x_3, 1, x_1);
+return x_3;
+}
+}
+obj* l_Lean_IR_mkVarJPMaps(obj* x_0) {
+_start:
+{
+obj* x_1; obj* x_2; 
+x_1 = l_Lean_IR_mkVarJPMaps___closed__1;
+x_2 = l_Lean_IR_CollectMaps_collectDecl___main(x_0, x_1);
+return x_2;
+}
+}
 obj* initialize_init_control_conditional(obj*);
 obj* initialize_init_lean_compiler_ir_compilerm(obj*);
 static bool _G_initialized = false;
@@ -546,5 +1766,7 @@ w = initialize_init_lean_compiler_ir_compilerm(w);
 if (io_result_is_error(w)) return w;
  l_Lean_IR_UsesLeanNamespace_leanNameSpacePrefix = _init_l_Lean_IR_UsesLeanNamespace_leanNameSpacePrefix();
 lean::mark_persistent(l_Lean_IR_UsesLeanNamespace_leanNameSpacePrefix);
+ l_Lean_IR_mkVarJPMaps___closed__1 = _init_l_Lean_IR_mkVarJPMaps___closed__1();
+lean::mark_persistent(l_Lean_IR_mkVarJPMaps___closed__1);
 return w;
 }
diff --git a/src/stage0/init/lean/compiler/ir/format.cpp b/src/stage0/init/lean/compiler/ir/format.cpp
index 0b0ecd2355..251e244c41 100644
--- a/src/stage0/init/lean/compiler/ir/format.cpp
+++ b/src/stage0/init/lean/compiler/ir/format.cpp
@@ -630,7 +630,7 @@ obj* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___main___close
 _start:
 {
 obj* x_0; obj* x_1; 
-x_0 = lean::mk_string("reset ");
+x_0 = lean::mk_string("reset_");
 x_1 = lean::alloc_cnstr(2, 1, 0);
 lean::cnstr_set(x_1, 0, x_0);
 return x_1;
@@ -827,409 +827,425 @@ return x_13;
 }
 case 1:
 {
-obj* x_14; obj* x_17; obj* x_18; obj* x_19; obj* x_21; uint8 x_22; obj* x_23; obj* x_24; obj* x_25; 
+obj* x_14; obj* x_16; obj* x_19; obj* x_20; uint8 x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_30; obj* x_32; obj* x_33; obj* x_34; 
 x_14 = lean::cnstr_get(x_0, 0);
 lean::inc(x_14);
+x_16 = lean::cnstr_get(x_0, 1);
+lean::inc(x_16);
 lean::dec(x_0);
-x_17 = l_Nat_repr(x_14);
-x_18 = l_Lean_IR_VarId_HasToString___closed__1;
-x_19 = lean::string_append(x_18, x_17);
-lean::dec(x_17);
-x_21 = lean::alloc_cnstr(2, 1, 0);
-lean::cnstr_set(x_21, 0, x_19);
-x_22 = 0;
-x_23 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__1;
-x_24 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_24, 0, x_23);
-lean::cnstr_set(x_24, 1, x_21);
-lean::cnstr_set_scalar(x_24, sizeof(void*)*2, x_22);
-x_25 = x_24;
-return x_25;
+x_19 = l_Nat_repr(x_14);
+x_20 = lean::alloc_cnstr(2, 1, 0);
+lean::cnstr_set(x_20, 0, x_19);
+x_21 = 0;
+x_22 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__1;
+x_23 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_23, 0, x_22);
+lean::cnstr_set(x_23, 1, x_20);
+lean::cnstr_set_scalar(x_23, sizeof(void*)*2, x_21);
+x_24 = x_23;
+x_25 = l_Lean_Format_flatten___main___closed__1;
+x_26 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_26, 0, x_24);
+lean::cnstr_set(x_26, 1, x_25);
+lean::cnstr_set_scalar(x_26, sizeof(void*)*2, x_21);
+x_27 = x_26;
+x_28 = l_Nat_repr(x_16);
+x_29 = l_Lean_IR_VarId_HasToString___closed__1;
+x_30 = lean::string_append(x_29, x_28);
+lean::dec(x_28);
+x_32 = lean::alloc_cnstr(2, 1, 0);
+lean::cnstr_set(x_32, 0, x_30);
+x_33 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_33, 0, x_27);
+lean::cnstr_set(x_33, 1, x_32);
+lean::cnstr_set_scalar(x_33, sizeof(void*)*2, x_21);
+x_34 = x_33;
+return x_34;
 }
 case 2:
 {
-obj* x_26; obj* x_28; uint8 x_30; obj* x_31; obj* x_34; obj* x_35; obj* x_36; obj* x_38; obj* x_39; obj* x_40; obj* x_41; obj* x_42; 
-x_26 = lean::cnstr_get(x_0, 0);
-lean::inc(x_26);
-x_28 = lean::cnstr_get(x_0, 1);
-lean::inc(x_28);
-x_30 = lean::cnstr_get_scalar<uint8>(x_0, sizeof(void*)*3);
-x_31 = lean::cnstr_get(x_0, 2);
-lean::inc(x_31);
+obj* x_35; obj* x_37; uint8 x_39; obj* x_40; obj* x_43; obj* x_44; obj* x_45; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; 
+x_35 = lean::cnstr_get(x_0, 0);
+lean::inc(x_35);
+x_37 = lean::cnstr_get(x_0, 1);
+lean::inc(x_37);
+x_39 = lean::cnstr_get_scalar<uint8>(x_0, sizeof(void*)*3);
+x_40 = lean::cnstr_get(x_0, 2);
+lean::inc(x_40);
 lean::dec(x_0);
-x_34 = l_Nat_repr(x_26);
-x_35 = l_Lean_IR_VarId_HasToString___closed__1;
-x_36 = lean::string_append(x_35, x_34);
-lean::dec(x_34);
-x_38 = lean::alloc_cnstr(2, 1, 0);
-lean::cnstr_set(x_38, 0, x_36);
-x_39 = l___private_init_lean_compiler_ir_format_4__formatCtorInfo___main(x_28);
-x_40 = lean::mk_nat_obj(0ul);
-x_41 = lean::box(0);
-x_42 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___main___spec__2(x_31, x_31, x_40, x_41);
-lean::dec(x_31);
-if (x_30 == 0)
+x_43 = l_Nat_repr(x_35);
+x_44 = l_Lean_IR_VarId_HasToString___closed__1;
+x_45 = lean::string_append(x_44, x_43);
+lean::dec(x_43);
+x_47 = lean::alloc_cnstr(2, 1, 0);
+lean::cnstr_set(x_47, 0, x_45);
+x_48 = l___private_init_lean_compiler_ir_format_4__formatCtorInfo___main(x_37);
+x_49 = lean::mk_nat_obj(0ul);
+x_50 = lean::box(0);
+x_51 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___main___spec__2(x_40, x_40, x_49, x_50);
+lean::dec(x_40);
+if (x_39 == 0)
 {
-uint8 x_44; obj* x_45; obj* x_46; obj* x_47; obj* x_48; obj* x_49; obj* x_50; obj* x_51; obj* x_52; obj* x_53; obj* x_54; 
-x_44 = 0;
-x_45 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__2;
-x_46 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_46, 0, x_45);
-lean::cnstr_set(x_46, 1, x_38);
-lean::cnstr_set_scalar(x_46, sizeof(void*)*2, x_44);
-x_47 = x_46;
-x_48 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__3;
-x_49 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_49, 0, x_47);
-lean::cnstr_set(x_49, 1, x_48);
-lean::cnstr_set_scalar(x_49, sizeof(void*)*2, x_44);
-x_50 = x_49;
-x_51 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_51, 0, x_50);
-lean::cnstr_set(x_51, 1, x_39);
-lean::cnstr_set_scalar(x_51, sizeof(void*)*2, x_44);
-x_52 = x_51;
-x_53 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_53, 0, x_52);
-lean::cnstr_set(x_53, 1, x_42);
-lean::cnstr_set_scalar(x_53, sizeof(void*)*2, x_44);
-x_54 = x_53;
-return x_54;
-}
-else
-{
-uint8 x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; obj* x_64; obj* x_65; 
-x_55 = 0;
-x_56 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__4;
-x_57 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_57, 0, x_56);
-lean::cnstr_set(x_57, 1, x_38);
-lean::cnstr_set_scalar(x_57, sizeof(void*)*2, x_55);
-x_58 = x_57;
-x_59 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__3;
+uint8 x_53; obj* x_54; obj* x_55; obj* x_56; obj* x_57; obj* x_58; obj* x_59; obj* x_60; obj* x_61; obj* x_62; obj* x_63; 
+x_53 = 0;
+x_54 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__2;
+x_55 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_55, 0, x_54);
+lean::cnstr_set(x_55, 1, x_47);
+lean::cnstr_set_scalar(x_55, sizeof(void*)*2, x_53);
+x_56 = x_55;
+x_57 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__3;
+x_58 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_58, 0, x_56);
+lean::cnstr_set(x_58, 1, x_57);
+lean::cnstr_set_scalar(x_58, sizeof(void*)*2, x_53);
+x_59 = x_58;
 x_60 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_60, 0, x_58);
-lean::cnstr_set(x_60, 1, x_59);
-lean::cnstr_set_scalar(x_60, sizeof(void*)*2, x_55);
+lean::cnstr_set(x_60, 0, x_59);
+lean::cnstr_set(x_60, 1, x_48);
+lean::cnstr_set_scalar(x_60, sizeof(void*)*2, x_53);
 x_61 = x_60;
 x_62 = lean::alloc_cnstr(4, 2, 1);
 lean::cnstr_set(x_62, 0, x_61);
-lean::cnstr_set(x_62, 1, x_39);
-lean::cnstr_set_scalar(x_62, sizeof(void*)*2, x_55);
+lean::cnstr_set(x_62, 1, x_51);
+lean::cnstr_set_scalar(x_62, sizeof(void*)*2, x_53);
 x_63 = x_62;
-x_64 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_64, 0, x_63);
-lean::cnstr_set(x_64, 1, x_42);
-lean::cnstr_set_scalar(x_64, sizeof(void*)*2, x_55);
-x_65 = x_64;
-return x_65;
+return x_63;
+}
+else
+{
+uint8 x_64; obj* x_65; obj* x_66; obj* x_67; obj* x_68; obj* x_69; obj* x_70; obj* x_71; obj* x_72; obj* x_73; obj* x_74; 
+x_64 = 0;
+x_65 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__4;
+x_66 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_66, 0, x_65);
+lean::cnstr_set(x_66, 1, x_47);
+lean::cnstr_set_scalar(x_66, sizeof(void*)*2, x_64);
+x_67 = x_66;
+x_68 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__3;
+x_69 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_69, 0, x_67);
+lean::cnstr_set(x_69, 1, x_68);
+lean::cnstr_set_scalar(x_69, sizeof(void*)*2, x_64);
+x_70 = x_69;
+x_71 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_71, 0, x_70);
+lean::cnstr_set(x_71, 1, x_48);
+lean::cnstr_set_scalar(x_71, sizeof(void*)*2, x_64);
+x_72 = x_71;
+x_73 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_73, 0, x_72);
+lean::cnstr_set(x_73, 1, x_51);
+lean::cnstr_set_scalar(x_73, sizeof(void*)*2, x_64);
+x_74 = x_73;
+return x_74;
 }
 }
 case 3:
 {
-obj* x_66; obj* x_68; obj* x_71; obj* x_72; uint8 x_73; obj* x_74; obj* x_75; obj* x_76; obj* x_77; obj* x_78; obj* x_79; obj* x_80; obj* x_81; obj* x_82; obj* x_84; obj* x_85; obj* x_86; 
-x_66 = lean::cnstr_get(x_0, 0);
-lean::inc(x_66);
-x_68 = lean::cnstr_get(x_0, 1);
-lean::inc(x_68);
+obj* x_75; obj* x_77; obj* x_80; obj* x_81; uint8 x_82; obj* x_83; obj* x_84; obj* x_85; obj* x_86; obj* x_87; obj* x_88; obj* x_89; obj* x_90; obj* x_91; obj* x_93; obj* x_94; obj* x_95; 
+x_75 = lean::cnstr_get(x_0, 0);
+lean::inc(x_75);
+x_77 = lean::cnstr_get(x_0, 1);
+lean::inc(x_77);
 lean::dec(x_0);
-x_71 = l_Nat_repr(x_66);
-x_72 = lean::alloc_cnstr(2, 1, 0);
-lean::cnstr_set(x_72, 0, x_71);
-x_73 = 0;
-x_74 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__5;
-x_75 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_75, 0, x_74);
-lean::cnstr_set(x_75, 1, x_72);
-lean::cnstr_set_scalar(x_75, sizeof(void*)*2, x_73);
-x_76 = x_75;
-x_77 = l_Lean_Format_flatten___main___closed__1;
-x_78 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_78, 0, x_76);
-lean::cnstr_set(x_78, 1, x_77);
-lean::cnstr_set_scalar(x_78, sizeof(void*)*2, x_73);
-x_79 = x_78;
-x_80 = l_Nat_repr(x_68);
-x_81 = l_Lean_IR_VarId_HasToString___closed__1;
-x_82 = lean::string_append(x_81, x_80);
-lean::dec(x_80);
-x_84 = lean::alloc_cnstr(2, 1, 0);
-lean::cnstr_set(x_84, 0, x_82);
-x_85 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_85, 0, x_79);
-lean::cnstr_set(x_85, 1, x_84);
-lean::cnstr_set_scalar(x_85, sizeof(void*)*2, x_73);
-x_86 = x_85;
-return x_86;
+x_80 = l_Nat_repr(x_75);
+x_81 = lean::alloc_cnstr(2, 1, 0);
+lean::cnstr_set(x_81, 0, x_80);
+x_82 = 0;
+x_83 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__5;
+x_84 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_84, 0, x_83);
+lean::cnstr_set(x_84, 1, x_81);
+lean::cnstr_set_scalar(x_84, sizeof(void*)*2, x_82);
+x_85 = x_84;
+x_86 = l_Lean_Format_flatten___main___closed__1;
+x_87 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_87, 0, x_85);
+lean::cnstr_set(x_87, 1, x_86);
+lean::cnstr_set_scalar(x_87, sizeof(void*)*2, x_82);
+x_88 = x_87;
+x_89 = l_Nat_repr(x_77);
+x_90 = l_Lean_IR_VarId_HasToString___closed__1;
+x_91 = lean::string_append(x_90, x_89);
+lean::dec(x_89);
+x_93 = lean::alloc_cnstr(2, 1, 0);
+lean::cnstr_set(x_93, 0, x_91);
+x_94 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_94, 0, x_88);
+lean::cnstr_set(x_94, 1, x_93);
+lean::cnstr_set_scalar(x_94, sizeof(void*)*2, x_82);
+x_95 = x_94;
+return x_95;
 }
 case 4:
 {
-obj* x_87; obj* x_89; obj* x_92; obj* x_93; uint8 x_94; obj* x_95; obj* x_96; obj* x_97; obj* x_98; obj* x_99; obj* x_100; obj* x_101; obj* x_102; obj* x_103; obj* x_105; obj* x_106; obj* x_107; 
-x_87 = lean::cnstr_get(x_0, 0);
-lean::inc(x_87);
-x_89 = lean::cnstr_get(x_0, 1);
-lean::inc(x_89);
+obj* x_96; obj* x_98; obj* x_101; obj* x_102; uint8 x_103; obj* x_104; obj* x_105; obj* x_106; obj* x_107; obj* x_108; obj* x_109; obj* x_110; obj* x_111; obj* x_112; obj* x_114; obj* x_115; obj* x_116; 
+x_96 = lean::cnstr_get(x_0, 0);
+lean::inc(x_96);
+x_98 = lean::cnstr_get(x_0, 1);
+lean::inc(x_98);
 lean::dec(x_0);
-x_92 = l_Nat_repr(x_87);
-x_93 = lean::alloc_cnstr(2, 1, 0);
-lean::cnstr_set(x_93, 0, x_92);
-x_94 = 0;
-x_95 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__6;
-x_96 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_96, 0, x_95);
-lean::cnstr_set(x_96, 1, x_93);
-lean::cnstr_set_scalar(x_96, sizeof(void*)*2, x_94);
-x_97 = x_96;
-x_98 = l_Lean_Format_flatten___main___closed__1;
-x_99 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_99, 0, x_97);
-lean::cnstr_set(x_99, 1, x_98);
-lean::cnstr_set_scalar(x_99, sizeof(void*)*2, x_94);
-x_100 = x_99;
-x_101 = l_Nat_repr(x_89);
-x_102 = l_Lean_IR_VarId_HasToString___closed__1;
-x_103 = lean::string_append(x_102, x_101);
-lean::dec(x_101);
-x_105 = lean::alloc_cnstr(2, 1, 0);
-lean::cnstr_set(x_105, 0, x_103);
-x_106 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_106, 0, x_100);
-lean::cnstr_set(x_106, 1, x_105);
-lean::cnstr_set_scalar(x_106, sizeof(void*)*2, x_94);
-x_107 = x_106;
-return x_107;
+x_101 = l_Nat_repr(x_96);
+x_102 = lean::alloc_cnstr(2, 1, 0);
+lean::cnstr_set(x_102, 0, x_101);
+x_103 = 0;
+x_104 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__6;
+x_105 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_105, 0, x_104);
+lean::cnstr_set(x_105, 1, x_102);
+lean::cnstr_set_scalar(x_105, sizeof(void*)*2, x_103);
+x_106 = x_105;
+x_107 = l_Lean_Format_flatten___main___closed__1;
+x_108 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_108, 0, x_106);
+lean::cnstr_set(x_108, 1, x_107);
+lean::cnstr_set_scalar(x_108, sizeof(void*)*2, x_103);
+x_109 = x_108;
+x_110 = l_Nat_repr(x_98);
+x_111 = l_Lean_IR_VarId_HasToString___closed__1;
+x_112 = lean::string_append(x_111, x_110);
+lean::dec(x_110);
+x_114 = lean::alloc_cnstr(2, 1, 0);
+lean::cnstr_set(x_114, 0, x_112);
+x_115 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_115, 0, x_109);
+lean::cnstr_set(x_115, 1, x_114);
+lean::cnstr_set_scalar(x_115, sizeof(void*)*2, x_103);
+x_116 = x_115;
+return x_116;
 }
 case 5:
 {
-obj* x_108; obj* x_110; obj* x_112; obj* x_115; obj* x_116; uint8 x_117; obj* x_118; obj* x_119; obj* x_120; obj* x_121; obj* x_122; obj* x_123; obj* x_124; obj* x_125; obj* x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_135; obj* x_136; obj* x_137; 
-x_108 = lean::cnstr_get(x_0, 0);
-lean::inc(x_108);
-x_110 = lean::cnstr_get(x_0, 1);
-lean::inc(x_110);
-x_112 = lean::cnstr_get(x_0, 2);
-lean::inc(x_112);
+obj* x_117; obj* x_119; obj* x_121; obj* x_124; obj* x_125; uint8 x_126; obj* x_127; obj* x_128; obj* x_129; obj* x_130; obj* x_131; obj* x_132; obj* x_133; obj* x_134; obj* x_135; obj* x_136; obj* x_137; obj* x_138; obj* x_139; obj* x_140; obj* x_141; obj* x_142; obj* x_144; obj* x_145; obj* x_146; 
+x_117 = lean::cnstr_get(x_0, 0);
+lean::inc(x_117);
+x_119 = lean::cnstr_get(x_0, 1);
+lean::inc(x_119);
+x_121 = lean::cnstr_get(x_0, 2);
+lean::inc(x_121);
 lean::dec(x_0);
-x_115 = l_Nat_repr(x_108);
-x_116 = lean::alloc_cnstr(2, 1, 0);
-lean::cnstr_set(x_116, 0, x_115);
-x_117 = 0;
-x_118 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__7;
-x_119 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_119, 0, x_118);
-lean::cnstr_set(x_119, 1, x_116);
-lean::cnstr_set_scalar(x_119, sizeof(void*)*2, x_117);
-x_120 = x_119;
-x_121 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__8;
-x_122 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_122, 0, x_120);
-lean::cnstr_set(x_122, 1, x_121);
-lean::cnstr_set_scalar(x_122, sizeof(void*)*2, x_117);
-x_123 = x_122;
-x_124 = l_Nat_repr(x_110);
+x_124 = l_Nat_repr(x_117);
 x_125 = lean::alloc_cnstr(2, 1, 0);
 lean::cnstr_set(x_125, 0, x_124);
-x_126 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_126, 0, x_123);
-lean::cnstr_set(x_126, 1, x_125);
-lean::cnstr_set_scalar(x_126, sizeof(void*)*2, x_117);
-x_127 = x_126;
-x_128 = l_Lean_Format_flatten___main___closed__1;
-x_129 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_129, 0, x_127);
-lean::cnstr_set(x_129, 1, x_128);
-lean::cnstr_set_scalar(x_129, sizeof(void*)*2, x_117);
-x_130 = x_129;
-x_131 = l_Nat_repr(x_112);
-x_132 = l_Lean_IR_VarId_HasToString___closed__1;
-x_133 = lean::string_append(x_132, x_131);
-lean::dec(x_131);
-x_135 = lean::alloc_cnstr(2, 1, 0);
-lean::cnstr_set(x_135, 0, x_133);
-x_136 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_136, 0, x_130);
-lean::cnstr_set(x_136, 1, x_135);
-lean::cnstr_set_scalar(x_136, sizeof(void*)*2, x_117);
-x_137 = x_136;
-return x_137;
+x_126 = 0;
+x_127 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__7;
+x_128 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_128, 0, x_127);
+lean::cnstr_set(x_128, 1, x_125);
+lean::cnstr_set_scalar(x_128, sizeof(void*)*2, x_126);
+x_129 = x_128;
+x_130 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__8;
+x_131 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_131, 0, x_129);
+lean::cnstr_set(x_131, 1, x_130);
+lean::cnstr_set_scalar(x_131, sizeof(void*)*2, x_126);
+x_132 = x_131;
+x_133 = l_Nat_repr(x_119);
+x_134 = lean::alloc_cnstr(2, 1, 0);
+lean::cnstr_set(x_134, 0, x_133);
+x_135 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_135, 0, x_132);
+lean::cnstr_set(x_135, 1, x_134);
+lean::cnstr_set_scalar(x_135, sizeof(void*)*2, x_126);
+x_136 = x_135;
+x_137 = l_Lean_Format_flatten___main___closed__1;
+x_138 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_138, 0, x_136);
+lean::cnstr_set(x_138, 1, x_137);
+lean::cnstr_set_scalar(x_138, sizeof(void*)*2, x_126);
+x_139 = x_138;
+x_140 = l_Nat_repr(x_121);
+x_141 = l_Lean_IR_VarId_HasToString___closed__1;
+x_142 = lean::string_append(x_141, x_140);
+lean::dec(x_140);
+x_144 = lean::alloc_cnstr(2, 1, 0);
+lean::cnstr_set(x_144, 0, x_142);
+x_145 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_145, 0, x_139);
+lean::cnstr_set(x_145, 1, x_144);
+lean::cnstr_set_scalar(x_145, sizeof(void*)*2, x_126);
+x_146 = x_145;
+return x_146;
 }
 case 6:
 {
-obj* x_138; obj* x_140; obj* x_143; obj* x_144; obj* x_145; obj* x_146; obj* x_147; obj* x_148; uint8 x_150; obj* x_151; obj* x_152; 
-x_138 = lean::cnstr_get(x_0, 0);
-lean::inc(x_138);
-x_140 = lean::cnstr_get(x_0, 1);
-lean::inc(x_140);
+obj* x_147; obj* x_149; obj* x_152; obj* x_153; obj* x_154; obj* x_155; obj* x_156; obj* x_157; uint8 x_159; obj* x_160; obj* x_161; 
+x_147 = lean::cnstr_get(x_0, 0);
+lean::inc(x_147);
+x_149 = lean::cnstr_get(x_0, 1);
+lean::inc(x_149);
 lean::dec(x_0);
-x_143 = l_Lean_Name_toString___closed__1;
-x_144 = l_Lean_Name_toStringWithSep___main(x_143, x_138);
-x_145 = lean::alloc_cnstr(2, 1, 0);
-lean::cnstr_set(x_145, 0, x_144);
-x_146 = lean::mk_nat_obj(0ul);
-x_147 = lean::box(0);
-x_148 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___main___spec__2(x_140, x_140, x_146, x_147);
-lean::dec(x_140);
-x_150 = 0;
-x_151 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_151, 0, x_145);
-lean::cnstr_set(x_151, 1, x_148);
-lean::cnstr_set_scalar(x_151, sizeof(void*)*2, x_150);
-x_152 = x_151;
-return x_152;
+x_152 = l_Lean_Name_toString___closed__1;
+x_153 = l_Lean_Name_toStringWithSep___main(x_152, x_147);
+x_154 = lean::alloc_cnstr(2, 1, 0);
+lean::cnstr_set(x_154, 0, x_153);
+x_155 = lean::mk_nat_obj(0ul);
+x_156 = lean::box(0);
+x_157 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___main___spec__2(x_149, x_149, x_155, x_156);
+lean::dec(x_149);
+x_159 = 0;
+x_160 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_160, 0, x_154);
+lean::cnstr_set(x_160, 1, x_157);
+lean::cnstr_set_scalar(x_160, sizeof(void*)*2, x_159);
+x_161 = x_160;
+return x_161;
 }
 case 7:
 {
-obj* x_153; obj* x_155; obj* x_158; obj* x_159; obj* x_160; uint8 x_161; obj* x_162; obj* x_163; obj* x_164; obj* x_165; obj* x_166; obj* x_167; obj* x_169; obj* x_170; 
-x_153 = lean::cnstr_get(x_0, 0);
-lean::inc(x_153);
-x_155 = lean::cnstr_get(x_0, 1);
-lean::inc(x_155);
+obj* x_162; obj* x_164; obj* x_167; obj* x_168; obj* x_169; uint8 x_170; obj* x_171; obj* x_172; obj* x_173; obj* x_174; obj* x_175; obj* x_176; obj* x_178; obj* x_179; 
+x_162 = lean::cnstr_get(x_0, 0);
+lean::inc(x_162);
+x_164 = lean::cnstr_get(x_0, 1);
+lean::inc(x_164);
 lean::dec(x_0);
-x_158 = l_Lean_Name_toString___closed__1;
-x_159 = l_Lean_Name_toStringWithSep___main(x_158, x_153);
-x_160 = lean::alloc_cnstr(2, 1, 0);
-lean::cnstr_set(x_160, 0, x_159);
-x_161 = 0;
-x_162 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__9;
-x_163 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_163, 0, x_162);
-lean::cnstr_set(x_163, 1, x_160);
-lean::cnstr_set_scalar(x_163, sizeof(void*)*2, x_161);
-x_164 = x_163;
-x_165 = lean::mk_nat_obj(0ul);
-x_166 = lean::box(0);
-x_167 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___main___spec__2(x_155, x_155, x_165, x_166);
-lean::dec(x_155);
-x_169 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_169, 0, x_164);
-lean::cnstr_set(x_169, 1, x_167);
-lean::cnstr_set_scalar(x_169, sizeof(void*)*2, x_161);
-x_170 = x_169;
-return x_170;
+x_167 = l_Lean_Name_toString___closed__1;
+x_168 = l_Lean_Name_toStringWithSep___main(x_167, x_162);
+x_169 = lean::alloc_cnstr(2, 1, 0);
+lean::cnstr_set(x_169, 0, x_168);
+x_170 = 0;
+x_171 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__9;
+x_172 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_172, 0, x_171);
+lean::cnstr_set(x_172, 1, x_169);
+lean::cnstr_set_scalar(x_172, sizeof(void*)*2, x_170);
+x_173 = x_172;
+x_174 = lean::mk_nat_obj(0ul);
+x_175 = lean::box(0);
+x_176 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___main___spec__2(x_164, x_164, x_174, x_175);
+lean::dec(x_164);
+x_178 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_178, 0, x_173);
+lean::cnstr_set(x_178, 1, x_176);
+lean::cnstr_set_scalar(x_178, sizeof(void*)*2, x_170);
+x_179 = x_178;
+return x_179;
 }
 case 8:
 {
-obj* x_171; obj* x_173; obj* x_176; obj* x_177; obj* x_178; obj* x_180; uint8 x_181; obj* x_182; obj* x_183; obj* x_184; obj* x_185; obj* x_186; obj* x_187; obj* x_189; obj* x_190; 
-x_171 = lean::cnstr_get(x_0, 0);
-lean::inc(x_171);
-x_173 = lean::cnstr_get(x_0, 1);
-lean::inc(x_173);
+obj* x_180; obj* x_182; obj* x_185; obj* x_186; obj* x_187; obj* x_189; uint8 x_190; obj* x_191; obj* x_192; obj* x_193; obj* x_194; obj* x_195; obj* x_196; obj* x_198; obj* x_199; 
+x_180 = lean::cnstr_get(x_0, 0);
+lean::inc(x_180);
+x_182 = lean::cnstr_get(x_0, 1);
+lean::inc(x_182);
 lean::dec(x_0);
-x_176 = l_Nat_repr(x_171);
-x_177 = l_Lean_IR_VarId_HasToString___closed__1;
-x_178 = lean::string_append(x_177, x_176);
-lean::dec(x_176);
-x_180 = lean::alloc_cnstr(2, 1, 0);
-lean::cnstr_set(x_180, 0, x_178);
-x_181 = 0;
-x_182 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__10;
-x_183 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_183, 0, x_182);
-lean::cnstr_set(x_183, 1, x_180);
-lean::cnstr_set_scalar(x_183, sizeof(void*)*2, x_181);
-x_184 = x_183;
-x_185 = lean::mk_nat_obj(0ul);
-x_186 = lean::box(0);
-x_187 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___main___spec__2(x_173, x_173, x_185, x_186);
-lean::dec(x_173);
-x_189 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_189, 0, x_184);
-lean::cnstr_set(x_189, 1, x_187);
-lean::cnstr_set_scalar(x_189, sizeof(void*)*2, x_181);
-x_190 = x_189;
-return x_190;
+x_185 = l_Nat_repr(x_180);
+x_186 = l_Lean_IR_VarId_HasToString___closed__1;
+x_187 = lean::string_append(x_186, x_185);
+lean::dec(x_185);
+x_189 = lean::alloc_cnstr(2, 1, 0);
+lean::cnstr_set(x_189, 0, x_187);
+x_190 = 0;
+x_191 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__10;
+x_192 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_192, 0, x_191);
+lean::cnstr_set(x_192, 1, x_189);
+lean::cnstr_set_scalar(x_192, sizeof(void*)*2, x_190);
+x_193 = x_192;
+x_194 = lean::mk_nat_obj(0ul);
+x_195 = lean::box(0);
+x_196 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___main___spec__2(x_182, x_182, x_194, x_195);
+lean::dec(x_182);
+x_198 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_198, 0, x_193);
+lean::cnstr_set(x_198, 1, x_196);
+lean::cnstr_set_scalar(x_198, sizeof(void*)*2, x_190);
+x_199 = x_198;
+return x_199;
 }
 case 9:
 {
-obj* x_191; obj* x_194; obj* x_195; obj* x_196; obj* x_198; uint8 x_199; obj* x_200; obj* x_201; obj* x_202; 
-x_191 = lean::cnstr_get(x_0, 0);
-lean::inc(x_191);
+obj* x_200; obj* x_203; obj* x_204; obj* x_205; obj* x_207; uint8 x_208; obj* x_209; obj* x_210; obj* x_211; 
+x_200 = lean::cnstr_get(x_0, 0);
+lean::inc(x_200);
 lean::dec(x_0);
-x_194 = l_Nat_repr(x_191);
-x_195 = l_Lean_IR_VarId_HasToString___closed__1;
-x_196 = lean::string_append(x_195, x_194);
-lean::dec(x_194);
-x_198 = lean::alloc_cnstr(2, 1, 0);
-lean::cnstr_set(x_198, 0, x_196);
-x_199 = 0;
-x_200 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__11;
-x_201 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_201, 0, x_200);
-lean::cnstr_set(x_201, 1, x_198);
-lean::cnstr_set_scalar(x_201, sizeof(void*)*2, x_199);
-x_202 = x_201;
-return x_202;
+x_203 = l_Nat_repr(x_200);
+x_204 = l_Lean_IR_VarId_HasToString___closed__1;
+x_205 = lean::string_append(x_204, x_203);
+lean::dec(x_203);
+x_207 = lean::alloc_cnstr(2, 1, 0);
+lean::cnstr_set(x_207, 0, x_205);
+x_208 = 0;
+x_209 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__11;
+x_210 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_210, 0, x_209);
+lean::cnstr_set(x_210, 1, x_207);
+lean::cnstr_set_scalar(x_210, sizeof(void*)*2, x_208);
+x_211 = x_210;
+return x_211;
 }
 case 10:
 {
-obj* x_203; obj* x_206; obj* x_207; obj* x_208; obj* x_210; uint8 x_211; obj* x_212; obj* x_213; obj* x_214; 
-x_203 = lean::cnstr_get(x_0, 0);
-lean::inc(x_203);
+obj* x_212; obj* x_215; obj* x_216; obj* x_217; obj* x_219; uint8 x_220; obj* x_221; obj* x_222; obj* x_223; 
+x_212 = lean::cnstr_get(x_0, 0);
+lean::inc(x_212);
 lean::dec(x_0);
-x_206 = l_Nat_repr(x_203);
-x_207 = l_Lean_IR_VarId_HasToString___closed__1;
-x_208 = lean::string_append(x_207, x_206);
-lean::dec(x_206);
-x_210 = lean::alloc_cnstr(2, 1, 0);
-lean::cnstr_set(x_210, 0, x_208);
-x_211 = 0;
-x_212 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__12;
-x_213 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_213, 0, x_212);
-lean::cnstr_set(x_213, 1, x_210);
-lean::cnstr_set_scalar(x_213, sizeof(void*)*2, x_211);
-x_214 = x_213;
-return x_214;
+x_215 = l_Nat_repr(x_212);
+x_216 = l_Lean_IR_VarId_HasToString___closed__1;
+x_217 = lean::string_append(x_216, x_215);
+lean::dec(x_215);
+x_219 = lean::alloc_cnstr(2, 1, 0);
+lean::cnstr_set(x_219, 0, x_217);
+x_220 = 0;
+x_221 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__12;
+x_222 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_222, 0, x_221);
+lean::cnstr_set(x_222, 1, x_219);
+lean::cnstr_set_scalar(x_222, sizeof(void*)*2, x_220);
+x_223 = x_222;
+return x_223;
 }
 case 11:
 {
-obj* x_215; obj* x_218; 
-x_215 = lean::cnstr_get(x_0, 0);
-lean::inc(x_215);
+obj* x_224; obj* x_227; 
+x_224 = lean::cnstr_get(x_0, 0);
+lean::inc(x_224);
 lean::dec(x_0);
-x_218 = l___private_init_lean_compiler_ir_format_3__formatLitVal___main(x_215);
-return x_218;
+x_227 = l___private_init_lean_compiler_ir_format_3__formatLitVal___main(x_224);
+return x_227;
 }
 case 12:
 {
-obj* x_219; obj* x_222; obj* x_223; obj* x_224; obj* x_226; uint8 x_227; obj* x_228; obj* x_229; obj* x_230; 
-x_219 = lean::cnstr_get(x_0, 0);
-lean::inc(x_219);
+obj* x_228; obj* x_231; obj* x_232; obj* x_233; obj* x_235; uint8 x_236; obj* x_237; obj* x_238; obj* x_239; 
+x_228 = lean::cnstr_get(x_0, 0);
+lean::inc(x_228);
 lean::dec(x_0);
-x_222 = l_Nat_repr(x_219);
-x_223 = l_Lean_IR_VarId_HasToString___closed__1;
-x_224 = lean::string_append(x_223, x_222);
-lean::dec(x_222);
-x_226 = lean::alloc_cnstr(2, 1, 0);
-lean::cnstr_set(x_226, 0, x_224);
-x_227 = 0;
-x_228 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__13;
-x_229 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_229, 0, x_228);
-lean::cnstr_set(x_229, 1, x_226);
-lean::cnstr_set_scalar(x_229, sizeof(void*)*2, x_227);
-x_230 = x_229;
-return x_230;
+x_231 = l_Nat_repr(x_228);
+x_232 = l_Lean_IR_VarId_HasToString___closed__1;
+x_233 = lean::string_append(x_232, x_231);
+lean::dec(x_231);
+x_235 = lean::alloc_cnstr(2, 1, 0);
+lean::cnstr_set(x_235, 0, x_233);
+x_236 = 0;
+x_237 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__13;
+x_238 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_238, 0, x_237);
+lean::cnstr_set(x_238, 1, x_235);
+lean::cnstr_set_scalar(x_238, sizeof(void*)*2, x_236);
+x_239 = x_238;
+return x_239;
 }
 default:
 {
-obj* x_231; obj* x_234; obj* x_235; obj* x_236; obj* x_238; uint8 x_239; obj* x_240; obj* x_241; obj* x_242; 
-x_231 = lean::cnstr_get(x_0, 0);
-lean::inc(x_231);
+obj* x_240; obj* x_243; obj* x_244; obj* x_245; obj* x_247; uint8 x_248; obj* x_249; obj* x_250; obj* x_251; 
+x_240 = lean::cnstr_get(x_0, 0);
+lean::inc(x_240);
 lean::dec(x_0);
-x_234 = l_Nat_repr(x_231);
-x_235 = l_Lean_IR_VarId_HasToString___closed__1;
-x_236 = lean::string_append(x_235, x_234);
-lean::dec(x_234);
-x_238 = lean::alloc_cnstr(2, 1, 0);
-lean::cnstr_set(x_238, 0, x_236);
-x_239 = 0;
-x_240 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__14;
-x_241 = lean::alloc_cnstr(4, 2, 1);
-lean::cnstr_set(x_241, 0, x_240);
-lean::cnstr_set(x_241, 1, x_238);
-lean::cnstr_set_scalar(x_241, sizeof(void*)*2, x_239);
-x_242 = x_241;
-return x_242;
+x_243 = l_Nat_repr(x_240);
+x_244 = l_Lean_IR_VarId_HasToString___closed__1;
+x_245 = lean::string_append(x_244, x_243);
+lean::dec(x_243);
+x_247 = lean::alloc_cnstr(2, 1, 0);
+lean::cnstr_set(x_247, 0, x_245);
+x_248 = 0;
+x_249 = l___private_init_lean_compiler_ir_format_5__formatExpr___main___closed__14;
+x_250 = lean::alloc_cnstr(4, 2, 1);
+lean::cnstr_set(x_250, 0, x_249);
+lean::cnstr_set(x_250, 1, x_247);
+lean::cnstr_set_scalar(x_250, sizeof(void*)*2, x_248);
+x_251 = x_250;
+return x_251;
 }
 }
 }
diff --git a/src/stage0/init/lean/compiler/ir/freevars.cpp b/src/stage0/init/lean/compiler/ir/freevars.cpp
index 9335f20543..8dcb390927 100644
--- a/src/stage0/init/lean/compiler/ir/freevars.cpp
+++ b/src/stage0/init/lean/compiler/ir/freevars.cpp
@@ -609,53 +609,53 @@ x_6 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_freevars_8
 lean::dec(x_2);
 return x_6;
 }
-case 2:
+case 1:
 {
-obj* x_8; obj* x_10; uint8 x_13; 
-x_8 = lean::cnstr_get(x_0, 0);
+obj* x_8; uint8 x_11; 
+x_8 = lean::cnstr_get(x_0, 1);
 lean::inc(x_8);
-x_10 = lean::cnstr_get(x_0, 2);
-lean::inc(x_10);
 lean::dec(x_0);
-x_13 = lean::nat_dec_lt(x_1, x_8);
-if (x_13 == 0)
+x_11 = lean::nat_dec_lt(x_1, x_8);
+if (x_11 == 0)
 {
-obj* x_15; obj* x_16; 
 lean::dec(x_8);
-x_15 = lean::mk_nat_obj(0ul);
-x_16 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_freevars_8__collectArgs___spec__2(x_10, x_10, x_15, x_1);
-lean::dec(x_10);
-return x_16;
-}
-else
-{
-obj* x_19; obj* x_20; 
-lean::dec(x_1);
-x_19 = lean::mk_nat_obj(0ul);
-x_20 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_freevars_8__collectArgs___spec__2(x_10, x_10, x_19, x_8);
-lean::dec(x_10);
-return x_20;
-}
-}
-case 3:
-{
-obj* x_22; uint8 x_25; 
-x_22 = lean::cnstr_get(x_0, 1);
-lean::inc(x_22);
-lean::dec(x_0);
-x_25 = lean::nat_dec_lt(x_1, x_22);
-if (x_25 == 0)
-{
-lean::dec(x_22);
 return x_1;
 }
 else
 {
 lean::dec(x_1);
+return x_8;
+}
+}
+case 2:
+{
+obj* x_14; obj* x_16; uint8 x_19; 
+x_14 = lean::cnstr_get(x_0, 0);
+lean::inc(x_14);
+x_16 = lean::cnstr_get(x_0, 2);
+lean::inc(x_16);
+lean::dec(x_0);
+x_19 = lean::nat_dec_lt(x_1, x_14);
+if (x_19 == 0)
+{
+obj* x_21; obj* x_22; 
+lean::dec(x_14);
+x_21 = lean::mk_nat_obj(0ul);
+x_22 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_freevars_8__collectArgs___spec__2(x_16, x_16, x_21, x_1);
+lean::dec(x_16);
 return x_22;
 }
+else
+{
+obj* x_25; obj* x_26; 
+lean::dec(x_1);
+x_25 = lean::mk_nat_obj(0ul);
+x_26 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_freevars_8__collectArgs___spec__2(x_16, x_16, x_25, x_14);
+lean::dec(x_16);
+return x_26;
 }
-case 4:
+}
+case 3:
 {
 obj* x_28; uint8 x_31; 
 x_28 = lean::cnstr_get(x_0, 1);
@@ -673,10 +673,10 @@ lean::dec(x_1);
 return x_28;
 }
 }
-case 5:
+case 4:
 {
 obj* x_34; uint8 x_37; 
-x_34 = lean::cnstr_get(x_0, 2);
+x_34 = lean::cnstr_get(x_0, 1);
 lean::inc(x_34);
 lean::dec(x_0);
 x_37 = lean::nat_dec_lt(x_1, x_34);
@@ -691,18 +691,25 @@ lean::dec(x_1);
 return x_34;
 }
 }
-case 6:
+case 5:
 {
-obj* x_40; obj* x_43; obj* x_44; 
-x_40 = lean::cnstr_get(x_0, 1);
+obj* x_40; uint8 x_43; 
+x_40 = lean::cnstr_get(x_0, 2);
 lean::inc(x_40);
 lean::dec(x_0);
-x_43 = lean::mk_nat_obj(0ul);
-x_44 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_freevars_8__collectArgs___spec__2(x_40, x_40, x_43, x_1);
+x_43 = lean::nat_dec_lt(x_1, x_40);
+if (x_43 == 0)
+{
 lean::dec(x_40);
-return x_44;
+return x_1;
 }
-case 7:
+else
+{
+lean::dec(x_1);
+return x_40;
+}
+}
+case 6:
 {
 obj* x_46; obj* x_49; obj* x_50; 
 x_46 = lean::cnstr_get(x_0, 1);
@@ -713,32 +720,43 @@ x_50 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_freevars_
 lean::dec(x_46);
 return x_50;
 }
+case 7:
+{
+obj* x_52; obj* x_55; obj* x_56; 
+x_52 = lean::cnstr_get(x_0, 1);
+lean::inc(x_52);
+lean::dec(x_0);
+x_55 = lean::mk_nat_obj(0ul);
+x_56 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_freevars_8__collectArgs___spec__2(x_52, x_52, x_55, x_1);
+lean::dec(x_52);
+return x_56;
+}
 case 8:
 {
-obj* x_52; obj* x_54; uint8 x_57; 
-x_52 = lean::cnstr_get(x_0, 0);
-lean::inc(x_52);
-x_54 = lean::cnstr_get(x_0, 1);
-lean::inc(x_54);
+obj* x_58; obj* x_60; uint8 x_63; 
+x_58 = lean::cnstr_get(x_0, 0);
+lean::inc(x_58);
+x_60 = lean::cnstr_get(x_0, 1);
+lean::inc(x_60);
 lean::dec(x_0);
-x_57 = lean::nat_dec_lt(x_1, x_52);
-if (x_57 == 0)
+x_63 = lean::nat_dec_lt(x_1, x_58);
+if (x_63 == 0)
 {
-obj* x_59; obj* x_60; 
-lean::dec(x_52);
-x_59 = lean::mk_nat_obj(0ul);
-x_60 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_freevars_8__collectArgs___spec__2(x_54, x_54, x_59, x_1);
-lean::dec(x_54);
-return x_60;
+obj* x_65; obj* x_66; 
+lean::dec(x_58);
+x_65 = lean::mk_nat_obj(0ul);
+x_66 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_freevars_8__collectArgs___spec__2(x_60, x_60, x_65, x_1);
+lean::dec(x_60);
+return x_66;
 }
 else
 {
-obj* x_63; obj* x_64; 
+obj* x_69; obj* x_70; 
 lean::dec(x_1);
-x_63 = lean::mk_nat_obj(0ul);
-x_64 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_freevars_8__collectArgs___spec__2(x_54, x_54, x_63, x_52);
-lean::dec(x_54);
-return x_64;
+x_69 = lean::mk_nat_obj(0ul);
+x_70 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_freevars_8__collectArgs___spec__2(x_60, x_60, x_69, x_58);
+lean::dec(x_60);
+return x_70;
 }
 }
 case 11:
@@ -748,20 +766,20 @@ return x_1;
 }
 default:
 {
-obj* x_67; uint8 x_70; 
-x_67 = lean::cnstr_get(x_0, 0);
-lean::inc(x_67);
+obj* x_73; uint8 x_76; 
+x_73 = lean::cnstr_get(x_0, 0);
+lean::inc(x_73);
 lean::dec(x_0);
-x_70 = lean::nat_dec_lt(x_1, x_67);
-if (x_70 == 0)
+x_76 = lean::nat_dec_lt(x_1, x_73);
+if (x_76 == 0)
 {
-lean::dec(x_67);
+lean::dec(x_73);
 return x_1;
 }
 else
 {
 lean::dec(x_1);
-return x_67;
+return x_73;
 }
 }
 }
@@ -2806,7 +2824,7 @@ switch (lean::obj_tag(x_0)) {
 case 1:
 {
 obj* x_3; obj* x_6; 
-x_3 = lean::cnstr_get(x_0, 0);
+x_3 = lean::cnstr_get(x_0, 1);
 lean::inc(x_3);
 lean::dec(x_0);
 x_6 = l_RBNode_findCore___main___at___private_init_lean_compiler_ir_freevars_14__collectIndex___spec__1(x_1, x_3);
@@ -2819,8 +2837,8 @@ return x_8;
 }
 else
 {
-lean::dec(x_3);
 lean::dec(x_6);
+lean::dec(x_3);
 return x_2;
 }
 }
@@ -2871,8 +2889,8 @@ return x_33;
 }
 else
 {
-lean::dec(x_28);
 lean::dec(x_31);
+lean::dec(x_28);
 return x_2;
 }
 }
@@ -2941,8 +2959,8 @@ return x_62;
 else
 {
 obj* x_66; obj* x_67; 
-lean::dec(x_52);
 lean::dec(x_58);
+lean::dec(x_52);
 x_66 = lean::mk_nat_obj(0ul);
 x_67 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_freevars_24__collectArgs___spec__2(x_54, x_1, x_54, x_66, x_2);
 lean::dec(x_54);
@@ -2986,8 +3004,8 @@ return x_82;
 }
 else
 {
-lean::dec(x_80);
 lean::dec(x_77);
+lean::dec(x_80);
 return x_2;
 }
 }
@@ -3013,8 +3031,8 @@ return x_92;
 }
 else
 {
-lean::dec(x_90);
 lean::dec(x_87);
+lean::dec(x_90);
 return x_2;
 }
 }
@@ -3775,95 +3793,102 @@ x_3 = lean::mk_nat_obj(0ul);
 x_4 = l_Array_anyMAux___main___at_Lean_IR_HasIndex_visitArgs___spec__1(x_0, x_2, x_3);
 return x_4;
 }
+case 1:
+{
+obj* x_5; uint8 x_6; 
+x_5 = lean::cnstr_get(x_1, 1);
+x_6 = lean::nat_dec_eq(x_0, x_5);
+return x_6;
+}
 case 2:
 {
-obj* x_5; obj* x_6; uint8 x_7; 
-x_5 = lean::cnstr_get(x_1, 0);
-x_6 = lean::cnstr_get(x_1, 2);
-x_7 = lean::nat_dec_eq(x_0, x_5);
-if (x_7 == 0)
+obj* x_7; obj* x_8; uint8 x_9; 
+x_7 = lean::cnstr_get(x_1, 0);
+x_8 = lean::cnstr_get(x_1, 2);
+x_9 = lean::nat_dec_eq(x_0, x_7);
+if (x_9 == 0)
 {
-obj* x_8; uint8 x_9; 
-x_8 = lean::mk_nat_obj(0ul);
-x_9 = l_Array_anyMAux___main___at_Lean_IR_HasIndex_visitArgs___spec__1(x_0, x_6, x_8);
-return x_9;
+obj* x_10; uint8 x_11; 
+x_10 = lean::mk_nat_obj(0ul);
+x_11 = l_Array_anyMAux___main___at_Lean_IR_HasIndex_visitArgs___spec__1(x_0, x_8, x_10);
+return x_11;
 }
 else
 {
-uint8 x_10; 
-x_10 = 1;
-return x_10;
+uint8 x_12; 
+x_12 = 1;
+return x_12;
 }
 }
 case 3:
 {
-obj* x_11; uint8 x_12; 
-x_11 = lean::cnstr_get(x_1, 1);
-x_12 = lean::nat_dec_eq(x_0, x_11);
-return x_12;
-}
-case 4:
-{
 obj* x_13; uint8 x_14; 
 x_13 = lean::cnstr_get(x_1, 1);
 x_14 = lean::nat_dec_eq(x_0, x_13);
 return x_14;
 }
-case 5:
+case 4:
 {
 obj* x_15; uint8 x_16; 
-x_15 = lean::cnstr_get(x_1, 2);
+x_15 = lean::cnstr_get(x_1, 1);
 x_16 = lean::nat_dec_eq(x_0, x_15);
 return x_16;
 }
+case 5:
+{
+obj* x_17; uint8 x_18; 
+x_17 = lean::cnstr_get(x_1, 2);
+x_18 = lean::nat_dec_eq(x_0, x_17);
+return x_18;
+}
 case 6:
 {
-obj* x_17; obj* x_18; uint8 x_19; 
-x_17 = lean::cnstr_get(x_1, 1);
-x_18 = lean::mk_nat_obj(0ul);
-x_19 = l_Array_anyMAux___main___at_Lean_IR_HasIndex_visitArgs___spec__1(x_0, x_17, x_18);
-return x_19;
+obj* x_19; obj* x_20; uint8 x_21; 
+x_19 = lean::cnstr_get(x_1, 1);
+x_20 = lean::mk_nat_obj(0ul);
+x_21 = l_Array_anyMAux___main___at_Lean_IR_HasIndex_visitArgs___spec__1(x_0, x_19, x_20);
+return x_21;
 }
 case 7:
 {
-obj* x_20; obj* x_21; uint8 x_22; 
-x_20 = lean::cnstr_get(x_1, 1);
-x_21 = lean::mk_nat_obj(0ul);
-x_22 = l_Array_anyMAux___main___at_Lean_IR_HasIndex_visitArgs___spec__1(x_0, x_20, x_21);
-return x_22;
+obj* x_22; obj* x_23; uint8 x_24; 
+x_22 = lean::cnstr_get(x_1, 1);
+x_23 = lean::mk_nat_obj(0ul);
+x_24 = l_Array_anyMAux___main___at_Lean_IR_HasIndex_visitArgs___spec__1(x_0, x_22, x_23);
+return x_24;
 }
 case 8:
 {
-obj* x_23; obj* x_24; uint8 x_25; 
-x_23 = lean::cnstr_get(x_1, 0);
-x_24 = lean::cnstr_get(x_1, 1);
-x_25 = lean::nat_dec_eq(x_0, x_23);
-if (x_25 == 0)
+obj* x_25; obj* x_26; uint8 x_27; 
+x_25 = lean::cnstr_get(x_1, 0);
+x_26 = lean::cnstr_get(x_1, 1);
+x_27 = lean::nat_dec_eq(x_0, x_25);
+if (x_27 == 0)
 {
-obj* x_26; uint8 x_27; 
-x_26 = lean::mk_nat_obj(0ul);
-x_27 = l_Array_anyMAux___main___at_Lean_IR_HasIndex_visitArgs___spec__1(x_0, x_24, x_26);
-return x_27;
+obj* x_28; uint8 x_29; 
+x_28 = lean::mk_nat_obj(0ul);
+x_29 = l_Array_anyMAux___main___at_Lean_IR_HasIndex_visitArgs___spec__1(x_0, x_26, x_28);
+return x_29;
 }
 else
 {
-uint8 x_28; 
-x_28 = 1;
-return x_28;
+uint8 x_30; 
+x_30 = 1;
+return x_30;
 }
 }
 case 11:
 {
-uint8 x_29; 
-x_29 = 0;
-return x_29;
+uint8 x_31; 
+x_31 = 0;
+return x_31;
 }
 default:
 {
-obj* x_30; uint8 x_31; 
-x_30 = lean::cnstr_get(x_1, 0);
-x_31 = lean::nat_dec_eq(x_0, x_30);
-return x_31;
+obj* x_32; uint8 x_33; 
+x_32 = lean::cnstr_get(x_1, 0);
+x_33 = lean::nat_dec_eq(x_0, x_32);
+return x_33;
 }
 }
 }
diff --git a/src/stage0/init/lean/compiler/ir/livevars.cpp b/src/stage0/init/lean/compiler/ir/livevars.cpp
index 3e57f0ba4b..02c627a9a6 100644
--- a/src/stage0/init/lean/compiler/ir/livevars.cpp
+++ b/src/stage0/init/lean/compiler/ir/livevars.cpp
@@ -2375,32 +2375,32 @@ x_6 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_livevars_5
 lean::dec(x_2);
 return x_6;
 }
+case 1:
+{
+obj* x_8; obj* x_11; obj* x_12; 
+x_8 = lean::cnstr_get(x_0, 1);
+lean::inc(x_8);
+lean::dec(x_0);
+x_11 = lean::box(0);
+x_12 = l_RBNode_insert___at___private_init_lean_compiler_ir_livevars_2__collectVar___spec__1(x_1, x_8, x_11);
+return x_12;
+}
 case 2:
 {
-obj* x_8; obj* x_10; obj* x_13; obj* x_14; obj* x_16; obj* x_17; 
-x_8 = lean::cnstr_get(x_0, 0);
-lean::inc(x_8);
-x_10 = lean::cnstr_get(x_0, 2);
-lean::inc(x_10);
-lean::dec(x_0);
-x_13 = lean::mk_nat_obj(0ul);
-x_14 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_livevars_5__collectArgs___spec__2(x_10, x_10, x_13, x_1);
-lean::dec(x_10);
-x_16 = lean::box(0);
-x_17 = l_RBNode_insert___at___private_init_lean_compiler_ir_livevars_2__collectVar___spec__1(x_14, x_8, x_16);
-return x_17;
-}
-case 3:
-{
-obj* x_18; obj* x_21; obj* x_22; 
-x_18 = lean::cnstr_get(x_0, 1);
-lean::inc(x_18);
+obj* x_13; obj* x_15; obj* x_18; obj* x_19; obj* x_21; obj* x_22; 
+x_13 = lean::cnstr_get(x_0, 0);
+lean::inc(x_13);
+x_15 = lean::cnstr_get(x_0, 2);
+lean::inc(x_15);
 lean::dec(x_0);
+x_18 = lean::mk_nat_obj(0ul);
+x_19 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_livevars_5__collectArgs___spec__2(x_15, x_15, x_18, x_1);
+lean::dec(x_15);
 x_21 = lean::box(0);
-x_22 = l_RBNode_insert___at___private_init_lean_compiler_ir_livevars_2__collectVar___spec__1(x_1, x_18, x_21);
+x_22 = l_RBNode_insert___at___private_init_lean_compiler_ir_livevars_2__collectVar___spec__1(x_19, x_13, x_21);
 return x_22;
 }
-case 4:
+case 3:
 {
 obj* x_23; obj* x_26; obj* x_27; 
 x_23 = lean::cnstr_get(x_0, 1);
@@ -2410,52 +2410,62 @@ x_26 = lean::box(0);
 x_27 = l_RBNode_insert___at___private_init_lean_compiler_ir_livevars_2__collectVar___spec__1(x_1, x_23, x_26);
 return x_27;
 }
-case 5:
+case 4:
 {
 obj* x_28; obj* x_31; obj* x_32; 
-x_28 = lean::cnstr_get(x_0, 2);
+x_28 = lean::cnstr_get(x_0, 1);
 lean::inc(x_28);
 lean::dec(x_0);
 x_31 = lean::box(0);
 x_32 = l_RBNode_insert___at___private_init_lean_compiler_ir_livevars_2__collectVar___spec__1(x_1, x_28, x_31);
 return x_32;
 }
-case 6:
+case 5:
 {
 obj* x_33; obj* x_36; obj* x_37; 
-x_33 = lean::cnstr_get(x_0, 1);
+x_33 = lean::cnstr_get(x_0, 2);
 lean::inc(x_33);
 lean::dec(x_0);
-x_36 = lean::mk_nat_obj(0ul);
-x_37 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_livevars_5__collectArgs___spec__2(x_33, x_33, x_36, x_1);
-lean::dec(x_33);
+x_36 = lean::box(0);
+x_37 = l_RBNode_insert___at___private_init_lean_compiler_ir_livevars_2__collectVar___spec__1(x_1, x_33, x_36);
 return x_37;
 }
+case 6:
+{
+obj* x_38; obj* x_41; obj* x_42; 
+x_38 = lean::cnstr_get(x_0, 1);
+lean::inc(x_38);
+lean::dec(x_0);
+x_41 = lean::mk_nat_obj(0ul);
+x_42 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_livevars_5__collectArgs___spec__2(x_38, x_38, x_41, x_1);
+lean::dec(x_38);
+return x_42;
+}
 case 7:
 {
-obj* x_39; obj* x_42; obj* x_43; 
-x_39 = lean::cnstr_get(x_0, 1);
-lean::inc(x_39);
+obj* x_44; obj* x_47; obj* x_48; 
+x_44 = lean::cnstr_get(x_0, 1);
+lean::inc(x_44);
 lean::dec(x_0);
-x_42 = lean::mk_nat_obj(0ul);
-x_43 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_livevars_5__collectArgs___spec__2(x_39, x_39, x_42, x_1);
-lean::dec(x_39);
-return x_43;
+x_47 = lean::mk_nat_obj(0ul);
+x_48 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_livevars_5__collectArgs___spec__2(x_44, x_44, x_47, x_1);
+lean::dec(x_44);
+return x_48;
 }
 case 8:
 {
-obj* x_45; obj* x_47; obj* x_50; obj* x_51; obj* x_53; obj* x_54; 
-x_45 = lean::cnstr_get(x_0, 0);
-lean::inc(x_45);
-x_47 = lean::cnstr_get(x_0, 1);
-lean::inc(x_47);
+obj* x_50; obj* x_52; obj* x_55; obj* x_56; obj* x_58; obj* x_59; 
+x_50 = lean::cnstr_get(x_0, 0);
+lean::inc(x_50);
+x_52 = lean::cnstr_get(x_0, 1);
+lean::inc(x_52);
 lean::dec(x_0);
-x_50 = lean::mk_nat_obj(0ul);
-x_51 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_livevars_5__collectArgs___spec__2(x_47, x_47, x_50, x_1);
-lean::dec(x_47);
-x_53 = lean::box(0);
-x_54 = l_RBNode_insert___at___private_init_lean_compiler_ir_livevars_2__collectVar___spec__1(x_51, x_45, x_53);
-return x_54;
+x_55 = lean::mk_nat_obj(0ul);
+x_56 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_livevars_5__collectArgs___spec__2(x_52, x_52, x_55, x_1);
+lean::dec(x_52);
+x_58 = lean::box(0);
+x_59 = l_RBNode_insert___at___private_init_lean_compiler_ir_livevars_2__collectVar___spec__1(x_56, x_50, x_58);
+return x_59;
 }
 case 11:
 {
@@ -2464,13 +2474,13 @@ return x_1;
 }
 default:
 {
-obj* x_56; obj* x_59; obj* x_60; 
-x_56 = lean::cnstr_get(x_0, 0);
-lean::inc(x_56);
+obj* x_61; obj* x_64; obj* x_65; 
+x_61 = lean::cnstr_get(x_0, 0);
+lean::inc(x_61);
 lean::dec(x_0);
-x_59 = lean::box(0);
-x_60 = l_RBNode_insert___at___private_init_lean_compiler_ir_livevars_2__collectVar___spec__1(x_1, x_56, x_59);
-return x_60;
+x_64 = lean::box(0);
+x_65 = l_RBNode_insert___at___private_init_lean_compiler_ir_livevars_2__collectVar___spec__1(x_1, x_61, x_64);
+return x_65;
 }
 }
 }
diff --git a/src/stage0/init/lean/compiler/ir/normids.cpp b/src/stage0/init/lean/compiler/ir/normids.cpp
index 4af12821f1..57d25b5955 100644
--- a/src/stage0/init/lean/compiler/ir/normids.cpp
+++ b/src/stage0/init/lean/compiler/ir/normids.cpp
@@ -1980,252 +1980,255 @@ return x_9;
 }
 case 1:
 {
-obj* x_10; obj* x_12; obj* x_13; obj* x_15; 
+obj* x_10; obj* x_12; obj* x_14; obj* x_15; obj* x_17; 
 x_10 = lean::cnstr_get(x_0, 0);
+x_12 = lean::cnstr_get(x_0, 1);
 if (lean::is_exclusive(x_0)) {
- x_12 = x_0;
+ x_14 = x_0;
 } else {
  lean::inc(x_10);
+ lean::inc(x_12);
  lean::dec(x_0);
- x_12 = lean::box(0);
+ x_14 = lean::box(0);
 }
-x_13 = l_Lean_IR_NormalizeIds_normIndex(x_10, x_1);
-lean::dec(x_10);
-if (lean::is_scalar(x_12)) {
- x_15 = lean::alloc_cnstr(1, 1, 0);
+x_15 = l_Lean_IR_NormalizeIds_normIndex(x_12, x_1);
+lean::dec(x_12);
+if (lean::is_scalar(x_14)) {
+ x_17 = lean::alloc_cnstr(1, 2, 0);
 } else {
- x_15 = x_12;
+ x_17 = x_14;
 }
-lean::cnstr_set(x_15, 0, x_13);
-return x_15;
+lean::cnstr_set(x_17, 0, x_10);
+lean::cnstr_set(x_17, 1, x_15);
+return x_17;
 }
 case 2:
 {
-obj* x_16; obj* x_18; uint8 x_20; obj* x_21; obj* x_23; obj* x_25; obj* x_27; obj* x_28; obj* x_29; obj* x_30; 
-x_16 = lean::cnstr_get(x_0, 0);
-x_18 = lean::cnstr_get(x_0, 1);
-x_20 = lean::cnstr_get_scalar<uint8>(x_0, sizeof(void*)*3);
-x_21 = lean::cnstr_get(x_0, 2);
+obj* x_18; obj* x_20; uint8 x_22; obj* x_23; obj* x_25; obj* x_27; obj* x_29; obj* x_30; obj* x_31; obj* x_32; 
+x_18 = lean::cnstr_get(x_0, 0);
+x_20 = lean::cnstr_get(x_0, 1);
+x_22 = lean::cnstr_get_scalar<uint8>(x_0, sizeof(void*)*3);
+x_23 = lean::cnstr_get(x_0, 2);
 if (lean::is_exclusive(x_0)) {
- x_23 = x_0;
+ x_25 = x_0;
 } else {
- lean::inc(x_16);
  lean::inc(x_18);
- lean::inc(x_21);
+ lean::inc(x_20);
+ lean::inc(x_23);
  lean::dec(x_0);
- x_23 = lean::box(0);
+ x_25 = lean::box(0);
 }
 lean::inc(x_1);
-x_25 = l_Lean_IR_NormalizeIds_normIndex(x_16, x_1);
-lean::dec(x_16);
-x_27 = lean::mk_nat_obj(0ul);
-x_28 = l_Array_hmmapAux___main___at_Lean_IR_NormalizeIds_normArgs___spec__1(x_1, x_27, x_21);
-if (lean::is_scalar(x_23)) {
- x_29 = lean::alloc_cnstr(2, 3, 1);
+x_27 = l_Lean_IR_NormalizeIds_normIndex(x_18, x_1);
+lean::dec(x_18);
+x_29 = lean::mk_nat_obj(0ul);
+x_30 = l_Array_hmmapAux___main___at_Lean_IR_NormalizeIds_normArgs___spec__1(x_1, x_29, x_23);
+if (lean::is_scalar(x_25)) {
+ x_31 = lean::alloc_cnstr(2, 3, 1);
 } else {
- x_29 = x_23;
+ x_31 = x_25;
 }
-lean::cnstr_set(x_29, 0, x_25);
-lean::cnstr_set(x_29, 1, x_18);
-lean::cnstr_set(x_29, 2, x_28);
-lean::cnstr_set_scalar(x_29, sizeof(void*)*3, x_20);
-x_30 = x_29;
-return x_30;
+lean::cnstr_set(x_31, 0, x_27);
+lean::cnstr_set(x_31, 1, x_20);
+lean::cnstr_set(x_31, 2, x_30);
+lean::cnstr_set_scalar(x_31, sizeof(void*)*3, x_22);
+x_32 = x_31;
+return x_32;
 }
 case 3:
 {
-obj* x_31; obj* x_33; obj* x_35; obj* x_36; obj* x_38; 
-x_31 = lean::cnstr_get(x_0, 0);
-x_33 = lean::cnstr_get(x_0, 1);
+obj* x_33; obj* x_35; obj* x_37; obj* x_38; obj* x_40; 
+x_33 = lean::cnstr_get(x_0, 0);
+x_35 = lean::cnstr_get(x_0, 1);
 if (lean::is_exclusive(x_0)) {
- x_35 = x_0;
+ x_37 = x_0;
 } else {
- lean::inc(x_31);
  lean::inc(x_33);
+ lean::inc(x_35);
  lean::dec(x_0);
- x_35 = lean::box(0);
+ x_37 = lean::box(0);
 }
-x_36 = l_Lean_IR_NormalizeIds_normIndex(x_33, x_1);
-lean::dec(x_33);
-if (lean::is_scalar(x_35)) {
- x_38 = lean::alloc_cnstr(3, 2, 0);
+x_38 = l_Lean_IR_NormalizeIds_normIndex(x_35, x_1);
+lean::dec(x_35);
+if (lean::is_scalar(x_37)) {
+ x_40 = lean::alloc_cnstr(3, 2, 0);
 } else {
- x_38 = x_35;
+ x_40 = x_37;
 }
-lean::cnstr_set(x_38, 0, x_31);
-lean::cnstr_set(x_38, 1, x_36);
-return x_38;
+lean::cnstr_set(x_40, 0, x_33);
+lean::cnstr_set(x_40, 1, x_38);
+return x_40;
 }
 case 4:
 {
-obj* x_39; obj* x_41; obj* x_43; obj* x_44; obj* x_46; 
-x_39 = lean::cnstr_get(x_0, 0);
-x_41 = lean::cnstr_get(x_0, 1);
+obj* x_41; obj* x_43; obj* x_45; obj* x_46; obj* x_48; 
+x_41 = lean::cnstr_get(x_0, 0);
+x_43 = lean::cnstr_get(x_0, 1);
 if (lean::is_exclusive(x_0)) {
- x_43 = x_0;
+ x_45 = x_0;
 } else {
- lean::inc(x_39);
  lean::inc(x_41);
+ lean::inc(x_43);
  lean::dec(x_0);
- x_43 = lean::box(0);
+ x_45 = lean::box(0);
 }
-x_44 = l_Lean_IR_NormalizeIds_normIndex(x_41, x_1);
-lean::dec(x_41);
-if (lean::is_scalar(x_43)) {
- x_46 = lean::alloc_cnstr(4, 2, 0);
+x_46 = l_Lean_IR_NormalizeIds_normIndex(x_43, x_1);
+lean::dec(x_43);
+if (lean::is_scalar(x_45)) {
+ x_48 = lean::alloc_cnstr(4, 2, 0);
 } else {
- x_46 = x_43;
+ x_48 = x_45;
 }
-lean::cnstr_set(x_46, 0, x_39);
-lean::cnstr_set(x_46, 1, x_44);
-return x_46;
+lean::cnstr_set(x_48, 0, x_41);
+lean::cnstr_set(x_48, 1, x_46);
+return x_48;
 }
 case 5:
 {
-obj* x_47; obj* x_49; obj* x_51; obj* x_53; obj* x_54; obj* x_56; 
-x_47 = lean::cnstr_get(x_0, 0);
-x_49 = lean::cnstr_get(x_0, 1);
-x_51 = lean::cnstr_get(x_0, 2);
+obj* x_49; obj* x_51; obj* x_53; obj* x_55; obj* x_56; obj* x_58; 
+x_49 = lean::cnstr_get(x_0, 0);
+x_51 = lean::cnstr_get(x_0, 1);
+x_53 = lean::cnstr_get(x_0, 2);
 if (lean::is_exclusive(x_0)) {
- x_53 = x_0;
+ x_55 = x_0;
 } else {
- lean::inc(x_47);
  lean::inc(x_49);
  lean::inc(x_51);
+ lean::inc(x_53);
  lean::dec(x_0);
- x_53 = lean::box(0);
+ x_55 = lean::box(0);
 }
-x_54 = l_Lean_IR_NormalizeIds_normIndex(x_51, x_1);
-lean::dec(x_51);
-if (lean::is_scalar(x_53)) {
- x_56 = lean::alloc_cnstr(5, 3, 0);
+x_56 = l_Lean_IR_NormalizeIds_normIndex(x_53, x_1);
+lean::dec(x_53);
+if (lean::is_scalar(x_55)) {
+ x_58 = lean::alloc_cnstr(5, 3, 0);
 } else {
- x_56 = x_53;
+ x_58 = x_55;
 }
-lean::cnstr_set(x_56, 0, x_47);
-lean::cnstr_set(x_56, 1, x_49);
-lean::cnstr_set(x_56, 2, x_54);
-return x_56;
+lean::cnstr_set(x_58, 0, x_49);
+lean::cnstr_set(x_58, 1, x_51);
+lean::cnstr_set(x_58, 2, x_56);
+return x_58;
 }
 case 6:
 {
-obj* x_57; obj* x_59; obj* x_61; obj* x_62; obj* x_63; obj* x_64; 
-x_57 = lean::cnstr_get(x_0, 0);
-x_59 = lean::cnstr_get(x_0, 1);
+obj* x_59; obj* x_61; obj* x_63; obj* x_64; obj* x_65; obj* x_66; 
+x_59 = lean::cnstr_get(x_0, 0);
+x_61 = lean::cnstr_get(x_0, 1);
 if (lean::is_exclusive(x_0)) {
- x_61 = x_0;
+ x_63 = x_0;
 } else {
- lean::inc(x_57);
  lean::inc(x_59);
+ lean::inc(x_61);
  lean::dec(x_0);
- x_61 = lean::box(0);
+ x_63 = lean::box(0);
 }
-x_62 = lean::mk_nat_obj(0ul);
-x_63 = l_Array_hmmapAux___main___at_Lean_IR_NormalizeIds_normArgs___spec__1(x_1, x_62, x_59);
-if (lean::is_scalar(x_61)) {
- x_64 = lean::alloc_cnstr(6, 2, 0);
+x_64 = lean::mk_nat_obj(0ul);
+x_65 = l_Array_hmmapAux___main___at_Lean_IR_NormalizeIds_normArgs___spec__1(x_1, x_64, x_61);
+if (lean::is_scalar(x_63)) {
+ x_66 = lean::alloc_cnstr(6, 2, 0);
 } else {
- x_64 = x_61;
+ x_66 = x_63;
 }
-lean::cnstr_set(x_64, 0, x_57);
-lean::cnstr_set(x_64, 1, x_63);
-return x_64;
+lean::cnstr_set(x_66, 0, x_59);
+lean::cnstr_set(x_66, 1, x_65);
+return x_66;
 }
 case 7:
 {
-obj* x_65; obj* x_67; obj* x_69; obj* x_70; obj* x_71; obj* x_72; 
-x_65 = lean::cnstr_get(x_0, 0);
-x_67 = lean::cnstr_get(x_0, 1);
+obj* x_67; obj* x_69; obj* x_71; obj* x_72; obj* x_73; obj* x_74; 
+x_67 = lean::cnstr_get(x_0, 0);
+x_69 = lean::cnstr_get(x_0, 1);
 if (lean::is_exclusive(x_0)) {
- x_69 = x_0;
+ x_71 = x_0;
 } else {
- lean::inc(x_65);
  lean::inc(x_67);
+ lean::inc(x_69);
  lean::dec(x_0);
- x_69 = lean::box(0);
+ x_71 = lean::box(0);
 }
-x_70 = lean::mk_nat_obj(0ul);
-x_71 = l_Array_hmmapAux___main___at_Lean_IR_NormalizeIds_normArgs___spec__1(x_1, x_70, x_67);
-if (lean::is_scalar(x_69)) {
- x_72 = lean::alloc_cnstr(7, 2, 0);
+x_72 = lean::mk_nat_obj(0ul);
+x_73 = l_Array_hmmapAux___main___at_Lean_IR_NormalizeIds_normArgs___spec__1(x_1, x_72, x_69);
+if (lean::is_scalar(x_71)) {
+ x_74 = lean::alloc_cnstr(7, 2, 0);
 } else {
- x_72 = x_69;
+ x_74 = x_71;
 }
-lean::cnstr_set(x_72, 0, x_65);
-lean::cnstr_set(x_72, 1, x_71);
-return x_72;
+lean::cnstr_set(x_74, 0, x_67);
+lean::cnstr_set(x_74, 1, x_73);
+return x_74;
 }
 case 8:
 {
-obj* x_73; obj* x_75; obj* x_77; obj* x_79; obj* x_81; obj* x_82; obj* x_83; 
-x_73 = lean::cnstr_get(x_0, 0);
-x_75 = lean::cnstr_get(x_0, 1);
+obj* x_75; obj* x_77; obj* x_79; obj* x_81; obj* x_83; obj* x_84; obj* x_85; 
+x_75 = lean::cnstr_get(x_0, 0);
+x_77 = lean::cnstr_get(x_0, 1);
 if (lean::is_exclusive(x_0)) {
- x_77 = x_0;
+ x_79 = x_0;
 } else {
- lean::inc(x_73);
  lean::inc(x_75);
+ lean::inc(x_77);
  lean::dec(x_0);
- x_77 = lean::box(0);
+ x_79 = lean::box(0);
 }
 lean::inc(x_1);
-x_79 = l_Lean_IR_NormalizeIds_normIndex(x_73, x_1);
-lean::dec(x_73);
-x_81 = lean::mk_nat_obj(0ul);
-x_82 = l_Array_hmmapAux___main___at_Lean_IR_NormalizeIds_normArgs___spec__1(x_1, x_81, x_75);
-if (lean::is_scalar(x_77)) {
- x_83 = lean::alloc_cnstr(8, 2, 0);
+x_81 = l_Lean_IR_NormalizeIds_normIndex(x_75, x_1);
+lean::dec(x_75);
+x_83 = lean::mk_nat_obj(0ul);
+x_84 = l_Array_hmmapAux___main___at_Lean_IR_NormalizeIds_normArgs___spec__1(x_1, x_83, x_77);
+if (lean::is_scalar(x_79)) {
+ x_85 = lean::alloc_cnstr(8, 2, 0);
 } else {
- x_83 = x_77;
+ x_85 = x_79;
 }
-lean::cnstr_set(x_83, 0, x_79);
-lean::cnstr_set(x_83, 1, x_82);
-return x_83;
+lean::cnstr_set(x_85, 0, x_81);
+lean::cnstr_set(x_85, 1, x_84);
+return x_85;
 }
 case 9:
 {
-uint8 x_84; obj* x_85; obj* x_87; obj* x_88; obj* x_90; obj* x_91; 
-x_84 = lean::cnstr_get_scalar<uint8>(x_0, sizeof(void*)*1);
-x_85 = lean::cnstr_get(x_0, 0);
+uint8 x_86; obj* x_87; obj* x_89; obj* x_90; obj* x_92; obj* x_93; 
+x_86 = lean::cnstr_get_scalar<uint8>(x_0, sizeof(void*)*1);
+x_87 = lean::cnstr_get(x_0, 0);
 if (lean::is_exclusive(x_0)) {
- x_87 = x_0;
+ x_89 = x_0;
 } else {
- lean::inc(x_85);
+ lean::inc(x_87);
  lean::dec(x_0);
- x_87 = lean::box(0);
+ x_89 = lean::box(0);
 }
-x_88 = l_Lean_IR_NormalizeIds_normIndex(x_85, x_1);
-lean::dec(x_85);
-if (lean::is_scalar(x_87)) {
- x_90 = lean::alloc_cnstr(9, 1, 1);
+x_90 = l_Lean_IR_NormalizeIds_normIndex(x_87, x_1);
+lean::dec(x_87);
+if (lean::is_scalar(x_89)) {
+ x_92 = lean::alloc_cnstr(9, 1, 1);
 } else {
- x_90 = x_87;
+ x_92 = x_89;
 }
-lean::cnstr_set(x_90, 0, x_88);
-lean::cnstr_set_scalar(x_90, sizeof(void*)*1, x_84);
-x_91 = x_90;
-return x_91;
+lean::cnstr_set(x_92, 0, x_90);
+lean::cnstr_set_scalar(x_92, sizeof(void*)*1, x_86);
+x_93 = x_92;
+return x_93;
 }
 case 10:
 {
-obj* x_92; obj* x_94; obj* x_95; obj* x_97; 
-x_92 = lean::cnstr_get(x_0, 0);
+obj* x_94; obj* x_96; obj* x_97; obj* x_99; 
+x_94 = lean::cnstr_get(x_0, 0);
 if (lean::is_exclusive(x_0)) {
- x_94 = x_0;
+ x_96 = x_0;
 } else {
- lean::inc(x_92);
+ lean::inc(x_94);
  lean::dec(x_0);
- x_94 = lean::box(0);
+ x_96 = lean::box(0);
 }
-x_95 = l_Lean_IR_NormalizeIds_normIndex(x_92, x_1);
-lean::dec(x_92);
-if (lean::is_scalar(x_94)) {
- x_97 = lean::alloc_cnstr(10, 1, 0);
+x_97 = l_Lean_IR_NormalizeIds_normIndex(x_94, x_1);
+lean::dec(x_94);
+if (lean::is_scalar(x_96)) {
+ x_99 = lean::alloc_cnstr(10, 1, 0);
 } else {
- x_97 = x_94;
+ x_99 = x_96;
 }
-lean::cnstr_set(x_97, 0, x_95);
-return x_97;
+lean::cnstr_set(x_99, 0, x_97);
+return x_99;
 }
 case 11:
 {
@@ -2234,45 +2237,45 @@ return x_0;
 }
 case 12:
 {
-obj* x_99; obj* x_101; obj* x_102; obj* x_104; 
-x_99 = lean::cnstr_get(x_0, 0);
+obj* x_101; obj* x_103; obj* x_104; obj* x_106; 
+x_101 = lean::cnstr_get(x_0, 0);
 if (lean::is_exclusive(x_0)) {
- x_101 = x_0;
+ x_103 = x_0;
 } else {
- lean::inc(x_99);
+ lean::inc(x_101);
  lean::dec(x_0);
- x_101 = lean::box(0);
+ x_103 = lean::box(0);
 }
-x_102 = l_Lean_IR_NormalizeIds_normIndex(x_99, x_1);
-lean::dec(x_99);
-if (lean::is_scalar(x_101)) {
- x_104 = lean::alloc_cnstr(12, 1, 0);
+x_104 = l_Lean_IR_NormalizeIds_normIndex(x_101, x_1);
+lean::dec(x_101);
+if (lean::is_scalar(x_103)) {
+ x_106 = lean::alloc_cnstr(12, 1, 0);
 } else {
- x_104 = x_101;
+ x_106 = x_103;
 }
-lean::cnstr_set(x_104, 0, x_102);
-return x_104;
+lean::cnstr_set(x_106, 0, x_104);
+return x_106;
 }
 default:
 {
-obj* x_105; obj* x_107; obj* x_108; obj* x_110; 
-x_105 = lean::cnstr_get(x_0, 0);
+obj* x_107; obj* x_109; obj* x_110; obj* x_112; 
+x_107 = lean::cnstr_get(x_0, 0);
 if (lean::is_exclusive(x_0)) {
- x_107 = x_0;
+ x_109 = x_0;
 } else {
- lean::inc(x_105);
+ lean::inc(x_107);
  lean::dec(x_0);
- x_107 = lean::box(0);
+ x_109 = lean::box(0);
 }
-x_108 = l_Lean_IR_NormalizeIds_normIndex(x_105, x_1);
-lean::dec(x_105);
-if (lean::is_scalar(x_107)) {
- x_110 = lean::alloc_cnstr(13, 1, 0);
+x_110 = l_Lean_IR_NormalizeIds_normIndex(x_107, x_1);
+lean::dec(x_107);
+if (lean::is_scalar(x_109)) {
+ x_112 = lean::alloc_cnstr(13, 1, 0);
 } else {
- x_110 = x_107;
+ x_112 = x_109;
 }
-lean::cnstr_set(x_110, 0, x_108);
-return x_110;
+lean::cnstr_set(x_112, 0, x_110);
+return x_112;
 }
 }
 }
diff --git a/src/stage0/init/lean/compiler/ir/rc.cpp b/src/stage0/init/lean/compiler/ir/rc.cpp
index 3da09f97c7..1e53aa33e9 100644
--- a/src/stage0/init/lean/compiler/ir/rc.cpp
+++ b/src/stage0/init/lean/compiler/ir/rc.cpp
@@ -52,6 +52,7 @@ obj* l_RBNode_fold___main___at___private_init_lean_compiler_ir_rc_2__addDecForAl
 obj* l_Array_hmmapAux___main___at_Lean_IR_ExplicitRC_visitFnBody___main___spec__1(obj*, obj*, obj*, obj*, obj*);
 obj* l___private_init_lean_compiler_ir_rc_14__addDecIfNeeded(obj*, obj*, obj*, obj*);
 uint8 l_Nat_anyAux___main___at___private_init_lean_compiler_ir_rc_8__addIncBefore___spec__5(obj*, obj*, obj*, obj*, obj*);
+obj* l_Lean_IR_findEnvDecl_x_27(obj*, obj*, obj*);
 obj* l___private_init_lean_compiler_ir_rc_7__addIncBeforeAux(obj*, obj*, obj*, obj*, obj*);
 obj* l_Array_miterateAux___main___at_Lean_IR_ExplicitRC_updateVarInfoWithParams___spec__1(obj*, obj*, obj*, obj*);
 obj* l___private_init_lean_compiler_ir_rc_8__addIncBefore___boxed(obj*, obj*, obj*, obj*, obj*);
@@ -129,7 +130,6 @@ obj* l_Nat_foldAux___main___at___private_init_lean_compiler_ir_rc_5__getNumConsu
 uint8 l_Nat_anyAux___main___at___private_init_lean_compiler_ir_rc_6__isBorrowParam___spec__1(obj*, obj*, obj*, obj*, obj*);
 obj* l___private_init_lean_compiler_ir_rc_1__updateRefUsingCtorInfo___boxed(obj*, obj*, obj*);
 obj* l_RBNode_insert___at___private_init_lean_compiler_ir_rc_1__updateRefUsingCtorInfo___spec__1(obj*, obj*, obj*);
-obj* l_Lean_IR_findDeclAux_x_27(obj*, obj*, obj*);
 obj* l___private_init_lean_compiler_ir_rc_5__getNumConsumptions___at___private_init_lean_compiler_ir_rc_9__addIncBeforeConsumeAll___spec__2___boxed(obj*, obj*);
 obj* l___private_init_lean_compiler_ir_rc_15__processVDecl___boxed(obj*, obj*, obj*, obj*, obj*, obj*);
 obj* l_Nat_foldAux___main___at___private_init_lean_compiler_ir_rc_8__addIncBefore___spec__3(obj*, obj*, obj*, obj*, obj*, obj*);
@@ -175,7 +175,7 @@ _start:
 obj* x_2; obj* x_3; obj* x_4; 
 x_2 = lean::cnstr_get(x_0, 0);
 x_3 = lean::cnstr_get(x_0, 1);
-x_4 = l_Lean_IR_findDeclAux_x_27(x_2, x_1, x_3);
+x_4 = l_Lean_IR_findEnvDecl_x_27(x_2, x_1, x_3);
 if (lean::obj_tag(x_4) == 0)
 {
 obj* x_5; 
diff --git a/src/stage0/init/lean/compiler/ir/resetreuse.cpp b/src/stage0/init/lean/compiler/ir/resetreuse.cpp
index d8d2f89281..c3a64a182d 100644
--- a/src/stage0/init/lean/compiler/ir/resetreuse.cpp
+++ b/src/stage0/init/lean/compiler/ir/resetreuse.cpp
@@ -500,7 +500,7 @@ return x_1;
 obj* l___private_init_lean_compiler_ir_resetreuse_4__tryS(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
 _start:
 {
-obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_13; uint8 x_16; 
+obj* x_5; obj* x_6; obj* x_8; obj* x_10; obj* x_14; uint8 x_17; 
 x_5 = l___private_init_lean_compiler_ir_resetreuse_3__mkFresh___rarg(x_4);
 x_6 = lean::cnstr_get(x_5, 0);
 x_8 = lean::cnstr_get(x_5, 1);
@@ -515,48 +515,54 @@ if (lean::is_exclusive(x_5)) {
  x_10 = lean::box(0);
 }
 lean::inc(x_2);
+lean::inc(x_1);
 lean::inc(x_6);
-x_13 = l___private_init_lean_compiler_ir_resetreuse_2__S___main(x_6, x_1, x_2);
-lean::inc(x_13);
+x_14 = l___private_init_lean_compiler_ir_resetreuse_2__S___main(x_6, x_1, x_2);
+lean::inc(x_14);
 lean::inc(x_2);
-x_16 = l_Lean_IR_FnBody_beq(x_2, x_13);
-if (x_16 == 0)
+x_17 = l_Lean_IR_FnBody_beq(x_2, x_14);
+if (x_17 == 0)
 {
-obj* x_18; uint8 x_19; obj* x_20; obj* x_21; obj* x_22; 
+obj* x_19; obj* x_22; uint8 x_23; obj* x_24; obj* x_25; obj* x_26; 
 lean::dec(x_2);
-x_18 = lean::alloc_cnstr(1, 1, 0);
-lean::cnstr_set(x_18, 0, x_0);
-x_19 = 7;
-x_20 = lean::alloc_cnstr(0, 3, 1);
-lean::cnstr_set(x_20, 0, x_6);
-lean::cnstr_set(x_20, 1, x_18);
-lean::cnstr_set(x_20, 2, x_13);
-lean::cnstr_set_scalar(x_20, sizeof(void*)*3, x_19);
-x_21 = x_20;
-if (lean::is_scalar(x_10)) {
- x_22 = lean::alloc_cnstr(0, 2, 0);
-} else {
- x_22 = x_10;
-}
-lean::cnstr_set(x_22, 0, x_21);
-lean::cnstr_set(x_22, 1, x_8);
-return x_22;
-}
-else
-{
-obj* x_26; 
-lean::dec(x_13);
-lean::dec(x_6);
-lean::dec(x_0);
+x_19 = lean::cnstr_get(x_1, 2);
+lean::inc(x_19);
+lean::dec(x_1);
+x_22 = lean::alloc_cnstr(1, 2, 0);
+lean::cnstr_set(x_22, 0, x_19);
+lean::cnstr_set(x_22, 1, x_0);
+x_23 = 7;
+x_24 = lean::alloc_cnstr(0, 3, 1);
+lean::cnstr_set(x_24, 0, x_6);
+lean::cnstr_set(x_24, 1, x_22);
+lean::cnstr_set(x_24, 2, x_14);
+lean::cnstr_set_scalar(x_24, sizeof(void*)*3, x_23);
+x_25 = x_24;
 if (lean::is_scalar(x_10)) {
  x_26 = lean::alloc_cnstr(0, 2, 0);
 } else {
  x_26 = x_10;
 }
-lean::cnstr_set(x_26, 0, x_2);
+lean::cnstr_set(x_26, 0, x_25);
 lean::cnstr_set(x_26, 1, x_8);
 return x_26;
 }
+else
+{
+obj* x_31; 
+lean::dec(x_14);
+lean::dec(x_1);
+lean::dec(x_6);
+lean::dec(x_0);
+if (lean::is_scalar(x_10)) {
+ x_31 = lean::alloc_cnstr(0, 2, 0);
+} else {
+ x_31 = x_10;
+}
+lean::cnstr_set(x_31, 0, x_2);
+lean::cnstr_set(x_31, 1, x_8);
+return x_31;
+}
 }
 }
 obj* l___private_init_lean_compiler_ir_resetreuse_4__tryS___boxed(obj* x_0, obj* x_1, obj* x_2, obj* x_3, obj* x_4) {
diff --git a/src/stage0/init/lean/extern.cpp b/src/stage0/init/lean/extern.cpp
index f4d7b496d3..b74b20d149 100644
--- a/src/stage0/init/lean/extern.cpp
+++ b/src/stage0/init/lean/extern.cpp
@@ -1,6 +1,6 @@
 // Lean compiler output
 // Module: init.lean.extern
-// Imports: init.lean.expr init.data.option.basic
+// Imports: init.lean.expr init.data.option.basic init.lean.environment
 #include "runtime/object.h"
 #include "runtime/apply.h"
 typedef lean::object obj;    typedef lean::usize  usize;
@@ -21,6 +21,8 @@ obj* mk_extern_attr_data_core(obj*, obj*);
 }
 obj* l_Lean_expandExternPatternAux(obj*, obj*, obj*, obj*);
 extern obj* l_String_foldlAux___main___at_String_toNat___spec__1___closed__1;
+obj* l_Lean_getExternNameFor(obj*, obj*, obj*);
+obj* l_Lean_getExternNameFor___boxed(obj*, obj*, obj*);
 extern "C" uint8 lean_name_dec_eq(obj*, obj*);
 obj* l_Lean_ExternEntry_backend(obj*);
 namespace lean {
@@ -52,11 +54,13 @@ namespace lean {
 obj* expand_extern_pattern_core(obj*, obj*);
 }
 obj* l_String_Iterator_next___main(obj*);
+extern "C" obj* lean_get_extern_attr_data(obj*, obj*);
 namespace lean {
 obj* string_append(obj*, obj*);
 }
 extern obj* l_List_reprAux___main___rarg___closed__1;
 extern obj* l_Option_HasRepr___rarg___closed__3;
+uint8 l_Lean_isExternC(obj*, obj*);
 obj* l_Lean_expandExternPatternAux___main(obj*, obj*, obj*, obj*);
 extern "C" obj* lean_name_mk_string(obj*, obj*);
 namespace lean {
@@ -70,6 +74,7 @@ namespace lean {
 obj* mk_inline_ext_entry_core(obj*, obj*);
 }
 obj* l___private_init_lean_extern_1__parseOptNum(obj*, obj*, obj*);
+obj* l_Lean_getExternAttrData___boxed(obj*, obj*);
 obj* l_Lean_getExternEntryForAux(obj*, obj*);
 obj* l_Lean_getExternEntryForAux___main___boxed(obj*, obj*);
 obj* l___private_init_lean_extern_1__parseOptNum___main(obj*, obj*, obj*);
@@ -91,6 +96,7 @@ namespace lean {
 obj* nat_mul(obj*, obj*);
 }
 obj* l_Lean_ExternEntry_backend___main(obj*);
+obj* l_Lean_isExternC___boxed(obj*, obj*);
 extern obj* l_String_splitAux___main___closed__1;
 obj* l_Lean_mkSimpleFnCall(obj*, obj*);
 namespace lean {
@@ -610,8 +616,200 @@ return x_9;
 }
 }
 }
+obj* l_Lean_getExternAttrData___boxed(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; 
+x_2 = lean_get_extern_attr_data(x_0, x_1);
+lean::dec(x_0);
+lean::dec(x_1);
+return x_2;
+}
+}
+uint8 l_Lean_isExternC(obj* x_0, obj* x_1) {
+_start:
+{
+obj* x_2; 
+x_2 = lean_get_extern_attr_data(x_0, x_1);
+if (lean::obj_tag(x_2) == 0)
+{
+uint8 x_3; 
+x_3 = 0;
+return x_3;
+}
+else
+{
+obj* x_4; obj* x_7; 
+x_4 = lean::cnstr_get(x_2, 0);
+lean::inc(x_4);
+lean::dec(x_2);
+x_7 = lean::cnstr_get(x_4, 1);
+lean::inc(x_7);
+lean::dec(x_4);
+if (lean::obj_tag(x_7) == 0)
+{
+uint8 x_10; 
+x_10 = 0;
+return x_10;
+}
+else
+{
+obj* x_11; 
+x_11 = lean::cnstr_get(x_7, 0);
+lean::inc(x_11);
+switch (lean::obj_tag(x_11)) {
+case 2:
+{
+obj* x_13; obj* x_16; obj* x_19; uint8 x_20; 
+x_13 = lean::cnstr_get(x_7, 1);
+lean::inc(x_13);
+lean::dec(x_7);
+x_16 = lean::cnstr_get(x_11, 0);
+lean::inc(x_16);
+lean::dec(x_11);
+x_19 = l_Lean_getExternEntryForAux___main___closed__1;
+x_20 = lean_name_dec_eq(x_16, x_19);
+lean::dec(x_16);
+if (x_20 == 0)
+{
+uint8 x_23; 
+lean::dec(x_13);
+x_23 = 0;
+return x_23;
+}
+else
+{
+if (lean::obj_tag(x_13) == 0)
+{
+uint8 x_24; 
+x_24 = 1;
+return x_24;
+}
+else
+{
+uint8 x_26; 
+lean::dec(x_13);
+x_26 = 0;
+return x_26;
+}
+}
+}
+default:
+{
+uint8 x_29; 
+lean::dec(x_11);
+lean::dec(x_7);
+x_29 = 0;
+return x_29;
+}
+}
+}
+}
+}
+}
+obj* l_Lean_isExternC___boxed(obj* x_0, obj* x_1) {
+_start:
+{
+uint8 x_2; obj* x_3; 
+x_2 = l_Lean_isExternC(x_0, x_1);
+x_3 = lean::box(x_2);
+lean::dec(x_0);
+lean::dec(x_1);
+return x_3;
+}
+}
+obj* l_Lean_getExternNameFor(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = lean_get_extern_attr_data(x_0, x_2);
+if (lean::obj_tag(x_3) == 0)
+{
+obj* x_5; 
+lean::dec(x_1);
+x_5 = lean::box(0);
+return x_5;
+}
+else
+{
+obj* x_6; obj* x_9; 
+x_6 = lean::cnstr_get(x_3, 0);
+lean::inc(x_6);
+lean::dec(x_3);
+x_9 = lean::get_extern_entry_for_core(x_6, x_1);
+if (lean::obj_tag(x_9) == 0)
+{
+obj* x_10; 
+x_10 = lean::box(0);
+return x_10;
+}
+else
+{
+obj* x_11; obj* x_13; 
+x_11 = lean::cnstr_get(x_9, 0);
+if (lean::is_exclusive(x_9)) {
+ lean::cnstr_set(x_9, 0, lean::box(0));
+ x_13 = x_9;
+} else {
+ lean::inc(x_11);
+ lean::dec(x_9);
+ x_13 = lean::box(0);
+}
+switch (lean::obj_tag(x_11)) {
+case 2:
+{
+obj* x_14; obj* x_17; 
+x_14 = lean::cnstr_get(x_11, 1);
+lean::inc(x_14);
+lean::dec(x_11);
+if (lean::is_scalar(x_13)) {
+ x_17 = lean::alloc_cnstr(1, 1, 0);
+} else {
+ x_17 = x_13;
+}
+lean::cnstr_set(x_17, 0, x_14);
+return x_17;
+}
+case 3:
+{
+obj* x_18; obj* x_21; 
+x_18 = lean::cnstr_get(x_11, 1);
+lean::inc(x_18);
+lean::dec(x_11);
+if (lean::is_scalar(x_13)) {
+ x_21 = lean::alloc_cnstr(1, 1, 0);
+} else {
+ x_21 = x_13;
+}
+lean::cnstr_set(x_21, 0, x_18);
+return x_21;
+}
+default:
+{
+obj* x_24; 
+lean::dec(x_11);
+lean::dec(x_13);
+x_24 = lean::box(0);
+return x_24;
+}
+}
+}
+}
+}
+}
+obj* l_Lean_getExternNameFor___boxed(obj* x_0, obj* x_1, obj* x_2) {
+_start:
+{
+obj* x_3; 
+x_3 = l_Lean_getExternNameFor(x_0, x_1, x_2);
+lean::dec(x_0);
+lean::dec(x_2);
+return x_3;
+}
+}
 obj* initialize_init_lean_expr(obj*);
 obj* initialize_init_data_option_basic(obj*);
+obj* initialize_init_lean_environment(obj*);
 static bool _G_initialized = false;
 obj* initialize_init_lean_extern(obj* w) {
  if (_G_initialized) return w;
@@ -620,6 +818,8 @@ if (io_result_is_error(w)) return w;
 w = initialize_init_lean_expr(w);
 if (io_result_is_error(w)) return w;
 w = initialize_init_data_option_basic(w);
+if (io_result_is_error(w)) return w;
+w = initialize_init_lean_environment(w);
 if (io_result_is_error(w)) return w;
  l_Lean_getExternEntryForAux___main___closed__1 = _init_l_Lean_getExternEntryForAux___main___closed__1();
 lean::mark_persistent(l_Lean_getExternEntryForAux___main___closed__1);
diff --git a/src/stage0/init/lean/name_mangling.cpp b/src/stage0/init/lean/name_mangling.cpp
index 4c28e8ac1d..565ca45af5 100644
--- a/src/stage0/init/lean/name_mangling.cpp
+++ b/src/stage0/init/lean/name_mangling.cpp
@@ -16,12 +16,12 @@ typedef lean::uint32 uint32; typedef lean::uint64 uint64;
 #endif
 obj* l_Lean_Name_mangle(obj*, obj*);
 uint32 l_String_Iterator_curr___main(obj*);
+extern "C" uint8 lean_name_dec_eq(obj*, obj*);
 namespace lean {
 obj* nat_sub(obj*, obj*);
 }
-obj* l_Lean_Name_mangle___boxed(obj*, obj*);
-obj* l___private_init_lean_name__mangling_2__Name_mangleAux___main(obj*, obj*);
-obj* l___private_init_lean_name__mangling_2__Name_mangleAux(obj*, obj*);
+obj* l___private_init_lean_name__mangling_2__Name_mangleAux___main(obj*);
+obj* l___private_init_lean_name__mangling_2__Name_mangleAux(obj*);
 uint8 l_Char_isAlpha(uint32);
 obj* l___private_init_lean_name__mangling_1__String_mangleAux___main___closed__3;
 namespace lean {
@@ -45,8 +45,6 @@ obj* l_Lean_String_mangle(obj*);
 obj* l___private_init_lean_name__mangling_2__Name_mangleAux___main___closed__1;
 uint8 l_Char_isDigit(uint32);
 obj* l___private_init_lean_name__mangling_1__String_mangleAux___main___closed__2;
-obj* l___private_init_lean_name__mangling_2__Name_mangleAux___main___closed__2;
-obj* l___private_init_lean_name__mangling_2__Name_mangleAux___main___boxed(obj*, obj*);
 obj* l___private_init_lean_name__mangling_1__String_mangleAux(obj*, obj*, obj*);
 obj* l___private_init_lean_name__mangling_1__String_mangleAux___main___closed__1;
 namespace lean {
@@ -55,7 +53,6 @@ uint32 uint32_of_nat(obj*);
 namespace lean {
 obj* nat_div(obj*, obj*);
 }
-obj* l___private_init_lean_name__mangling_2__Name_mangleAux___boxed(obj*, obj*);
 namespace lean {
 obj* uint32_to_nat(uint32);
 }
@@ -243,110 +240,83 @@ obj* _init_l___private_init_lean_name__mangling_2__Name_mangleAux___main___close
 _start:
 {
 obj* x_0; 
-x_0 = lean::mk_string("_s");
-return x_0;
-}
-}
-obj* _init_l___private_init_lean_name__mangling_2__Name_mangleAux___main___closed__2() {
-_start:
-{
-obj* x_0; 
 x_0 = lean::mk_string("_");
 return x_0;
 }
 }
-obj* l___private_init_lean_name__mangling_2__Name_mangleAux___main(obj* x_0, obj* x_1) {
+obj* l___private_init_lean_name__mangling_2__Name_mangleAux___main(obj* x_0) {
 _start:
 {
-switch (lean::obj_tag(x_1)) {
+switch (lean::obj_tag(x_0)) {
 case 0:
 {
-lean::inc(x_0);
-return x_0;
+obj* x_1; 
+x_1 = l_String_splitAux___main___closed__1;
+return x_1;
 }
 case 1:
 {
-obj* x_3; obj* x_5; obj* x_8; obj* x_9; obj* x_10; obj* x_11; obj* x_12; obj* x_13; obj* x_14; obj* x_16; obj* x_17; obj* x_18; 
-x_3 = lean::cnstr_get(x_1, 0);
-lean::inc(x_3);
-x_5 = lean::cnstr_get(x_1, 1);
-lean::inc(x_5);
-lean::dec(x_1);
-x_8 = l___private_init_lean_name__mangling_2__Name_mangleAux___main(x_0, x_3);
-x_9 = l_Lean_String_mangle(x_5);
-x_10 = l___private_init_lean_name__mangling_2__Name_mangleAux___main___closed__1;
-x_11 = lean::string_append(x_8, x_10);
-x_12 = lean::string_length(x_9);
-x_13 = l_Nat_repr(x_12);
-x_14 = lean::string_append(x_11, x_13);
-lean::dec(x_13);
-x_16 = l___private_init_lean_name__mangling_2__Name_mangleAux___main___closed__2;
-x_17 = lean::string_append(x_14, x_16);
-x_18 = lean::string_append(x_17, x_9);
-lean::dec(x_9);
-return x_18;
+obj* x_2; obj* x_4; obj* x_7; obj* x_8; uint8 x_9; 
+x_2 = lean::cnstr_get(x_0, 0);
+lean::inc(x_2);
+x_4 = lean::cnstr_get(x_0, 1);
+lean::inc(x_4);
+lean::dec(x_0);
+x_7 = l_Lean_String_mangle(x_4);
+x_8 = lean::box(0);
+x_9 = lean_name_dec_eq(x_2, x_8);
+if (x_9 == 0)
+{
+obj* x_10; obj* x_11; obj* x_12; obj* x_13; 
+x_10 = l___private_init_lean_name__mangling_2__Name_mangleAux___main(x_2);
+x_11 = l___private_init_lean_name__mangling_2__Name_mangleAux___main___closed__1;
+x_12 = lean::string_append(x_10, x_11);
+x_13 = lean::string_append(x_12, x_7);
+lean::dec(x_7);
+return x_13;
+}
+else
+{
+lean::dec(x_2);
+return x_7;
+}
 }
 default:
 {
-obj* x_20; obj* x_22; obj* x_25; obj* x_26; obj* x_27; obj* x_28; obj* x_29; obj* x_31; 
-x_20 = lean::cnstr_get(x_1, 0);
-lean::inc(x_20);
-x_22 = lean::cnstr_get(x_1, 1);
-lean::inc(x_22);
-lean::dec(x_1);
-x_25 = l___private_init_lean_name__mangling_2__Name_mangleAux___main(x_0, x_20);
-x_26 = l___private_init_lean_name__mangling_2__Name_mangleAux___main___closed__2;
-x_27 = lean::string_append(x_25, x_26);
-x_28 = l_Nat_repr(x_22);
-x_29 = lean::string_append(x_27, x_28);
-lean::dec(x_28);
-x_31 = lean::string_append(x_29, x_26);
-return x_31;
-}
-}
-}
-}
-obj* l___private_init_lean_name__mangling_2__Name_mangleAux___main___boxed(obj* x_0, obj* x_1) {
-_start:
-{
-obj* x_2; 
-x_2 = l___private_init_lean_name__mangling_2__Name_mangleAux___main(x_0, x_1);
+obj* x_16; obj* x_18; obj* x_21; obj* x_22; obj* x_23; obj* x_24; obj* x_25; obj* x_27; 
+x_16 = lean::cnstr_get(x_0, 0);
+lean::inc(x_16);
+x_18 = lean::cnstr_get(x_0, 1);
+lean::inc(x_18);
 lean::dec(x_0);
-return x_2;
+x_21 = l___private_init_lean_name__mangling_2__Name_mangleAux___main(x_16);
+x_22 = l___private_init_lean_name__mangling_2__Name_mangleAux___main___closed__1;
+x_23 = lean::string_append(x_21, x_22);
+x_24 = l_Nat_repr(x_18);
+x_25 = lean::string_append(x_23, x_24);
+lean::dec(x_24);
+x_27 = lean::string_append(x_25, x_22);
+return x_27;
 }
 }
-obj* l___private_init_lean_name__mangling_2__Name_mangleAux(obj* x_0, obj* x_1) {
+}
+}
+obj* l___private_init_lean_name__mangling_2__Name_mangleAux(obj* x_0) {
 _start:
 {
-obj* x_2; 
-x_2 = l___private_init_lean_name__mangling_2__Name_mangleAux___main(x_0, x_1);
-return x_2;
-}
-}
-obj* l___private_init_lean_name__mangling_2__Name_mangleAux___boxed(obj* x_0, obj* x_1) {
-_start:
-{
-obj* x_2; 
-x_2 = l___private_init_lean_name__mangling_2__Name_mangleAux(x_0, x_1);
-lean::dec(x_0);
-return x_2;
+obj* x_1; 
+x_1 = l___private_init_lean_name__mangling_2__Name_mangleAux___main(x_0);
+return x_1;
 }
 }
 obj* l_Lean_Name_mangle(obj* x_0, obj* x_1) {
 _start:
 {
-obj* x_2; 
-x_2 = l___private_init_lean_name__mangling_2__Name_mangleAux___main(x_1, x_0);
-return x_2;
-}
-}
-obj* l_Lean_Name_mangle___boxed(obj* x_0, obj* x_1) {
-_start:
-{
-obj* x_2; 
-x_2 = l_Lean_Name_mangle(x_0, x_1);
-lean::dec(x_1);
-return x_2;
+obj* x_2; obj* x_3; 
+x_2 = l___private_init_lean_name__mangling_2__Name_mangleAux___main(x_0);
+x_3 = lean::string_append(x_1, x_2);
+lean::dec(x_2);
+return x_3;
 }
 }
 obj* initialize_init_lean_name(obj*);
@@ -368,7 +338,5 @@ lean::mark_persistent(l___private_init_lean_name__mangling_1__String_mangleAux__
 lean::mark_persistent(l___private_init_lean_name__mangling_1__String_mangleAux___main___closed__3);
  l___private_init_lean_name__mangling_2__Name_mangleAux___main___closed__1 = _init_l___private_init_lean_name__mangling_2__Name_mangleAux___main___closed__1();
 lean::mark_persistent(l___private_init_lean_name__mangling_2__Name_mangleAux___main___closed__1);
- l___private_init_lean_name__mangling_2__Name_mangleAux___main___closed__2 = _init_l___private_init_lean_name__mangling_2__Name_mangleAux___main___closed__2();
-lean::mark_persistent(l___private_init_lean_name__mangling_2__Name_mangleAux___main___closed__2);
 return w;
 }