// Lean compiler output
// Module: Init.Control.Basic
// Imports: Init.Core
#include <lean/lean.h>
#if defined(__clang__)
#pragma clang diagnostic ignored "-Wunused-parameter"
#pragma clang diagnostic ignored "-Wunused-label"
#elif defined(__GNUC__) && !defined(__CLANG__)
#pragma GCC diagnostic ignored "-Wunused-parameter"
#pragma GCC diagnostic ignored "-Wunused-label"
#pragma GCC diagnostic ignored "-Wunused-but-set-variable"
#endif
#ifdef __cplusplus
extern "C" {
#endif
lean_object* l_term___x3c_x7c_x7c_x3e_____closed__3;
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_611____closed__2;
lean_object* lean_name_mk_string(lean_object*, lean_object*);
lean_object* l_term___x3c_x26_x3e__;
lean_object* l_term___x3c_x7c_x7c_x3e__;
lean_object* l_instMonadControlT___rarg___lambda__3(lean_object*, lean_object*, lean_object*);
lean_object* l_control___rarg(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_unexpand____x40_Init_Control_Basic___hyg_576_(lean_object*, lean_object*);
lean_object* l_unexpand____x40_Init_Control_Basic___hyg_916_(lean_object*, lean_object*);
lean_object* l_unexpand____x40_Init_Control_Basic___hyg_38_(lean_object*, lean_object*);
lean_object* l_term___x3c_x7c_x7c_x3e_____closed__5;
lean_object* l_guard___rarg(lean_object*, lean_object*, uint8_t);
extern lean_object* l_Array_empty___closed__1;
lean_object* l_controlAt___rarg(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_instOrElse(lean_object*, lean_object*);
lean_object* lean_array_push(lean_object*, lean_object*);
lean_object* lean_array_get_size(lean_object*);
lean_object* l_Lean_MonadRef_mkInfoFromRefPos___at_unexpand____x40_Init_Notation___hyg_2118____spec__1(lean_object*);
lean_object* l_bool_match__1(lean_object*);
lean_object* l_term___x3c_x26_x26_x3e__;
lean_object* l_term___x3c_x7c_x7c_x3e_____closed__2;
lean_object* l_controlAt(lean_object*, lean_object*);
lean_object* l_term___x3c_x26_x26_x3e_____closed__3;
lean_object* lean_string_utf8_byte_size(lean_object*);
lean_object* l_andM_match__1___rarg(uint8_t, lean_object*, lean_object*);
lean_object* l_Functor_discard(lean_object*, lean_object*);
lean_object* l_instMonadControlT(lean_object*, lean_object*, lean_object*);
lean_object* l_Functor_mapRev(lean_object*);
lean_object* l_instMonadControlT__1___rarg___lambda__1___boxed(lean_object*, lean_object*);
lean_object* l_Lean_MonadRef_mkInfoFromRefPos___at_myMacro____x40_Init_Notation___hyg_109____spec__1(lean_object*, lean_object*);
lean_object* l_orM_match__1(lean_object*);
lean_object* l_term___x3c_x7c_x7c_x3e_____closed__1;
lean_object* l_Functor_discard___rarg(lean_object*, lean_object*);
extern lean_object* l_myMacro____x40_Init_Notation___hyg_12136____closed__5;
extern lean_object* l_term___x5c_x2f_____closed__5;
lean_object* l_when(lean_object*);
lean_object* l_optional___rarg___closed__1;
lean_object* l_term___x3c_x26_x3e_____closed__5;
lean_object* l_instMonadControlT___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*);
uint8_t lean_nat_dec_eq(lean_object*, lean_object*);
lean_object* l_instMonadControlT__1(lean_object*);
lean_object* l_not___boxed(lean_object*);
lean_object* l_andM___rarg(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_term___x3c_x26_x3e_____closed__1;
lean_object* l_instOrElse___rarg(lean_object*);
lean_object* l_unless___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_611____closed__6;
lean_object* l_instMonadControlT___rarg___lambda__4(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_optional___rarg(lean_object*, lean_object*, lean_object*);
lean_object* l_term___x3c_x26_x26_x3e_____closed__5;
lean_object* l_term___x3c_x7c_x7c_x3e_____closed__6;
lean_object* l_when___rarg(lean_object*, lean_object*, uint8_t, lean_object*);
lean_object* l_bool_match__1___rarg___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_instToBoolBool___boxed(lean_object*);
lean_object* l_bool_match__1___rarg(uint8_t, lean_object*, lean_object*);
lean_object* l_term___x3c_x26_x3e_____closed__4;
lean_object* l_instMonadFunctorT___rarg___lambda__1(lean_object*, lean_object*, lean_object*);
lean_object* l_notM___rarg___closed__1;
extern lean_object* l_Lean_instInhabitedSourceInfo___closed__1;
lean_object* l_guard___rarg___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_57____closed__7;
lean_object* l_term___x3c_x26_x3e_____closed__2;
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_611____closed__1;
lean_object* l_orM___rarg(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_orM_match__1___rarg___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_951____closed__6;
extern lean_object* l_term_x2d_____closed__5;
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_57____closed__3;
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_611_(lean_object*, lean_object*, lean_object*);
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_57_(lean_object*, lean_object*, lean_object*);
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_951_(lean_object*, lean_object*, lean_object*);
lean_object* l_instMonadControlT__1___rarg___lambda__2(lean_object*, lean_object*);
extern lean_object* l_Lean_Parser_Syntax_addPrec___closed__10;
extern lean_object* l_term___xd7_____closed__5;
lean_object* l_bool___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_addMacroScope(lean_object*, lean_object*, lean_object*);
lean_object* l_instMonadControlT___rarg___lambda__5(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_951____closed__3;
extern lean_object* l_Lean_nullKind___closed__2;
lean_object* l_notM(lean_object*);
lean_object* l_instMonadControlT___rarg___lambda__2(lean_object*, lean_object*, lean_object*);
lean_object* l_bool(lean_object*, lean_object*);
lean_object* l_term___x3c_x26_x26_x3e_____closed__2;
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_57____closed__5;
lean_object* l_instMonadControlT__1___rarg___lambda__2___closed__1;
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_951____closed__5;
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_57____closed__6;
lean_object* l_Functor_mapRev___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
uint8_t l_instToBoolBool(uint8_t);
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_611____closed__4;
lean_object* l_term___x3c_x26_x3e_____closed__3;
lean_object* l_instMonadControlT__1___rarg___closed__1;
lean_object* l_instMonadControlT___rarg(lean_object*, lean_object*);
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_951____closed__4;
lean_object* l_Lean_Syntax_getArgs(lean_object*);
lean_object* l_orM___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_term___x3c_x26_x3e_____closed__6;
lean_object* l_instMonadControlT__1___rarg___lambda__1(lean_object*, lean_object*);
lean_object* l_optional___rarg___lambda__1(lean_object*);
lean_object* l_orM___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_951____closed__2;
lean_object* l_term___x3c_x7c_x7c_x3e_____closed__4;
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_951____closed__1;
lean_object* l_andM___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_andM_match__1(lean_object*);
lean_object* l_term___x3c_x26_x26_x3e_____closed__6;
lean_object* l_bool___rarg(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_orM_match__1___rarg(uint8_t, lean_object*, lean_object*);
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_611____closed__5;
uint8_t l_Lean_Syntax_isOfKind(lean_object*, lean_object*);
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_611____closed__3;
lean_object* l_term___x3c_x26_x26_x3e_____closed__4;
lean_object* l_unless(lean_object*);
lean_object* l_Lean_Syntax_getArg(lean_object*, lean_object*);
lean_object* l_unless___rarg(lean_object*, lean_object*, uint8_t, lean_object*);
extern lean_object* l_myMacro____x40_Init_Notation___hyg_2137____closed__4;
lean_object* l_andM___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_andM(lean_object*, lean_object*);
lean_object* l_guard(lean_object*);
lean_object* l_optional(lean_object*);
lean_object* l_orM(lean_object*, lean_object*);
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_57____closed__4;
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_57____closed__1;
lean_object* l_control(lean_object*, lean_object*);
lean_object* l_when___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_instMonadControlT__1___rarg(lean_object*);
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_57____closed__2;
lean_object* l_andM_match__1___rarg___boxed(lean_object*, lean_object*, lean_object*);
lean_object* l_notM___rarg(lean_object*, lean_object*);
lean_object* l_term___x3c_x26_x26_x3e_____closed__1;
lean_object* l_Functor_mapRev___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
lean_object* x_6; lean_object* x_7; 
x_6 = lean_ctor_get(x_1, 0);
lean_inc(x_6);
lean_dec(x_1);
x_7 = lean_apply_4(x_6, lean_box(0), lean_box(0), x_5, x_4);
return x_7;
}
}
lean_object* l_Functor_mapRev(lean_object* x_1) {
_start:
{
lean_object* x_2; 
x_2 = lean_alloc_closure((void*)(l_Functor_mapRev___rarg), 5, 0);
return x_2;
}
}
static lean_object* _init_l_term___x3c_x26_x3e_____closed__1() {
_start:
{
lean_object* x_1; 
x_1 = lean_mk_string("term_<&>_");
return x_1;
}
}
static lean_object* _init_l_term___x3c_x26_x3e_____closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; 
x_1 = lean_box(0);
x_2 = l_term___x3c_x26_x3e_____closed__1;
x_3 = lean_name_mk_string(x_1, x_2);
return x_3;
}
}
static lean_object* _init_l_term___x3c_x26_x3e_____closed__3() {
_start:
{
lean_object* x_1; 
x_1 = lean_mk_string(" <&> ");
return x_1;
}
}
static lean_object* _init_l_term___x3c_x26_x3e_____closed__4() {
_start:
{
lean_object* x_1; lean_object* x_2; 
x_1 = l_term___x3c_x26_x3e_____closed__3;
x_2 = lean_alloc_ctor(5, 1, 0);
lean_ctor_set(x_2, 0, x_1);
return x_2;
}
}
static lean_object* _init_l_term___x3c_x26_x3e_____closed__5() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; 
x_1 = l_Lean_Parser_Syntax_addPrec___closed__10;
x_2 = l_term___x3c_x26_x3e_____closed__4;
x_3 = l_term_x2d_____closed__5;
x_4 = lean_alloc_ctor(2, 3, 0);
lean_ctor_set(x_4, 0, x_1);
lean_ctor_set(x_4, 1, x_2);
lean_ctor_set(x_4, 2, x_3);
return x_4;
}
}
static lean_object* _init_l_term___x3c_x26_x3e_____closed__6() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; 
x_1 = l_term___x3c_x26_x3e_____closed__2;
x_2 = lean_unsigned_to_nat(100u);
x_3 = l_term___x3c_x26_x3e_____closed__5;
x_4 = lean_alloc_ctor(4, 3, 0);
lean_ctor_set(x_4, 0, x_1);
lean_ctor_set(x_4, 1, x_2);
lean_ctor_set(x_4, 2, x_3);
return x_4;
}
}
static lean_object* _init_l_term___x3c_x26_x3e__() {
_start:
{
lean_object* x_1; 
x_1 = l_term___x3c_x26_x3e_____closed__6;
return x_1;
}
}
static lean_object* _init_l_myMacro____x40_Init_Control_Basic___hyg_57____closed__1() {
_start:
{
lean_object* x_1; 
x_1 = lean_mk_string("Functor.mapRev");
return x_1;
}
}
static lean_object* _init_l_myMacro____x40_Init_Control_Basic___hyg_57____closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2; 
x_1 = l_myMacro____x40_Init_Control_Basic___hyg_57____closed__1;
x_2 = lean_string_utf8_byte_size(x_1);
return x_2;
}
}
static lean_object* _init_l_myMacro____x40_Init_Control_Basic___hyg_57____closed__3() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; 
x_1 = l_myMacro____x40_Init_Control_Basic___hyg_57____closed__1;
x_2 = lean_unsigned_to_nat(0u);
x_3 = l_myMacro____x40_Init_Control_Basic___hyg_57____closed__2;
x_4 = lean_alloc_ctor(0, 3, 0);
lean_ctor_set(x_4, 0, x_1);
lean_ctor_set(x_4, 1, x_2);
lean_ctor_set(x_4, 2, x_3);
return x_4;
}
}
static lean_object* _init_l_myMacro____x40_Init_Control_Basic___hyg_57____closed__4() {
_start:
{
lean_object* x_1; 
x_1 = lean_mk_string("mapRev");
return x_1;
}
}
static lean_object* _init_l_myMacro____x40_Init_Control_Basic___hyg_57____closed__5() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; 
x_1 = l_myMacro____x40_Init_Notation___hyg_12136____closed__5;
x_2 = l_myMacro____x40_Init_Control_Basic___hyg_57____closed__4;
x_3 = lean_name_mk_string(x_1, x_2);
return x_3;
}
}
static lean_object* _init_l_myMacro____x40_Init_Control_Basic___hyg_57____closed__6() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; 
x_1 = lean_box(0);
x_2 = l_myMacro____x40_Init_Control_Basic___hyg_57____closed__5;
x_3 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_3, 0, x_2);
lean_ctor_set(x_3, 1, x_1);
return x_3;
}
}
static lean_object* _init_l_myMacro____x40_Init_Control_Basic___hyg_57____closed__7() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; 
x_1 = lean_box(0);
x_2 = l_myMacro____x40_Init_Control_Basic___hyg_57____closed__6;
x_3 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_3, 0, x_2);
lean_ctor_set(x_3, 1, x_1);
return x_3;
}
}
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_57_(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
lean_object* x_4; uint8_t x_5; 
x_4 = l_term___x3c_x26_x3e_____closed__2;
lean_inc(x_1);
x_5 = l_Lean_Syntax_isOfKind(x_1, x_4);
if (x_5 == 0)
{
lean_object* x_6; lean_object* x_7; 
lean_dec(x_2);
lean_dec(x_1);
x_6 = lean_box(1);
x_7 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_7, 0, x_6);
lean_ctor_set(x_7, 1, x_3);
return x_7;
}
else
{
lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; 
x_8 = lean_unsigned_to_nat(0u);
x_9 = l_Lean_Syntax_getArg(x_1, x_8);
x_10 = lean_unsigned_to_nat(2u);
x_11 = l_Lean_Syntax_getArg(x_1, x_10);
lean_dec(x_1);
x_12 = l_Lean_MonadRef_mkInfoFromRefPos___at_myMacro____x40_Init_Notation___hyg_109____spec__1(x_2, x_3);
x_13 = !lean_is_exclusive(x_12);
if (x_13 == 0)
{
lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; 
x_14 = lean_ctor_get(x_12, 0);
lean_dec(x_14);
x_15 = lean_ctor_get(x_2, 2);
lean_inc(x_15);
x_16 = lean_ctor_get(x_2, 1);
lean_inc(x_16);
lean_dec(x_2);
x_17 = l_myMacro____x40_Init_Control_Basic___hyg_57____closed__5;
x_18 = l_Lean_addMacroScope(x_16, x_17, x_15);
x_19 = l_Lean_instInhabitedSourceInfo___closed__1;
x_20 = l_myMacro____x40_Init_Control_Basic___hyg_57____closed__3;
x_21 = l_myMacro____x40_Init_Control_Basic___hyg_57____closed__7;
x_22 = lean_alloc_ctor(3, 4, 0);
lean_ctor_set(x_22, 0, x_19);
lean_ctor_set(x_22, 1, x_20);
lean_ctor_set(x_22, 2, x_18);
lean_ctor_set(x_22, 3, x_21);
x_23 = l_Array_empty___closed__1;
x_24 = lean_array_push(x_23, x_22);
x_25 = lean_array_push(x_23, x_9);
x_26 = lean_array_push(x_25, x_11);
x_27 = l_Lean_nullKind___closed__2;
x_28 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_28, 0, x_27);
lean_ctor_set(x_28, 1, x_26);
x_29 = lean_array_push(x_24, x_28);
x_30 = l_myMacro____x40_Init_Notation___hyg_2137____closed__4;
x_31 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_31, 0, x_30);
lean_ctor_set(x_31, 1, x_29);
lean_ctor_set(x_12, 0, x_31);
return x_12;
}
else
{
lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; 
x_32 = lean_ctor_get(x_12, 1);
lean_inc(x_32);
lean_dec(x_12);
x_33 = lean_ctor_get(x_2, 2);
lean_inc(x_33);
x_34 = lean_ctor_get(x_2, 1);
lean_inc(x_34);
lean_dec(x_2);
x_35 = l_myMacro____x40_Init_Control_Basic___hyg_57____closed__5;
x_36 = l_Lean_addMacroScope(x_34, x_35, x_33);
x_37 = l_Lean_instInhabitedSourceInfo___closed__1;
x_38 = l_myMacro____x40_Init_Control_Basic___hyg_57____closed__3;
x_39 = l_myMacro____x40_Init_Control_Basic___hyg_57____closed__7;
x_40 = lean_alloc_ctor(3, 4, 0);
lean_ctor_set(x_40, 0, x_37);
lean_ctor_set(x_40, 1, x_38);
lean_ctor_set(x_40, 2, x_36);
lean_ctor_set(x_40, 3, x_39);
x_41 = l_Array_empty___closed__1;
x_42 = lean_array_push(x_41, x_40);
x_43 = lean_array_push(x_41, x_9);
x_44 = lean_array_push(x_43, x_11);
x_45 = l_Lean_nullKind___closed__2;
x_46 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_46, 0, x_45);
lean_ctor_set(x_46, 1, x_44);
x_47 = lean_array_push(x_42, x_46);
x_48 = l_myMacro____x40_Init_Notation___hyg_2137____closed__4;
x_49 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_49, 0, x_48);
lean_ctor_set(x_49, 1, x_47);
x_50 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_50, 0, x_49);
lean_ctor_set(x_50, 1, x_32);
return x_50;
}
}
}
}
lean_object* l_unexpand____x40_Init_Control_Basic___hyg_38_(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3; uint8_t x_4; 
x_3 = l_myMacro____x40_Init_Notation___hyg_2137____closed__4;
lean_inc(x_1);
x_4 = l_Lean_Syntax_isOfKind(x_1, x_3);
if (x_4 == 0)
{
lean_object* x_5; lean_object* x_6; 
lean_dec(x_1);
x_5 = lean_box(0);
x_6 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_6, 0, x_5);
lean_ctor_set(x_6, 1, x_2);
return x_6;
}
else
{
lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; 
x_7 = lean_unsigned_to_nat(1u);
x_8 = l_Lean_Syntax_getArg(x_1, x_7);
lean_dec(x_1);
x_9 = l_Lean_nullKind___closed__2;
lean_inc(x_8);
x_10 = l_Lean_Syntax_isOfKind(x_8, x_9);
if (x_10 == 0)
{
lean_object* x_11; lean_object* x_12; 
lean_dec(x_8);
x_11 = lean_box(0);
x_12 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_12, 0, x_11);
lean_ctor_set(x_12, 1, x_2);
return x_12;
}
else
{
lean_object* x_13; lean_object* x_14; lean_object* x_15; uint8_t x_16; 
x_13 = l_Lean_Syntax_getArgs(x_8);
x_14 = lean_array_get_size(x_13);
lean_dec(x_13);
x_15 = lean_unsigned_to_nat(2u);
x_16 = lean_nat_dec_eq(x_14, x_15);
lean_dec(x_14);
if (x_16 == 0)
{
lean_object* x_17; lean_object* x_18; 
lean_dec(x_8);
x_17 = lean_box(0);
x_18 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_18, 0, x_17);
lean_ctor_set(x_18, 1, x_2);
return x_18;
}
else
{
lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; uint8_t x_23; 
x_19 = lean_unsigned_to_nat(0u);
x_20 = l_Lean_Syntax_getArg(x_8, x_19);
x_21 = l_Lean_Syntax_getArg(x_8, x_7);
lean_dec(x_8);
x_22 = l_Lean_MonadRef_mkInfoFromRefPos___at_unexpand____x40_Init_Notation___hyg_2118____spec__1(x_2);
x_23 = !lean_is_exclusive(x_22);
if (x_23 == 0)
{
lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; 
x_24 = lean_ctor_get(x_22, 0);
x_25 = l_Array_empty___closed__1;
x_26 = lean_array_push(x_25, x_20);
x_27 = l_term___x3c_x26_x3e_____closed__3;
x_28 = lean_alloc_ctor(2, 2, 0);
lean_ctor_set(x_28, 0, x_24);
lean_ctor_set(x_28, 1, x_27);
x_29 = lean_array_push(x_26, x_28);
x_30 = lean_array_push(x_29, x_21);
x_31 = l_term___x3c_x26_x3e_____closed__2;
x_32 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_32, 0, x_31);
lean_ctor_set(x_32, 1, x_30);
lean_ctor_set(x_22, 0, x_32);
return x_22;
}
else
{
lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; 
x_33 = lean_ctor_get(x_22, 0);
x_34 = lean_ctor_get(x_22, 1);
lean_inc(x_34);
lean_inc(x_33);
lean_dec(x_22);
x_35 = l_Array_empty___closed__1;
x_36 = lean_array_push(x_35, x_20);
x_37 = l_term___x3c_x26_x3e_____closed__3;
x_38 = lean_alloc_ctor(2, 2, 0);
lean_ctor_set(x_38, 0, x_33);
lean_ctor_set(x_38, 1, x_37);
x_39 = lean_array_push(x_36, x_38);
x_40 = lean_array_push(x_39, x_21);
x_41 = l_term___x3c_x26_x3e_____closed__2;
x_42 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_42, 0, x_41);
lean_ctor_set(x_42, 1, x_40);
x_43 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_43, 0, x_42);
lean_ctor_set(x_43, 1, x_34);
return x_43;
}
}
}
}
}
}
lean_object* l_Functor_discard___rarg(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3; lean_object* x_4; lean_object* x_5; 
x_3 = lean_ctor_get(x_1, 1);
lean_inc(x_3);
lean_dec(x_1);
x_4 = lean_box(0);
x_5 = lean_apply_4(x_3, lean_box(0), lean_box(0), x_4, x_2);
return x_5;
}
}
lean_object* l_Functor_discard(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3; 
x_3 = lean_alloc_closure((void*)(l_Functor_discard___rarg), 2, 0);
return x_3;
}
}
lean_object* l_when___rarg(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4) {
_start:
{
if (x_3 == 0)
{
lean_object* x_5; lean_object* x_6; lean_object* x_7; 
x_5 = lean_ctor_get(x_1, 1);
lean_inc(x_5);
lean_dec(x_1);
x_6 = lean_box(0);
x_7 = lean_apply_2(x_5, lean_box(0), x_6);
return x_7;
}
else
{
lean_dec(x_1);
lean_inc(x_4);
return x_4;
}
}
}
lean_object* l_when(lean_object* x_1) {
_start:
{
lean_object* x_2; 
x_2 = lean_alloc_closure((void*)(l_when___rarg___boxed), 4, 0);
return x_2;
}
}
lean_object* l_when___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
uint8_t x_5; lean_object* x_6; 
x_5 = lean_unbox(x_3);
lean_dec(x_3);
x_6 = l_when___rarg(x_1, x_2, x_5, x_4);
lean_dec(x_4);
return x_6;
}
}
lean_object* l_unless___rarg(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4) {
_start:
{
if (x_3 == 0)
{
lean_dec(x_1);
lean_inc(x_4);
return x_4;
}
else
{
lean_object* x_5; lean_object* x_6; lean_object* x_7; 
x_5 = lean_ctor_get(x_1, 1);
lean_inc(x_5);
lean_dec(x_1);
x_6 = lean_box(0);
x_7 = lean_apply_2(x_5, lean_box(0), x_6);
return x_7;
}
}
}
lean_object* l_unless(lean_object* x_1) {
_start:
{
lean_object* x_2; 
x_2 = lean_alloc_closure((void*)(l_unless___rarg___boxed), 4, 0);
return x_2;
}
}
lean_object* l_unless___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
uint8_t x_5; lean_object* x_6; 
x_5 = lean_unbox(x_3);
lean_dec(x_3);
x_6 = l_unless___rarg(x_1, x_2, x_5, x_4);
lean_dec(x_4);
return x_6;
}
}
lean_object* l_instOrElse___rarg(lean_object* x_1) {
_start:
{
lean_object* x_2; lean_object* x_3; 
x_2 = lean_ctor_get(x_1, 2);
lean_inc(x_2);
lean_dec(x_1);
x_3 = lean_apply_1(x_2, lean_box(0));
return x_3;
}
}
lean_object* l_instOrElse(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3; 
x_3 = lean_alloc_closure((void*)(l_instOrElse___rarg), 1, 0);
return x_3;
}
}
lean_object* l_guard___rarg(lean_object* x_1, lean_object* x_2, uint8_t x_3) {
_start:
{
if (x_3 == 0)
{
lean_object* x_4; lean_object* x_5; 
x_4 = lean_ctor_get(x_1, 1);
lean_inc(x_4);
lean_dec(x_1);
x_5 = lean_apply_1(x_4, lean_box(0));
return x_5;
}
else
{
lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; 
x_6 = lean_ctor_get(x_1, 0);
lean_inc(x_6);
lean_dec(x_1);
x_7 = lean_ctor_get(x_6, 1);
lean_inc(x_7);
lean_dec(x_6);
x_8 = lean_box(0);
x_9 = lean_apply_2(x_7, lean_box(0), x_8);
return x_9;
}
}
}
lean_object* l_guard(lean_object* x_1) {
_start:
{
lean_object* x_2; 
x_2 = lean_alloc_closure((void*)(l_guard___rarg___boxed), 3, 0);
return x_2;
}
}
lean_object* l_guard___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
uint8_t x_4; lean_object* x_5; 
x_4 = lean_unbox(x_3);
lean_dec(x_3);
x_5 = l_guard___rarg(x_1, x_2, x_4);
return x_5;
}
}
lean_object* l_optional___rarg___lambda__1(lean_object* x_1) {
_start:
{
lean_object* x_2; 
x_2 = lean_alloc_ctor(1, 1, 0);
lean_ctor_set(x_2, 0, x_1);
return x_2;
}
}
static lean_object* _init_l_optional___rarg___closed__1() {
_start:
{
lean_object* x_1; 
x_1 = lean_alloc_closure((void*)(l_optional___rarg___lambda__1), 1, 0);
return x_1;
}
}
lean_object* l_optional___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; 
x_4 = lean_ctor_get(x_1, 0);
lean_inc(x_4);
x_5 = lean_ctor_get(x_4, 0);
lean_inc(x_5);
x_6 = lean_ctor_get(x_5, 0);
lean_inc(x_6);
lean_dec(x_5);
x_7 = l_optional___rarg___closed__1;
x_8 = lean_apply_4(x_6, lean_box(0), lean_box(0), x_7, x_3);
x_9 = lean_ctor_get(x_4, 1);
lean_inc(x_9);
lean_dec(x_4);
x_10 = lean_box(0);
x_11 = lean_apply_2(x_9, lean_box(0), x_10);
x_12 = lean_ctor_get(x_1, 2);
lean_inc(x_12);
lean_dec(x_1);
x_13 = lean_apply_3(x_12, lean_box(0), x_8, x_11);
return x_13;
}
}
lean_object* l_optional(lean_object* x_1) {
_start:
{
lean_object* x_2; 
x_2 = lean_alloc_closure((void*)(l_optional___rarg), 3, 0);
return x_2;
}
}
uint8_t l_instToBoolBool(uint8_t x_1) {
_start:
{
return x_1;
}
}
lean_object* l_instToBoolBool___boxed(lean_object* x_1) {
_start:
{
uint8_t x_2; uint8_t x_3; lean_object* x_4; 
x_2 = lean_unbox(x_1);
lean_dec(x_1);
x_3 = l_instToBoolBool(x_2);
x_4 = lean_box(x_3);
return x_4;
}
}
lean_object* l_bool_match__1___rarg(uint8_t x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
if (x_1 == 0)
{
lean_object* x_4; lean_object* x_5; 
lean_dec(x_2);
x_4 = lean_box(0);
x_5 = lean_apply_1(x_3, x_4);
return x_5;
}
else
{
lean_object* x_6; lean_object* x_7; 
lean_dec(x_3);
x_6 = lean_box(0);
x_7 = lean_apply_1(x_2, x_6);
return x_7;
}
}
}
lean_object* l_bool_match__1(lean_object* x_1) {
_start:
{
lean_object* x_2; 
x_2 = lean_alloc_closure((void*)(l_bool_match__1___rarg___boxed), 3, 0);
return x_2;
}
}
lean_object* l_bool_match__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
uint8_t x_4; lean_object* x_5; 
x_4 = lean_unbox(x_1);
lean_dec(x_1);
x_5 = l_bool_match__1___rarg(x_4, x_2, x_3);
return x_5;
}
}
lean_object* l_bool___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
lean_object* x_5; uint8_t x_6; 
x_5 = lean_apply_1(x_1, x_4);
x_6 = lean_unbox(x_5);
lean_dec(x_5);
if (x_6 == 0)
{
lean_inc(x_2);
return x_2;
}
else
{
lean_inc(x_3);
return x_3;
}
}
}
lean_object* l_bool(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3; 
x_3 = lean_alloc_closure((void*)(l_bool___rarg___boxed), 4, 0);
return x_3;
}
}
lean_object* l_bool___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
lean_object* x_5; 
x_5 = l_bool___rarg(x_1, x_2, x_3, x_4);
lean_dec(x_3);
lean_dec(x_2);
return x_5;
}
}
lean_object* l_orM_match__1___rarg(uint8_t x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
if (x_1 == 0)
{
lean_object* x_4; lean_object* x_5; 
lean_dec(x_2);
x_4 = lean_box(0);
x_5 = lean_apply_1(x_3, x_4);
return x_5;
}
else
{
lean_object* x_6; lean_object* x_7; 
lean_dec(x_3);
x_6 = lean_box(0);
x_7 = lean_apply_1(x_2, x_6);
return x_7;
}
}
}
lean_object* l_orM_match__1(lean_object* x_1) {
_start:
{
lean_object* x_2; 
x_2 = lean_alloc_closure((void*)(l_orM_match__1___rarg___boxed), 3, 0);
return x_2;
}
}
lean_object* l_orM_match__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
uint8_t x_4; lean_object* x_5; 
x_4 = lean_unbox(x_1);
lean_dec(x_1);
x_5 = l_orM_match__1___rarg(x_4, x_2, x_3);
return x_5;
}
}
lean_object* l_orM___rarg___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
lean_object* x_5; uint8_t x_6; 
lean_inc(x_4);
x_5 = lean_apply_1(x_1, x_4);
x_6 = lean_unbox(x_5);
lean_dec(x_5);
if (x_6 == 0)
{
lean_dec(x_4);
lean_dec(x_3);
lean_inc(x_2);
return x_2;
}
else
{
lean_object* x_7; lean_object* x_8; lean_object* x_9; 
x_7 = lean_ctor_get(x_3, 0);
lean_inc(x_7);
lean_dec(x_3);
x_8 = lean_ctor_get(x_7, 1);
lean_inc(x_8);
lean_dec(x_7);
x_9 = lean_apply_2(x_8, lean_box(0), x_4);
return x_9;
}
}
}
lean_object* l_orM___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
lean_object* x_5; lean_object* x_6; lean_object* x_7; 
x_5 = lean_ctor_get(x_1, 1);
lean_inc(x_5);
x_6 = lean_alloc_closure((void*)(l_orM___rarg___lambda__1___boxed), 4, 3);
lean_closure_set(x_6, 0, x_2);
lean_closure_set(x_6, 1, x_4);
lean_closure_set(x_6, 2, x_1);
x_7 = lean_apply_4(x_5, lean_box(0), lean_box(0), x_3, x_6);
return x_7;
}
}
lean_object* l_orM(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3; 
x_3 = lean_alloc_closure((void*)(l_orM___rarg), 4, 0);
return x_3;
}
}
lean_object* l_orM___rarg___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
lean_object* x_5; 
x_5 = l_orM___rarg___lambda__1(x_1, x_2, x_3, x_4);
lean_dec(x_2);
return x_5;
}
}
static lean_object* _init_l_term___x3c_x7c_x7c_x3e_____closed__1() {
_start:
{
lean_object* x_1; 
x_1 = lean_mk_string("term_<||>_");
return x_1;
}
}
static lean_object* _init_l_term___x3c_x7c_x7c_x3e_____closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; 
x_1 = lean_box(0);
x_2 = l_term___x3c_x7c_x7c_x3e_____closed__1;
x_3 = lean_name_mk_string(x_1, x_2);
return x_3;
}
}
static lean_object* _init_l_term___x3c_x7c_x7c_x3e_____closed__3() {
_start:
{
lean_object* x_1; 
x_1 = lean_mk_string(" <||> ");
return x_1;
}
}
static lean_object* _init_l_term___x3c_x7c_x7c_x3e_____closed__4() {
_start:
{
lean_object* x_1; lean_object* x_2; 
x_1 = l_term___x3c_x7c_x7c_x3e_____closed__3;
x_2 = lean_alloc_ctor(5, 1, 0);
lean_ctor_set(x_2, 0, x_1);
return x_2;
}
}
static lean_object* _init_l_term___x3c_x7c_x7c_x3e_____closed__5() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; 
x_1 = l_Lean_Parser_Syntax_addPrec___closed__10;
x_2 = l_term___x3c_x7c_x7c_x3e_____closed__4;
x_3 = l_term___x5c_x2f_____closed__5;
x_4 = lean_alloc_ctor(2, 3, 0);
lean_ctor_set(x_4, 0, x_1);
lean_ctor_set(x_4, 1, x_2);
lean_ctor_set(x_4, 2, x_3);
return x_4;
}
}
static lean_object* _init_l_term___x3c_x7c_x7c_x3e_____closed__6() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; 
x_1 = l_term___x3c_x7c_x7c_x3e_____closed__2;
x_2 = lean_unsigned_to_nat(30u);
x_3 = l_term___x3c_x7c_x7c_x3e_____closed__5;
x_4 = lean_alloc_ctor(4, 3, 0);
lean_ctor_set(x_4, 0, x_1);
lean_ctor_set(x_4, 1, x_2);
lean_ctor_set(x_4, 2, x_3);
return x_4;
}
}
static lean_object* _init_l_term___x3c_x7c_x7c_x3e__() {
_start:
{
lean_object* x_1; 
x_1 = l_term___x3c_x7c_x7c_x3e_____closed__6;
return x_1;
}
}
static lean_object* _init_l_myMacro____x40_Init_Control_Basic___hyg_611____closed__1() {
_start:
{
lean_object* x_1; 
x_1 = lean_mk_string("orM");
return x_1;
}
}
static lean_object* _init_l_myMacro____x40_Init_Control_Basic___hyg_611____closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2; 
x_1 = l_myMacro____x40_Init_Control_Basic___hyg_611____closed__1;
x_2 = lean_string_utf8_byte_size(x_1);
return x_2;
}
}
static lean_object* _init_l_myMacro____x40_Init_Control_Basic___hyg_611____closed__3() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; 
x_1 = l_myMacro____x40_Init_Control_Basic___hyg_611____closed__1;
x_2 = lean_unsigned_to_nat(0u);
x_3 = l_myMacro____x40_Init_Control_Basic___hyg_611____closed__2;
x_4 = lean_alloc_ctor(0, 3, 0);
lean_ctor_set(x_4, 0, x_1);
lean_ctor_set(x_4, 1, x_2);
lean_ctor_set(x_4, 2, x_3);
return x_4;
}
}
static lean_object* _init_l_myMacro____x40_Init_Control_Basic___hyg_611____closed__4() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; 
x_1 = lean_box(0);
x_2 = l_myMacro____x40_Init_Control_Basic___hyg_611____closed__1;
x_3 = lean_name_mk_string(x_1, x_2);
return x_3;
}
}
static lean_object* _init_l_myMacro____x40_Init_Control_Basic___hyg_611____closed__5() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; 
x_1 = lean_box(0);
x_2 = l_myMacro____x40_Init_Control_Basic___hyg_611____closed__4;
x_3 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_3, 0, x_2);
lean_ctor_set(x_3, 1, x_1);
return x_3;
}
}
static lean_object* _init_l_myMacro____x40_Init_Control_Basic___hyg_611____closed__6() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; 
x_1 = lean_box(0);
x_2 = l_myMacro____x40_Init_Control_Basic___hyg_611____closed__5;
x_3 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_3, 0, x_2);
lean_ctor_set(x_3, 1, x_1);
return x_3;
}
}
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_611_(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
lean_object* x_4; uint8_t x_5; 
x_4 = l_term___x3c_x7c_x7c_x3e_____closed__2;
lean_inc(x_1);
x_5 = l_Lean_Syntax_isOfKind(x_1, x_4);
if (x_5 == 0)
{
lean_object* x_6; lean_object* x_7; 
lean_dec(x_2);
lean_dec(x_1);
x_6 = lean_box(1);
x_7 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_7, 0, x_6);
lean_ctor_set(x_7, 1, x_3);
return x_7;
}
else
{
lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; 
x_8 = lean_unsigned_to_nat(0u);
x_9 = l_Lean_Syntax_getArg(x_1, x_8);
x_10 = lean_unsigned_to_nat(2u);
x_11 = l_Lean_Syntax_getArg(x_1, x_10);
lean_dec(x_1);
x_12 = l_Lean_MonadRef_mkInfoFromRefPos___at_myMacro____x40_Init_Notation___hyg_109____spec__1(x_2, x_3);
x_13 = !lean_is_exclusive(x_12);
if (x_13 == 0)
{
lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; 
x_14 = lean_ctor_get(x_12, 0);
lean_dec(x_14);
x_15 = lean_ctor_get(x_2, 2);
lean_inc(x_15);
x_16 = lean_ctor_get(x_2, 1);
lean_inc(x_16);
lean_dec(x_2);
x_17 = l_myMacro____x40_Init_Control_Basic___hyg_611____closed__4;
x_18 = l_Lean_addMacroScope(x_16, x_17, x_15);
x_19 = l_Lean_instInhabitedSourceInfo___closed__1;
x_20 = l_myMacro____x40_Init_Control_Basic___hyg_611____closed__3;
x_21 = l_myMacro____x40_Init_Control_Basic___hyg_611____closed__6;
x_22 = lean_alloc_ctor(3, 4, 0);
lean_ctor_set(x_22, 0, x_19);
lean_ctor_set(x_22, 1, x_20);
lean_ctor_set(x_22, 2, x_18);
lean_ctor_set(x_22, 3, x_21);
x_23 = l_Array_empty___closed__1;
x_24 = lean_array_push(x_23, x_22);
x_25 = lean_array_push(x_23, x_9);
x_26 = lean_array_push(x_25, x_11);
x_27 = l_Lean_nullKind___closed__2;
x_28 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_28, 0, x_27);
lean_ctor_set(x_28, 1, x_26);
x_29 = lean_array_push(x_24, x_28);
x_30 = l_myMacro____x40_Init_Notation___hyg_2137____closed__4;
x_31 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_31, 0, x_30);
lean_ctor_set(x_31, 1, x_29);
lean_ctor_set(x_12, 0, x_31);
return x_12;
}
else
{
lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; 
x_32 = lean_ctor_get(x_12, 1);
lean_inc(x_32);
lean_dec(x_12);
x_33 = lean_ctor_get(x_2, 2);
lean_inc(x_33);
x_34 = lean_ctor_get(x_2, 1);
lean_inc(x_34);
lean_dec(x_2);
x_35 = l_myMacro____x40_Init_Control_Basic___hyg_611____closed__4;
x_36 = l_Lean_addMacroScope(x_34, x_35, x_33);
x_37 = l_Lean_instInhabitedSourceInfo___closed__1;
x_38 = l_myMacro____x40_Init_Control_Basic___hyg_611____closed__3;
x_39 = l_myMacro____x40_Init_Control_Basic___hyg_611____closed__6;
x_40 = lean_alloc_ctor(3, 4, 0);
lean_ctor_set(x_40, 0, x_37);
lean_ctor_set(x_40, 1, x_38);
lean_ctor_set(x_40, 2, x_36);
lean_ctor_set(x_40, 3, x_39);
x_41 = l_Array_empty___closed__1;
x_42 = lean_array_push(x_41, x_40);
x_43 = lean_array_push(x_41, x_9);
x_44 = lean_array_push(x_43, x_11);
x_45 = l_Lean_nullKind___closed__2;
x_46 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_46, 0, x_45);
lean_ctor_set(x_46, 1, x_44);
x_47 = lean_array_push(x_42, x_46);
x_48 = l_myMacro____x40_Init_Notation___hyg_2137____closed__4;
x_49 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_49, 0, x_48);
lean_ctor_set(x_49, 1, x_47);
x_50 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_50, 0, x_49);
lean_ctor_set(x_50, 1, x_32);
return x_50;
}
}
}
}
lean_object* l_unexpand____x40_Init_Control_Basic___hyg_576_(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3; uint8_t x_4; 
x_3 = l_myMacro____x40_Init_Notation___hyg_2137____closed__4;
lean_inc(x_1);
x_4 = l_Lean_Syntax_isOfKind(x_1, x_3);
if (x_4 == 0)
{
lean_object* x_5; lean_object* x_6; 
lean_dec(x_1);
x_5 = lean_box(0);
x_6 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_6, 0, x_5);
lean_ctor_set(x_6, 1, x_2);
return x_6;
}
else
{
lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; 
x_7 = lean_unsigned_to_nat(1u);
x_8 = l_Lean_Syntax_getArg(x_1, x_7);
lean_dec(x_1);
x_9 = l_Lean_nullKind___closed__2;
lean_inc(x_8);
x_10 = l_Lean_Syntax_isOfKind(x_8, x_9);
if (x_10 == 0)
{
lean_object* x_11; lean_object* x_12; 
lean_dec(x_8);
x_11 = lean_box(0);
x_12 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_12, 0, x_11);
lean_ctor_set(x_12, 1, x_2);
return x_12;
}
else
{
lean_object* x_13; lean_object* x_14; lean_object* x_15; uint8_t x_16; 
x_13 = l_Lean_Syntax_getArgs(x_8);
x_14 = lean_array_get_size(x_13);
lean_dec(x_13);
x_15 = lean_unsigned_to_nat(2u);
x_16 = lean_nat_dec_eq(x_14, x_15);
lean_dec(x_14);
if (x_16 == 0)
{
lean_object* x_17; lean_object* x_18; 
lean_dec(x_8);
x_17 = lean_box(0);
x_18 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_18, 0, x_17);
lean_ctor_set(x_18, 1, x_2);
return x_18;
}
else
{
lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; uint8_t x_23; 
x_19 = lean_unsigned_to_nat(0u);
x_20 = l_Lean_Syntax_getArg(x_8, x_19);
x_21 = l_Lean_Syntax_getArg(x_8, x_7);
lean_dec(x_8);
x_22 = l_Lean_MonadRef_mkInfoFromRefPos___at_unexpand____x40_Init_Notation___hyg_2118____spec__1(x_2);
x_23 = !lean_is_exclusive(x_22);
if (x_23 == 0)
{
lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; 
x_24 = lean_ctor_get(x_22, 0);
x_25 = l_Array_empty___closed__1;
x_26 = lean_array_push(x_25, x_20);
x_27 = l_term___x3c_x7c_x7c_x3e_____closed__3;
x_28 = lean_alloc_ctor(2, 2, 0);
lean_ctor_set(x_28, 0, x_24);
lean_ctor_set(x_28, 1, x_27);
x_29 = lean_array_push(x_26, x_28);
x_30 = lean_array_push(x_29, x_21);
x_31 = l_term___x3c_x7c_x7c_x3e_____closed__2;
x_32 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_32, 0, x_31);
lean_ctor_set(x_32, 1, x_30);
lean_ctor_set(x_22, 0, x_32);
return x_22;
}
else
{
lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; 
x_33 = lean_ctor_get(x_22, 0);
x_34 = lean_ctor_get(x_22, 1);
lean_inc(x_34);
lean_inc(x_33);
lean_dec(x_22);
x_35 = l_Array_empty___closed__1;
x_36 = lean_array_push(x_35, x_20);
x_37 = l_term___x3c_x7c_x7c_x3e_____closed__3;
x_38 = lean_alloc_ctor(2, 2, 0);
lean_ctor_set(x_38, 0, x_33);
lean_ctor_set(x_38, 1, x_37);
x_39 = lean_array_push(x_36, x_38);
x_40 = lean_array_push(x_39, x_21);
x_41 = l_term___x3c_x7c_x7c_x3e_____closed__2;
x_42 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_42, 0, x_41);
lean_ctor_set(x_42, 1, x_40);
x_43 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_43, 0, x_42);
lean_ctor_set(x_43, 1, x_34);
return x_43;
}
}
}
}
}
}
lean_object* l_andM_match__1___rarg(uint8_t x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
if (x_1 == 0)
{
lean_object* x_4; lean_object* x_5; 
lean_dec(x_2);
x_4 = lean_box(0);
x_5 = lean_apply_1(x_3, x_4);
return x_5;
}
else
{
lean_object* x_6; lean_object* x_7; 
lean_dec(x_3);
x_6 = lean_box(0);
x_7 = lean_apply_1(x_2, x_6);
return x_7;
}
}
}
lean_object* l_andM_match__1(lean_object* x_1) {
_start:
{
lean_object* x_2; 
x_2 = lean_alloc_closure((void*)(l_andM_match__1___rarg___boxed), 3, 0);
return x_2;
}
}
lean_object* l_andM_match__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
uint8_t x_4; lean_object* x_5; 
x_4 = lean_unbox(x_1);
lean_dec(x_1);
x_5 = l_andM_match__1___rarg(x_4, x_2, x_3);
return x_5;
}
}
lean_object* l_andM___rarg___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
lean_object* x_5; uint8_t x_6; 
lean_inc(x_4);
x_5 = lean_apply_1(x_1, x_4);
x_6 = lean_unbox(x_5);
lean_dec(x_5);
if (x_6 == 0)
{
lean_object* x_7; lean_object* x_8; lean_object* x_9; 
x_7 = lean_ctor_get(x_2, 0);
lean_inc(x_7);
lean_dec(x_2);
x_8 = lean_ctor_get(x_7, 1);
lean_inc(x_8);
lean_dec(x_7);
x_9 = lean_apply_2(x_8, lean_box(0), x_4);
return x_9;
}
else
{
lean_dec(x_4);
lean_dec(x_2);
lean_inc(x_3);
return x_3;
}
}
}
lean_object* l_andM___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
lean_object* x_5; lean_object* x_6; lean_object* x_7; 
x_5 = lean_ctor_get(x_1, 1);
lean_inc(x_5);
x_6 = lean_alloc_closure((void*)(l_andM___rarg___lambda__1___boxed), 4, 3);
lean_closure_set(x_6, 0, x_2);
lean_closure_set(x_6, 1, x_1);
lean_closure_set(x_6, 2, x_4);
x_7 = lean_apply_4(x_5, lean_box(0), lean_box(0), x_3, x_6);
return x_7;
}
}
lean_object* l_andM(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3; 
x_3 = lean_alloc_closure((void*)(l_andM___rarg), 4, 0);
return x_3;
}
}
lean_object* l_andM___rarg___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
lean_object* x_5; 
x_5 = l_andM___rarg___lambda__1(x_1, x_2, x_3, x_4);
lean_dec(x_3);
return x_5;
}
}
static lean_object* _init_l_term___x3c_x26_x26_x3e_____closed__1() {
_start:
{
lean_object* x_1; 
x_1 = lean_mk_string("term_<&&>_");
return x_1;
}
}
static lean_object* _init_l_term___x3c_x26_x26_x3e_____closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; 
x_1 = lean_box(0);
x_2 = l_term___x3c_x26_x26_x3e_____closed__1;
x_3 = lean_name_mk_string(x_1, x_2);
return x_3;
}
}
static lean_object* _init_l_term___x3c_x26_x26_x3e_____closed__3() {
_start:
{
lean_object* x_1; 
x_1 = lean_mk_string(" <&&> ");
return x_1;
}
}
static lean_object* _init_l_term___x3c_x26_x26_x3e_____closed__4() {
_start:
{
lean_object* x_1; lean_object* x_2; 
x_1 = l_term___x3c_x26_x26_x3e_____closed__3;
x_2 = lean_alloc_ctor(5, 1, 0);
lean_ctor_set(x_2, 0, x_1);
return x_2;
}
}
static lean_object* _init_l_term___x3c_x26_x26_x3e_____closed__5() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; 
x_1 = l_Lean_Parser_Syntax_addPrec___closed__10;
x_2 = l_term___x3c_x26_x26_x3e_____closed__4;
x_3 = l_term___xd7_____closed__5;
x_4 = lean_alloc_ctor(2, 3, 0);
lean_ctor_set(x_4, 0, x_1);
lean_ctor_set(x_4, 1, x_2);
lean_ctor_set(x_4, 2, x_3);
return x_4;
}
}
static lean_object* _init_l_term___x3c_x26_x26_x3e_____closed__6() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; 
x_1 = l_term___x3c_x26_x26_x3e_____closed__2;
x_2 = lean_unsigned_to_nat(35u);
x_3 = l_term___x3c_x26_x26_x3e_____closed__5;
x_4 = lean_alloc_ctor(4, 3, 0);
lean_ctor_set(x_4, 0, x_1);
lean_ctor_set(x_4, 1, x_2);
lean_ctor_set(x_4, 2, x_3);
return x_4;
}
}
static lean_object* _init_l_term___x3c_x26_x26_x3e__() {
_start:
{
lean_object* x_1; 
x_1 = l_term___x3c_x26_x26_x3e_____closed__6;
return x_1;
}
}
static lean_object* _init_l_myMacro____x40_Init_Control_Basic___hyg_951____closed__1() {
_start:
{
lean_object* x_1; 
x_1 = lean_mk_string("andM");
return x_1;
}
}
static lean_object* _init_l_myMacro____x40_Init_Control_Basic___hyg_951____closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2; 
x_1 = l_myMacro____x40_Init_Control_Basic___hyg_951____closed__1;
x_2 = lean_string_utf8_byte_size(x_1);
return x_2;
}
}
static lean_object* _init_l_myMacro____x40_Init_Control_Basic___hyg_951____closed__3() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; 
x_1 = l_myMacro____x40_Init_Control_Basic___hyg_951____closed__1;
x_2 = lean_unsigned_to_nat(0u);
x_3 = l_myMacro____x40_Init_Control_Basic___hyg_951____closed__2;
x_4 = lean_alloc_ctor(0, 3, 0);
lean_ctor_set(x_4, 0, x_1);
lean_ctor_set(x_4, 1, x_2);
lean_ctor_set(x_4, 2, x_3);
return x_4;
}
}
static lean_object* _init_l_myMacro____x40_Init_Control_Basic___hyg_951____closed__4() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; 
x_1 = lean_box(0);
x_2 = l_myMacro____x40_Init_Control_Basic___hyg_951____closed__1;
x_3 = lean_name_mk_string(x_1, x_2);
return x_3;
}
}
static lean_object* _init_l_myMacro____x40_Init_Control_Basic___hyg_951____closed__5() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; 
x_1 = lean_box(0);
x_2 = l_myMacro____x40_Init_Control_Basic___hyg_951____closed__4;
x_3 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_3, 0, x_2);
lean_ctor_set(x_3, 1, x_1);
return x_3;
}
}
static lean_object* _init_l_myMacro____x40_Init_Control_Basic___hyg_951____closed__6() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; 
x_1 = lean_box(0);
x_2 = l_myMacro____x40_Init_Control_Basic___hyg_951____closed__5;
x_3 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_3, 0, x_2);
lean_ctor_set(x_3, 1, x_1);
return x_3;
}
}
lean_object* l_myMacro____x40_Init_Control_Basic___hyg_951_(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
lean_object* x_4; uint8_t x_5; 
x_4 = l_term___x3c_x26_x26_x3e_____closed__2;
lean_inc(x_1);
x_5 = l_Lean_Syntax_isOfKind(x_1, x_4);
if (x_5 == 0)
{
lean_object* x_6; lean_object* x_7; 
lean_dec(x_2);
lean_dec(x_1);
x_6 = lean_box(1);
x_7 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_7, 0, x_6);
lean_ctor_set(x_7, 1, x_3);
return x_7;
}
else
{
lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; 
x_8 = lean_unsigned_to_nat(0u);
x_9 = l_Lean_Syntax_getArg(x_1, x_8);
x_10 = lean_unsigned_to_nat(2u);
x_11 = l_Lean_Syntax_getArg(x_1, x_10);
lean_dec(x_1);
x_12 = l_Lean_MonadRef_mkInfoFromRefPos___at_myMacro____x40_Init_Notation___hyg_109____spec__1(x_2, x_3);
x_13 = !lean_is_exclusive(x_12);
if (x_13 == 0)
{
lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; 
x_14 = lean_ctor_get(x_12, 0);
lean_dec(x_14);
x_15 = lean_ctor_get(x_2, 2);
lean_inc(x_15);
x_16 = lean_ctor_get(x_2, 1);
lean_inc(x_16);
lean_dec(x_2);
x_17 = l_myMacro____x40_Init_Control_Basic___hyg_951____closed__4;
x_18 = l_Lean_addMacroScope(x_16, x_17, x_15);
x_19 = l_Lean_instInhabitedSourceInfo___closed__1;
x_20 = l_myMacro____x40_Init_Control_Basic___hyg_951____closed__3;
x_21 = l_myMacro____x40_Init_Control_Basic___hyg_951____closed__6;
x_22 = lean_alloc_ctor(3, 4, 0);
lean_ctor_set(x_22, 0, x_19);
lean_ctor_set(x_22, 1, x_20);
lean_ctor_set(x_22, 2, x_18);
lean_ctor_set(x_22, 3, x_21);
x_23 = l_Array_empty___closed__1;
x_24 = lean_array_push(x_23, x_22);
x_25 = lean_array_push(x_23, x_9);
x_26 = lean_array_push(x_25, x_11);
x_27 = l_Lean_nullKind___closed__2;
x_28 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_28, 0, x_27);
lean_ctor_set(x_28, 1, x_26);
x_29 = lean_array_push(x_24, x_28);
x_30 = l_myMacro____x40_Init_Notation___hyg_2137____closed__4;
x_31 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_31, 0, x_30);
lean_ctor_set(x_31, 1, x_29);
lean_ctor_set(x_12, 0, x_31);
return x_12;
}
else
{
lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; 
x_32 = lean_ctor_get(x_12, 1);
lean_inc(x_32);
lean_dec(x_12);
x_33 = lean_ctor_get(x_2, 2);
lean_inc(x_33);
x_34 = lean_ctor_get(x_2, 1);
lean_inc(x_34);
lean_dec(x_2);
x_35 = l_myMacro____x40_Init_Control_Basic___hyg_951____closed__4;
x_36 = l_Lean_addMacroScope(x_34, x_35, x_33);
x_37 = l_Lean_instInhabitedSourceInfo___closed__1;
x_38 = l_myMacro____x40_Init_Control_Basic___hyg_951____closed__3;
x_39 = l_myMacro____x40_Init_Control_Basic___hyg_951____closed__6;
x_40 = lean_alloc_ctor(3, 4, 0);
lean_ctor_set(x_40, 0, x_37);
lean_ctor_set(x_40, 1, x_38);
lean_ctor_set(x_40, 2, x_36);
lean_ctor_set(x_40, 3, x_39);
x_41 = l_Array_empty___closed__1;
x_42 = lean_array_push(x_41, x_40);
x_43 = lean_array_push(x_41, x_9);
x_44 = lean_array_push(x_43, x_11);
x_45 = l_Lean_nullKind___closed__2;
x_46 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_46, 0, x_45);
lean_ctor_set(x_46, 1, x_44);
x_47 = lean_array_push(x_42, x_46);
x_48 = l_myMacro____x40_Init_Notation___hyg_2137____closed__4;
x_49 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_49, 0, x_48);
lean_ctor_set(x_49, 1, x_47);
x_50 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_50, 0, x_49);
lean_ctor_set(x_50, 1, x_32);
return x_50;
}
}
}
}
lean_object* l_unexpand____x40_Init_Control_Basic___hyg_916_(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3; uint8_t x_4; 
x_3 = l_myMacro____x40_Init_Notation___hyg_2137____closed__4;
lean_inc(x_1);
x_4 = l_Lean_Syntax_isOfKind(x_1, x_3);
if (x_4 == 0)
{
lean_object* x_5; lean_object* x_6; 
lean_dec(x_1);
x_5 = lean_box(0);
x_6 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_6, 0, x_5);
lean_ctor_set(x_6, 1, x_2);
return x_6;
}
else
{
lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; 
x_7 = lean_unsigned_to_nat(1u);
x_8 = l_Lean_Syntax_getArg(x_1, x_7);
lean_dec(x_1);
x_9 = l_Lean_nullKind___closed__2;
lean_inc(x_8);
x_10 = l_Lean_Syntax_isOfKind(x_8, x_9);
if (x_10 == 0)
{
lean_object* x_11; lean_object* x_12; 
lean_dec(x_8);
x_11 = lean_box(0);
x_12 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_12, 0, x_11);
lean_ctor_set(x_12, 1, x_2);
return x_12;
}
else
{
lean_object* x_13; lean_object* x_14; lean_object* x_15; uint8_t x_16; 
x_13 = l_Lean_Syntax_getArgs(x_8);
x_14 = lean_array_get_size(x_13);
lean_dec(x_13);
x_15 = lean_unsigned_to_nat(2u);
x_16 = lean_nat_dec_eq(x_14, x_15);
lean_dec(x_14);
if (x_16 == 0)
{
lean_object* x_17; lean_object* x_18; 
lean_dec(x_8);
x_17 = lean_box(0);
x_18 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_18, 0, x_17);
lean_ctor_set(x_18, 1, x_2);
return x_18;
}
else
{
lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; uint8_t x_23; 
x_19 = lean_unsigned_to_nat(0u);
x_20 = l_Lean_Syntax_getArg(x_8, x_19);
x_21 = l_Lean_Syntax_getArg(x_8, x_7);
lean_dec(x_8);
x_22 = l_Lean_MonadRef_mkInfoFromRefPos___at_unexpand____x40_Init_Notation___hyg_2118____spec__1(x_2);
x_23 = !lean_is_exclusive(x_22);
if (x_23 == 0)
{
lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; 
x_24 = lean_ctor_get(x_22, 0);
x_25 = l_Array_empty___closed__1;
x_26 = lean_array_push(x_25, x_20);
x_27 = l_term___x3c_x26_x26_x3e_____closed__3;
x_28 = lean_alloc_ctor(2, 2, 0);
lean_ctor_set(x_28, 0, x_24);
lean_ctor_set(x_28, 1, x_27);
x_29 = lean_array_push(x_26, x_28);
x_30 = lean_array_push(x_29, x_21);
x_31 = l_term___x3c_x26_x26_x3e_____closed__2;
x_32 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_32, 0, x_31);
lean_ctor_set(x_32, 1, x_30);
lean_ctor_set(x_22, 0, x_32);
return x_22;
}
else
{
lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; 
x_33 = lean_ctor_get(x_22, 0);
x_34 = lean_ctor_get(x_22, 1);
lean_inc(x_34);
lean_inc(x_33);
lean_dec(x_22);
x_35 = l_Array_empty___closed__1;
x_36 = lean_array_push(x_35, x_20);
x_37 = l_term___x3c_x26_x26_x3e_____closed__3;
x_38 = lean_alloc_ctor(2, 2, 0);
lean_ctor_set(x_38, 0, x_33);
lean_ctor_set(x_38, 1, x_37);
x_39 = lean_array_push(x_36, x_38);
x_40 = lean_array_push(x_39, x_21);
x_41 = l_term___x3c_x26_x26_x3e_____closed__2;
x_42 = lean_alloc_ctor(1, 2, 0);
lean_ctor_set(x_42, 0, x_41);
lean_ctor_set(x_42, 1, x_40);
x_43 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_43, 0, x_42);
lean_ctor_set(x_43, 1, x_34);
return x_43;
}
}
}
}
}
}
static lean_object* _init_l_notM___rarg___closed__1() {
_start:
{
lean_object* x_1; 
x_1 = lean_alloc_closure((void*)(l_not___boxed), 1, 0);
return x_1;
}
}
lean_object* l_notM___rarg(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; 
x_3 = lean_ctor_get(x_1, 0);
lean_inc(x_3);
lean_dec(x_1);
x_4 = lean_ctor_get(x_3, 0);
lean_inc(x_4);
lean_dec(x_3);
x_5 = l_notM___rarg___closed__1;
x_6 = lean_apply_4(x_4, lean_box(0), lean_box(0), x_5, x_2);
return x_6;
}
}
lean_object* l_notM(lean_object* x_1) {
_start:
{
lean_object* x_2; 
x_2 = lean_alloc_closure((void*)(l_notM___rarg), 2, 0);
return x_2;
}
}
lean_object* l_instMonadControlT___rarg___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
lean_object* x_5; lean_object* x_6; 
x_5 = lean_apply_2(x_1, lean_box(0), x_4);
x_6 = lean_apply_2(x_2, lean_box(0), x_5);
return x_6;
}
}
lean_object* l_instMonadControlT___rarg___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
lean_object* x_4; lean_object* x_5; 
x_4 = lean_alloc_closure((void*)(l_instMonadControlT___rarg___lambda__1), 4, 2);
lean_closure_set(x_4, 0, x_1);
lean_closure_set(x_4, 1, x_3);
x_5 = lean_apply_1(x_2, x_4);
return x_5;
}
}
lean_object* l_instMonadControlT___rarg___lambda__3(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
lean_object* x_4; lean_object* x_5; lean_object* x_6; 
x_4 = lean_ctor_get(x_1, 0);
lean_inc(x_4);
lean_dec(x_1);
x_5 = lean_alloc_closure((void*)(l_instMonadControlT___rarg___lambda__2), 3, 2);
lean_closure_set(x_5, 0, x_3);
lean_closure_set(x_5, 1, x_2);
x_6 = lean_apply_2(x_4, lean_box(0), x_5);
return x_6;
}
}
lean_object* l_instMonadControlT___rarg___lambda__4(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
lean_object* x_5; lean_object* x_6; lean_object* x_7; 
x_5 = lean_ctor_get(x_1, 0);
lean_inc(x_5);
lean_dec(x_1);
x_6 = lean_alloc_closure((void*)(l_instMonadControlT___rarg___lambda__3), 3, 2);
lean_closure_set(x_6, 0, x_2);
lean_closure_set(x_6, 1, x_4);
x_7 = lean_apply_2(x_5, lean_box(0), x_6);
return x_7;
}
}
lean_object* l_instMonadControlT___rarg___lambda__5(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; 
x_5 = lean_ctor_get(x_1, 1);
lean_inc(x_5);
lean_dec(x_1);
x_6 = lean_ctor_get(x_2, 1);
lean_inc(x_6);
lean_dec(x_2);
x_7 = lean_apply_2(x_6, lean_box(0), x_4);
x_8 = lean_apply_2(x_5, lean_box(0), x_7);
return x_8;
}
}
lean_object* l_instMonadControlT___rarg(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3; lean_object* x_4; lean_object* x_5; 
lean_inc(x_1);
lean_inc(x_2);
x_3 = lean_alloc_closure((void*)(l_instMonadControlT___rarg___lambda__4), 4, 2);
lean_closure_set(x_3, 0, x_2);
lean_closure_set(x_3, 1, x_1);
x_4 = lean_alloc_closure((void*)(l_instMonadControlT___rarg___lambda__5), 4, 2);
lean_closure_set(x_4, 0, x_2);
lean_closure_set(x_4, 1, x_1);
x_5 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_5, 0, x_3);
lean_ctor_set(x_5, 1, x_4);
return x_5;
}
}
lean_object* l_instMonadControlT(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
lean_object* x_4; 
x_4 = lean_alloc_closure((void*)(l_instMonadControlT___rarg), 2, 0);
return x_4;
}
}
lean_object* l_instMonadControlT__1___rarg___lambda__1(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_inc(x_2);
return x_2;
}
}
static lean_object* _init_l_instMonadControlT__1___rarg___lambda__2___closed__1() {
_start:
{
lean_object* x_1; 
x_1 = lean_alloc_closure((void*)(l_instMonadControlT__1___rarg___lambda__1___boxed), 2, 0);
return x_1;
}
}
lean_object* l_instMonadControlT__1___rarg___lambda__2(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3; lean_object* x_4; 
x_3 = l_instMonadControlT__1___rarg___lambda__2___closed__1;
x_4 = lean_apply_1(x_2, x_3);
return x_4;
}
}
static lean_object* _init_l_instMonadControlT__1___rarg___closed__1() {
_start:
{
lean_object* x_1; 
x_1 = lean_alloc_closure((void*)(l_instMonadControlT__1___rarg___lambda__2), 2, 0);
return x_1;
}
}
lean_object* l_instMonadControlT__1___rarg(lean_object* x_1) {
_start:
{
lean_object* x_2; lean_object* x_3; lean_object* x_4; 
x_2 = lean_alloc_closure((void*)(l_instMonadFunctorT___rarg___lambda__1), 3, 1);
lean_closure_set(x_2, 0, x_1);
x_3 = l_instMonadControlT__1___rarg___closed__1;
x_4 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_4, 0, x_3);
lean_ctor_set(x_4, 1, x_2);
return x_4;
}
}
lean_object* l_instMonadControlT__1(lean_object* x_1) {
_start:
{
lean_object* x_2; 
x_2 = lean_alloc_closure((void*)(l_instMonadControlT__1___rarg), 1, 0);
return x_2;
}
}
lean_object* l_instMonadControlT__1___rarg___lambda__1___boxed(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3; 
x_3 = l_instMonadControlT__1___rarg___lambda__1(x_1, x_2);
lean_dec(x_2);
return x_3;
}
}
lean_object* l_controlAt___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; 
x_5 = lean_ctor_get(x_1, 0);
lean_inc(x_5);
x_6 = lean_apply_2(x_5, lean_box(0), x_4);
x_7 = lean_ctor_get(x_1, 1);
lean_inc(x_7);
lean_dec(x_1);
x_8 = lean_apply_1(x_7, lean_box(0));
x_9 = lean_apply_4(x_2, lean_box(0), lean_box(0), x_6, x_8);
return x_9;
}
}
lean_object* l_controlAt(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3; 
x_3 = lean_alloc_closure((void*)(l_controlAt___rarg), 4, 0);
return x_3;
}
}
lean_object* l_control___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; 
x_5 = lean_ctor_get(x_1, 0);
lean_inc(x_5);
x_6 = lean_apply_2(x_5, lean_box(0), x_4);
x_7 = lean_ctor_get(x_1, 1);
lean_inc(x_7);
lean_dec(x_1);
x_8 = lean_apply_1(x_7, lean_box(0));
x_9 = lean_apply_4(x_2, lean_box(0), lean_box(0), x_6, x_8);
return x_9;
}
}
lean_object* l_control(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3; 
x_3 = lean_alloc_closure((void*)(l_control___rarg), 4, 0);
return x_3;
}
}
lean_object* initialize_Init_Core(lean_object*);
static bool _G_initialized = false;
lean_object* initialize_Init_Control_Basic(lean_object* w) {
lean_object * res;
if (_G_initialized) return lean_io_result_mk_ok(lean_box(0));
_G_initialized = true;
res = initialize_Init_Core(lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
l_term___x3c_x26_x3e_____closed__1 = _init_l_term___x3c_x26_x3e_____closed__1();
lean_mark_persistent(l_term___x3c_x26_x3e_____closed__1);
l_term___x3c_x26_x3e_____closed__2 = _init_l_term___x3c_x26_x3e_____closed__2();
lean_mark_persistent(l_term___x3c_x26_x3e_____closed__2);
l_term___x3c_x26_x3e_____closed__3 = _init_l_term___x3c_x26_x3e_____closed__3();
lean_mark_persistent(l_term___x3c_x26_x3e_____closed__3);
l_term___x3c_x26_x3e_____closed__4 = _init_l_term___x3c_x26_x3e_____closed__4();
lean_mark_persistent(l_term___x3c_x26_x3e_____closed__4);
l_term___x3c_x26_x3e_____closed__5 = _init_l_term___x3c_x26_x3e_____closed__5();
lean_mark_persistent(l_term___x3c_x26_x3e_____closed__5);
l_term___x3c_x26_x3e_____closed__6 = _init_l_term___x3c_x26_x3e_____closed__6();
lean_mark_persistent(l_term___x3c_x26_x3e_____closed__6);
l_term___x3c_x26_x3e__ = _init_l_term___x3c_x26_x3e__();
lean_mark_persistent(l_term___x3c_x26_x3e__);
l_myMacro____x40_Init_Control_Basic___hyg_57____closed__1 = _init_l_myMacro____x40_Init_Control_Basic___hyg_57____closed__1();
lean_mark_persistent(l_myMacro____x40_Init_Control_Basic___hyg_57____closed__1);
l_myMacro____x40_Init_Control_Basic___hyg_57____closed__2 = _init_l_myMacro____x40_Init_Control_Basic___hyg_57____closed__2();
lean_mark_persistent(l_myMacro____x40_Init_Control_Basic___hyg_57____closed__2);
l_myMacro____x40_Init_Control_Basic___hyg_57____closed__3 = _init_l_myMacro____x40_Init_Control_Basic___hyg_57____closed__3();
lean_mark_persistent(l_myMacro____x40_Init_Control_Basic___hyg_57____closed__3);
l_myMacro____x40_Init_Control_Basic___hyg_57____closed__4 = _init_l_myMacro____x40_Init_Control_Basic___hyg_57____closed__4();
lean_mark_persistent(l_myMacro____x40_Init_Control_Basic___hyg_57____closed__4);
l_myMacro____x40_Init_Control_Basic___hyg_57____closed__5 = _init_l_myMacro____x40_Init_Control_Basic___hyg_57____closed__5();
lean_mark_persistent(l_myMacro____x40_Init_Control_Basic___hyg_57____closed__5);
l_myMacro____x40_Init_Control_Basic___hyg_57____closed__6 = _init_l_myMacro____x40_Init_Control_Basic___hyg_57____closed__6();
lean_mark_persistent(l_myMacro____x40_Init_Control_Basic___hyg_57____closed__6);
l_myMacro____x40_Init_Control_Basic___hyg_57____closed__7 = _init_l_myMacro____x40_Init_Control_Basic___hyg_57____closed__7();
lean_mark_persistent(l_myMacro____x40_Init_Control_Basic___hyg_57____closed__7);
l_optional___rarg___closed__1 = _init_l_optional___rarg___closed__1();
lean_mark_persistent(l_optional___rarg___closed__1);
l_term___x3c_x7c_x7c_x3e_____closed__1 = _init_l_term___x3c_x7c_x7c_x3e_____closed__1();
lean_mark_persistent(l_term___x3c_x7c_x7c_x3e_____closed__1);
l_term___x3c_x7c_x7c_x3e_____closed__2 = _init_l_term___x3c_x7c_x7c_x3e_____closed__2();
lean_mark_persistent(l_term___x3c_x7c_x7c_x3e_____closed__2);
l_term___x3c_x7c_x7c_x3e_____closed__3 = _init_l_term___x3c_x7c_x7c_x3e_____closed__3();
lean_mark_persistent(l_term___x3c_x7c_x7c_x3e_____closed__3);
l_term___x3c_x7c_x7c_x3e_____closed__4 = _init_l_term___x3c_x7c_x7c_x3e_____closed__4();
lean_mark_persistent(l_term___x3c_x7c_x7c_x3e_____closed__4);
l_term___x3c_x7c_x7c_x3e_____closed__5 = _init_l_term___x3c_x7c_x7c_x3e_____closed__5();
lean_mark_persistent(l_term___x3c_x7c_x7c_x3e_____closed__5);
l_term___x3c_x7c_x7c_x3e_____closed__6 = _init_l_term___x3c_x7c_x7c_x3e_____closed__6();
lean_mark_persistent(l_term___x3c_x7c_x7c_x3e_____closed__6);
l_term___x3c_x7c_x7c_x3e__ = _init_l_term___x3c_x7c_x7c_x3e__();
lean_mark_persistent(l_term___x3c_x7c_x7c_x3e__);
l_myMacro____x40_Init_Control_Basic___hyg_611____closed__1 = _init_l_myMacro____x40_Init_Control_Basic___hyg_611____closed__1();
lean_mark_persistent(l_myMacro____x40_Init_Control_Basic___hyg_611____closed__1);
l_myMacro____x40_Init_Control_Basic___hyg_611____closed__2 = _init_l_myMacro____x40_Init_Control_Basic___hyg_611____closed__2();
lean_mark_persistent(l_myMacro____x40_Init_Control_Basic___hyg_611____closed__2);
l_myMacro____x40_Init_Control_Basic___hyg_611____closed__3 = _init_l_myMacro____x40_Init_Control_Basic___hyg_611____closed__3();
lean_mark_persistent(l_myMacro____x40_Init_Control_Basic___hyg_611____closed__3);
l_myMacro____x40_Init_Control_Basic___hyg_611____closed__4 = _init_l_myMacro____x40_Init_Control_Basic___hyg_611____closed__4();
lean_mark_persistent(l_myMacro____x40_Init_Control_Basic___hyg_611____closed__4);
l_myMacro____x40_Init_Control_Basic___hyg_611____closed__5 = _init_l_myMacro____x40_Init_Control_Basic___hyg_611____closed__5();
lean_mark_persistent(l_myMacro____x40_Init_Control_Basic___hyg_611____closed__5);
l_myMacro____x40_Init_Control_Basic___hyg_611____closed__6 = _init_l_myMacro____x40_Init_Control_Basic___hyg_611____closed__6();
lean_mark_persistent(l_myMacro____x40_Init_Control_Basic___hyg_611____closed__6);
l_term___x3c_x26_x26_x3e_____closed__1 = _init_l_term___x3c_x26_x26_x3e_____closed__1();
lean_mark_persistent(l_term___x3c_x26_x26_x3e_____closed__1);
l_term___x3c_x26_x26_x3e_____closed__2 = _init_l_term___x3c_x26_x26_x3e_____closed__2();
lean_mark_persistent(l_term___x3c_x26_x26_x3e_____closed__2);
l_term___x3c_x26_x26_x3e_____closed__3 = _init_l_term___x3c_x26_x26_x3e_____closed__3();
lean_mark_persistent(l_term___x3c_x26_x26_x3e_____closed__3);
l_term___x3c_x26_x26_x3e_____closed__4 = _init_l_term___x3c_x26_x26_x3e_____closed__4();
lean_mark_persistent(l_term___x3c_x26_x26_x3e_____closed__4);
l_term___x3c_x26_x26_x3e_____closed__5 = _init_l_term___x3c_x26_x26_x3e_____closed__5();
lean_mark_persistent(l_term___x3c_x26_x26_x3e_____closed__5);
l_term___x3c_x26_x26_x3e_____closed__6 = _init_l_term___x3c_x26_x26_x3e_____closed__6();
lean_mark_persistent(l_term___x3c_x26_x26_x3e_____closed__6);
l_term___x3c_x26_x26_x3e__ = _init_l_term___x3c_x26_x26_x3e__();
lean_mark_persistent(l_term___x3c_x26_x26_x3e__);
l_myMacro____x40_Init_Control_Basic___hyg_951____closed__1 = _init_l_myMacro____x40_Init_Control_Basic___hyg_951____closed__1();
lean_mark_persistent(l_myMacro____x40_Init_Control_Basic___hyg_951____closed__1);
l_myMacro____x40_Init_Control_Basic___hyg_951____closed__2 = _init_l_myMacro____x40_Init_Control_Basic___hyg_951____closed__2();
lean_mark_persistent(l_myMacro____x40_Init_Control_Basic___hyg_951____closed__2);
l_myMacro____x40_Init_Control_Basic___hyg_951____closed__3 = _init_l_myMacro____x40_Init_Control_Basic___hyg_951____closed__3();
lean_mark_persistent(l_myMacro____x40_Init_Control_Basic___hyg_951____closed__3);
l_myMacro____x40_Init_Control_Basic___hyg_951____closed__4 = _init_l_myMacro____x40_Init_Control_Basic___hyg_951____closed__4();
lean_mark_persistent(l_myMacro____x40_Init_Control_Basic___hyg_951____closed__4);
l_myMacro____x40_Init_Control_Basic___hyg_951____closed__5 = _init_l_myMacro____x40_Init_Control_Basic___hyg_951____closed__5();
lean_mark_persistent(l_myMacro____x40_Init_Control_Basic___hyg_951____closed__5);
l_myMacro____x40_Init_Control_Basic___hyg_951____closed__6 = _init_l_myMacro____x40_Init_Control_Basic___hyg_951____closed__6();
lean_mark_persistent(l_myMacro____x40_Init_Control_Basic___hyg_951____closed__6);
l_notM___rarg___closed__1 = _init_l_notM___rarg___closed__1();
lean_mark_persistent(l_notM___rarg___closed__1);
l_instMonadControlT__1___rarg___lambda__2___closed__1 = _init_l_instMonadControlT__1___rarg___lambda__2___closed__1();
lean_mark_persistent(l_instMonadControlT__1___rarg___lambda__2___closed__1);
l_instMonadControlT__1___rarg___closed__1 = _init_l_instMonadControlT__1___rarg___closed__1();
lean_mark_persistent(l_instMonadControlT__1___rarg___closed__1);
return lean_io_result_mk_ok(lean_box(0));
}
#ifdef __cplusplus
}
#endif
