max/lean4-htt
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 2

chore: update stage0

Browse source
This commit is contained in:
Lean stage0 autoupdater 2025-09-17 03:26:25 +00:00
parent efb398b040
commit 5a7d663624
31 changed files with 44079 additions and 26372 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
stage0/src/stdlib_flags.h
View file

@ -1,4 +1,3 @@
// update me!
#include "util/options.h"
namespace lean {

144
stage0/stdlib/Init/Data/Int/Linear.c generated
View file

@ -1,6 +1,6 @@
// Lean compiler output
// Module: Init.Data.Int.Linear
// Imports: Init.ByCases Init.Data.Prod Init.Data.Int.Lemmas Init.Data.Int.LemmasAux Init.Data.Int.DivMod.Bootstrap Init.Data.Int.Cooper Init.Data.Int.Gcd Init.Data.Int.Gcd Init.Data.RArray Init.Data.AC Init.Data.AC
// Imports: Init.ByCases Init.Data.Prod Init.Data.Int.Lemmas Init.Data.Int.LemmasAux Init.Data.Int.DivMod.Bootstrap Init.Data.Int.Cooper Init.Data.Int.Gcd Init.Data.Int.Gcd Init.Data.RArray Init.Data.AC Init.Data.AC Init.LawfulBEqTactics
#include <lean/lean.h>
#if defined(__clang__)
#pragma clang diagnostic ignored "-Wunused-parameter"
@ -953,6 +953,75 @@ x_1 = l_Int_Linear_instBEqPoly___closed__0;
return x_1;
}
}
LEAN_EXPORT lean_object* l___private_Init_Data_Int_Linear_0__Int_Linear_instBEqPoly_beq_match__1_splitter___redArg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
if (lean_obj_tag(x_1) == 0)
{
lean_dec(x_4);
if (lean_obj_tag(x_2) == 0)
{
lean_object* x_6; lean_object* x_7; lean_object* x_8;
lean_dec(x_5);
x_6 = lean_ctor_get(x_1, 0);
lean_inc(x_6);
lean_dec_ref(x_1);
x_7 = lean_ctor_get(x_2, 0);
lean_inc(x_7);
lean_dec_ref(x_2);
x_8 = lean_apply_2(x_3, x_6, x_7);
return x_8;
}
else
{
lean_object* x_9;
lean_dec(x_3);
x_9 = lean_apply_4(x_5, x_1, x_2, lean_box(0), lean_box(0));
return x_9;
}
}
else
{
lean_dec(x_3);
if (lean_obj_tag(x_2) == 0)
{
lean_object* x_10;
lean_dec(x_4);
x_10 = lean_apply_4(x_5, x_1, x_2, lean_box(0), lean_box(0));
return x_10;
}
else
{
lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17;
lean_dec(x_5);
x_11 = lean_ctor_get(x_1, 0);
lean_inc(x_11);
x_12 = lean_ctor_get(x_1, 1);
lean_inc(x_12);
x_13 = lean_ctor_get(x_1, 2);
lean_inc_ref(x_13);
lean_dec_ref(x_1);
x_14 = lean_ctor_get(x_2, 0);
lean_inc(x_14);
x_15 = lean_ctor_get(x_2, 1);
lean_inc(x_15);
x_16 = lean_ctor_get(x_2, 2);
lean_inc_ref(x_16);
lean_dec_ref(x_2);
x_17 = lean_apply_6(x_4, x_11, x_12, x_13, x_14, x_15, x_16);
return x_17;
}
}
}
}
LEAN_EXPORT lean_object* l___private_Init_Data_Int_Linear_0__Int_Linear_instBEqPoly_beq_match__1_splitter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) {
_start:
{
lean_object* x_7;
x_7 = l___private_Init_Data_Int_Linear_0__Int_Linear_instBEqPoly_beq_match__1_splitter___redArg(x_2, x_3, x_4, x_5, x_6);
return x_7;
}
}
LEAN_EXPORT lean_object* l_Int_Linear_Poly_denote(lean_object* x_1, lean_object* x_2) {
_start:
{
@ -2493,75 +2562,6 @@ x_10 = l___private_Init_Data_Int_Linear_0__Int_Linear_Expr_toPoly_x27_go_match__
return x_10;
}
}
LEAN_EXPORT lean_object* l___private_Init_Data_Int_Linear_0__Int_Linear_instBEqPoly_beq_match__1_splitter___redArg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
if (lean_obj_tag(x_1) == 0)
{
lean_dec(x_4);
if (lean_obj_tag(x_2) == 0)
{
lean_object* x_6; lean_object* x_7; lean_object* x_8;
lean_dec(x_5);
x_6 = lean_ctor_get(x_1, 0);
lean_inc(x_6);
lean_dec_ref(x_1);
x_7 = lean_ctor_get(x_2, 0);
lean_inc(x_7);
lean_dec_ref(x_2);
x_8 = lean_apply_2(x_3, x_6, x_7);
return x_8;
}
else
{
lean_object* x_9;
lean_dec(x_3);
x_9 = lean_apply_4(x_5, x_1, x_2, lean_box(0), lean_box(0));
return x_9;
}
}
else
{
lean_dec(x_3);
if (lean_obj_tag(x_2) == 0)
{
lean_object* x_10;
lean_dec(x_4);
x_10 = lean_apply_4(x_5, x_1, x_2, lean_box(0), lean_box(0));
return x_10;
}
else
{
lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17;
lean_dec(x_5);
x_11 = lean_ctor_get(x_1, 0);
lean_inc(x_11);
x_12 = lean_ctor_get(x_1, 1);
lean_inc(x_12);
x_13 = lean_ctor_get(x_1, 2);
lean_inc_ref(x_13);
lean_dec_ref(x_1);
x_14 = lean_ctor_get(x_2, 0);
lean_inc(x_14);
x_15 = lean_ctor_get(x_2, 1);
lean_inc(x_15);
x_16 = lean_ctor_get(x_2, 2);
lean_inc_ref(x_16);
lean_dec_ref(x_2);
x_17 = lean_apply_6(x_4, x_11, x_12, x_13, x_14, x_15, x_16);
return x_17;
}
}
}
}
LEAN_EXPORT lean_object* l___private_Init_Data_Int_Linear_0__Int_Linear_instBEqPoly_beq_match__1_splitter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) {
_start:
{
lean_object* x_7;
x_7 = l___private_Init_Data_Int_Linear_0__Int_Linear_instBEqPoly_beq_match__1_splitter___redArg(x_2, x_3, x_4, x_5, x_6);
return x_7;
}
}
LEAN_EXPORT uint8_t l_Int_Linear_Poly_isUnsatEq(lean_object* x_1) {
_start:
{
@ -3470,6 +3470,7 @@ lean_object* initialize_Init_Data_Int_Gcd(uint8_t builtin, lean_object*);
lean_object* initialize_Init_Data_RArray(uint8_t builtin, lean_object*);
lean_object* initialize_Init_Data_AC(uint8_t builtin, lean_object*);
lean_object* initialize_Init_Data_AC(uint8_t builtin, lean_object*);
lean_object* initialize_Init_LawfulBEqTactics(uint8_t builtin, lean_object*);
static bool _G_initialized = false;
LEAN_EXPORT lean_object* initialize_Init_Data_Int_Linear(uint8_t builtin, lean_object* w) {
lean_object * res;
@ -3508,6 +3509,9 @@ lean_dec_ref(res);
res = initialize_Init_Data_AC(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
res = initialize_Init_LawfulBEqTactics(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
l_Int_Linear_instInhabitedExpr_default___closed__0 = _init_l_Int_Linear_instInhabitedExpr_default___closed__0();
lean_mark_persistent(l_Int_Linear_instInhabitedExpr_default___closed__0);
l_Int_Linear_instInhabitedExpr_default___closed__1 = _init_l_Int_Linear_instInhabitedExpr_default___closed__1();

48
stage0/stdlib/Init/Data/Nat/Linear.c generated
View file

@ -1,6 +1,6 @@
// Lean compiler output
// Module: Init.Data.Nat.Linear
// Imports: Init.ByCases Init.Data.Prod Init.Data.RArray
// Imports: Init.ByCases Init.Data.Prod Init.Data.RArray Init.LawfulBEqTactics
#include <lean/lean.h>
#if defined(__clang__)
#pragma clang diagnostic ignored "-Wunused-parameter"
@ -49,6 +49,7 @@ uint8_t lean_nat_dec_eq(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l___private_Init_Data_Nat_Linear_0__Nat_Linear_Poly_isZero_match__1_splitter___boxed(lean_object*, lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Nat_Linear_Var_denote___boxed(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Nat_Linear_instInhabitedExpr_default;
LEAN_EXPORT lean_object* l___private_Init_Data_Nat_Linear_0__Nat_Linear_instBEqPolyCnstr_beq_match__1_splitter___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Nat_Linear_Expr_toPoly_go(lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_List_beq___at___Nat_Linear_instBEqPolyCnstr_beq_spec__0___boxed(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l___private_Init_Data_Nat_Linear_0__Nat_Linear_Poly_cancelAux_match__3_splitter___redArg___boxed(lean_object*, lean_object*, lean_object*);
@ -56,6 +57,7 @@ LEAN_EXPORT lean_object* l_Nat_elimOffset___redArg(lean_object*);
LEAN_EXPORT lean_object* l___private_Init_Data_Nat_Linear_0__Nat_Linear_Expr_toPoly_go_match__1_splitter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l___private_Init_Data_Nat_Linear_0__Nat_Linear_Poly_cancelAux_match__3_splitter___redArg(lean_object*, lean_object*, lean_object*);
static lean_object* l_Nat_Linear_Expr_inc___closed__0;
LEAN_EXPORT lean_object* l___private_Init_Data_Nat_Linear_0__Nat_Linear_instBEqPolyCnstr_beq_match__1_splitter___redArg(lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Nat_Linear_Poly_toExpr(lean_object*);
LEAN_EXPORT lean_object* l___private_Init_Data_Nat_Linear_0__Nat_Linear_Expr_denote_match__1_splitter___redArg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Nat_Linear_Expr_denote(lean_object*, lean_object*);
@ -89,6 +91,7 @@ lean_object* lean_nat_sub(lean_object*, lean_object*);
lean_object* lean_nat_mul(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Nat_Linear_instBEqExpr;
LEAN_EXPORT lean_object* l_Nat_Linear_Expr_ctorIdx(lean_object*);
LEAN_EXPORT lean_object* l___private_Init_Data_Nat_Linear_0__Nat_Linear_instBEqPolyCnstr_beq_match__1_splitter(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Nat_Linear_Expr_toPoly(lean_object*);
LEAN_EXPORT lean_object* l_Nat_Linear_Expr_toNormPoly___boxed(lean_object*);
LEAN_EXPORT lean_object* l_Nat_Linear_PolyCnstr_ctorIdx(lean_object*);
@ -1695,6 +1698,45 @@ x_1 = l_Nat_Linear_instBEqPolyCnstr___closed__0;
return x_1;
}
}
LEAN_EXPORT lean_object* l___private_Init_Data_Nat_Linear_0__Nat_Linear_instBEqPolyCnstr_beq_match__1_splitter___redArg(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
uint8_t x_4; lean_object* x_5; lean_object* x_6; uint8_t x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12;
x_4 = lean_ctor_get_uint8(x_1, sizeof(void*)*2);
x_5 = lean_ctor_get(x_1, 0);
lean_inc(x_5);
x_6 = lean_ctor_get(x_1, 1);
lean_inc(x_6);
lean_dec_ref(x_1);
x_7 = lean_ctor_get_uint8(x_2, sizeof(void*)*2);
x_8 = lean_ctor_get(x_2, 0);
lean_inc(x_8);
x_9 = lean_ctor_get(x_2, 1);
lean_inc(x_9);
lean_dec_ref(x_2);
x_10 = lean_box(x_4);
x_11 = lean_box(x_7);
x_12 = lean_apply_6(x_3, x_10, x_5, x_6, x_11, x_8, x_9);
return x_12;
}
}
LEAN_EXPORT lean_object* l___private_Init_Data_Nat_Linear_0__Nat_Linear_instBEqPolyCnstr_beq_match__1_splitter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
lean_object* x_6;
x_6 = l___private_Init_Data_Nat_Linear_0__Nat_Linear_instBEqPolyCnstr_beq_match__1_splitter___redArg(x_2, x_3, x_4);
return x_6;
}
}
LEAN_EXPORT lean_object* l___private_Init_Data_Nat_Linear_0__Nat_Linear_instBEqPolyCnstr_beq_match__1_splitter___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
lean_object* x_6;
x_6 = l___private_Init_Data_Nat_Linear_0__Nat_Linear_instBEqPolyCnstr_beq_match__1_splitter(x_1, x_2, x_3, x_4, x_5);
lean_dec(x_5);
return x_6;
}
}
LEAN_EXPORT lean_object* l_Nat_Linear_ExprCnstr_ctorIdx(lean_object* x_1) {
_start:
{
@ -2531,6 +2573,7 @@ return x_7;
lean_object* initialize_Init_ByCases(uint8_t builtin, lean_object*);
lean_object* initialize_Init_Data_Prod(uint8_t builtin, lean_object*);
lean_object* initialize_Init_Data_RArray(uint8_t builtin, lean_object*);
lean_object* initialize_Init_LawfulBEqTactics(uint8_t builtin, lean_object*);
static bool _G_initialized = false;
LEAN_EXPORT lean_object* initialize_Init_Data_Nat_Linear(uint8_t builtin, lean_object* w) {
lean_object * res;
@ -2545,6 +2588,9 @@ lean_dec_ref(res);
res = initialize_Init_Data_RArray(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
res = initialize_Init_LawfulBEqTactics(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
l_Nat_Linear_fixedVar = _init_l_Nat_Linear_fixedVar();
lean_mark_persistent(l_Nat_Linear_fixedVar);
l_Nat_Linear_instInhabitedExpr_default___closed__0 = _init_l_Nat_Linear_instInhabitedExpr_default___closed__0();

6
stage0/stdlib/Init/Grind/AC.c generated
View file

@ -1,6 +1,6 @@
// Lean compiler output
// Module: Init.Grind.AC
// Imports: Init.Core Init.Data.Nat.Lemmas Init.Data.RArray Init.Data.Bool
// Imports: Init.Core Init.Data.Nat.Lemmas Init.Data.RArray Init.Data.Bool Init.LawfulBEqTactics
#include <lean/lean.h>
#if defined(__clang__)
#pragma clang diagnostic ignored "-Wunused-parameter"
@ -1877,6 +1877,7 @@ lean_object* initialize_Init_Core(uint8_t builtin, lean_object*);
lean_object* initialize_Init_Data_Nat_Lemmas(uint8_t builtin, lean_object*);
lean_object* initialize_Init_Data_RArray(uint8_t builtin, lean_object*);
lean_object* initialize_Init_Data_Bool(uint8_t builtin, lean_object*);
lean_object* initialize_Init_LawfulBEqTactics(uint8_t builtin, lean_object*);
static bool _G_initialized = false;
LEAN_EXPORT lean_object* initialize_Init_Grind_AC(uint8_t builtin, lean_object* w) {
lean_object * res;
@ -1894,6 +1895,9 @@ lean_dec_ref(res);
res = initialize_Init_Data_Bool(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
res = initialize_Init_LawfulBEqTactics(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
l_Lean_Grind_AC_instInhabitedExpr_default___closed__0 = _init_l_Lean_Grind_AC_instInhabitedExpr_default___closed__0();
lean_mark_persistent(l_Lean_Grind_AC_instInhabitedExpr_default___closed__0);
l_Lean_Grind_AC_instInhabitedExpr_default = _init_l_Lean_Grind_AC_instInhabitedExpr_default();

172
stage0/stdlib/Init/Grind/Attr.c generated
View file

@ -39,6 +39,7 @@ LEAN_EXPORT lean_object* l_Lean_Grind_genHEqPattern(lean_object*, lean_object*,
static lean_object* l_Lean_Parser_Attr_grindEqRhs___closed__7;
static lean_object* l_Lean_Parser_Attr_grindLR___closed__10;
static lean_object* l_Lean_Parser_Attr_grindCasesEager___closed__5;
static lean_object* l_Lean_Parser_Attr_grind_x21_x3f___closed__0;
static lean_object* l_Lean_Parser_Attr_grindEqBwd___closed__20;
static lean_object* l_Lean_Parser_resetGrindAttrs___closed__4;
static lean_object* l_Lean_Parser_Attr_grindFwd___closed__0;
@ -63,6 +64,7 @@ static lean_object* l_Lean_Parser_Attr_grindExt___closed__4;
static lean_object* l_Lean_Parser_Attr_grindSym___closed__5;
LEAN_EXPORT lean_object* l_Lean_Grind_genHEqPattern___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
static lean_object* l_Lean_Parser_Attr_grindEq___closed__4;
static lean_object* l_Lean_Parser_Attr_grind_x21_x3f___closed__1;
static lean_object* l_Lean_Parser_Attr_grindSym___closed__0;
static lean_object* l_Lean_Parser_Attr_grindEqRhs___closed__4;
LEAN_EXPORT lean_object* l_Lean_Parser_Attr_grindEqRhs;
@ -76,6 +78,7 @@ static lean_object* l_Lean_Parser_Attr_grindEq___closed__8;
static lean_object* l_Lean_Parser_Attr_grindBwd___closed__8;
static lean_object* l_Lean_Parser_Attr_grindEqRhs___closed__6;
static lean_object* l_Lean_Parser_Attr_grindFwd___closed__7;
static lean_object* l_Lean_Parser_Attr_grind_x21___closed__2;
static lean_object* l_Lean_Parser_Attr_grindGen___closed__11;
LEAN_EXPORT lean_object* l_Lean_Parser_Attr_grind;
static lean_object* l_Lean_Parser_Attr_grindEq___closed__5;
@ -143,6 +146,7 @@ static lean_object* l_Lean_Parser_Attr_grindEqBwd___closed__0;
static lean_object* l_Lean_Parser_Attr_grindEq___closed__7;
static lean_object* l_Lean_Parser_Attr_grindUsr___closed__3;
static lean_object* l_Lean_Parser_Attr_grindLR___closed__3;
static lean_object* l_Lean_Parser_Attr_grind_x21___closed__1;
LEAN_EXPORT lean_object* l_Lean_Grind_genHEqPattern___redArg(lean_object*);
static lean_object* l_Lean_Parser_Attr_grindEqBwd___closed__12;
static lean_object* l_Lean_Parser_Attr_grindEqRhs___closed__5;
@ -155,8 +159,10 @@ static lean_object* l_Lean_Parser_Attr_grindMod___closed__0;
static lean_object* l_Lean_Parser_Attr_grindBwd___closed__10;
static lean_object* l_Lean_Parser_Attr_grind___closed__6;
static lean_object* l_Lean_Parser_Attr_grindIntro___closed__3;
LEAN_EXPORT lean_object* l_Lean_Parser_Attr_grind_x21_x3f;
static lean_object* l_Lean_Parser_Attr_grindRL___closed__8;
static lean_object* l_Lean_Parser_Attr_grindUsr___closed__0;
static lean_object* l_Lean_Parser_Attr_grind_x21___closed__4;
static lean_object* l_Lean_Parser_Attr_grindCases___closed__3;
static lean_object* l_Lean_Parser_Attr_grindMod___closed__6;
static lean_object* l_Lean_Parser_Attr_grindMod___closed__16;
@ -164,6 +170,7 @@ lean_object* l_Lean_Name_mkStr2(lean_object*, lean_object*);
static lean_object* l_Lean_Parser_Attr_grindRL___closed__12;
static lean_object* l_Lean_Parser_Attr_grindRL___closed__10;
static lean_object* l_Lean_Parser_Attr_grindGen___closed__4;
static lean_object* l_Lean_Parser_Attr_grind_x21___closed__3;
static lean_object* l_Lean_Parser_Attr_grindRL___closed__11;
static lean_object* l_Lean_Parser_Attr_grindEqBwd___closed__14;
static lean_object* l_Lean_Parser_Attr_grindEqBwd___closed__4;
@ -188,6 +195,7 @@ LEAN_EXPORT lean_object* l_Lean_Parser_Attr_grindRL;
static lean_object* l_Lean_Parser_Attr_grindCasesEager___closed__1;
static lean_object* l_Lean_Parser_resetGrindAttrs___closed__5;
static lean_object* l_Lean_Parser_Attr_grindFwd___closed__9;
LEAN_EXPORT lean_object* l_Lean_Parser_Attr_grind_x21;
static lean_object* l_Lean_Parser_Attr_grindMod___closed__7;
static lean_object* l_Lean_Parser_Attr_grind___closed__5;
static lean_object* l_Lean_Parser_Attr_grind_x3f___closed__1;
@ -198,12 +206,14 @@ static lean_object* l_Lean_Parser_Attr_grindMod___closed__5;
static lean_object* l_Lean_Parser_Attr_grindEqBwd___closed__3;
static lean_object* l_Lean_Parser_Attr_grindEqBwd___closed__2;
lean_object* l_Lean_Name_mkStr1(lean_object*);
static lean_object* l_Lean_Parser_Attr_grind_x21___closed__0;
static lean_object* l_Lean_Parser_Attr_grindLR___closed__8;
lean_object* l_Lean_Name_mkStr4(lean_object*, lean_object*, lean_object*, lean_object*);
static lean_object* l_Lean_Parser_Attr_grindBwd___closed__9;
static lean_object* l_Lean_Parser_Attr_grindEqBwd___closed__13;
static lean_object* l_Lean_Parser_Attr_grindEqBwd___closed__1;
static lean_object* l_Lean_Parser_Attr_grindMod___closed__4;
static lean_object* l_Lean_Parser_Attr_grind_x21_x3f___closed__4;
static lean_object* l_Lean_Parser_resetGrindAttrs___closed__0;
static lean_object* l_Lean_Parser_Attr_grindSym___closed__2;
static lean_object* l_Lean_Parser_Attr_grindLR___closed__12;
@ -212,10 +222,12 @@ static lean_object* l_Lean_Parser_Attr_grindBwd___closed__4;
static lean_object* l_Lean_Parser_Attr_grindCasesEager___closed__4;
static lean_object* l_Lean_Parser_Attr_grindGen___closed__2;
static lean_object* l_Lean_Parser_Attr_grindEqBwd___closed__11;
static lean_object* l_Lean_Parser_Attr_grind_x21_x3f___closed__3;
static lean_object* l_Lean_Parser_Attr_grindExt___closed__0;
static lean_object* l_Lean_Parser_Attr_grindBwd___closed__5;
static lean_object* l_Lean_Parser_Attr_grindFwd___closed__2;
static lean_object* l_Lean_Parser_Attr_grindEqRhs___closed__2;
static lean_object* l_Lean_Parser_Attr_grind_x21_x3f___closed__2;
static lean_object* l_Lean_Parser_Attr_grindEqRhs___closed__0;
static lean_object* l_Lean_Parser_Attr_grindMod___closed__3;
static lean_object* l_Lean_Parser_Attr_grind___closed__1;
@ -2423,6 +2435,74 @@ x_1 = l_Lean_Parser_Attr_grind___closed__6;
return x_1;
}
}
static lean_object* _init_l_Lean_Parser_Attr_grind_x21___closed__0() {
_start:
{
lean_object* x_1;
x_1 = lean_mk_string_unchecked("grind!", 6, 6);
return x_1;
}
}
static lean_object* _init_l_Lean_Parser_Attr_grind_x21___closed__1() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5;
x_1 = l_Lean_Parser_Attr_grind_x21___closed__0;
x_2 = l_Lean_Parser_Attr_grindGen___closed__1;
x_3 = l_Lean_Parser_resetGrindAttrs___closed__1;
x_4 = l_Lean_Parser_resetGrindAttrs___closed__0;
x_5 = l_Lean_Name_mkStr4(x_4, x_3, x_2, x_1);
return x_5;
}
}
static lean_object* _init_l_Lean_Parser_Attr_grind_x21___closed__2() {
_start:
{
uint8_t x_1; lean_object* x_2; lean_object* x_3;
x_1 = 0;
x_2 = l_Lean_Parser_Attr_grind_x21___closed__0;
x_3 = lean_alloc_ctor(6, 1, 1);
lean_ctor_set(x_3, 0, x_2);
lean_ctor_set_uint8(x_3, sizeof(void*)*1, x_1);
return x_3;
}
}
static lean_object* _init_l_Lean_Parser_Attr_grind_x21___closed__3() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4;
x_1 = l_Lean_Parser_Attr_grind___closed__4;
x_2 = l_Lean_Parser_Attr_grind_x21___closed__2;
x_3 = l_Lean_Parser_Attr_grindGen___closed__4;
x_4 = lean_alloc_ctor(2, 3, 0);
lean_ctor_set(x_4, 0, x_3);
lean_ctor_set(x_4, 1, x_2);
lean_ctor_set(x_4, 2, x_1);
return x_4;
}
}
static lean_object* _init_l_Lean_Parser_Attr_grind_x21___closed__4() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4;
x_1 = l_Lean_Parser_Attr_grind_x21___closed__3;
x_2 = lean_unsigned_to_nat(1022u);
x_3 = l_Lean_Parser_Attr_grind_x21___closed__1;
x_4 = lean_alloc_ctor(3, 3, 0);
lean_ctor_set(x_4, 0, x_3);
lean_ctor_set(x_4, 1, x_2);
lean_ctor_set(x_4, 2, x_1);
return x_4;
}
}
static lean_object* _init_l_Lean_Parser_Attr_grind_x21() {
_start:
{
lean_object* x_1;
x_1 = l_Lean_Parser_Attr_grind_x21___closed__4;
return x_1;
}
}
static lean_object* _init_l_Lean_Parser_Attr_grind_x3f___closed__0() {
_start:
{
@ -2491,6 +2571,74 @@ x_1 = l_Lean_Parser_Attr_grind_x3f___closed__4;
return x_1;
}
}
static lean_object* _init_l_Lean_Parser_Attr_grind_x21_x3f___closed__0() {
_start:
{
lean_object* x_1;
x_1 = lean_mk_string_unchecked("grind!\?", 7, 7);
return x_1;
}
}
static lean_object* _init_l_Lean_Parser_Attr_grind_x21_x3f___closed__1() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5;
x_1 = l_Lean_Parser_Attr_grind_x21_x3f___closed__0;
x_2 = l_Lean_Parser_Attr_grindGen___closed__1;
x_3 = l_Lean_Parser_resetGrindAttrs___closed__1;
x_4 = l_Lean_Parser_resetGrindAttrs___closed__0;
x_5 = l_Lean_Name_mkStr4(x_4, x_3, x_2, x_1);
return x_5;
}
}
static lean_object* _init_l_Lean_Parser_Attr_grind_x21_x3f___closed__2() {
_start:
{
uint8_t x_1; lean_object* x_2; lean_object* x_3;
x_1 = 0;
x_2 = l_Lean_Parser_Attr_grind_x21_x3f___closed__0;
x_3 = lean_alloc_ctor(6, 1, 1);
lean_ctor_set(x_3, 0, x_2);
lean_ctor_set_uint8(x_3, sizeof(void*)*1, x_1);
return x_3;
}
}
static lean_object* _init_l_Lean_Parser_Attr_grind_x21_x3f___closed__3() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4;
x_1 = l_Lean_Parser_Attr_grind___closed__4;
x_2 = l_Lean_Parser_Attr_grind_x21_x3f___closed__2;
x_3 = l_Lean_Parser_Attr_grindGen___closed__4;
x_4 = lean_alloc_ctor(2, 3, 0);
lean_ctor_set(x_4, 0, x_3);
lean_ctor_set(x_4, 1, x_2);
lean_ctor_set(x_4, 2, x_1);
return x_4;
}
}
static lean_object* _init_l_Lean_Parser_Attr_grind_x21_x3f___closed__4() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4;
x_1 = l_Lean_Parser_Attr_grind_x21_x3f___closed__3;
x_2 = lean_unsigned_to_nat(1022u);
x_3 = l_Lean_Parser_Attr_grind_x21_x3f___closed__1;
x_4 = lean_alloc_ctor(3, 3, 0);
lean_ctor_set(x_4, 0, x_3);
lean_ctor_set(x_4, 1, x_2);
lean_ctor_set(x_4, 2, x_1);
return x_4;
}
}
static lean_object* _init_l_Lean_Parser_Attr_grind_x21_x3f() {
_start:
{
lean_object* x_1;
x_1 = l_Lean_Parser_Attr_grind_x21_x3f___closed__4;
return x_1;
}
}
lean_object* initialize_Init_Tactics(uint8_t builtin, lean_object*);
static bool _G_initialized = false;
LEAN_EXPORT lean_object* initialize_Init_Grind_Attr(uint8_t builtin, lean_object* w) {
@ -2890,6 +3038,18 @@ l_Lean_Parser_Attr_grind___closed__6 = _init_l_Lean_Parser_Attr_grind___closed__
lean_mark_persistent(l_Lean_Parser_Attr_grind___closed__6);
l_Lean_Parser_Attr_grind = _init_l_Lean_Parser_Attr_grind();
lean_mark_persistent(l_Lean_Parser_Attr_grind);
l_Lean_Parser_Attr_grind_x21___closed__0 = _init_l_Lean_Parser_Attr_grind_x21___closed__0();
lean_mark_persistent(l_Lean_Parser_Attr_grind_x21___closed__0);
l_Lean_Parser_Attr_grind_x21___closed__1 = _init_l_Lean_Parser_Attr_grind_x21___closed__1();
lean_mark_persistent(l_Lean_Parser_Attr_grind_x21___closed__1);
l_Lean_Parser_Attr_grind_x21___closed__2 = _init_l_Lean_Parser_Attr_grind_x21___closed__2();
lean_mark_persistent(l_Lean_Parser_Attr_grind_x21___closed__2);
l_Lean_Parser_Attr_grind_x21___closed__3 = _init_l_Lean_Parser_Attr_grind_x21___closed__3();
lean_mark_persistent(l_Lean_Parser_Attr_grind_x21___closed__3);
l_Lean_Parser_Attr_grind_x21___closed__4 = _init_l_Lean_Parser_Attr_grind_x21___closed__4();
lean_mark_persistent(l_Lean_Parser_Attr_grind_x21___closed__4);
l_Lean_Parser_Attr_grind_x21 = _init_l_Lean_Parser_Attr_grind_x21();
lean_mark_persistent(l_Lean_Parser_Attr_grind_x21);
l_Lean_Parser_Attr_grind_x3f___closed__0 = _init_l_Lean_Parser_Attr_grind_x3f___closed__0();
lean_mark_persistent(l_Lean_Parser_Attr_grind_x3f___closed__0);
l_Lean_Parser_Attr_grind_x3f___closed__1 = _init_l_Lean_Parser_Attr_grind_x3f___closed__1();
@ -2902,6 +3062,18 @@ l_Lean_Parser_Attr_grind_x3f___closed__4 = _init_l_Lean_Parser_Attr_grind_x3f___
lean_mark_persistent(l_Lean_Parser_Attr_grind_x3f___closed__4);
l_Lean_Parser_Attr_grind_x3f = _init_l_Lean_Parser_Attr_grind_x3f();
lean_mark_persistent(l_Lean_Parser_Attr_grind_x3f);
l_Lean_Parser_Attr_grind_x21_x3f___closed__0 = _init_l_Lean_Parser_Attr_grind_x21_x3f___closed__0();
lean_mark_persistent(l_Lean_Parser_Attr_grind_x21_x3f___closed__0);
l_Lean_Parser_Attr_grind_x21_x3f___closed__1 = _init_l_Lean_Parser_Attr_grind_x21_x3f___closed__1();
lean_mark_persistent(l_Lean_Parser_Attr_grind_x21_x3f___closed__1);
l_Lean_Parser_Attr_grind_x21_x3f___closed__2 = _init_l_Lean_Parser_Attr_grind_x21_x3f___closed__2();
lean_mark_persistent(l_Lean_Parser_Attr_grind_x21_x3f___closed__2);
l_Lean_Parser_Attr_grind_x21_x3f___closed__3 = _init_l_Lean_Parser_Attr_grind_x21_x3f___closed__3();
lean_mark_persistent(l_Lean_Parser_Attr_grind_x21_x3f___closed__3);
l_Lean_Parser_Attr_grind_x21_x3f___closed__4 = _init_l_Lean_Parser_Attr_grind_x21_x3f___closed__4();
lean_mark_persistent(l_Lean_Parser_Attr_grind_x21_x3f___closed__4);
l_Lean_Parser_Attr_grind_x21_x3f = _init_l_Lean_Parser_Attr_grind_x21_x3f();
lean_mark_persistent(l_Lean_Parser_Attr_grind_x21_x3f);
return lean_io_result_mk_ok(lean_box(0));
}
#ifdef __cplusplus

178
stage0/stdlib/Init/Grind/Ordered/Linarith.c generated
View file

@ -1,6 +1,6 @@
// Lean compiler output
// Module: Init.Grind.Ordered.Linarith
// Imports: Init.Grind.Ordered.Module Init.Grind.Ordered.Ring Init.Grind.Ring.Field Init.Data.Ord.Basic Init.Data.Ord.Basic Init.Data.AC Init.Data.AC Init.Data.RArray
// Imports: Init.Grind.Ordered.Module Init.Grind.Ordered.Ring Init.Grind.Ring.Field Init.Data.Ord.Basic Init.Data.Ord.Basic Init.Data.AC Init.Data.AC Init.Data.RArray Init.LawfulBEqTactics
#include <lean/lean.h>
#if defined(__clang__)
#pragma clang diagnostic ignored "-Wunused-parameter"
@ -1682,6 +1682,84 @@ x_1 = l_Lean_Grind_Linarith_instBEqPoly___closed__0;
return x_1;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ordered_Linarith_0__Lean_Grind_Linarith_instBEqPoly_beq_match__1_splitter___redArg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
if (lean_obj_tag(x_1) == 0)
{
lean_dec(x_4);
if (lean_obj_tag(x_2) == 0)
{
lean_dec(x_5);
lean_inc(x_3);
return x_3;
}
else
{
lean_object* x_6;
x_6 = lean_apply_4(x_5, x_1, x_2, lean_box(0), lean_box(0));
return x_6;
}
}
else
{
if (lean_obj_tag(x_2) == 0)
{
lean_object* x_7;
lean_dec(x_4);
x_7 = lean_apply_4(x_5, x_1, x_2, lean_box(0), lean_box(0));
return x_7;
}
else
{
lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14;
lean_dec(x_5);
x_8 = lean_ctor_get(x_1, 0);
lean_inc(x_8);
x_9 = lean_ctor_get(x_1, 1);
lean_inc(x_9);
x_10 = lean_ctor_get(x_1, 2);
lean_inc(x_10);
lean_dec_ref(x_1);
x_11 = lean_ctor_get(x_2, 0);
lean_inc(x_11);
x_12 = lean_ctor_get(x_2, 1);
lean_inc(x_12);
x_13 = lean_ctor_get(x_2, 2);
lean_inc(x_13);
lean_dec_ref(x_2);
x_14 = lean_apply_6(x_4, x_8, x_9, x_10, x_11, x_12, x_13);
return x_14;
}
}
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ordered_Linarith_0__Lean_Grind_Linarith_instBEqPoly_beq_match__1_splitter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) {
_start:
{
lean_object* x_7;
x_7 = l___private_Init_Grind_Ordered_Linarith_0__Lean_Grind_Linarith_instBEqPoly_beq_match__1_splitter___redArg(x_2, x_3, x_4, x_5, x_6);
return x_7;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ordered_Linarith_0__Lean_Grind_Linarith_instBEqPoly_beq_match__1_splitter___redArg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
lean_object* x_6;
x_6 = l___private_Init_Grind_Ordered_Linarith_0__Lean_Grind_Linarith_instBEqPoly_beq_match__1_splitter___redArg(x_1, x_2, x_3, x_4, x_5);
lean_dec(x_3);
return x_6;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ordered_Linarith_0__Lean_Grind_Linarith_instBEqPoly_beq_match__1_splitter___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) {
_start:
{
lean_object* x_7;
x_7 = l___private_Init_Grind_Ordered_Linarith_0__Lean_Grind_Linarith_instBEqPoly_beq_match__1_splitter(x_1, x_2, x_3, x_4, x_5, x_6);
lean_dec(x_4);
return x_7;
}
}
static lean_object* _init_l_Lean_Grind_Linarith_instReprPoly_repr___closed__0() {
_start:
{
@ -1784,12 +1862,12 @@ block_34:
{
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; uint8_t x_31; lean_object* x_32; lean_object* x_33;
x_22 = lean_alloc_ctor(5, 2, 0);
lean_ctor_set(x_22, 0, x_20);
lean_ctor_set(x_22, 0, x_18);
lean_ctor_set(x_22, 1, x_21);
lean_inc(x_18);
lean_inc(x_20);
x_23 = lean_alloc_ctor(5, 2, 0);
lean_ctor_set(x_23, 0, x_22);
lean_ctor_set(x_23, 1, x_18);
lean_ctor_set(x_23, 1, x_20);
x_24 = l_Nat_reprFast(x_15);
x_25 = lean_alloc_ctor(3, 1, 0);
lean_ctor_set(x_25, 0, x_24);
@ -1798,7 +1876,7 @@ lean_ctor_set(x_26, 0, x_23);
lean_ctor_set(x_26, 1, x_25);
x_27 = lean_alloc_ctor(5, 2, 0);
lean_ctor_set(x_27, 0, x_26);
lean_ctor_set(x_27, 1, x_18);
lean_ctor_set(x_27, 1, x_20);
x_28 = l_Lean_Grind_Linarith_instReprPoly_repr(x_16, x_17);
x_29 = lean_alloc_ctor(5, 2, 0);
lean_ctor_set(x_29, 0, x_27);
@ -1827,9 +1905,9 @@ x_40 = l_Int_repr(x_14);
lean_dec(x_14);
x_41 = lean_alloc_ctor(3, 1, 0);
lean_ctor_set(x_41, 0, x_40);
x_18 = x_36;
x_18 = x_37;
x_19 = x_35;
x_20 = x_37;
x_20 = x_36;
x_21 = x_41;
goto block_34;
}
@ -1841,9 +1919,9 @@ lean_dec(x_14);
x_43 = lean_alloc_ctor(3, 1, 0);
lean_ctor_set(x_43, 0, x_42);
x_44 = l_Repr_addAppParen(x_43, x_17);
x_18 = x_36;
x_18 = x_37;
x_19 = x_35;
x_20 = x_37;
x_20 = x_36;
x_21 = x_44;
goto block_34;
}
@ -3134,84 +3212,6 @@ lean_dec(x_3);
return x_10;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ordered_Linarith_0__Lean_Grind_Linarith_instBEqPoly_beq_match__1_splitter___redArg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
if (lean_obj_tag(x_1) == 0)
{
lean_dec(x_4);
if (lean_obj_tag(x_2) == 0)
{
lean_dec(x_5);
lean_inc(x_3);
return x_3;
}
else
{
lean_object* x_6;
x_6 = lean_apply_4(x_5, x_1, x_2, lean_box(0), lean_box(0));
return x_6;
}
}
else
{
if (lean_obj_tag(x_2) == 0)
{
lean_object* x_7;
lean_dec(x_4);
x_7 = lean_apply_4(x_5, x_1, x_2, lean_box(0), lean_box(0));
return x_7;
}
else
{
lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14;
lean_dec(x_5);
x_8 = lean_ctor_get(x_1, 0);
lean_inc(x_8);
x_9 = lean_ctor_get(x_1, 1);
lean_inc(x_9);
x_10 = lean_ctor_get(x_1, 2);
lean_inc(x_10);
lean_dec_ref(x_1);
x_11 = lean_ctor_get(x_2, 0);
lean_inc(x_11);
x_12 = lean_ctor_get(x_2, 1);
lean_inc(x_12);
x_13 = lean_ctor_get(x_2, 2);
lean_inc(x_13);
lean_dec_ref(x_2);
x_14 = lean_apply_6(x_4, x_8, x_9, x_10, x_11, x_12, x_13);
return x_14;
}
}
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ordered_Linarith_0__Lean_Grind_Linarith_instBEqPoly_beq_match__1_splitter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) {
_start:
{
lean_object* x_7;
x_7 = l___private_Init_Grind_Ordered_Linarith_0__Lean_Grind_Linarith_instBEqPoly_beq_match__1_splitter___redArg(x_2, x_3, x_4, x_5, x_6);
return x_7;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ordered_Linarith_0__Lean_Grind_Linarith_instBEqPoly_beq_match__1_splitter___redArg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
lean_object* x_6;
x_6 = l___private_Init_Grind_Ordered_Linarith_0__Lean_Grind_Linarith_instBEqPoly_beq_match__1_splitter___redArg(x_1, x_2, x_3, x_4, x_5);
lean_dec(x_3);
return x_6;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ordered_Linarith_0__Lean_Grind_Linarith_instBEqPoly_beq_match__1_splitter___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) {
_start:
{
lean_object* x_7;
x_7 = l___private_Init_Grind_Ordered_Linarith_0__Lean_Grind_Linarith_instBEqPoly_beq_match__1_splitter(x_1, x_2, x_3, x_4, x_5, x_6);
lean_dec(x_4);
return x_7;
}
}
LEAN_EXPORT lean_object* l_Lean_Grind_Linarith_Poly_leadCoeff(lean_object* x_1) {
_start:
{
@ -3827,6 +3827,7 @@ lean_object* initialize_Init_Data_Ord_Basic(uint8_t builtin, lean_object*);
lean_object* initialize_Init_Data_AC(uint8_t builtin, lean_object*);
lean_object* initialize_Init_Data_AC(uint8_t builtin, lean_object*);
lean_object* initialize_Init_Data_RArray(uint8_t builtin, lean_object*);
lean_object* initialize_Init_LawfulBEqTactics(uint8_t builtin, lean_object*);
static bool _G_initialized = false;
LEAN_EXPORT lean_object* initialize_Init_Grind_Ordered_Linarith(uint8_t builtin, lean_object* w) {
lean_object * res;
@ -3856,6 +3857,9 @@ lean_dec_ref(res);
res = initialize_Init_Data_RArray(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
res = initialize_Init_LawfulBEqTactics(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
l_Lean_Grind_Linarith_instInhabitedExpr_default = _init_l_Lean_Grind_Linarith_instInhabitedExpr_default();
lean_mark_persistent(l_Lean_Grind_Linarith_instInhabitedExpr_default);
l_Lean_Grind_Linarith_instInhabitedExpr = _init_l_Lean_Grind_Linarith_instInhabitedExpr();

1786
stage0/stdlib/Init/Grind/Ring/CommSemiringAdapter.c generated
View file

File diff suppressed because it is too large Load diff

396
stage0/stdlib/Init/Grind/Ring/CommSolver.c generated
View file

@ -1,6 +1,6 @@
// Lean compiler output
// Module: Init.Grind.Ring.CommSolver
// Imports: Init.Data.Nat.Lemmas Init.Data.Int.LemmasAux Init.Data.Hashable Init.Data.Ord.Basic Init.Data.RArray Init.Grind.Ring.Basic Init.Grind.Ring.Field Init.Grind.Ordered.Ring Init.GrindInstances.Ring.Int Init.Data.Ord.Basic
// Imports: Init.Data.Nat.Lemmas Init.Data.Int.LemmasAux Init.Data.Hashable Init.Data.Ord.Basic Init.Data.RArray Init.Grind.Ring.Basic Init.Grind.Ring.Field Init.Grind.Ordered.Ring Init.GrindInstances.Ring.Int Init.Data.Ord.Basic Init.LawfulBEqTactics
#include <lean/lean.h>
#if defined(__clang__)
#pragma clang diagnostic ignored "-Wunused-parameter"
@ -2162,6 +2162,41 @@ x_1 = l_Lean_Grind_CommRing_instBEqPower___closed__0;
return x_1;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqPower_beq_match__1_splitter___redArg(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8;
x_4 = lean_ctor_get(x_1, 0);
lean_inc(x_4);
x_5 = lean_ctor_get(x_1, 1);
lean_inc(x_5);
lean_dec_ref(x_1);
x_6 = lean_ctor_get(x_2, 0);
lean_inc(x_6);
x_7 = lean_ctor_get(x_2, 1);
lean_inc(x_7);
lean_dec_ref(x_2);
x_8 = lean_apply_4(x_3, x_4, x_5, x_6, x_7);
return x_8;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqPower_beq_match__1_splitter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
lean_object* x_6;
x_6 = l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqPower_beq_match__1_splitter___redArg(x_2, x_3, x_4);
return x_6;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqPower_beq_match__1_splitter___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
lean_object* x_6;
x_6 = l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqPower_beq_match__1_splitter(x_1, x_2, x_3, x_4, x_5);
lean_dec(x_5);
return x_6;
}
}
LEAN_EXPORT lean_object* l_Nat_cast___at___Lean_Grind_CommRing_instReprPower_repr_spec__0(lean_object* x_1) {
_start:
{
@ -2569,41 +2604,6 @@ x_1 = l_Lean_Grind_CommRing_instHashablePower___closed__0;
return x_1;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqPower_beq_match__1_splitter___redArg(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8;
x_4 = lean_ctor_get(x_1, 0);
lean_inc(x_4);
x_5 = lean_ctor_get(x_1, 1);
lean_inc(x_5);
lean_dec_ref(x_1);
x_6 = lean_ctor_get(x_2, 0);
lean_inc(x_6);
x_7 = lean_ctor_get(x_2, 1);
lean_inc(x_7);
lean_dec_ref(x_2);
x_8 = lean_apply_4(x_3, x_4, x_5, x_6, x_7);
return x_8;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqPower_beq_match__1_splitter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
lean_object* x_6;
x_6 = l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqPower_beq_match__1_splitter___redArg(x_2, x_3, x_4);
return x_6;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqPower_beq_match__1_splitter___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
lean_object* x_6;
x_6 = l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqPower_beq_match__1_splitter(x_1, x_2, x_3, x_4, x_5);
lean_dec(x_5);
return x_6;
}
}
LEAN_EXPORT uint8_t l_Lean_Grind_CommRing_Power_varLt(lean_object* x_1, lean_object* x_2) {
_start:
{
@ -2873,6 +2873,80 @@ x_1 = l_Lean_Grind_CommRing_instBEqMon___closed__0;
return x_1;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqMon_beq_match__1_splitter___redArg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
if (lean_obj_tag(x_1) == 0)
{
lean_dec(x_4);
if (lean_obj_tag(x_2) == 0)
{
lean_dec(x_5);
lean_inc(x_3);
return x_3;
}
else
{
lean_object* x_6;
x_6 = lean_apply_4(x_5, x_1, x_2, lean_box(0), lean_box(0));
return x_6;
}
}
else
{
if (lean_obj_tag(x_2) == 0)
{
lean_object* x_7;
lean_dec(x_4);
x_7 = lean_apply_4(x_5, x_1, x_2, lean_box(0), lean_box(0));
return x_7;
}
else
{
lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12;
lean_dec(x_5);
x_8 = lean_ctor_get(x_1, 0);
lean_inc_ref(x_8);
x_9 = lean_ctor_get(x_1, 1);
lean_inc(x_9);
lean_dec_ref(x_1);
x_10 = lean_ctor_get(x_2, 0);
lean_inc_ref(x_10);
x_11 = lean_ctor_get(x_2, 1);
lean_inc(x_11);
lean_dec_ref(x_2);
x_12 = lean_apply_4(x_4, x_8, x_9, x_10, x_11);
return x_12;
}
}
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqMon_beq_match__1_splitter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) {
_start:
{
lean_object* x_7;
x_7 = l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqMon_beq_match__1_splitter___redArg(x_2, x_3, x_4, x_5, x_6);
return x_7;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqMon_beq_match__1_splitter___redArg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
lean_object* x_6;
x_6 = l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqMon_beq_match__1_splitter___redArg(x_1, x_2, x_3, x_4, x_5);
lean_dec(x_3);
return x_6;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqMon_beq_match__1_splitter___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) {
_start:
{
lean_object* x_7;
x_7 = l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqMon_beq_match__1_splitter(x_1, x_2, x_3, x_4, x_5, x_6);
lean_dec(x_4);
return x_7;
}
}
static lean_object* _init_l_Lean_Grind_CommRing_instReprMon_repr___closed__0() {
_start:
{
@ -3114,80 +3188,6 @@ x_1 = l_Lean_Grind_CommRing_instHashableMon___closed__0;
return x_1;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqMon_beq_match__1_splitter___redArg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
if (lean_obj_tag(x_1) == 0)
{
lean_dec(x_4);
if (lean_obj_tag(x_2) == 0)
{
lean_dec(x_5);
lean_inc(x_3);
return x_3;
}
else
{
lean_object* x_6;
x_6 = lean_apply_4(x_5, x_1, x_2, lean_box(0), lean_box(0));
return x_6;
}
}
else
{
if (lean_obj_tag(x_2) == 0)
{
lean_object* x_7;
lean_dec(x_4);
x_7 = lean_apply_4(x_5, x_1, x_2, lean_box(0), lean_box(0));
return x_7;
}
else
{
lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12;
lean_dec(x_5);
x_8 = lean_ctor_get(x_1, 0);
lean_inc_ref(x_8);
x_9 = lean_ctor_get(x_1, 1);
lean_inc(x_9);
lean_dec_ref(x_1);
x_10 = lean_ctor_get(x_2, 0);
lean_inc_ref(x_10);
x_11 = lean_ctor_get(x_2, 1);
lean_inc(x_11);
lean_dec_ref(x_2);
x_12 = lean_apply_4(x_4, x_8, x_9, x_10, x_11);
return x_12;
}
}
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqMon_beq_match__1_splitter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) {
_start:
{
lean_object* x_7;
x_7 = l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqMon_beq_match__1_splitter___redArg(x_2, x_3, x_4, x_5, x_6);
return x_7;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqMon_beq_match__1_splitter___redArg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
lean_object* x_6;
x_6 = l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqMon_beq_match__1_splitter___redArg(x_1, x_2, x_3, x_4, x_5);
lean_dec(x_3);
return x_6;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqMon_beq_match__1_splitter___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) {
_start:
{
lean_object* x_7;
x_7 = l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqMon_beq_match__1_splitter(x_1, x_2, x_3, x_4, x_5, x_6);
lean_dec(x_4);
return x_7;
}
}
LEAN_EXPORT lean_object* l_Lean_Grind_CommRing_Mon_denote___redArg(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
@ -4798,6 +4798,75 @@ x_1 = l_Lean_Grind_CommRing_instBEqPoly___closed__0;
return x_1;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqPoly_beq_match__1_splitter___redArg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
if (lean_obj_tag(x_1) == 0)
{
lean_dec(x_4);
if (lean_obj_tag(x_2) == 0)
{
lean_object* x_6; lean_object* x_7; lean_object* x_8;
lean_dec(x_5);
x_6 = lean_ctor_get(x_1, 0);
lean_inc(x_6);
lean_dec_ref(x_1);
x_7 = lean_ctor_get(x_2, 0);
lean_inc(x_7);
lean_dec_ref(x_2);
x_8 = lean_apply_2(x_3, x_6, x_7);
return x_8;
}
else
{
lean_object* x_9;
lean_dec(x_3);
x_9 = lean_apply_4(x_5, x_1, x_2, lean_box(0), lean_box(0));
return x_9;
}
}
else
{
lean_dec(x_3);
if (lean_obj_tag(x_2) == 0)
{
lean_object* x_10;
lean_dec(x_4);
x_10 = lean_apply_4(x_5, x_1, x_2, lean_box(0), lean_box(0));
return x_10;
}
else
{
lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17;
lean_dec(x_5);
x_11 = lean_ctor_get(x_1, 0);
lean_inc(x_11);
x_12 = lean_ctor_get(x_1, 1);
lean_inc(x_12);
x_13 = lean_ctor_get(x_1, 2);
lean_inc_ref(x_13);
lean_dec_ref(x_1);
x_14 = lean_ctor_get(x_2, 0);
lean_inc(x_14);
x_15 = lean_ctor_get(x_2, 1);
lean_inc(x_15);
x_16 = lean_ctor_get(x_2, 2);
lean_inc_ref(x_16);
lean_dec_ref(x_2);
x_17 = lean_apply_6(x_4, x_11, x_12, x_13, x_14, x_15, x_16);
return x_17;
}
}
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqPoly_beq_match__1_splitter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) {
_start:
{
lean_object* x_7;
x_7 = l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqPoly_beq_match__1_splitter___redArg(x_2, x_3, x_4, x_5, x_6);
return x_7;
}
}
static lean_object* _init_l_Lean_Grind_CommRing_instReprPoly_repr___closed__0() {
_start:
{
@ -4908,8 +4977,8 @@ if (lean_is_scalar(x_13)) {
lean_ctor_set_tag(x_19, 3);
}
lean_ctor_set(x_19, 0, x_18);
x_3 = x_15;
x_4 = x_14;
x_3 = x_14;
x_4 = x_15;
x_5 = x_19;
goto block_11;
}
@ -4927,8 +4996,8 @@ if (lean_is_scalar(x_13)) {
}
lean_ctor_set(x_22, 0, x_21);
x_23 = l_Repr_addAppParen(x_22, x_20);
x_3 = x_15;
x_4 = x_14;
x_3 = x_14;
x_4 = x_15;
x_5 = x_23;
goto block_11;
}
@ -4964,25 +5033,25 @@ block_48:
{
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; uint8_t x_45; lean_object* x_46; lean_object* x_47;
x_37 = lean_alloc_ctor(5, 2, 0);
lean_ctor_set(x_37, 0, x_34);
lean_ctor_set(x_37, 0, x_35);
lean_ctor_set(x_37, 1, x_36);
lean_inc(x_33);
lean_inc(x_34);
x_38 = lean_alloc_ctor(5, 2, 0);
lean_ctor_set(x_38, 0, x_37);
lean_ctor_set(x_38, 1, x_33);
lean_ctor_set(x_38, 1, x_34);
x_39 = l_Lean_Grind_CommRing_instReprMon_repr(x_30, x_32);
x_40 = lean_alloc_ctor(5, 2, 0);
lean_ctor_set(x_40, 0, x_38);
lean_ctor_set(x_40, 1, x_39);
x_41 = lean_alloc_ctor(5, 2, 0);
lean_ctor_set(x_41, 0, x_40);
lean_ctor_set(x_41, 1, x_33);
lean_ctor_set(x_41, 1, x_34);
x_42 = l_Lean_Grind_CommRing_instReprPoly_repr(x_31, x_32);
x_43 = lean_alloc_ctor(5, 2, 0);
lean_ctor_set(x_43, 0, x_41);
lean_ctor_set(x_43, 1, x_42);
x_44 = lean_alloc_ctor(4, 2, 0);
lean_ctor_set(x_44, 0, x_35);
lean_ctor_set(x_44, 0, x_33);
lean_ctor_set(x_44, 1, x_43);
x_45 = 0;
x_46 = lean_alloc_ctor(6, 1, 1);
@ -5005,9 +5074,9 @@ x_54 = l_Int_repr(x_29);
lean_dec(x_29);
x_55 = lean_alloc_ctor(3, 1, 0);
lean_ctor_set(x_55, 0, x_54);
x_33 = x_50;
x_34 = x_51;
x_35 = x_49;
x_33 = x_49;
x_34 = x_50;
x_35 = x_51;
x_36 = x_55;
goto block_48;
}
@ -5019,9 +5088,9 @@ lean_dec(x_29);
x_57 = lean_alloc_ctor(3, 1, 0);
lean_ctor_set(x_57, 0, x_56);
x_58 = l_Repr_addAppParen(x_57, x_32);
x_33 = x_50;
x_34 = x_51;
x_35 = x_49;
x_33 = x_49;
x_34 = x_50;
x_35 = x_51;
x_36 = x_58;
goto block_48;
}
@ -5031,10 +5100,10 @@ block_11:
{
lean_object* x_6; lean_object* x_7; uint8_t x_8; lean_object* x_9; lean_object* x_10;
x_6 = lean_alloc_ctor(5, 2, 0);
lean_ctor_set(x_6, 0, x_3);
lean_ctor_set(x_6, 0, x_4);
lean_ctor_set(x_6, 1, x_5);
x_7 = lean_alloc_ctor(4, 2, 0);
lean_ctor_set(x_7, 0, x_4);
lean_ctor_set(x_7, 0, x_3);
lean_ctor_set(x_7, 1, x_6);
x_8 = 0;
x_9 = lean_alloc_ctor(6, 1, 1);
@ -5213,75 +5282,6 @@ x_1 = l_Lean_Grind_CommRing_instHashablePoly___closed__0;
return x_1;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqPoly_beq_match__1_splitter___redArg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
if (lean_obj_tag(x_1) == 0)
{
lean_dec(x_4);
if (lean_obj_tag(x_2) == 0)
{
lean_object* x_6; lean_object* x_7; lean_object* x_8;
lean_dec(x_5);
x_6 = lean_ctor_get(x_1, 0);
lean_inc(x_6);
lean_dec_ref(x_1);
x_7 = lean_ctor_get(x_2, 0);
lean_inc(x_7);
lean_dec_ref(x_2);
x_8 = lean_apply_2(x_3, x_6, x_7);
return x_8;
}
else
{
lean_object* x_9;
lean_dec(x_3);
x_9 = lean_apply_4(x_5, x_1, x_2, lean_box(0), lean_box(0));
return x_9;
}
}
else
{
lean_dec(x_3);
if (lean_obj_tag(x_2) == 0)
{
lean_object* x_10;
lean_dec(x_4);
x_10 = lean_apply_4(x_5, x_1, x_2, lean_box(0), lean_box(0));
return x_10;
}
else
{
lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17;
lean_dec(x_5);
x_11 = lean_ctor_get(x_1, 0);
lean_inc(x_11);
x_12 = lean_ctor_get(x_1, 1);
lean_inc(x_12);
x_13 = lean_ctor_get(x_1, 2);
lean_inc_ref(x_13);
lean_dec_ref(x_1);
x_14 = lean_ctor_get(x_2, 0);
lean_inc(x_14);
x_15 = lean_ctor_get(x_2, 1);
lean_inc(x_15);
x_16 = lean_ctor_get(x_2, 2);
lean_inc_ref(x_16);
lean_dec_ref(x_2);
x_17 = lean_apply_6(x_4, x_11, x_12, x_13, x_14, x_15, x_16);
return x_17;
}
}
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqPoly_beq_match__1_splitter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) {
_start:
{
lean_object* x_7;
x_7 = l___private_Init_Grind_Ring_CommSolver_0__Lean_Grind_CommRing_instBEqPoly_beq_match__1_splitter___redArg(x_2, x_3, x_4, x_5, x_6);
return x_7;
}
}
LEAN_EXPORT lean_object* l_Lean_Grind_CommRing_Poly_denote___redArg(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
@ -10638,6 +10638,7 @@ lean_object* initialize_Init_Grind_Ring_Field(uint8_t builtin, lean_object*);
lean_object* initialize_Init_Grind_Ordered_Ring(uint8_t builtin, lean_object*);
lean_object* initialize_Init_GrindInstances_Ring_Int(uint8_t builtin, lean_object*);
lean_object* initialize_Init_Data_Ord_Basic(uint8_t builtin, lean_object*);
lean_object* initialize_Init_LawfulBEqTactics(uint8_t builtin, lean_object*);
static bool _G_initialized = false;
LEAN_EXPORT lean_object* initialize_Init_Grind_Ring_CommSolver(uint8_t builtin, lean_object* w) {
lean_object * res;
@ -10673,6 +10674,9 @@ lean_dec_ref(res);
res = initialize_Init_Data_Ord_Basic(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
res = initialize_Init_LawfulBEqTactics(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
l_Lean_Grind_CommRing_instInhabitedExpr_default___closed__0 = _init_l_Lean_Grind_CommRing_instInhabitedExpr_default___closed__0();
lean_mark_persistent(l_Lean_Grind_CommRing_instInhabitedExpr_default___closed__0);
l_Lean_Grind_CommRing_instInhabitedExpr_default___closed__1 = _init_l_Lean_Grind_CommRing_instInhabitedExpr_default___closed__1();

266
stage0/stdlib/Init/Grind/ToInt.c generated
View file

@ -1,6 +1,6 @@
// Lean compiler output
// Module: Init.Grind.ToInt
// Imports: Init.Data.Int.DivMod.Lemmas
// Imports: Init.Data.Int.DivMod.Lemmas Init.LawfulBEqTactics
#include <lean/lean.h>
#if defined(__clang__)
#pragma clang diagnostic ignored "-Wunused-parameter"
@ -353,6 +353,136 @@ x_1 = l_Lean_Grind_instBEqIntInterval___closed__0;
return x_1;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_ToInt_0__Lean_Grind_instBEqIntInterval_beq_match__1_splitter___redArg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) {
_start:
{
switch (lean_obj_tag(x_1)) {
case 0:
{
lean_dec(x_5);
lean_dec(x_4);
if (lean_obj_tag(x_2) == 0)
{
lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12;
lean_dec(x_7);
x_8 = lean_ctor_get(x_1, 0);
lean_inc(x_8);
x_9 = lean_ctor_get(x_1, 1);
lean_inc(x_9);
lean_dec_ref(x_1);
x_10 = lean_ctor_get(x_2, 0);
lean_inc(x_10);
x_11 = lean_ctor_get(x_2, 1);
lean_inc(x_11);
lean_dec_ref(x_2);
x_12 = lean_apply_4(x_3, x_8, x_9, x_10, x_11);
return x_12;
}
else
{
lean_object* x_13;
lean_dec(x_3);
x_13 = lean_apply_6(x_7, x_1, x_2, lean_box(0), lean_box(0), lean_box(0), lean_box(0));
return x_13;
}
}
case 1:
{
lean_dec(x_5);
lean_dec(x_3);
if (lean_obj_tag(x_2) == 1)
{
lean_object* x_14; lean_object* x_15; lean_object* x_16;
lean_dec(x_7);
x_14 = lean_ctor_get(x_1, 0);
lean_inc(x_14);
lean_dec_ref(x_1);
x_15 = lean_ctor_get(x_2, 0);
lean_inc(x_15);
lean_dec_ref(x_2);
x_16 = lean_apply_2(x_4, x_14, x_15);
return x_16;
}
else
{
lean_object* x_17;
lean_dec(x_4);
x_17 = lean_apply_6(x_7, x_1, x_2, lean_box(0), lean_box(0), lean_box(0), lean_box(0));
return x_17;
}
}
case 2:
{
lean_dec(x_4);
lean_dec(x_3);
if (lean_obj_tag(x_2) == 2)
{
lean_object* x_18; lean_object* x_19; lean_object* x_20;
lean_dec(x_7);
x_18 = lean_ctor_get(x_1, 0);
lean_inc(x_18);
lean_dec_ref(x_1);
x_19 = lean_ctor_get(x_2, 0);
lean_inc(x_19);
lean_dec_ref(x_2);
x_20 = lean_apply_2(x_5, x_18, x_19);
return x_20;
}
else
{
lean_object* x_21;
lean_dec(x_5);
x_21 = lean_apply_6(x_7, x_1, x_2, lean_box(0), lean_box(0), lean_box(0), lean_box(0));
return x_21;
}
}
default:
{
lean_dec(x_5);
lean_dec(x_4);
lean_dec(x_3);
if (lean_obj_tag(x_2) == 3)
{
lean_dec(x_7);
lean_inc(x_6);
return x_6;
}
else
{
lean_object* x_22;
x_22 = lean_apply_6(x_7, x_1, x_2, lean_box(0), lean_box(0), lean_box(0), lean_box(0));
return x_22;
}
}
}
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_ToInt_0__Lean_Grind_instBEqIntInterval_beq_match__1_splitter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) {
_start:
{
lean_object* x_9;
x_9 = l___private_Init_Grind_ToInt_0__Lean_Grind_instBEqIntInterval_beq_match__1_splitter___redArg(x_2, x_3, x_4, x_5, x_6, x_7, x_8);
return x_9;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_ToInt_0__Lean_Grind_instBEqIntInterval_beq_match__1_splitter___redArg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) {
_start:
{
lean_object* x_8;
x_8 = l___private_Init_Grind_ToInt_0__Lean_Grind_instBEqIntInterval_beq_match__1_splitter___redArg(x_1, x_2, x_3, x_4, x_5, x_6, x_7);
lean_dec(x_6);
return x_8;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_ToInt_0__Lean_Grind_instBEqIntInterval_beq_match__1_splitter___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) {
_start:
{
lean_object* x_9;
x_9 = l___private_Init_Grind_ToInt_0__Lean_Grind_instBEqIntInterval_beq_match__1_splitter(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8);
lean_dec(x_7);
return x_9;
}
}
LEAN_EXPORT uint8_t l_Lean_Grind_instDecidableEqIntInterval_decEq(lean_object* x_1, lean_object* x_2) {
_start:
{
@ -542,136 +672,6 @@ x_1 = l_Lean_Grind_instInhabitedIntInterval_default;
return x_1;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_ToInt_0__Lean_Grind_instBEqIntInterval_beq_match__1_splitter___redArg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) {
_start:
{
switch (lean_obj_tag(x_1)) {
case 0:
{
lean_dec(x_5);
lean_dec(x_4);
if (lean_obj_tag(x_2) == 0)
{
lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12;
lean_dec(x_7);
x_8 = lean_ctor_get(x_1, 0);
lean_inc(x_8);
x_9 = lean_ctor_get(x_1, 1);
lean_inc(x_9);
lean_dec_ref(x_1);
x_10 = lean_ctor_get(x_2, 0);
lean_inc(x_10);
x_11 = lean_ctor_get(x_2, 1);
lean_inc(x_11);
lean_dec_ref(x_2);
x_12 = lean_apply_4(x_3, x_8, x_9, x_10, x_11);
return x_12;
}
else
{
lean_object* x_13;
lean_dec(x_3);
x_13 = lean_apply_6(x_7, x_1, x_2, lean_box(0), lean_box(0), lean_box(0), lean_box(0));
return x_13;
}
}
case 1:
{
lean_dec(x_5);
lean_dec(x_3);
if (lean_obj_tag(x_2) == 1)
{
lean_object* x_14; lean_object* x_15; lean_object* x_16;
lean_dec(x_7);
x_14 = lean_ctor_get(x_1, 0);
lean_inc(x_14);
lean_dec_ref(x_1);
x_15 = lean_ctor_get(x_2, 0);
lean_inc(x_15);
lean_dec_ref(x_2);
x_16 = lean_apply_2(x_4, x_14, x_15);
return x_16;
}
else
{
lean_object* x_17;
lean_dec(x_4);
x_17 = lean_apply_6(x_7, x_1, x_2, lean_box(0), lean_box(0), lean_box(0), lean_box(0));
return x_17;
}
}
case 2:
{
lean_dec(x_4);
lean_dec(x_3);
if (lean_obj_tag(x_2) == 2)
{
lean_object* x_18; lean_object* x_19; lean_object* x_20;
lean_dec(x_7);
x_18 = lean_ctor_get(x_1, 0);
lean_inc(x_18);
lean_dec_ref(x_1);
x_19 = lean_ctor_get(x_2, 0);
lean_inc(x_19);
lean_dec_ref(x_2);
x_20 = lean_apply_2(x_5, x_18, x_19);
return x_20;
}
else
{
lean_object* x_21;
lean_dec(x_5);
x_21 = lean_apply_6(x_7, x_1, x_2, lean_box(0), lean_box(0), lean_box(0), lean_box(0));
return x_21;
}
}
default:
{
lean_dec(x_5);
lean_dec(x_4);
lean_dec(x_3);
if (lean_obj_tag(x_2) == 3)
{
lean_dec(x_7);
lean_inc(x_6);
return x_6;
}
else
{
lean_object* x_22;
x_22 = lean_apply_6(x_7, x_1, x_2, lean_box(0), lean_box(0), lean_box(0), lean_box(0));
return x_22;
}
}
}
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_ToInt_0__Lean_Grind_instBEqIntInterval_beq_match__1_splitter(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) {
_start:
{
lean_object* x_9;
x_9 = l___private_Init_Grind_ToInt_0__Lean_Grind_instBEqIntInterval_beq_match__1_splitter___redArg(x_2, x_3, x_4, x_5, x_6, x_7, x_8);
return x_9;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_ToInt_0__Lean_Grind_instBEqIntInterval_beq_match__1_splitter___redArg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) {
_start:
{
lean_object* x_8;
x_8 = l___private_Init_Grind_ToInt_0__Lean_Grind_instBEqIntInterval_beq_match__1_splitter___redArg(x_1, x_2, x_3, x_4, x_5, x_6, x_7);
lean_dec(x_6);
return x_8;
}
}
LEAN_EXPORT lean_object* l___private_Init_Grind_ToInt_0__Lean_Grind_instBEqIntInterval_beq_match__1_splitter___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) {
_start:
{
lean_object* x_9;
x_9 = l___private_Init_Grind_ToInt_0__Lean_Grind_instBEqIntInterval_beq_match__1_splitter(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8);
lean_dec(x_7);
return x_9;
}
}
static lean_object* _init_l_Lean_Grind_IntInterval_uint___closed__0() {
_start:
{
@ -1205,6 +1205,7 @@ return x_4;
}
}
lean_object* initialize_Init_Data_Int_DivMod_Lemmas(uint8_t builtin, lean_object*);
lean_object* initialize_Init_LawfulBEqTactics(uint8_t builtin, lean_object*);
static bool _G_initialized = false;
LEAN_EXPORT lean_object* initialize_Init_Grind_ToInt(uint8_t builtin, lean_object* w) {
lean_object * res;
@ -1213,6 +1214,9 @@ _G_initialized = true;
res = initialize_Init_Data_Int_DivMod_Lemmas(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
res = initialize_Init_LawfulBEqTactics(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
l_Lean_Grind_instBEqIntInterval___closed__0 = _init_l_Lean_Grind_instBEqIntInterval___closed__0();
lean_mark_persistent(l_Lean_Grind_instBEqIntInterval___closed__0);
l_Lean_Grind_instBEqIntInterval = _init_l_Lean_Grind_instBEqIntInterval();

1588
stage0/stdlib/Init/LawfulBEqTactics.c generated
View file

File diff suppressed because it is too large Load diff

12
stage0/stdlib/Lean/Elab/Tactic/Grind.c generated
View file

@ -418,7 +418,7 @@ uint8_t l_Lean_checkTraceOption(lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Elab_Tactic_elabGrobnerConfig___redArg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
static lean_object* l___private_Init_Data_Array_Basic_0__Array_forIn_x27Unsafe_loop___at_____private_Init_Data_Array_Basic_0__Array_forIn_x27Unsafe_loop___at___Lean_Elab_Tactic_elabGrindParams_spec__15_spec__15___closed__22;
LEAN_EXPORT lean_object* l_Lean_logWarning___at_____private_Lean_Elab_Tactic_Grind_0__Lean_Elab_Tactic_warnRedundantEMatchArg_spec__0(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Meta_Grind_mkEMatchTheoremForDecl(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Meta_Grind_mkEMatchTheoremForDecl(lean_object*, lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_mkConst(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_PersistentHashMap_foldlM___at___Lean_PersistentHashMap_foldl___at___Lean_PersistentHashMap_toList___at___Lean_PersistentHashSet_toList___at___Lean_Elab_Tactic_mkGrindOnly_spec__6_spec__6_spec__6_spec__6___redArg(lean_object*, lean_object*, lean_object*);
static lean_object* l_Lean_Elab_Tactic_elabGrindPattern___closed__1;
@ -12132,7 +12132,7 @@ lean_inc(x_89);
lean_inc_ref(x_88);
lean_inc_ref(x_97);
lean_inc(x_2);
x_102 = l_Lean_Meta_Grind_mkEMatchTheoremForDecl(x_2, x_3, x_97, x_37, x_88, x_89, x_90, x_91, x_92);
x_102 = l_Lean_Meta_Grind_mkEMatchTheoremForDecl(x_2, x_3, x_97, x_37, x_37, x_88, x_89, x_90, x_91, x_92);
if (lean_obj_tag(x_102) == 0)
{
lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106;
@ -12149,7 +12149,7 @@ lean_inc(x_89);
lean_inc_ref(x_88);
lean_inc_ref(x_97);
lean_inc(x_2);
x_106 = l_Lean_Meta_Grind_mkEMatchTheoremForDecl(x_2, x_105, x_97, x_37, x_88, x_89, x_90, x_91, x_104);
x_106 = l_Lean_Meta_Grind_mkEMatchTheoremForDecl(x_2, x_105, x_97, x_37, x_37, x_88, x_89, x_90, x_91, x_104);
if (lean_obj_tag(x_106) == 0)
{
lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; uint8_t x_111;
@ -12333,7 +12333,7 @@ lean_inc(x_89);
lean_inc_ref(x_88);
lean_inc_ref(x_128);
lean_inc(x_2);
x_134 = l_Lean_Meta_Grind_mkEMatchTheoremForDecl(x_2, x_133, x_128, x_37, x_88, x_89, x_90, x_91, x_92);
x_134 = l_Lean_Meta_Grind_mkEMatchTheoremForDecl(x_2, x_133, x_128, x_37, x_37, x_88, x_89, x_90, x_91, x_92);
if (lean_obj_tag(x_134) == 0)
{
lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138;
@ -12350,7 +12350,7 @@ lean_inc(x_89);
lean_inc_ref(x_88);
lean_inc_ref(x_128);
lean_inc(x_2);
x_138 = l_Lean_Meta_Grind_mkEMatchTheoremForDecl(x_2, x_137, x_128, x_37, x_88, x_89, x_90, x_91, x_136);
x_138 = l_Lean_Meta_Grind_mkEMatchTheoremForDecl(x_2, x_137, x_128, x_37, x_37, x_88, x_89, x_90, x_91, x_136);
if (lean_obj_tag(x_138) == 0)
{
lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; uint8_t x_143;
@ -12535,7 +12535,7 @@ lean_inc(x_89);
lean_inc_ref(x_88);
lean_inc_ref(x_159);
lean_inc(x_2);
x_164 = l_Lean_Meta_Grind_mkEMatchTheoremForDecl(x_2, x_3, x_159, x_37, x_88, x_89, x_90, x_91, x_92);
x_164 = l_Lean_Meta_Grind_mkEMatchTheoremForDecl(x_2, x_3, x_159, x_37, x_37, x_88, x_89, x_90, x_91, x_92);
if (lean_obj_tag(x_164) == 0)
{
lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; uint8_t x_169;

22
stage0/stdlib/Lean/Meta/Tactic/Grind/Arith/CommRing.c generated
View file

@ -1,6 +1,6 @@
// Lean compiler output
// Module: Lean.Meta.Tactic.Grind.Arith.CommRing
// Imports: Lean.Util.Trace Lean.Meta.Tactic.Grind.Arith.CommRing.Poly Lean.Meta.Tactic.Grind.Arith.CommRing.Types Lean.Meta.Tactic.Grind.Arith.CommRing.RingId Lean.Meta.Tactic.Grind.Arith.CommRing.Internalize Lean.Meta.Tactic.Grind.Arith.CommRing.ToExpr Lean.Meta.Tactic.Grind.Arith.CommRing.RingM Lean.Meta.Tactic.Grind.Arith.CommRing.SemiringM Lean.Meta.Tactic.Grind.Arith.CommRing.Functions Lean.Meta.Tactic.Grind.Arith.CommRing.Reify Lean.Meta.Tactic.Grind.Arith.CommRing.EqCnstr Lean.Meta.Tactic.Grind.Arith.CommRing.Proof Lean.Meta.Tactic.Grind.Arith.CommRing.DenoteExpr Lean.Meta.Tactic.Grind.Arith.CommRing.Inv Lean.Meta.Tactic.Grind.Arith.CommRing.PP Lean.Meta.Tactic.Grind.Arith.CommRing.VarRename
// Imports: Lean.Util.Trace Lean.Meta.Tactic.Grind.Arith.CommRing.Poly Lean.Meta.Tactic.Grind.Arith.CommRing.Types Lean.Meta.Tactic.Grind.Arith.CommRing.RingId Lean.Meta.Tactic.Grind.Arith.CommRing.Internalize Lean.Meta.Tactic.Grind.Arith.CommRing.ToExpr Lean.Meta.Tactic.Grind.Arith.CommRing.RingM Lean.Meta.Tactic.Grind.Arith.CommRing.SemiringM Lean.Meta.Tactic.Grind.Arith.CommRing.NonCommRingM Lean.Meta.Tactic.Grind.Arith.CommRing.NonCommSemiringM Lean.Meta.Tactic.Grind.Arith.CommRing.Functions Lean.Meta.Tactic.Grind.Arith.CommRing.Reify Lean.Meta.Tactic.Grind.Arith.CommRing.EqCnstr Lean.Meta.Tactic.Grind.Arith.CommRing.Proof Lean.Meta.Tactic.Grind.Arith.CommRing.DenoteExpr Lean.Meta.Tactic.Grind.Arith.CommRing.Inv Lean.Meta.Tactic.Grind.Arith.CommRing.PP Lean.Meta.Tactic.Grind.Arith.CommRing.VarRename Lean.Meta.Tactic.Grind.Arith.CommRing.MonadCanon Lean.Meta.Tactic.Grind.Arith.CommRing.MonadRing Lean.Meta.Tactic.Grind.Arith.CommRing.MonadSemiring
#include <lean/lean.h>
#if defined(__clang__)
#pragma clang diagnostic ignored "-Wunused-parameter"
@ -1855,6 +1855,8 @@ lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_Internalize(uint8_
lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_ToExpr(uint8_t builtin, lean_object*);
lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_RingM(uint8_t builtin, lean_object*);
lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_SemiringM(uint8_t builtin, lean_object*);
lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_NonCommRingM(uint8_t builtin, lean_object*);
lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_NonCommSemiringM(uint8_t builtin, lean_object*);
lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_Functions(uint8_t builtin, lean_object*);
lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_Reify(uint8_t builtin, lean_object*);
lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_EqCnstr(uint8_t builtin, lean_object*);
@ -1863,6 +1865,9 @@ lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_DenoteExpr(uint8_t
lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_Inv(uint8_t builtin, lean_object*);
lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_PP(uint8_t builtin, lean_object*);
lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_VarRename(uint8_t builtin, lean_object*);
lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_MonadCanon(uint8_t builtin, lean_object*);
lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_MonadRing(uint8_t builtin, lean_object*);
lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_MonadSemiring(uint8_t builtin, lean_object*);
static bool _G_initialized = false;
LEAN_EXPORT lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing(uint8_t builtin, lean_object* w) {
lean_object * res;
@ -1892,6 +1897,12 @@ lean_dec_ref(res);
res = initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_SemiringM(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
res = initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_NonCommRingM(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
res = initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_NonCommSemiringM(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
res = initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_Functions(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
@ -1916,6 +1927,15 @@ lean_dec_ref(res);
res = initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_VarRename(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
res = initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_MonadCanon(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
res = initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_MonadRing(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
res = initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_MonadSemiring(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
l___private_Lean_Meta_Tactic_Grind_Arith_CommRing_0__Lean_Meta_Grind_Arith_CommRing_initFn___closed__0____x40_Lean_Meta_Tactic_Grind_Arith_CommRing_3846929371____hygCtx___hyg_2_ = _init_l___private_Lean_Meta_Tactic_Grind_Arith_CommRing_0__Lean_Meta_Grind_Arith_CommRing_initFn___closed__0____x40_Lean_Meta_Tactic_Grind_Arith_CommRing_3846929371____hygCtx___hyg_2_();
lean_mark_persistent(l___private_Lean_Meta_Tactic_Grind_Arith_CommRing_0__Lean_Meta_Grind_Arith_CommRing_initFn___closed__0____x40_Lean_Meta_Tactic_Grind_Arith_CommRing_3846929371____hygCtx___hyg_2_);
l___private_Lean_Meta_Tactic_Grind_Arith_CommRing_0__Lean_Meta_Grind_Arith_CommRing_initFn___closed__1____x40_Lean_Meta_Tactic_Grind_Arith_CommRing_3846929371____hygCtx___hyg_2_ = _init_l___private_Lean_Meta_Tactic_Grind_Arith_CommRing_0__Lean_Meta_Grind_Arith_CommRing_initFn___closed__1____x40_Lean_Meta_Tactic_Grind_Arith_CommRing_3846929371____hygCtx___hyg_2_();

3277
stage0/stdlib/Lean/Meta/Tactic/Grind/Arith/CommRing/EqCnstr.c generated
View file

File diff suppressed because it is too large Load diff

9507
stage0/stdlib/Lean/Meta/Tactic/Grind/Arith/CommRing/Internalize.c generated
View file

File diff suppressed because it is too large Load diff

201
stage0/stdlib/Lean/Meta/Tactic/Grind/Arith/CommRing/MonadCanon.c generated Normal file
View file

@ -0,0 +1,201 @@
// Lean compiler output
// Module: Lean.Meta.Tactic.Grind.Arith.CommRing.MonadCanon
// Imports: Lean.Meta.Tactic.Grind.Arith.CommRing.Types
#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_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_ctorIdx(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift___redArg(lean_object*, lean_object*);
lean_object* l_Lean_stringToMessageData(lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_throwError___redArg(lean_object*, lean_object*, lean_object*);
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__0;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__1;
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift___redArg___lam__0(lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_indentExpr(lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_ctorIdx___boxed(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift___redArg___lam__1(lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_ctorIdx(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3;
x_3 = lean_unsigned_to_nat(0u);
return x_3;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_ctorIdx___boxed(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3;
x_3 = l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_ctorIdx(x_1, x_2);
lean_dec_ref(x_2);
return x_3;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift___redArg___lam__0(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_ref(x_1);
x_5 = lean_apply_1(x_4, x_3);
x_6 = lean_apply_2(x_2, lean_box(0), x_5);
return x_6;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift___redArg___lam__1(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, 1);
lean_inc(x_4);
lean_dec_ref(x_1);
x_5 = lean_apply_1(x_4, x_3);
x_6 = lean_apply_2(x_2, lean_box(0), x_5);
return x_6;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift___redArg(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_ref(x_2);
x_3 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift___redArg___lam__0), 3, 2);
lean_closure_set(x_3, 0, x_2);
lean_closure_set(x_3, 1, x_1);
x_4 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift___redArg___lam__1), 3, 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_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift(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_inc(x_3);
lean_inc_ref(x_4);
x_5 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift___redArg___lam__0), 3, 2);
lean_closure_set(x_5, 0, x_4);
lean_closure_set(x_5, 1, x_3);
x_6 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift___redArg___lam__1), 3, 2);
lean_closure_set(x_6, 0, x_4);
lean_closure_set(x_6, 1, x_3);
x_7 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_7, 0, x_5);
lean_ctor_set(x_7, 1, x_6);
return x_7;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__0() {
_start:
{
lean_object* x_1;
x_1 = lean_mk_string_unchecked("`grind` failed to find instance", 31, 31);
return x_1;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__1() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__0;
x_2 = l_Lean_stringToMessageData(x_1);
return x_2;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
if (lean_obj_tag(x_5) == 0)
{
lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9;
lean_dec(x_4);
x_6 = l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__1;
x_7 = l_Lean_indentExpr(x_1);
x_8 = lean_alloc_ctor(7, 2, 0);
lean_ctor_set(x_8, 0, x_6);
lean_ctor_set(x_8, 1, x_7);
x_9 = l_Lean_throwError___redArg(x_2, x_3, x_8);
return x_9;
}
else
{
lean_object* x_10; lean_object* x_11;
lean_dec_ref(x_3);
lean_dec_ref(x_2);
lean_dec_ref(x_1);
x_10 = lean_ctor_get(x_5, 0);
lean_inc(x_10);
lean_dec_ref(x_5);
x_11 = lean_apply_2(x_4, lean_box(0), x_10);
return x_11;
}
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11;
x_5 = lean_ctor_get(x_1, 0);
x_6 = lean_ctor_get(x_1, 1);
lean_inc(x_6);
x_7 = lean_ctor_get(x_3, 1);
lean_inc(x_7);
lean_dec_ref(x_3);
x_8 = lean_ctor_get(x_5, 1);
lean_inc(x_8);
lean_inc_ref(x_4);
x_9 = lean_apply_1(x_7, x_4);
x_10 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0), 5, 4);
lean_closure_set(x_10, 0, x_4);
lean_closure_set(x_10, 1, x_1);
lean_closure_set(x_10, 2, x_2);
lean_closure_set(x_10, 3, x_8);
x_11 = lean_apply_4(x_6, lean_box(0), lean_box(0), x_9, x_10);
return x_11;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
lean_object* x_6;
x_6 = l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg(x_2, x_3, x_4, x_5);
return x_6;
}
}
lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_Types(uint8_t builtin, lean_object*);
static bool _G_initialized = false;
LEAN_EXPORT lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_MonadCanon(uint8_t builtin, lean_object* w) {
lean_object * res;
if (_G_initialized) return lean_io_result_mk_ok(lean_box(0));
_G_initialized = true;
res = initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_Types(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__0 = _init_l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__0();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__0);
l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__1 = _init_l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__1();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__1);
return lean_io_result_mk_ok(lean_box(0));
}
#ifdef __cplusplus
}
#endif

178
stage0/stdlib/Lean/Meta/Tactic/Grind/Arith/CommRing/MonadRing.c generated
View file

@ -1,6 +1,6 @@
// Lean compiler output
// Module: Lean.Meta.Tactic.Grind.Arith.CommRing.MonadRing
// Imports: Lean.Meta.Tactic.Grind.Arith.CommRing.Types
// Imports: Lean.Meta.Tactic.Grind.Arith.CommRing.MonadCanon
#include <lean/lean.h>
#if defined(__clang__)
#pragma clang diagnostic ignored "-Wunused-parameter"
@ -13,189 +13,21 @@
#ifdef __cplusplus
extern "C" {
#endif
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_ctorIdx(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadRingOfMonadOfMonadCommRing___redArg___lam__1(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCommRingOfMonadLift___redArg(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadRingOfMonadLift___redArg(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCommRing_ctorIdx(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadRingOfMonadOfMonadCommRing___redArg___lam__0(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift___redArg(lean_object*, lean_object*);
lean_object* l_Lean_stringToMessageData(lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadRing_ctorIdx___boxed(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_throwError___redArg(lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadRingOfMonadLift___redArg___lam__0(lean_object*, lean_object*, lean_object*);
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__0;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__1;
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadRingOfMonadLift(lean_object*, lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift___redArg___lam__0(lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCommRingOfMonadLift___redArg___lam__0(lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadRingOfMonadOfMonadCommRing(lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadRing_ctorIdx(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_indentExpr(lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadRingOfMonadOfMonadCommRing___redArg___lam__2(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadRingOfMonadOfMonadCommRing___redArg(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_ctorIdx___boxed(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCommRingOfMonadLift(lean_object*, lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift___redArg___lam__1(lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCommRing_ctorIdx___boxed(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_ctorIdx(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3;
x_3 = lean_unsigned_to_nat(0u);
return x_3;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_ctorIdx___boxed(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3;
x_3 = l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_ctorIdx(x_1, x_2);
lean_dec_ref(x_2);
return x_3;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift___redArg___lam__0(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_ref(x_1);
x_5 = lean_apply_1(x_4, x_3);
x_6 = lean_apply_2(x_2, lean_box(0), x_5);
return x_6;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift___redArg___lam__1(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, 1);
lean_inc(x_4);
lean_dec_ref(x_1);
x_5 = lean_apply_1(x_4, x_3);
x_6 = lean_apply_2(x_2, lean_box(0), x_5);
return x_6;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift___redArg(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_ref(x_2);
x_3 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift___redArg___lam__0), 3, 2);
lean_closure_set(x_3, 0, x_2);
lean_closure_set(x_3, 1, x_1);
x_4 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift___redArg___lam__1), 3, 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_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift(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_inc(x_3);
lean_inc_ref(x_4);
x_5 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift___redArg___lam__0), 3, 2);
lean_closure_set(x_5, 0, x_4);
lean_closure_set(x_5, 1, x_3);
x_6 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadCanonOfMonadLift___redArg___lam__1), 3, 2);
lean_closure_set(x_6, 0, x_4);
lean_closure_set(x_6, 1, x_3);
x_7 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_7, 0, x_5);
lean_ctor_set(x_7, 1, x_6);
return x_7;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__0() {
_start:
{
lean_object* x_1;
x_1 = lean_mk_string_unchecked("`grind` failed to find instance", 31, 31);
return x_1;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__1() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__0;
x_2 = l_Lean_stringToMessageData(x_1);
return x_2;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
if (lean_obj_tag(x_5) == 0)
{
lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9;
lean_dec(x_4);
x_6 = l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__1;
x_7 = l_Lean_indentExpr(x_1);
x_8 = lean_alloc_ctor(7, 2, 0);
lean_ctor_set(x_8, 0, x_6);
lean_ctor_set(x_8, 1, x_7);
x_9 = l_Lean_throwError___redArg(x_2, x_3, x_8);
return x_9;
}
else
{
lean_object* x_10; lean_object* x_11;
lean_dec_ref(x_3);
lean_dec_ref(x_2);
lean_dec_ref(x_1);
x_10 = lean_ctor_get(x_5, 0);
lean_inc(x_10);
lean_dec_ref(x_5);
x_11 = lean_apply_2(x_4, lean_box(0), x_10);
return x_11;
}
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11;
x_5 = lean_ctor_get(x_1, 0);
x_6 = lean_ctor_get(x_1, 1);
lean_inc(x_6);
x_7 = lean_ctor_get(x_3, 1);
lean_inc(x_7);
lean_dec_ref(x_3);
x_8 = lean_ctor_get(x_5, 1);
lean_inc(x_8);
lean_inc_ref(x_4);
x_9 = lean_apply_1(x_7, x_4);
x_10 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0), 5, 4);
lean_closure_set(x_10, 0, x_4);
lean_closure_set(x_10, 1, x_1);
lean_closure_set(x_10, 2, x_2);
lean_closure_set(x_10, 3, x_8);
x_11 = lean_apply_4(x_6, lean_box(0), lean_box(0), x_9, x_10);
return x_11;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) {
_start:
{
lean_object* x_6;
x_6 = l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg(x_2, x_3, x_4, x_5);
return x_6;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadRing_ctorIdx(lean_object* x_1, lean_object* x_2) {
_start:
{
@ -597,19 +429,15 @@ return x_19;
}
}
}
lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_Types(uint8_t builtin, lean_object*);
lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_MonadCanon(uint8_t builtin, lean_object*);
static bool _G_initialized = false;
LEAN_EXPORT lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_MonadRing(uint8_t builtin, lean_object* w) {
lean_object * res;
if (_G_initialized) return lean_io_result_mk_ok(lean_box(0));
_G_initialized = true;
res = initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_Types(builtin, lean_io_mk_world());
res = initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_MonadCanon(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__0 = _init_l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__0();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__0);
l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__1 = _init_l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__1();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_MonadCanon_synthInstance___redArg___lam__0___closed__1);
return lean_io_result_mk_ok(lean_box(0));
}
#ifdef __cplusplus

411
stage0/stdlib/Lean/Meta/Tactic/Grind/Arith/CommRing/MonadSemiring.c generated Normal file
View file

@ -0,0 +1,411 @@
// Lean compiler output
// Module: Lean.Meta.Tactic.Grind.Arith.CommRing.MonadSemiring
// Imports: Lean.Meta.Tactic.Grind.Arith.CommRing.MonadCanon
#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_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadLift(lean_object*, lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCommSemiring_ctorIdx___boxed(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCommSemiringOfMonadLift___redArg___lam__0(lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadOfMonadCommSemiring___redArg___lam__1(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadOfMonadCommSemiring(lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCommSemiring_ctorIdx(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadSemiring_ctorIdx___boxed(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadLift___redArg___lam__0(lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadSemiring_ctorIdx(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCommSemiringOfMonadLift(lean_object*, lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadOfMonadCommSemiring___redArg___lam__2(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadOfMonadCommSemiring___redArg(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadLift___redArg(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadOfMonadCommSemiring___redArg___lam__0(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCommSemiringOfMonadLift___redArg(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadSemiring_ctorIdx(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3;
x_3 = lean_unsigned_to_nat(0u);
return x_3;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadSemiring_ctorIdx___boxed(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3;
x_3 = l_Lean_Meta_Grind_Arith_CommRing_MonadSemiring_ctorIdx(x_1, x_2);
lean_dec_ref(x_2);
return x_3;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadLift___redArg___lam__0(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
lean_object* x_4; lean_object* x_5;
x_4 = lean_apply_1(x_1, x_3);
x_5 = lean_apply_2(x_2, lean_box(0), x_4);
return x_5;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadLift___redArg(lean_object* x_1, lean_object* x_2) {
_start:
{
uint8_t x_3;
x_3 = !lean_is_exclusive(x_2);
if (x_3 == 0)
{
lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7;
x_4 = lean_ctor_get(x_2, 0);
x_5 = lean_ctor_get(x_2, 1);
lean_inc(x_1);
x_6 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadLift___redArg___lam__0), 3, 2);
lean_closure_set(x_6, 0, x_5);
lean_closure_set(x_6, 1, x_1);
x_7 = lean_apply_2(x_1, lean_box(0), x_4);
lean_ctor_set(x_2, 1, x_6);
lean_ctor_set(x_2, 0, x_7);
return x_2;
}
else
{
lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12;
x_8 = lean_ctor_get(x_2, 0);
x_9 = lean_ctor_get(x_2, 1);
lean_inc(x_9);
lean_inc(x_8);
lean_dec(x_2);
lean_inc(x_1);
x_10 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadLift___redArg___lam__0), 3, 2);
lean_closure_set(x_10, 0, x_9);
lean_closure_set(x_10, 1, x_1);
x_11 = lean_apply_2(x_1, lean_box(0), x_8);
x_12 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_12, 0, x_11);
lean_ctor_set(x_12, 1, x_10);
return x_12;
}
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadLift(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
uint8_t x_5;
x_5 = !lean_is_exclusive(x_4);
if (x_5 == 0)
{
lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9;
x_6 = lean_ctor_get(x_4, 0);
x_7 = lean_ctor_get(x_4, 1);
lean_inc(x_3);
x_8 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadLift___redArg___lam__0), 3, 2);
lean_closure_set(x_8, 0, x_7);
lean_closure_set(x_8, 1, x_3);
x_9 = lean_apply_2(x_3, lean_box(0), x_6);
lean_ctor_set(x_4, 1, x_8);
lean_ctor_set(x_4, 0, x_9);
return x_4;
}
else
{
lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14;
x_10 = lean_ctor_get(x_4, 0);
x_11 = lean_ctor_get(x_4, 1);
lean_inc(x_11);
lean_inc(x_10);
lean_dec(x_4);
lean_inc(x_3);
x_12 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadLift___redArg___lam__0), 3, 2);
lean_closure_set(x_12, 0, x_11);
lean_closure_set(x_12, 1, x_3);
x_13 = lean_apply_2(x_3, lean_box(0), x_10);
x_14 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_14, 0, x_13);
lean_ctor_set(x_14, 1, x_12);
return x_14;
}
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCommSemiring_ctorIdx(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3;
x_3 = lean_unsigned_to_nat(0u);
return x_3;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_MonadCommSemiring_ctorIdx___boxed(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3;
x_3 = l_Lean_Meta_Grind_Arith_CommRing_MonadCommSemiring_ctorIdx(x_1, x_2);
lean_dec_ref(x_2);
return x_3;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCommSemiringOfMonadLift___redArg___lam__0(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
lean_object* x_4; lean_object* x_5;
x_4 = lean_apply_1(x_1, x_3);
x_5 = lean_apply_2(x_2, lean_box(0), x_4);
return x_5;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCommSemiringOfMonadLift___redArg(lean_object* x_1, lean_object* x_2) {
_start:
{
uint8_t x_3;
x_3 = !lean_is_exclusive(x_2);
if (x_3 == 0)
{
lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7;
x_4 = lean_ctor_get(x_2, 0);
x_5 = lean_ctor_get(x_2, 1);
lean_inc(x_1);
x_6 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadCommSemiringOfMonadLift___redArg___lam__0), 3, 2);
lean_closure_set(x_6, 0, x_5);
lean_closure_set(x_6, 1, x_1);
x_7 = lean_apply_2(x_1, lean_box(0), x_4);
lean_ctor_set(x_2, 1, x_6);
lean_ctor_set(x_2, 0, x_7);
return x_2;
}
else
{
lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12;
x_8 = lean_ctor_get(x_2, 0);
x_9 = lean_ctor_get(x_2, 1);
lean_inc(x_9);
lean_inc(x_8);
lean_dec(x_2);
lean_inc(x_1);
x_10 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadCommSemiringOfMonadLift___redArg___lam__0), 3, 2);
lean_closure_set(x_10, 0, x_9);
lean_closure_set(x_10, 1, x_1);
x_11 = lean_apply_2(x_1, lean_box(0), x_8);
x_12 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_12, 0, x_11);
lean_ctor_set(x_12, 1, x_10);
return x_12;
}
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadCommSemiringOfMonadLift(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) {
_start:
{
uint8_t x_5;
x_5 = !lean_is_exclusive(x_4);
if (x_5 == 0)
{
lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9;
x_6 = lean_ctor_get(x_4, 0);
x_7 = lean_ctor_get(x_4, 1);
lean_inc(x_3);
x_8 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadCommSemiringOfMonadLift___redArg___lam__0), 3, 2);
lean_closure_set(x_8, 0, x_7);
lean_closure_set(x_8, 1, x_3);
x_9 = lean_apply_2(x_3, lean_box(0), x_6);
lean_ctor_set(x_4, 1, x_8);
lean_ctor_set(x_4, 0, x_9);
return x_4;
}
else
{
lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14;
x_10 = lean_ctor_get(x_4, 0);
x_11 = lean_ctor_get(x_4, 1);
lean_inc(x_11);
lean_inc(x_10);
lean_dec(x_4);
lean_inc(x_3);
x_12 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadCommSemiringOfMonadLift___redArg___lam__0), 3, 2);
lean_closure_set(x_12, 0, x_11);
lean_closure_set(x_12, 1, x_3);
x_13 = lean_apply_2(x_3, lean_box(0), x_10);
x_14 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_14, 0, x_13);
lean_ctor_set(x_14, 1, x_12);
return x_14;
}
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadOfMonadCommSemiring___redArg___lam__0(lean_object* x_1, lean_object* x_2) {
_start:
{
uint8_t x_3;
x_3 = !lean_is_exclusive(x_2);
if (x_3 == 0)
{
lean_object* x_4; lean_object* x_5;
x_4 = lean_ctor_get(x_2, 0);
x_5 = lean_apply_1(x_1, x_4);
lean_ctor_set(x_2, 0, x_5);
return x_2;
}
else
{
lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12;
x_6 = lean_ctor_get(x_2, 0);
x_7 = lean_ctor_get(x_2, 1);
x_8 = lean_ctor_get(x_2, 2);
x_9 = lean_ctor_get(x_2, 3);
x_10 = lean_ctor_get(x_2, 4);
lean_inc(x_10);
lean_inc(x_9);
lean_inc(x_8);
lean_inc(x_7);
lean_inc(x_6);
lean_dec(x_2);
x_11 = lean_apply_1(x_1, x_6);
x_12 = lean_alloc_ctor(0, 5, 0);
lean_ctor_set(x_12, 0, x_11);
lean_ctor_set(x_12, 1, x_7);
lean_ctor_set(x_12, 2, x_8);
lean_ctor_set(x_12, 3, x_9);
lean_ctor_set(x_12, 4, x_10);
return x_12;
}
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadOfMonadCommSemiring___redArg___lam__1(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3; lean_object* x_4;
x_3 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadOfMonadCommSemiring___redArg___lam__0), 2, 1);
lean_closure_set(x_3, 0, x_2);
x_4 = lean_apply_1(x_1, x_3);
return x_4;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadOfMonadCommSemiring___redArg___lam__2(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3; lean_object* x_4;
x_3 = lean_ctor_get(x_2, 0);
lean_inc_ref(x_3);
lean_dec_ref(x_2);
x_4 = lean_apply_2(x_1, lean_box(0), x_3);
return x_4;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadOfMonadCommSemiring___redArg(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3; lean_object* x_4; uint8_t x_5;
x_3 = lean_ctor_get(x_1, 0);
lean_inc_ref(x_3);
x_4 = lean_ctor_get(x_1, 1);
lean_inc(x_4);
lean_dec_ref(x_1);
x_5 = !lean_is_exclusive(x_2);
if (x_5 == 0)
{
lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11;
x_6 = lean_ctor_get(x_2, 0);
x_7 = lean_ctor_get(x_2, 1);
x_8 = lean_ctor_get(x_3, 1);
lean_inc(x_8);
lean_dec_ref(x_3);
x_9 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadOfMonadCommSemiring___redArg___lam__1), 2, 1);
lean_closure_set(x_9, 0, x_7);
x_10 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadOfMonadCommSemiring___redArg___lam__2), 2, 1);
lean_closure_set(x_10, 0, x_8);
x_11 = lean_apply_4(x_4, lean_box(0), lean_box(0), x_6, x_10);
lean_ctor_set(x_2, 1, x_9);
lean_ctor_set(x_2, 0, x_11);
return x_2;
}
else
{
lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18;
x_12 = lean_ctor_get(x_2, 0);
x_13 = lean_ctor_get(x_2, 1);
lean_inc(x_13);
lean_inc(x_12);
lean_dec(x_2);
x_14 = lean_ctor_get(x_3, 1);
lean_inc(x_14);
lean_dec_ref(x_3);
x_15 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadOfMonadCommSemiring___redArg___lam__1), 2, 1);
lean_closure_set(x_15, 0, x_13);
x_16 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadOfMonadCommSemiring___redArg___lam__2), 2, 1);
lean_closure_set(x_16, 0, x_14);
x_17 = lean_apply_4(x_4, lean_box(0), lean_box(0), x_12, x_16);
x_18 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_18, 0, x_17);
lean_ctor_set(x_18, 1, x_15);
return x_18;
}
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadOfMonadCommSemiring(lean_object* x_1, lean_object* x_2, lean_object* x_3) {
_start:
{
lean_object* x_4; lean_object* x_5; uint8_t x_6;
x_4 = lean_ctor_get(x_2, 0);
lean_inc_ref(x_4);
x_5 = lean_ctor_get(x_2, 1);
lean_inc(x_5);
lean_dec_ref(x_2);
x_6 = !lean_is_exclusive(x_3);
if (x_6 == 0)
{
lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12;
x_7 = lean_ctor_get(x_3, 0);
x_8 = lean_ctor_get(x_3, 1);
x_9 = lean_ctor_get(x_4, 1);
lean_inc(x_9);
lean_dec_ref(x_4);
x_10 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadOfMonadCommSemiring___redArg___lam__1), 2, 1);
lean_closure_set(x_10, 0, x_8);
x_11 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadOfMonadCommSemiring___redArg___lam__2), 2, 1);
lean_closure_set(x_11, 0, x_9);
x_12 = lean_apply_4(x_5, lean_box(0), lean_box(0), x_7, x_11);
lean_ctor_set(x_3, 1, x_10);
lean_ctor_set(x_3, 0, x_12);
return x_3;
}
else
{
lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19;
x_13 = lean_ctor_get(x_3, 0);
x_14 = lean_ctor_get(x_3, 1);
lean_inc(x_14);
lean_inc(x_13);
lean_dec(x_3);
x_15 = lean_ctor_get(x_4, 1);
lean_inc(x_15);
lean_dec_ref(x_4);
x_16 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadOfMonadCommSemiring___redArg___lam__1), 2, 1);
lean_closure_set(x_16, 0, x_14);
x_17 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_instMonadSemiringOfMonadOfMonadCommSemiring___redArg___lam__2), 2, 1);
lean_closure_set(x_17, 0, x_15);
x_18 = lean_apply_4(x_5, lean_box(0), lean_box(0), x_13, x_17);
x_19 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_19, 0, x_18);
lean_ctor_set(x_19, 1, x_16);
return x_19;
}
}
}
lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_MonadCanon(uint8_t builtin, lean_object*);
static bool _G_initialized = false;
LEAN_EXPORT lean_object* initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_MonadSemiring(uint8_t builtin, lean_object* w) {
lean_object * res;
if (_G_initialized) return lean_io_result_mk_ok(lean_box(0));
_G_initialized = true;
res = initialize_Lean_Meta_Tactic_Grind_Arith_CommRing_MonadCanon(builtin, lean_io_mk_world());
if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
return lean_io_result_mk_ok(lean_box(0));
}
#ifdef __cplusplus
}
#endif

146
stage0/stdlib/Lean/Meta/Tactic/Grind/Arith/CommRing/NonCommRingM.c generated
View file

@ -554,7 +554,7 @@ return x_11;
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_NonCommRingM_modifyRing___redArg___lam__0(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; lean_object* x_14; uint8_t x_15;
lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18;
x_4 = lean_ctor_get(x_3, 0);
x_5 = lean_ctor_get(x_3, 1);
x_6 = lean_ctor_get(x_3, 2);
@ -565,18 +565,24 @@ x_10 = lean_ctor_get(x_3, 6);
x_11 = lean_ctor_get(x_3, 7);
x_12 = lean_ctor_get(x_3, 8);
x_13 = lean_ctor_get(x_3, 9);
x_14 = lean_array_get_size(x_10);
x_15 = lean_nat_dec_lt(x_1, x_14);
lean_dec(x_14);
if (x_15 == 0)
x_14 = lean_ctor_get(x_3, 10);
x_15 = lean_ctor_get(x_3, 11);
x_16 = lean_ctor_get(x_3, 12);
x_17 = lean_array_get_size(x_10);
x_18 = lean_nat_dec_lt(x_1, x_17);
lean_dec(x_17);
if (x_18 == 0)
{
lean_dec_ref(x_2);
return x_3;
}
else
{
uint8_t x_16;
lean_inc(x_13);
uint8_t x_19;
lean_inc(x_16);
lean_inc_ref(x_15);
lean_inc_ref(x_14);
lean_inc_ref(x_13);
lean_inc_ref(x_12);
lean_inc_ref(x_11);
lean_inc_ref(x_10);
@ -586,59 +592,68 @@ lean_inc_ref(x_7);
lean_inc_ref(x_6);
lean_inc_ref(x_5);
lean_inc_ref(x_4);
x_16 = !lean_is_exclusive(x_3);
if (x_16 == 0)
x_19 = !lean_is_exclusive(x_3);
if (x_19 == 0)
{
lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; 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_17 = lean_ctor_get(x_3, 9);
lean_dec(x_17);
x_18 = lean_ctor_get(x_3, 8);
lean_dec(x_18);
x_19 = lean_ctor_get(x_3, 7);
lean_dec(x_19);
x_20 = lean_ctor_get(x_3, 6);
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; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37;
x_20 = lean_ctor_get(x_3, 12);
lean_dec(x_20);
x_21 = lean_ctor_get(x_3, 5);
x_21 = lean_ctor_get(x_3, 11);
lean_dec(x_21);
x_22 = lean_ctor_get(x_3, 4);
x_22 = lean_ctor_get(x_3, 10);
lean_dec(x_22);
x_23 = lean_ctor_get(x_3, 3);
x_23 = lean_ctor_get(x_3, 9);
lean_dec(x_23);
x_24 = lean_ctor_get(x_3, 2);
x_24 = lean_ctor_get(x_3, 8);
lean_dec(x_24);
x_25 = lean_ctor_get(x_3, 1);
x_25 = lean_ctor_get(x_3, 7);
lean_dec(x_25);
x_26 = lean_ctor_get(x_3, 0);
x_26 = lean_ctor_get(x_3, 6);
lean_dec(x_26);
x_27 = lean_array_fget(x_10, x_1);
x_28 = lean_box(0);
x_29 = lean_array_fset(x_10, x_1, x_28);
x_30 = lean_apply_1(x_2, x_27);
x_31 = lean_array_fset(x_29, x_1, x_30);
lean_ctor_set(x_3, 6, x_31);
x_27 = lean_ctor_get(x_3, 5);
lean_dec(x_27);
x_28 = lean_ctor_get(x_3, 4);
lean_dec(x_28);
x_29 = lean_ctor_get(x_3, 3);
lean_dec(x_29);
x_30 = lean_ctor_get(x_3, 2);
lean_dec(x_30);
x_31 = lean_ctor_get(x_3, 1);
lean_dec(x_31);
x_32 = lean_ctor_get(x_3, 0);
lean_dec(x_32);
x_33 = lean_array_fget(x_10, x_1);
x_34 = lean_box(0);
x_35 = lean_array_fset(x_10, x_1, x_34);
x_36 = lean_apply_1(x_2, x_33);
x_37 = lean_array_fset(x_35, x_1, x_36);
lean_ctor_set(x_3, 6, x_37);
return x_3;
}
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_dec(x_3);
x_32 = lean_array_fget(x_10, x_1);
x_33 = lean_box(0);
x_34 = lean_array_fset(x_10, x_1, x_33);
x_35 = lean_apply_1(x_2, x_32);
x_36 = lean_array_fset(x_34, x_1, x_35);
x_37 = lean_alloc_ctor(0, 10, 0);
lean_ctor_set(x_37, 0, x_4);
lean_ctor_set(x_37, 1, x_5);
lean_ctor_set(x_37, 2, x_6);
lean_ctor_set(x_37, 3, x_7);
lean_ctor_set(x_37, 4, x_8);
lean_ctor_set(x_37, 5, x_9);
lean_ctor_set(x_37, 6, x_36);
lean_ctor_set(x_37, 7, x_11);
lean_ctor_set(x_37, 8, x_12);
lean_ctor_set(x_37, 9, x_13);
return x_37;
x_38 = lean_array_fget(x_10, x_1);
x_39 = lean_box(0);
x_40 = lean_array_fset(x_10, x_1, x_39);
x_41 = lean_apply_1(x_2, x_38);
x_42 = lean_array_fset(x_40, x_1, x_41);
x_43 = lean_alloc_ctor(0, 13, 0);
lean_ctor_set(x_43, 0, x_4);
lean_ctor_set(x_43, 1, x_5);
lean_ctor_set(x_43, 2, x_6);
lean_ctor_set(x_43, 3, x_7);
lean_ctor_set(x_43, 4, x_8);
lean_ctor_set(x_43, 5, x_9);
lean_ctor_set(x_43, 6, x_42);
lean_ctor_set(x_43, 7, x_11);
lean_ctor_set(x_43, 8, x_12);
lean_ctor_set(x_43, 9, x_13);
lean_ctor_set(x_43, 10, x_14);
lean_ctor_set(x_43, 11, x_15);
lean_ctor_set(x_43, 12, x_16);
return x_43;
}
}
}
@ -1609,7 +1624,7 @@ return x_3;
}
else
{
lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18;
lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21;
x_7 = lean_ctor_get(x_3, 0);
x_8 = lean_ctor_get(x_3, 1);
x_9 = lean_ctor_get(x_3, 2);
@ -1620,6 +1635,12 @@ x_13 = lean_ctor_get(x_3, 6);
x_14 = lean_ctor_get(x_3, 7);
x_15 = lean_ctor_get(x_3, 8);
x_16 = lean_ctor_get(x_3, 9);
x_17 = lean_ctor_get(x_3, 10);
x_18 = lean_ctor_get(x_3, 11);
x_19 = lean_ctor_get(x_3, 12);
lean_inc(x_19);
lean_inc(x_18);
lean_inc(x_17);
lean_inc(x_16);
lean_inc(x_15);
lean_inc(x_14);
@ -1631,19 +1652,22 @@ lean_inc(x_9);
lean_inc(x_8);
lean_inc(x_7);
lean_dec(x_3);
x_17 = l_Lean_PersistentHashMap_insert___at___Lean_Meta_Grind_Arith_CommRing_setTermNonCommRingId_spec__0___redArg(x_14, x_1, x_2);
x_18 = lean_alloc_ctor(0, 10, 0);
lean_ctor_set(x_18, 0, x_7);
lean_ctor_set(x_18, 1, x_8);
lean_ctor_set(x_18, 2, x_9);
lean_ctor_set(x_18, 3, x_10);
lean_ctor_set(x_18, 4, x_11);
lean_ctor_set(x_18, 5, x_12);
lean_ctor_set(x_18, 6, x_13);
lean_ctor_set(x_18, 7, x_17);
lean_ctor_set(x_18, 8, x_15);
lean_ctor_set(x_18, 9, x_16);
return x_18;
x_20 = l_Lean_PersistentHashMap_insert___at___Lean_Meta_Grind_Arith_CommRing_setTermNonCommRingId_spec__0___redArg(x_14, x_1, x_2);
x_21 = lean_alloc_ctor(0, 13, 0);
lean_ctor_set(x_21, 0, x_7);
lean_ctor_set(x_21, 1, x_8);
lean_ctor_set(x_21, 2, x_9);
lean_ctor_set(x_21, 3, x_10);
lean_ctor_set(x_21, 4, x_11);
lean_ctor_set(x_21, 5, x_12);
lean_ctor_set(x_21, 6, x_13);
lean_ctor_set(x_21, 7, x_20);
lean_ctor_set(x_21, 8, x_15);
lean_ctor_set(x_21, 9, x_16);
lean_ctor_set(x_21, 10, x_17);
lean_ctor_set(x_21, 11, x_18);
lean_ctor_set(x_21, 12, x_19);
return x_21;
}
}
}

1974
stage0/stdlib/Lean/Meta/Tactic/Grind/Arith/CommRing/NonCommSemiringM.c generated Normal file
View file

File diff suppressed because it is too large Load diff

4
stage0/stdlib/Lean/Meta/Tactic/Grind/Arith/CommRing/PP.c generated
View file

@ -9056,7 +9056,7 @@ x_8 = lean_ctor_get(x_6, 0);
x_9 = lean_ctor_get(x_2, 5);
lean_inc(x_9);
lean_dec_ref(x_2);
x_10 = lean_ctor_get(x_8, 9);
x_10 = lean_ctor_get(x_8, 12);
lean_inc(x_10);
lean_dec(x_8);
x_11 = lean_nat_dec_le(x_9, x_10);
@ -9112,7 +9112,7 @@ lean_dec(x_6);
x_28 = lean_ctor_get(x_2, 5);
lean_inc(x_28);
lean_dec_ref(x_2);
x_29 = lean_ctor_get(x_26, 9);
x_29 = lean_ctor_get(x_26, 12);
lean_inc(x_29);
lean_dec(x_26);
x_30 = lean_nat_dec_le(x_28, x_29);

5372
stage0/stdlib/Lean/Meta/Tactic/Grind/Arith/CommRing/Proof.c generated
View file

File diff suppressed because it is too large Load diff

12049
stage0/stdlib/Lean/Meta/Tactic/Grind/Arith/CommRing/Reify.c generated
View file

File diff suppressed because it is too large Load diff

1639
stage0/stdlib/Lean/Meta/Tactic/Grind/Arith/CommRing/RingId.c generated
View file

File diff suppressed because it is too large Load diff

195
stage0/stdlib/Lean/Meta/Tactic/Grind/Arith/CommRing/RingM.c generated
View file

@ -220,7 +220,7 @@ x_10 = lean_ctor_get(x_8, 0);
x_11 = lean_ctor_get(x_10, 5);
lean_inc(x_11);
lean_dec(x_10);
x_12 = lean_ctor_get(x_6, 9);
x_12 = lean_ctor_get(x_6, 12);
lean_inc(x_12);
lean_dec(x_6);
x_13 = lean_nat_dec_le(x_11, x_12);
@ -241,7 +241,7 @@ lean_dec(x_8);
x_17 = lean_ctor_get(x_15, 5);
lean_inc(x_17);
lean_dec(x_15);
x_18 = lean_ctor_get(x_6, 9);
x_18 = lean_ctor_get(x_6, 12);
lean_inc(x_18);
lean_dec(x_6);
x_19 = lean_nat_dec_le(x_17, x_18);
@ -345,16 +345,16 @@ x_2 = !lean_is_exclusive(x_1);
if (x_2 == 0)
{
lean_object* x_3; lean_object* x_4; lean_object* x_5;
x_3 = lean_ctor_get(x_1, 9);
x_3 = lean_ctor_get(x_1, 12);
x_4 = lean_unsigned_to_nat(1u);
x_5 = lean_nat_add(x_3, x_4);
lean_dec(x_3);
lean_ctor_set(x_1, 9, x_5);
lean_ctor_set(x_1, 12, x_5);
return x_1;
}
else
{
lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18;
lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21;
x_6 = lean_ctor_get(x_1, 0);
x_7 = lean_ctor_get(x_1, 1);
x_8 = lean_ctor_get(x_1, 2);
@ -365,6 +365,12 @@ x_12 = lean_ctor_get(x_1, 6);
x_13 = lean_ctor_get(x_1, 7);
x_14 = lean_ctor_get(x_1, 8);
x_15 = lean_ctor_get(x_1, 9);
x_16 = lean_ctor_get(x_1, 10);
x_17 = lean_ctor_get(x_1, 11);
x_18 = lean_ctor_get(x_1, 12);
lean_inc(x_18);
lean_inc(x_17);
lean_inc(x_16);
lean_inc(x_15);
lean_inc(x_14);
lean_inc(x_13);
@ -376,21 +382,24 @@ lean_inc(x_8);
lean_inc(x_7);
lean_inc(x_6);
lean_dec(x_1);
x_16 = lean_unsigned_to_nat(1u);
x_17 = lean_nat_add(x_15, x_16);
lean_dec(x_15);
x_18 = lean_alloc_ctor(0, 10, 0);
lean_ctor_set(x_18, 0, x_6);
lean_ctor_set(x_18, 1, x_7);
lean_ctor_set(x_18, 2, x_8);
lean_ctor_set(x_18, 3, x_9);
lean_ctor_set(x_18, 4, x_10);
lean_ctor_set(x_18, 5, x_11);
lean_ctor_set(x_18, 6, x_12);
lean_ctor_set(x_18, 7, x_13);
lean_ctor_set(x_18, 8, x_14);
lean_ctor_set(x_18, 9, x_17);
return x_18;
x_19 = lean_unsigned_to_nat(1u);
x_20 = lean_nat_add(x_18, x_19);
lean_dec(x_18);
x_21 = lean_alloc_ctor(0, 13, 0);
lean_ctor_set(x_21, 0, x_6);
lean_ctor_set(x_21, 1, x_7);
lean_ctor_set(x_21, 2, x_8);
lean_ctor_set(x_21, 3, x_9);
lean_ctor_set(x_21, 4, x_10);
lean_ctor_set(x_21, 5, x_11);
lean_ctor_set(x_21, 6, x_12);
lean_ctor_set(x_21, 7, x_13);
lean_ctor_set(x_21, 8, x_14);
lean_ctor_set(x_21, 9, x_15);
lean_ctor_set(x_21, 10, x_16);
lean_ctor_set(x_21, 11, x_17);
lean_ctor_set(x_21, 12, x_20);
return x_21;
}
}
}
@ -942,7 +951,7 @@ return x_11;
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_RingM_modifyCommRing___redArg___lam__0(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; lean_object* x_14; uint8_t x_15;
lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18;
x_4 = lean_ctor_get(x_3, 0);
x_5 = lean_ctor_get(x_3, 1);
x_6 = lean_ctor_get(x_3, 2);
@ -953,18 +962,24 @@ x_10 = lean_ctor_get(x_3, 6);
x_11 = lean_ctor_get(x_3, 7);
x_12 = lean_ctor_get(x_3, 8);
x_13 = lean_ctor_get(x_3, 9);
x_14 = lean_array_get_size(x_4);
x_15 = lean_nat_dec_lt(x_1, x_14);
lean_dec(x_14);
if (x_15 == 0)
x_14 = lean_ctor_get(x_3, 10);
x_15 = lean_ctor_get(x_3, 11);
x_16 = lean_ctor_get(x_3, 12);
x_17 = lean_array_get_size(x_4);
x_18 = lean_nat_dec_lt(x_1, x_17);
lean_dec(x_17);
if (x_18 == 0)
{
lean_dec_ref(x_2);
return x_3;
}
else
{
uint8_t x_16;
lean_inc(x_13);
uint8_t x_19;
lean_inc(x_16);
lean_inc_ref(x_15);
lean_inc_ref(x_14);
lean_inc_ref(x_13);
lean_inc_ref(x_12);
lean_inc_ref(x_11);
lean_inc_ref(x_10);
@ -974,59 +989,68 @@ lean_inc_ref(x_7);
lean_inc_ref(x_6);
lean_inc_ref(x_5);
lean_inc_ref(x_4);
x_16 = !lean_is_exclusive(x_3);
if (x_16 == 0)
x_19 = !lean_is_exclusive(x_3);
if (x_19 == 0)
{
lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; 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_17 = lean_ctor_get(x_3, 9);
lean_dec(x_17);
x_18 = lean_ctor_get(x_3, 8);
lean_dec(x_18);
x_19 = lean_ctor_get(x_3, 7);
lean_dec(x_19);
x_20 = lean_ctor_get(x_3, 6);
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; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37;
x_20 = lean_ctor_get(x_3, 12);
lean_dec(x_20);
x_21 = lean_ctor_get(x_3, 5);
x_21 = lean_ctor_get(x_3, 11);
lean_dec(x_21);
x_22 = lean_ctor_get(x_3, 4);
x_22 = lean_ctor_get(x_3, 10);
lean_dec(x_22);
x_23 = lean_ctor_get(x_3, 3);
x_23 = lean_ctor_get(x_3, 9);
lean_dec(x_23);
x_24 = lean_ctor_get(x_3, 2);
x_24 = lean_ctor_get(x_3, 8);
lean_dec(x_24);
x_25 = lean_ctor_get(x_3, 1);
x_25 = lean_ctor_get(x_3, 7);
lean_dec(x_25);
x_26 = lean_ctor_get(x_3, 0);
x_26 = lean_ctor_get(x_3, 6);
lean_dec(x_26);
x_27 = lean_array_fget(x_4, x_1);
x_28 = lean_box(0);
x_29 = lean_array_fset(x_4, x_1, x_28);
x_30 = lean_apply_1(x_2, x_27);
x_31 = lean_array_fset(x_29, x_1, x_30);
lean_ctor_set(x_3, 0, x_31);
x_27 = lean_ctor_get(x_3, 5);
lean_dec(x_27);
x_28 = lean_ctor_get(x_3, 4);
lean_dec(x_28);
x_29 = lean_ctor_get(x_3, 3);
lean_dec(x_29);
x_30 = lean_ctor_get(x_3, 2);
lean_dec(x_30);
x_31 = lean_ctor_get(x_3, 1);
lean_dec(x_31);
x_32 = lean_ctor_get(x_3, 0);
lean_dec(x_32);
x_33 = lean_array_fget(x_4, x_1);
x_34 = lean_box(0);
x_35 = lean_array_fset(x_4, x_1, x_34);
x_36 = lean_apply_1(x_2, x_33);
x_37 = lean_array_fset(x_35, x_1, x_36);
lean_ctor_set(x_3, 0, x_37);
return x_3;
}
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_dec(x_3);
x_32 = lean_array_fget(x_4, x_1);
x_33 = lean_box(0);
x_34 = lean_array_fset(x_4, x_1, x_33);
x_35 = lean_apply_1(x_2, x_32);
x_36 = lean_array_fset(x_34, x_1, x_35);
x_37 = lean_alloc_ctor(0, 10, 0);
lean_ctor_set(x_37, 0, x_36);
lean_ctor_set(x_37, 1, x_5);
lean_ctor_set(x_37, 2, x_6);
lean_ctor_set(x_37, 3, x_7);
lean_ctor_set(x_37, 4, x_8);
lean_ctor_set(x_37, 5, x_9);
lean_ctor_set(x_37, 6, x_10);
lean_ctor_set(x_37, 7, x_11);
lean_ctor_set(x_37, 8, x_12);
lean_ctor_set(x_37, 9, x_13);
return x_37;
x_38 = lean_array_fget(x_4, x_1);
x_39 = lean_box(0);
x_40 = lean_array_fset(x_4, x_1, x_39);
x_41 = lean_apply_1(x_2, x_38);
x_42 = lean_array_fset(x_40, x_1, x_41);
x_43 = lean_alloc_ctor(0, 13, 0);
lean_ctor_set(x_43, 0, x_42);
lean_ctor_set(x_43, 1, x_5);
lean_ctor_set(x_43, 2, x_6);
lean_ctor_set(x_43, 3, x_7);
lean_ctor_set(x_43, 4, x_8);
lean_ctor_set(x_43, 5, x_9);
lean_ctor_set(x_43, 6, x_10);
lean_ctor_set(x_43, 7, x_11);
lean_ctor_set(x_43, 8, x_12);
lean_ctor_set(x_43, 9, x_13);
lean_ctor_set(x_43, 10, x_14);
lean_ctor_set(x_43, 11, x_15);
lean_ctor_set(x_43, 12, x_16);
return x_43;
}
}
}
@ -5846,7 +5870,7 @@ return x_3;
}
else
{
lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18;
lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21;
x_7 = lean_ctor_get(x_3, 0);
x_8 = lean_ctor_get(x_3, 1);
x_9 = lean_ctor_get(x_3, 2);
@ -5857,6 +5881,12 @@ x_13 = lean_ctor_get(x_3, 6);
x_14 = lean_ctor_get(x_3, 7);
x_15 = lean_ctor_get(x_3, 8);
x_16 = lean_ctor_get(x_3, 9);
x_17 = lean_ctor_get(x_3, 10);
x_18 = lean_ctor_get(x_3, 11);
x_19 = lean_ctor_get(x_3, 12);
lean_inc(x_19);
lean_inc(x_18);
lean_inc(x_17);
lean_inc(x_16);
lean_inc(x_15);
lean_inc(x_14);
@ -5868,19 +5898,22 @@ lean_inc(x_9);
lean_inc(x_8);
lean_inc(x_7);
lean_dec(x_3);
x_17 = l_Lean_PersistentHashMap_insert___at___Lean_Meta_Grind_Arith_CommRing_setTermRingId_spec__0___redArg(x_9, x_1, x_2);
x_18 = lean_alloc_ctor(0, 10, 0);
lean_ctor_set(x_18, 0, x_7);
lean_ctor_set(x_18, 1, x_8);
lean_ctor_set(x_18, 2, x_17);
lean_ctor_set(x_18, 3, x_10);
lean_ctor_set(x_18, 4, x_11);
lean_ctor_set(x_18, 5, x_12);
lean_ctor_set(x_18, 6, x_13);
lean_ctor_set(x_18, 7, x_14);
lean_ctor_set(x_18, 8, x_15);
lean_ctor_set(x_18, 9, x_16);
return x_18;
x_20 = l_Lean_PersistentHashMap_insert___at___Lean_Meta_Grind_Arith_CommRing_setTermRingId_spec__0___redArg(x_9, x_1, x_2);
x_21 = lean_alloc_ctor(0, 13, 0);
lean_ctor_set(x_21, 0, x_7);
lean_ctor_set(x_21, 1, x_8);
lean_ctor_set(x_21, 2, x_20);
lean_ctor_set(x_21, 3, x_10);
lean_ctor_set(x_21, 4, x_11);
lean_ctor_set(x_21, 5, x_12);
lean_ctor_set(x_21, 6, x_13);
lean_ctor_set(x_21, 7, x_14);
lean_ctor_set(x_21, 8, x_15);
lean_ctor_set(x_21, 9, x_16);
lean_ctor_set(x_21, 10, x_17);
lean_ctor_set(x_21, 11, x_18);
lean_ctor_set(x_21, 12, x_19);
return x_21;
}
}
}

8253
stage0/stdlib/Lean/Meta/Tactic/Grind/Arith/CommRing/SemiringM.c generated
View file

File diff suppressed because it is too large Load diff

311
stage0/stdlib/Lean/Meta/Tactic/Grind/Arith/CommRing/ToExpr.c generated
View file

@ -20,21 +20,18 @@ static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprPower___closed__2
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprPower___closed__1;
lean_object* l_Lean_mkNatLit(lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprPoly;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__2;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofMon___closed__5;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__8;
lean_object* l_Lean_mkAppB(lean_object*, lean_object*, lean_object*);
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprPoly___closed__1;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPower___closed__5;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofMon___closed__2;
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr(lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofMon(lean_object*);
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__7;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofMon___closed__1;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr___closed__3;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr___closed__0;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPoly___closed__19;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__5;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__17;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprPower___closed__0;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPoly___closed__3;
@ -44,31 +41,24 @@ static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__13;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofMon___closed__3;
lean_object* l_Lean_Name_mkStr5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprPoly___closed__2;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__1;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPoly___closed__12;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPoly___closed__8;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__4;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__1;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPoly___closed__18;
uint8_t lean_int_dec_le(lean_object*, lean_object*);
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPoly___closed__0;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__11;
lean_object* l_Lean_Level_ofNat(lean_object*);
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__1;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPoly___closed__4;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__22;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__10;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr___closed__2;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__5;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__15;
lean_object* lean_nat_to_int(lean_object*);
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__21;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__2;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPower___closed__3;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPoly___closed__15;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__11;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__16;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__6;
lean_object* l_Lean_mkConst(lean_object*, lean_object*);
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPoly___closed__5;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__2;
@ -82,13 +72,10 @@ static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprMon___closed__0;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__0;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__3;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprMon___closed__3;
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1;
lean_object* l_Lean_Name_mkStr6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPoly___closed__2;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__6;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__20;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPoly___closed__17;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__0;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__4;
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprMon;
lean_object* l_Lean_Expr_app___override(lean_object*, lean_object*);
@ -97,27 +84,22 @@ static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr___closed__1;
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPoly(lean_object*);
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPoly___closed__11;
lean_object* l_Lean_Name_mkStr2(lean_object*, lean_object*);
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__3;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPower___closed__1;
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprPower;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprPower___closed__3;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPoly___closed__13;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__12;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__0;
lean_object* l_Int_toNat(lean_object*);
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofMon___closed__6;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPoly___closed__16;
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__9;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPoly___closed__14;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPower___closed__4;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__10;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofMon___closed__4;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPoly___closed__7;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__7;
lean_object* l_Lean_instToExprInt_mkNat(lean_object*);
lean_object* l_Lean_Name_mkStr1(lean_object*);
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__8;
lean_object* l_Lean_Name_mkStr4(lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* lean_int_neg(lean_object*);
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__19;
@ -129,7 +111,6 @@ static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPoly___closed__6;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__9;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofPoly___closed__9;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__24;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__3;
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr(lean_object*);
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_ofPower___closed__0() {
_start:
@ -1208,264 +1189,6 @@ x_1 = l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr___closed__3;
return x_1;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__0() {
_start:
{
lean_object* x_1;
x_1 = lean_mk_string_unchecked("Ring", 4, 4);
return x_1;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__1() {
_start:
{
lean_object* x_1;
x_1 = lean_mk_string_unchecked("OfSemiring", 10, 10);
return x_1;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_ofPoly___closed__1;
x_2 = l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__0;
x_3 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__1;
x_4 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__0;
x_5 = l_Lean_Meta_Grind_Arith_CommRing_ofPower___closed__1;
x_6 = l_Lean_Meta_Grind_Arith_CommRing_ofPower___closed__0;
x_7 = l_Lean_Name_mkStr6(x_6, x_5, x_4, x_3, x_2, x_1);
return x_7;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__3() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = lean_box(0);
x_2 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__2;
x_3 = l_Lean_mkConst(x_2, x_1);
return x_3;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__4() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__9;
x_2 = l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__0;
x_3 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__1;
x_4 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__0;
x_5 = l_Lean_Meta_Grind_Arith_CommRing_ofPower___closed__1;
x_6 = l_Lean_Meta_Grind_Arith_CommRing_ofPower___closed__0;
x_7 = l_Lean_Name_mkStr6(x_6, x_5, x_4, x_3, x_2, x_1);
return x_7;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__5() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = lean_box(0);
x_2 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__4;
x_3 = l_Lean_mkConst(x_2, x_1);
return x_3;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__6() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_ofPoly___closed__17;
x_2 = l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__0;
x_3 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__1;
x_4 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__0;
x_5 = l_Lean_Meta_Grind_Arith_CommRing_ofPower___closed__1;
x_6 = l_Lean_Meta_Grind_Arith_CommRing_ofPower___closed__0;
x_7 = l_Lean_Name_mkStr6(x_6, x_5, x_4, x_3, x_2, x_1);
return x_7;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__7() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = lean_box(0);
x_2 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__6;
x_3 = l_Lean_mkConst(x_2, x_1);
return x_3;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__8() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__19;
x_2 = l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__0;
x_3 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__1;
x_4 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__0;
x_5 = l_Lean_Meta_Grind_Arith_CommRing_ofPower___closed__1;
x_6 = l_Lean_Meta_Grind_Arith_CommRing_ofPower___closed__0;
x_7 = l_Lean_Name_mkStr6(x_6, x_5, x_4, x_3, x_2, x_1);
return x_7;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__9() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = lean_box(0);
x_2 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__8;
x_3 = l_Lean_mkConst(x_2, x_1);
return x_3;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__10() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__22;
x_2 = l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__0;
x_3 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__1;
x_4 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__0;
x_5 = l_Lean_Meta_Grind_Arith_CommRing_ofPower___closed__1;
x_6 = l_Lean_Meta_Grind_Arith_CommRing_ofPower___closed__0;
x_7 = l_Lean_Name_mkStr6(x_6, x_5, x_4, x_3, x_2, x_1);
return x_7;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__11() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = lean_box(0);
x_2 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__10;
x_3 = l_Lean_mkConst(x_2, x_1);
return x_3;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr(lean_object* x_1) {
_start:
{
switch (lean_obj_tag(x_1)) {
case 0:
{
lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5;
x_2 = lean_ctor_get(x_1, 0);
lean_inc(x_2);
lean_dec_ref(x_1);
x_3 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__3;
x_4 = l_Lean_mkNatLit(x_2);
x_5 = l_Lean_Expr_app___override(x_3, x_4);
return x_5;
}
case 1:
{
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_ref(x_1);
x_7 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__5;
x_8 = l_Lean_mkNatLit(x_6);
x_9 = l_Lean_Expr_app___override(x_7, x_8);
return x_9;
}
case 2:
{
lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15;
x_10 = lean_ctor_get(x_1, 0);
lean_inc_ref(x_10);
x_11 = lean_ctor_get(x_1, 1);
lean_inc_ref(x_11);
lean_dec_ref(x_1);
x_12 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__7;
x_13 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr(x_10);
x_14 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr(x_11);
x_15 = l_Lean_mkAppB(x_12, x_13, x_14);
return x_15;
}
case 3:
{
lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21;
x_16 = lean_ctor_get(x_1, 0);
lean_inc_ref(x_16);
x_17 = lean_ctor_get(x_1, 1);
lean_inc_ref(x_17);
lean_dec_ref(x_1);
x_18 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__9;
x_19 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr(x_16);
x_20 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr(x_17);
x_21 = l_Lean_mkAppB(x_18, x_19, x_20);
return x_21;
}
default:
{
lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27;
x_22 = lean_ctor_get(x_1, 0);
lean_inc_ref(x_22);
x_23 = lean_ctor_get(x_1, 1);
lean_inc(x_23);
lean_dec_ref(x_1);
x_24 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__11;
x_25 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr(x_22);
x_26 = l_Lean_mkNatLit(x_23);
x_27 = l_Lean_mkAppB(x_24, x_25, x_26);
return x_27;
}
}
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__0() {
_start:
{
lean_object* x_1;
x_1 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr), 1, 0);
return x_1;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__1() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_ofRingExpr___closed__0;
x_2 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__1;
x_3 = l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__0;
x_4 = l_Lean_Meta_Grind_Arith_CommRing_ofPower___closed__1;
x_5 = l_Lean_Meta_Grind_Arith_CommRing_ofPower___closed__0;
x_6 = l_Lean_Name_mkStr5(x_5, x_4, x_3, x_2, x_1);
return x_6;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = lean_box(0);
x_2 = l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__1;
x_3 = l_Lean_mkConst(x_2, x_1);
return x_3;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__3() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__2;
x_2 = l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__0;
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_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1() {
_start:
{
lean_object* x_1;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__3;
return x_1;
}
}
lean_object* initialize_Init_Grind_Ring_CommSolver(uint8_t builtin, lean_object*);
lean_object* initialize_Init_Grind_Ring_CommSemiringAdapter(uint8_t builtin, lean_object*);
lean_object* initialize_Lean_ToExpr(uint8_t builtin, lean_object*);
@ -1641,40 +1364,6 @@ l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr___closed__3 = _init_l_Lean_Meta_
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr___closed__3);
l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr = _init_l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr);
l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__0 = _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__0();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__0);
l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__1 = _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__1();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__1);
l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__2 = _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__2();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__2);
l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__3 = _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__3();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__3);
l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__4 = _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__4();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__4);
l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__5 = _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__5();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__5);
l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__6 = _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__6();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__6);
l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__7 = _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__7();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__7);
l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__8 = _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__8();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__8);
l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__9 = _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__9();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__9);
l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__10 = _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__10();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__10);
l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__11 = _init_l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__11();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_ofSemiringExpr___closed__11);
l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__0 = _init_l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__0();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__0);
l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__1 = _init_l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__1();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__1);
l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__2 = _init_l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__2();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__2);
l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__3 = _init_l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__3();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1___closed__3);
l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1 = _init_l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instToExprExpr__1);
return lean_io_result_mk_ok(lean_box(0));
}
#ifdef __cplusplus

226
stage0/stdlib/Lean/Meta/Tactic/Grind/Arith/CommRing/Types.c generated
View file

@ -44,7 +44,6 @@ LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_PolyDerivation_ctorEli
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instInhabitedEqCnstrProof___closed__2;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__0;
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_initFn____x40_Lean_Meta_Tactic_Grind_Arith_CommRing_Types_2273073757____hygCtx___hyg_2_(lean_object*);
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__3;
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_EqCnstr_ctorIdx(lean_object*);
lean_object* l_Array_empty(lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_modify_x27(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
@ -75,6 +74,8 @@ LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing;
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_EqCnstrProof_superpose_elim___redArg(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_DiseqCnstr_ctorIdx___boxed(lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_PolyDerivation_input_elim(lean_object*, lean_object*, lean_object*, lean_object*);
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__3;
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_CommSemiring_ctorIdx(lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_EqCnstrProof_mul_elim___redArg(lean_object*, lean_object*);
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__2;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instInhabitedEqCnstr___closed__0;
@ -94,7 +95,9 @@ LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_modify_x27___redArg___
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_EqCnstrProof_superpose_elim(lean_object*, lean_object*, lean_object*, lean_object*);
LEAN_EXPORT uint8_t l_Lean_Meta_Grind_Arith_CommRing_EqCnstr_compare(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_State_ctorIdx___boxed(lean_object*);
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommSemiring_default___closed__0;
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_PolyDerivation_ctorElim(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_CommSemiring_ctorIdx___boxed(lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_CommRing_ctorIdx(lean_object*);
lean_object* l_Lean_PersistentHashMap_mkEmptyEntriesArray(lean_object*, lean_object*);
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__0;
@ -106,6 +109,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_EqCnstrProof_core_elim
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_EqCnstrProof_numEq0_elim___redArg(lean_object*, lean_object*);
lean_object* l_Lean_Name_mkStr1(lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_EqCnstrProof_core_elim(lean_object*, lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommSemiring_default;
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_PolyDerivation_p(lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instInhabitedEqCnstr;
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_Ring_ctorIdx___boxed(lean_object*);
@ -113,6 +117,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_EqCnstrProof_numEq0_el
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instInhabitedState_default___closed__1;
static lean_object* l_Lean_Meta_Grind_Arith_CommRing_instInhabitedEqCnstrProof___closed__0;
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_get_x27___redArg___boxed(lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommSemiring;
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_EqCnstr_compare___boxed(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_EqCnstrProof_ctorElim___redArg(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_PolyDerivation_ctorElim___redArg(lean_object*, lean_object*);
@ -809,6 +814,90 @@ lean_dec_ref(x_1);
return x_2;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_Semiring_ctorIdx(lean_object* x_1) {
_start:
{
lean_object* x_2;
x_2 = lean_unsigned_to_nat(0u);
return x_2;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_Semiring_ctorIdx___boxed(lean_object* x_1) {
_start:
{
lean_object* x_2;
x_2 = l_Lean_Meta_Grind_Arith_CommRing_Semiring_ctorIdx(x_1);
lean_dec_ref(x_1);
return x_2;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__0() {
_start:
{
lean_object* x_1;
x_1 = l_Lean_PersistentHashMap_mkEmptyEntriesArray(lean_box(0), lean_box(0));
return x_1;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__1() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__0;
x_2 = lean_alloc_ctor(0, 1, 0);
lean_ctor_set(x_2, 0, x_1);
return x_2;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__2() {
_start:
{
lean_object* x_1;
x_1 = l_Lean_instInhabitedPersistentArray_default(lean_box(0));
return x_1;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__3() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__2;
x_2 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__1;
x_3 = lean_box(0);
x_4 = lean_box(0);
x_5 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedEqCnstrProof___closed__2;
x_6 = lean_unsigned_to_nat(0u);
x_7 = lean_alloc_ctor(0, 11, 0);
lean_ctor_set(x_7, 0, x_6);
lean_ctor_set(x_7, 1, x_5);
lean_ctor_set(x_7, 2, x_4);
lean_ctor_set(x_7, 3, x_5);
lean_ctor_set(x_7, 4, x_3);
lean_ctor_set(x_7, 5, x_3);
lean_ctor_set(x_7, 6, x_3);
lean_ctor_set(x_7, 7, x_3);
lean_ctor_set(x_7, 8, x_2);
lean_ctor_set(x_7, 9, x_1);
lean_ctor_set(x_7, 10, x_2);
return x_7;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default() {
_start:
{
lean_object* x_1;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__3;
return x_1;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring() {
_start:
{
lean_object* x_1;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default;
return x_1;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_Ring_ctorIdx(lean_object* x_1) {
_start:
{
@ -830,34 +919,26 @@ static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_def
_start:
{
lean_object* x_1;
x_1 = l_Lean_instInhabitedPersistentArray_default(lean_box(0));
x_1 = l_Lean_PersistentHashMap_mkEmptyEntriesArray(lean_box(0), lean_box(0));
return x_1;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__1() {
_start:
{
lean_object* x_1;
x_1 = l_Lean_PersistentHashMap_mkEmptyEntriesArray(lean_box(0), lean_box(0));
return x_1;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__1;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__0;
x_2 = lean_alloc_ctor(0, 1, 0);
lean_ctor_set(x_2, 0, x_1);
return x_2;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__3() {
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__2;
x_2 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__0;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__1;
x_2 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__2;
x_3 = lean_box(0);
x_4 = lean_box(0);
x_5 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedEqCnstrProof___closed__2;
@ -887,7 +968,7 @@ static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_def
_start:
{
lean_object* x_1;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__3;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__2;
return x_1;
}
}
@ -992,7 +1073,7 @@ x_1 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommRing_default;
return x_1;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_Semiring_ctorIdx(lean_object* x_1) {
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_CommSemiring_ctorIdx(lean_object* x_1) {
_start:
{
lean_object* x_2;
@ -1000,75 +1081,45 @@ x_2 = lean_unsigned_to_nat(0u);
return x_2;
}
}
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_Semiring_ctorIdx___boxed(lean_object* x_1) {
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_Arith_CommRing_CommSemiring_ctorIdx___boxed(lean_object* x_1) {
_start:
{
lean_object* x_2;
x_2 = l_Lean_Meta_Grind_Arith_CommRing_Semiring_ctorIdx(x_1);
x_2 = l_Lean_Meta_Grind_Arith_CommRing_CommSemiring_ctorIdx(x_1);
lean_dec_ref(x_1);
return x_2;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__0() {
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommSemiring_default___closed__0() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5;
x_1 = lean_box(0);
x_2 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedEqCnstrProof___closed__2;
x_3 = lean_unsigned_to_nat(0u);
x_4 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default;
x_5 = lean_alloc_ctor(0, 5, 0);
lean_ctor_set(x_5, 0, x_4);
lean_ctor_set(x_5, 1, x_3);
lean_ctor_set(x_5, 2, x_2);
lean_ctor_set(x_5, 3, x_1);
lean_ctor_set(x_5, 4, x_1);
return x_5;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommSemiring_default() {
_start:
{
lean_object* x_1;
x_1 = l_Lean_PersistentHashMap_mkEmptyEntriesArray(lean_box(0), lean_box(0));
x_1 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommSemiring_default___closed__0;
return x_1;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__1() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__0;
x_2 = lean_alloc_ctor(0, 1, 0);
lean_ctor_set(x_2, 0, x_1);
return x_2;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__2() {
_start:
{
lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__0;
x_2 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__1;
x_3 = lean_box(0);
x_4 = lean_box(0);
x_5 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedEqCnstrProof___closed__2;
x_6 = lean_unsigned_to_nat(0u);
x_7 = lean_alloc_ctor(0, 15, 0);
lean_ctor_set(x_7, 0, x_6);
lean_ctor_set(x_7, 1, x_6);
lean_ctor_set(x_7, 2, x_5);
lean_ctor_set(x_7, 3, x_4);
lean_ctor_set(x_7, 4, x_5);
lean_ctor_set(x_7, 5, x_5);
lean_ctor_set(x_7, 6, x_3);
lean_ctor_set(x_7, 7, x_3);
lean_ctor_set(x_7, 8, x_3);
lean_ctor_set(x_7, 9, x_3);
lean_ctor_set(x_7, 10, x_3);
lean_ctor_set(x_7, 11, x_3);
lean_ctor_set(x_7, 12, x_2);
lean_ctor_set(x_7, 13, x_1);
lean_ctor_set(x_7, 14, x_2);
return x_7;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default() {
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommSemiring() {
_start:
{
lean_object* x_1;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__2;
return x_1;
}
}
static lean_object* _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring() {
_start:
{
lean_object* x_1;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default;
x_1 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommSemiring_default;
return x_1;
}
}
@ -1122,7 +1173,7 @@ lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4;
x_1 = lean_unsigned_to_nat(0u);
x_2 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedState_default___closed__2;
x_3 = l_Lean_Meta_Grind_Arith_CommRing_instInhabitedState_default___closed__0;
x_4 = lean_alloc_ctor(0, 10, 0);
x_4 = lean_alloc_ctor(0, 13, 0);
lean_ctor_set(x_4, 0, x_3);
lean_ctor_set(x_4, 1, x_2);
lean_ctor_set(x_4, 2, x_2);
@ -1132,7 +1183,10 @@ lean_ctor_set(x_4, 5, x_2);
lean_ctor_set(x_4, 6, x_3);
lean_ctor_set(x_4, 7, x_2);
lean_ctor_set(x_4, 8, x_2);
lean_ctor_set(x_4, 9, x_1);
lean_ctor_set(x_4, 9, x_3);
lean_ctor_set(x_4, 10, x_2);
lean_ctor_set(x_4, 11, x_2);
lean_ctor_set(x_4, 12, x_1);
return x_4;
}
}
@ -1302,14 +1356,24 @@ l_Lean_Meta_Grind_Arith_CommRing_instInhabitedEqCnstr___closed__0 = _init_l_Lean
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedEqCnstr___closed__0);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedEqCnstr = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedEqCnstr();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedEqCnstr);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__0 = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__0();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__0);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__1 = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__1();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__1);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__2 = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__2();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__2);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__3 = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__3();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__3);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__0 = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__0();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__0);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__1 = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__1();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__1);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__2 = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__2();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__2);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__3 = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__3();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default___closed__3);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing_default);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedRing();
@ -1324,16 +1388,12 @@ l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommRing_default = _init_l_Lean_Me
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommRing_default);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommRing = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommRing();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommRing);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__0 = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__0();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__0);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__1 = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__1();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__1);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__2 = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__2();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default___closed__2);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring_default);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedSemiring);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommSemiring_default___closed__0 = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommSemiring_default___closed__0();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommSemiring_default___closed__0);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommSemiring_default = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommSemiring_default();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommSemiring_default);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommSemiring = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommSemiring();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedCommSemiring);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedState_default___closed__0 = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedState_default___closed__0();
lean_mark_persistent(l_Lean_Meta_Grind_Arith_CommRing_instInhabitedState_default___closed__0);
l_Lean_Meta_Grind_Arith_CommRing_instInhabitedState_default___closed__1 = _init_l_Lean_Meta_Grind_Arith_CommRing_instInhabitedState_default___closed__1();

230
stage0/stdlib/Lean/Meta/Tactic/Grind/Arith/CommRing/VarRename.c generated
View file

@ -38,17 +38,13 @@ uint8_t lean_nat_dec_eq(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Grind_CommRing_Power_renameVars___boxed(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Std_DHashMap_Internal_AssocList_get_x3f___at___Std_DHashMap_Internal_Raw_u2080_Const_get_x3f___at___Lean_Grind_CommRing_Power_renameVars_spec__0_spec__0(lean_object*, lean_object*, lean_object*);
uint64_t lean_uint64_xor(uint64_t, uint64_t);
LEAN_EXPORT lean_object* l_Lean_Grind_Ring_OfSemiring_Expr_renameVars(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Grind_CommRing_Mon_renameVars(lean_object*, lean_object*);
static lean_object* l_Lean_Grind_CommRing_Expr_renameVars___closed__0;
size_t lean_usize_sub(size_t, size_t);
LEAN_EXPORT lean_object* l_Lean_Grind_Ring_OfSemiring_Expr_renameVars___boxed(lean_object*, lean_object*);
static lean_object* l_Lean_Grind_Ring_OfSemiring_Expr_renameVars___closed__0;
lean_object* lean_array_uget(lean_object*, size_t);
LEAN_EXPORT lean_object* l_Lean_Grind_CommRing_Mon_collectVars(lean_object*, lean_object*);
lean_object* lean_array_get_size(lean_object*);
size_t lean_usize_land(size_t, size_t);
LEAN_EXPORT lean_object* l_Lean_Grind_Ring_OfSemiring_Expr_collectVars(lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Std_DHashMap_Internal_AssocList_get_x3f___at___Std_DHashMap_Internal_Raw_u2080_Const_get_x3f___at___Lean_Grind_CommRing_Power_renameVars_spec__0_spec__0___redArg(lean_object* x_1, lean_object* x_2) {
_start:
{
@ -703,230 +699,6 @@ goto _start;
}
}
}
static lean_object* _init_l_Lean_Grind_Ring_OfSemiring_Expr_renameVars___closed__0() {
_start:
{
lean_object* x_1; lean_object* x_2;
x_1 = lean_unsigned_to_nat(0u);
x_2 = lean_alloc_ctor(1, 1, 0);
lean_ctor_set(x_2, 0, x_1);
return x_2;
}
}
LEAN_EXPORT lean_object* l_Lean_Grind_Ring_OfSemiring_Expr_renameVars(lean_object* x_1, lean_object* x_2) {
_start:
{
switch (lean_obj_tag(x_1)) {
case 0:
{
return x_1;
}
case 1:
{
uint8_t x_3;
x_3 = !lean_is_exclusive(x_1);
if (x_3 == 0)
{
lean_object* x_4; lean_object* x_5;
x_4 = lean_ctor_get(x_1, 0);
x_5 = l_Std_DHashMap_Internal_Raw_u2080_Const_get_x3f___at___Lean_Grind_CommRing_Power_renameVars_spec__0___redArg(x_2, x_4);
lean_dec(x_4);
if (lean_obj_tag(x_5) == 0)
{
lean_object* x_6;
lean_free_object(x_1);
x_6 = l_Lean_Grind_Ring_OfSemiring_Expr_renameVars___closed__0;
return x_6;
}
else
{
lean_object* x_7;
x_7 = lean_ctor_get(x_5, 0);
lean_inc(x_7);
lean_dec_ref(x_5);
lean_ctor_set(x_1, 0, x_7);
return x_1;
}
}
else
{
lean_object* x_8; lean_object* x_9;
x_8 = lean_ctor_get(x_1, 0);
lean_inc(x_8);
lean_dec(x_1);
x_9 = l_Std_DHashMap_Internal_Raw_u2080_Const_get_x3f___at___Lean_Grind_CommRing_Power_renameVars_spec__0___redArg(x_2, x_8);
lean_dec(x_8);
if (lean_obj_tag(x_9) == 0)
{
lean_object* x_10;
x_10 = l_Lean_Grind_Ring_OfSemiring_Expr_renameVars___closed__0;
return x_10;
}
else
{
lean_object* x_11; lean_object* x_12;
x_11 = lean_ctor_get(x_9, 0);
lean_inc(x_11);
lean_dec_ref(x_9);
x_12 = lean_alloc_ctor(1, 1, 0);
lean_ctor_set(x_12, 0, x_11);
return x_12;
}
}
}
case 2:
{
uint8_t x_13;
x_13 = !lean_is_exclusive(x_1);
if (x_13 == 0)
{
lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17;
x_14 = lean_ctor_get(x_1, 0);
x_15 = lean_ctor_get(x_1, 1);
x_16 = l_Lean_Grind_Ring_OfSemiring_Expr_renameVars(x_14, x_2);
x_17 = l_Lean_Grind_Ring_OfSemiring_Expr_renameVars(x_15, x_2);
lean_ctor_set(x_1, 1, x_17);
lean_ctor_set(x_1, 0, x_16);
return x_1;
}
else
{
lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22;
x_18 = lean_ctor_get(x_1, 0);
x_19 = lean_ctor_get(x_1, 1);
lean_inc(x_19);
lean_inc(x_18);
lean_dec(x_1);
x_20 = l_Lean_Grind_Ring_OfSemiring_Expr_renameVars(x_18, x_2);
x_21 = l_Lean_Grind_Ring_OfSemiring_Expr_renameVars(x_19, x_2);
x_22 = lean_alloc_ctor(2, 2, 0);
lean_ctor_set(x_22, 0, x_20);
lean_ctor_set(x_22, 1, x_21);
return x_22;
}
}
case 3:
{
uint8_t x_23;
x_23 = !lean_is_exclusive(x_1);
if (x_23 == 0)
{
lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27;
x_24 = lean_ctor_get(x_1, 0);
x_25 = lean_ctor_get(x_1, 1);
x_26 = l_Lean_Grind_Ring_OfSemiring_Expr_renameVars(x_24, x_2);
x_27 = l_Lean_Grind_Ring_OfSemiring_Expr_renameVars(x_25, x_2);
lean_ctor_set(x_1, 1, x_27);
lean_ctor_set(x_1, 0, x_26);
return x_1;
}
else
{
lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32;
x_28 = lean_ctor_get(x_1, 0);
x_29 = lean_ctor_get(x_1, 1);
lean_inc(x_29);
lean_inc(x_28);
lean_dec(x_1);
x_30 = l_Lean_Grind_Ring_OfSemiring_Expr_renameVars(x_28, x_2);
x_31 = l_Lean_Grind_Ring_OfSemiring_Expr_renameVars(x_29, x_2);
x_32 = lean_alloc_ctor(3, 2, 0);
lean_ctor_set(x_32, 0, x_30);
lean_ctor_set(x_32, 1, x_31);
return x_32;
}
}
default:
{
uint8_t x_33;
x_33 = !lean_is_exclusive(x_1);
if (x_33 == 0)
{
lean_object* x_34; lean_object* x_35;
x_34 = lean_ctor_get(x_1, 0);
x_35 = l_Lean_Grind_Ring_OfSemiring_Expr_renameVars(x_34, x_2);
lean_ctor_set(x_1, 0, x_35);
return x_1;
}
else
{
lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39;
x_36 = lean_ctor_get(x_1, 0);
x_37 = lean_ctor_get(x_1, 1);
lean_inc(x_37);
lean_inc(x_36);
lean_dec(x_1);
x_38 = l_Lean_Grind_Ring_OfSemiring_Expr_renameVars(x_36, x_2);
x_39 = lean_alloc_ctor(4, 2, 0);
lean_ctor_set(x_39, 0, x_38);
lean_ctor_set(x_39, 1, x_37);
return x_39;
}
}
}
}
}
LEAN_EXPORT lean_object* l_Lean_Grind_Ring_OfSemiring_Expr_renameVars___boxed(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3;
x_3 = l_Lean_Grind_Ring_OfSemiring_Expr_renameVars(x_1, x_2);
lean_dec_ref(x_2);
return x_3;
}
}
LEAN_EXPORT lean_object* l_Lean_Grind_Ring_OfSemiring_Expr_collectVars(lean_object* x_1, lean_object* x_2) {
_start:
{
lean_object* x_3; lean_object* x_4; lean_object* x_5;
switch (lean_obj_tag(x_1)) {
case 0:
{
lean_dec_ref(x_1);
return x_2;
}
case 1:
{
lean_object* x_9; lean_object* x_10;
x_9 = lean_ctor_get(x_1, 0);
lean_inc(x_9);
lean_dec_ref(x_1);
x_10 = l_Lean_Meta_Grind_collectVar(x_9, x_2);
return x_10;
}
case 4:
{
lean_object* x_11;
x_11 = lean_ctor_get(x_1, 0);
lean_inc_ref(x_11);
lean_dec_ref(x_1);
x_1 = x_11;
goto _start;
}
default:
{
lean_object* x_13; lean_object* x_14;
x_13 = lean_ctor_get(x_1, 0);
lean_inc_ref(x_13);
x_14 = lean_ctor_get(x_1, 1);
lean_inc_ref(x_14);
lean_dec_ref(x_1);
x_3 = x_13;
x_4 = x_14;
x_5 = x_2;
goto block_8;
}
}
block_8:
{
lean_object* x_6;
x_6 = l_Lean_Grind_Ring_OfSemiring_Expr_collectVars(x_3, x_5);
x_1 = x_4;
x_2 = x_6;
goto _start;
}
}
}
lean_object* initialize_Init_Grind_Ring_CommSolver(uint8_t builtin, lean_object*);
lean_object* initialize_Init_Grind_Ring_CommSemiringAdapter(uint8_t builtin, lean_object*);
lean_object* initialize_Lean_Meta_Tactic_Grind_VarRename(uint8_t builtin, lean_object*);
@ -946,8 +718,6 @@ if (lean_io_result_is_error(res)) return res;
lean_dec_ref(res);
l_Lean_Grind_CommRing_Expr_renameVars___closed__0 = _init_l_Lean_Grind_CommRing_Expr_renameVars___closed__0();
lean_mark_persistent(l_Lean_Grind_CommRing_Expr_renameVars___closed__0);
l_Lean_Grind_Ring_OfSemiring_Expr_renameVars___closed__0 = _init_l_Lean_Grind_Ring_OfSemiring_Expr_renameVars___closed__0();
lean_mark_persistent(l_Lean_Grind_Ring_OfSemiring_Expr_renameVars___closed__0);
return lean_io_result_mk_ok(lean_box(0));
}
#ifdef __cplusplus

2989
stage0/stdlib/Lean/Meta/Tactic/Grind/Attr.c generated
View file

File diff suppressed because it is too large Load diff

18502
stage0/stdlib/Lean/Meta/Tactic/Grind/EMatchTheorem.c generated
View file

File diff suppressed because it is too large Load diff

368
stage0/stdlib/Lean/Meta/Tactic/Grind/ForallProp.c generated
View file

@ -32,7 +32,7 @@ static lean_object* l___private_Lean_Meta_Tactic_Grind_ForallProp_0____regBuilti
static lean_object* l_Lean_Meta_Grind_propagateForallPropDown___closed__2;
static lean_object* l_Lean_Meta_Grind_propagateForallPropUp___closed__7;
LEAN_EXPORT lean_object* l_Lean_addTrace___at___Lean_Meta_Grind_propagateForallPropUp_spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Meta_Grind_mkEMatchTheoremWithKind_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
lean_object* l_Lean_Meta_Grind_mkEMatchTheoremWithKind_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
static lean_object* l_Lean_Meta_Grind_simpForall___closed__25;
LEAN_EXPORT lean_object* l_Lean_isTracingEnabledFor___at___Lean_Meta_Grind_propagateForallPropUp_spec__0___redArg(lean_object*, lean_object*, lean_object*);
LEAN_EXPORT lean_object* l_Lean_Meta_Grind_simpForall(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*);
@ -2944,7 +2944,7 @@ _start:
lean_object* x_10; uint8_t x_11; lean_object* x_12;
x_10 = l___private_Lean_Meta_Tactic_Grind_ForallProp_0__Lean_Meta_Grind_mkEMatchTheoremWithKind_x27_x3f___closed__0;
x_11 = 0;
x_12 = l_Lean_Meta_Grind_mkEMatchTheoremWithKind_x3f(x_1, x_10, x_2, x_3, x_4, x_11, x_11, x_5, x_6, x_7, x_8, x_9);
x_12 = l_Lean_Meta_Grind_mkEMatchTheoremWithKind_x3f(x_1, x_10, x_2, x_3, x_4, x_11, x_11, x_11, x_5, x_6, x_7, x_8, x_9);
if (lean_obj_tag(x_12) == 0)
{
return x_12;
@ -3315,7 +3315,7 @@ return x_2;
LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Grind_ForallProp_0__Lean_Meta_Grind_addLocalEMatchTheorems(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) {
_start:
{
lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_71; lean_object* x_72; uint8_t x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_106; lean_object* x_107; uint8_t x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_136;
lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; uint8_t x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; uint8_t x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_136;
lean_inc(x_9);
lean_inc_ref(x_8);
lean_inc(x_7);
@ -3697,12 +3697,12 @@ lean_dec_ref(x_171);
x_176 = lean_ctor_get(x_173, 2);
lean_inc(x_176);
lean_dec_ref(x_173);
x_106 = x_156;
x_107 = x_158;
x_108 = x_161;
x_109 = x_176;
x_110 = x_153;
x_111 = x_139;
x_106 = x_153;
x_107 = x_176;
x_108 = x_156;
x_109 = x_139;
x_110 = x_158;
x_111 = x_161;
x_112 = x_168;
x_113 = x_140;
x_114 = x_141;
@ -3731,12 +3731,12 @@ x_180 = l___private_Lean_Meta_Tactic_Grind_ForallProp_0__Lean_Meta_Grind_isNewPa
if (x_180 == 0)
{
lean_dec(x_179);
x_106 = x_156;
x_107 = x_158;
x_108 = x_161;
x_109 = x_178;
x_110 = x_153;
x_111 = x_139;
x_106 = x_153;
x_107 = x_178;
x_108 = x_156;
x_109 = x_139;
x_110 = x_158;
x_111 = x_161;
x_112 = x_168;
x_113 = x_140;
x_114 = x_141;
@ -3773,12 +3773,12 @@ x_183 = lean_ctor_get(x_179, 3);
lean_inc(x_183);
lean_dec(x_179);
x_184 = lean_array_push(x_168, x_183);
x_106 = x_156;
x_107 = x_158;
x_108 = x_161;
x_109 = x_178;
x_110 = x_153;
x_111 = x_139;
x_106 = x_153;
x_107 = x_178;
x_108 = x_156;
x_109 = x_139;
x_110 = x_158;
x_111 = x_161;
x_112 = x_184;
x_113 = x_140;
x_114 = x_141;
@ -4316,15 +4316,15 @@ lean_dec_ref(x_86);
x_91 = lean_ctor_get(x_89, 2);
lean_inc(x_91);
lean_dec_ref(x_89);
x_92 = lean_nat_dec_eq(x_91, x_74);
x_92 = lean_nat_dec_eq(x_91, x_73);
lean_dec(x_91);
if (x_92 == 0)
{
lean_dec_ref(x_76);
lean_dec(x_75);
lean_dec_ref(x_75);
lean_dec_ref(x_74);
lean_dec_ref(x_72);
lean_dec_ref(x_71);
x_11 = x_74;
lean_dec(x_71);
x_11 = x_73;
x_12 = x_77;
x_13 = x_78;
x_14 = x_79;
@ -4340,12 +4340,12 @@ else
{
lean_object* x_93; lean_object* x_94;
x_93 = lean_alloc_ctor(8, 0, 1);
lean_ctor_set_uint8(x_93, 0, x_73);
lean_ctor_set_uint8(x_93, 0, x_76);
lean_inc(x_84);
lean_inc_ref(x_83);
lean_inc(x_82);
lean_inc_ref(x_81);
x_94 = l___private_Lean_Meta_Tactic_Grind_ForallProp_0__Lean_Meta_Grind_mkEMatchTheoremWithKind_x27_x3f(x_76, x_72, x_93, x_71, x_81, x_82, x_83, x_84, x_90);
x_94 = l___private_Lean_Meta_Tactic_Grind_ForallProp_0__Lean_Meta_Grind_mkEMatchTheoremWithKind_x27_x3f(x_74, x_75, x_93, x_72, x_81, x_82, x_83, x_84, x_90);
if (lean_obj_tag(x_94) == 0)
{
lean_object* x_95;
@ -4354,11 +4354,11 @@ lean_inc(x_95);
if (lean_obj_tag(x_95) == 0)
{
lean_object* x_96;
lean_dec(x_75);
lean_dec(x_71);
x_96 = lean_ctor_get(x_94, 1);
lean_inc(x_96);
lean_dec_ref(x_94);
x_11 = x_74;
x_11 = x_73;
x_12 = x_77;
x_13 = x_78;
x_14 = x_79;
@ -4387,14 +4387,14 @@ lean_inc(x_80);
lean_inc_ref(x_79);
lean_inc(x_78);
lean_inc(x_77);
x_99 = l_Lean_Meta_Grind_activateTheorem(x_98, x_75, x_77, x_78, x_79, x_80, x_81, x_82, x_83, x_84, x_97);
x_99 = l_Lean_Meta_Grind_activateTheorem(x_98, x_71, x_77, x_78, x_79, x_80, x_81, x_82, x_83, x_84, x_97);
if (lean_obj_tag(x_99) == 0)
{
lean_object* x_100;
x_100 = lean_ctor_get(x_99, 1);
lean_inc(x_100);
lean_dec_ref(x_99);
x_11 = x_74;
x_11 = x_73;
x_12 = x_77;
x_13 = x_78;
x_14 = x_79;
@ -4416,7 +4416,7 @@ lean_dec(x_80);
lean_dec_ref(x_79);
lean_dec(x_78);
lean_dec(x_77);
lean_dec(x_74);
lean_dec(x_73);
lean_dec_ref(x_1);
return x_99;
}
@ -4433,8 +4433,8 @@ lean_dec(x_80);
lean_dec_ref(x_79);
lean_dec(x_78);
lean_dec(x_77);
lean_dec(x_75);
lean_dec(x_74);
lean_dec(x_73);
lean_dec(x_71);
lean_dec_ref(x_1);
x_101 = !lean_is_exclusive(x_94);
if (x_101 == 0)
@ -4465,10 +4465,10 @@ lean_inc(x_120);
lean_inc_ref(x_119);
lean_inc(x_118);
lean_inc_ref(x_117);
lean_inc_ref(x_106);
lean_inc_ref(x_107);
lean_inc_ref(x_111);
x_123 = l___private_Lean_Meta_Tactic_Grind_ForallProp_0__Lean_Meta_Grind_mkEMatchTheoremWithKind_x27_x3f(x_111, x_107, x_122, x_106, x_117, x_118, x_119, x_120, x_121);
lean_inc_ref(x_108);
lean_inc_ref(x_110);
lean_inc_ref(x_109);
x_123 = l___private_Lean_Meta_Tactic_Grind_ForallProp_0__Lean_Meta_Grind_mkEMatchTheoremWithKind_x27_x3f(x_109, x_110, x_122, x_108, x_117, x_118, x_119, x_120, x_121);
if (lean_obj_tag(x_123) == 0)
{
lean_object* x_124;
@ -4482,8 +4482,8 @@ x_125 = lean_ctor_get(x_123, 1);
lean_inc(x_125);
lean_dec_ref(x_123);
x_71 = x_106;
x_72 = x_107;
x_73 = x_108;
x_72 = x_108;
x_73 = x_107;
x_74 = x_109;
x_75 = x_110;
x_76 = x_111;
@ -4513,8 +4513,8 @@ if (x_128 == 0)
{
lean_dec(x_127);
x_71 = x_106;
x_72 = x_107;
x_73 = x_108;
x_72 = x_108;
x_73 = x_107;
x_74 = x_109;
x_75 = x_110;
x_76 = x_111;
@ -4540,8 +4540,8 @@ lean_inc(x_116);
lean_inc_ref(x_115);
lean_inc(x_114);
lean_inc(x_113);
lean_inc(x_110);
x_129 = l_Lean_Meta_Grind_activateTheorem(x_127, x_110, x_113, x_114, x_115, x_116, x_117, x_118, x_119, x_120, x_126);
lean_inc(x_106);
x_129 = l_Lean_Meta_Grind_activateTheorem(x_127, x_106, x_113, x_114, x_115, x_116, x_117, x_118, x_119, x_120, x_126);
if (lean_obj_tag(x_129) == 0)
{
lean_object* x_130;
@ -4549,8 +4549,8 @@ x_130 = lean_ctor_get(x_129, 1);
lean_inc(x_130);
lean_dec_ref(x_129);
x_71 = x_106;
x_72 = x_107;
x_73 = x_108;
x_72 = x_108;
x_73 = x_107;
x_74 = x_109;
x_75 = x_110;
x_76 = x_111;
@ -4575,11 +4575,11 @@ lean_dec(x_116);
lean_dec_ref(x_115);
lean_dec(x_114);
lean_dec(x_113);
lean_dec_ref(x_111);
lean_dec(x_110);
lean_dec(x_109);
lean_dec_ref(x_107);
lean_dec_ref(x_106);
lean_dec_ref(x_110);
lean_dec_ref(x_109);
lean_dec_ref(x_108);
lean_dec(x_107);
lean_dec(x_106);
lean_dec_ref(x_1);
return x_129;
}
@ -4598,11 +4598,11 @@ lean_dec_ref(x_115);
lean_dec(x_114);
lean_dec(x_113);
lean_dec_ref(x_112);
lean_dec_ref(x_111);
lean_dec(x_110);
lean_dec(x_109);
lean_dec_ref(x_107);
lean_dec_ref(x_106);
lean_dec_ref(x_110);
lean_dec_ref(x_109);
lean_dec_ref(x_108);
lean_dec(x_107);
lean_dec(x_106);
lean_dec_ref(x_1);
x_131 = !lean_is_exclusive(x_123);
if (x_131 == 0)
@ -8394,17 +8394,17 @@ block_446:
{
if (x_26 == 0)
{
lean_dec(x_25);
lean_dec_ref(x_24);
lean_dec_ref(x_23);
lean_dec(x_22);
lean_dec_ref(x_25);
lean_dec(x_23);
lean_dec_ref(x_22);
lean_dec(x_21);
lean_dec(x_20);
lean_dec_ref(x_19);
lean_dec(x_18);
lean_dec_ref(x_16);
lean_dec_ref(x_15);
lean_dec(x_14);
x_10 = x_20;
x_10 = x_24;
goto block_13;
}
else
@ -8423,30 +8423,30 @@ x_31 = lean_name_eq(x_29, x_30);
if (x_31 == 0)
{
lean_object* x_32; uint8_t x_33;
lean_dec(x_25);
lean_dec_ref(x_24);
lean_dec(x_21);
lean_dec(x_20);
lean_dec_ref(x_19);
x_32 = l_Lean_Meta_Grind_simpForall___closed__4;
x_33 = lean_name_eq(x_29, x_32);
lean_dec(x_29);
if (x_33 == 0)
{
lean_dec_ref(x_27);
lean_dec_ref(x_23);
lean_dec(x_22);
lean_dec_ref(x_19);
lean_dec_ref(x_25);
lean_dec(x_23);
lean_dec_ref(x_22);
lean_dec(x_18);
lean_dec_ref(x_16);
lean_dec_ref(x_15);
lean_dec(x_14);
x_10 = x_20;
x_10 = x_24;
goto block_13;
}
else
{
lean_object* x_34;
lean_inc_ref(x_15);
x_34 = l_Lean_Meta_getLevel(x_15, x_23, x_22, x_19, x_18, x_20);
x_34 = l_Lean_Meta_getLevel(x_15, x_25, x_18, x_22, x_23, x_24);
if (lean_obj_tag(x_34) == 0)
{
uint8_t x_35;
@ -8583,16 +8583,16 @@ lean_dec_ref(x_75);
if (lean_obj_tag(x_77) == 0)
{
lean_dec_ref(x_74);
lean_dec(x_25);
lean_dec_ref(x_24);
lean_dec_ref(x_23);
lean_dec(x_22);
lean_dec_ref(x_25);
lean_dec(x_23);
lean_dec_ref(x_22);
lean_dec(x_21);
lean_dec(x_20);
lean_dec_ref(x_19);
lean_dec(x_18);
lean_dec_ref(x_15);
lean_dec(x_14);
x_10 = x_20;
x_10 = x_24;
goto block_13;
}
else
@ -8615,12 +8615,12 @@ lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86;
x_83 = lean_ctor_get(x_79, 0);
x_84 = lean_ctor_get(x_81, 0);
x_85 = lean_ctor_get(x_81, 1);
lean_inc(x_23);
lean_inc_ref(x_22);
lean_inc(x_18);
lean_inc_ref(x_19);
lean_inc(x_22);
lean_inc_ref(x_23);
lean_inc_ref(x_25);
lean_inc_ref(x_15);
x_86 = l_Lean_Meta_getLevel(x_15, x_23, x_22, x_19, x_18, x_20);
x_86 = l_Lean_Meta_getLevel(x_15, x_25, x_18, x_22, x_23, x_24);
if (lean_obj_tag(x_86) == 0)
{
lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90;
@ -8634,7 +8634,7 @@ x_89 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_simpForall___lam__0___boxed)
lean_closure_set(x_89, 0, x_84);
lean_inc_ref(x_15);
lean_inc(x_14);
x_90 = l_Lean_Meta_withLocalDeclD___at___Lean_Meta_Grind_simpForall_spec__0___redArg(x_14, x_15, x_89, x_21, x_24, x_25, x_23, x_22, x_19, x_18, x_88);
x_90 = l_Lean_Meta_withLocalDeclD___at___Lean_Meta_Grind_simpForall_spec__0___redArg(x_14, x_15, x_89, x_21, x_19, x_20, x_25, x_18, x_22, x_23, x_88);
if (lean_obj_tag(x_90) == 0)
{
uint8_t x_91;
@ -8783,11 +8783,11 @@ lean_free_object(x_79);
lean_dec(x_83);
lean_free_object(x_77);
lean_dec_ref(x_74);
lean_dec(x_25);
lean_dec_ref(x_24);
lean_dec_ref(x_23);
lean_dec(x_22);
lean_dec_ref(x_25);
lean_dec(x_23);
lean_dec_ref(x_22);
lean_dec(x_21);
lean_dec(x_20);
lean_dec_ref(x_19);
lean_dec(x_18);
lean_dec_ref(x_15);
@ -8821,12 +8821,12 @@ x_140 = lean_ctor_get(x_81, 1);
lean_inc(x_140);
lean_inc(x_139);
lean_dec(x_81);
lean_inc(x_23);
lean_inc_ref(x_22);
lean_inc(x_18);
lean_inc_ref(x_19);
lean_inc(x_22);
lean_inc_ref(x_23);
lean_inc_ref(x_25);
lean_inc_ref(x_15);
x_141 = l_Lean_Meta_getLevel(x_15, x_23, x_22, x_19, x_18, x_20);
x_141 = l_Lean_Meta_getLevel(x_15, x_25, x_18, x_22, x_23, x_24);
if (lean_obj_tag(x_141) == 0)
{
lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145;
@ -8840,7 +8840,7 @@ x_144 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_simpForall___lam__0___boxed
lean_closure_set(x_144, 0, x_139);
lean_inc_ref(x_15);
lean_inc(x_14);
x_145 = l_Lean_Meta_withLocalDeclD___at___Lean_Meta_Grind_simpForall_spec__0___redArg(x_14, x_15, x_144, x_21, x_24, x_25, x_23, x_22, x_19, x_18, x_143);
x_145 = l_Lean_Meta_withLocalDeclD___at___Lean_Meta_Grind_simpForall_spec__0___redArg(x_14, x_15, x_144, x_21, x_19, x_20, x_25, x_18, x_22, x_23, x_143);
if (lean_obj_tag(x_145) == 0)
{
lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; uint8_t x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167;
@ -8949,11 +8949,11 @@ lean_free_object(x_79);
lean_dec(x_138);
lean_free_object(x_77);
lean_dec_ref(x_74);
lean_dec(x_25);
lean_dec_ref(x_24);
lean_dec_ref(x_23);
lean_dec(x_22);
lean_dec_ref(x_25);
lean_dec(x_23);
lean_dec_ref(x_22);
lean_dec(x_21);
lean_dec(x_20);
lean_dec_ref(x_19);
lean_dec(x_18);
lean_dec_ref(x_15);
@ -9001,12 +9001,12 @@ if (lean_is_exclusive(x_176)) {
lean_dec_ref(x_176);
x_180 = lean_box(0);
}
lean_inc(x_23);
lean_inc_ref(x_22);
lean_inc(x_18);
lean_inc_ref(x_19);
lean_inc(x_22);
lean_inc_ref(x_23);
lean_inc_ref(x_25);
lean_inc_ref(x_15);
x_181 = l_Lean_Meta_getLevel(x_15, x_23, x_22, x_19, x_18, x_20);
x_181 = l_Lean_Meta_getLevel(x_15, x_25, x_18, x_22, x_23, x_24);
if (lean_obj_tag(x_181) == 0)
{
lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185;
@ -9020,7 +9020,7 @@ x_184 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_simpForall___lam__0___boxed
lean_closure_set(x_184, 0, x_178);
lean_inc_ref(x_15);
lean_inc(x_14);
x_185 = l_Lean_Meta_withLocalDeclD___at___Lean_Meta_Grind_simpForall_spec__0___redArg(x_14, x_15, x_184, x_21, x_24, x_25, x_23, x_22, x_19, x_18, x_183);
x_185 = l_Lean_Meta_withLocalDeclD___at___Lean_Meta_Grind_simpForall_spec__0___redArg(x_14, x_15, x_184, x_21, x_19, x_20, x_25, x_18, x_22, x_23, x_183);
if (lean_obj_tag(x_185) == 0)
{
lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; uint8_t x_190; lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; lean_object* x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; lean_object* x_207; lean_object* x_208;
@ -9134,11 +9134,11 @@ lean_dec(x_178);
lean_dec(x_177);
lean_free_object(x_77);
lean_dec_ref(x_74);
lean_dec(x_25);
lean_dec_ref(x_24);
lean_dec_ref(x_23);
lean_dec(x_22);
lean_dec_ref(x_25);
lean_dec(x_23);
lean_dec_ref(x_22);
lean_dec(x_21);
lean_dec(x_20);
lean_dec_ref(x_19);
lean_dec(x_18);
lean_dec_ref(x_15);
@ -9196,12 +9196,12 @@ if (lean_is_exclusive(x_218)) {
lean_dec_ref(x_218);
x_223 = lean_box(0);
}
lean_inc(x_23);
lean_inc_ref(x_22);
lean_inc(x_18);
lean_inc_ref(x_19);
lean_inc(x_22);
lean_inc_ref(x_23);
lean_inc_ref(x_25);
lean_inc_ref(x_15);
x_224 = l_Lean_Meta_getLevel(x_15, x_23, x_22, x_19, x_18, x_20);
x_224 = l_Lean_Meta_getLevel(x_15, x_25, x_18, x_22, x_23, x_24);
if (lean_obj_tag(x_224) == 0)
{
lean_object* x_225; lean_object* x_226; lean_object* x_227; lean_object* x_228;
@ -9215,7 +9215,7 @@ x_227 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_simpForall___lam__0___boxed
lean_closure_set(x_227, 0, x_221);
lean_inc_ref(x_15);
lean_inc(x_14);
x_228 = l_Lean_Meta_withLocalDeclD___at___Lean_Meta_Grind_simpForall_spec__0___redArg(x_14, x_15, x_227, x_21, x_24, x_25, x_23, x_22, x_19, x_18, x_226);
x_228 = l_Lean_Meta_withLocalDeclD___at___Lean_Meta_Grind_simpForall_spec__0___redArg(x_14, x_15, x_227, x_21, x_19, x_20, x_25, x_18, x_22, x_23, x_226);
if (lean_obj_tag(x_228) == 0)
{
lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; uint8_t x_233; lean_object* x_234; lean_object* x_235; lean_object* x_236; lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; lean_object* x_245; lean_object* x_246; lean_object* x_247; lean_object* x_248; lean_object* x_249; lean_object* x_250; lean_object* x_251; lean_object* x_252;
@ -9335,11 +9335,11 @@ lean_dec(x_221);
lean_dec(x_220);
lean_dec(x_219);
lean_dec_ref(x_74);
lean_dec(x_25);
lean_dec_ref(x_24);
lean_dec_ref(x_23);
lean_dec(x_22);
lean_dec_ref(x_25);
lean_dec(x_23);
lean_dec_ref(x_22);
lean_dec(x_21);
lean_dec(x_20);
lean_dec_ref(x_19);
lean_dec(x_18);
lean_dec_ref(x_15);
@ -9389,12 +9389,12 @@ lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269;
x_266 = lean_ctor_get(x_262, 0);
x_267 = lean_ctor_get(x_264, 0);
x_268 = lean_ctor_get(x_264, 1);
lean_inc(x_23);
lean_inc_ref(x_22);
lean_inc(x_18);
lean_inc_ref(x_19);
lean_inc(x_22);
lean_inc_ref(x_23);
lean_inc_ref(x_25);
lean_inc_ref(x_15);
x_269 = l_Lean_Meta_getLevel(x_15, x_23, x_22, x_19, x_18, x_20);
x_269 = l_Lean_Meta_getLevel(x_15, x_25, x_18, x_22, x_23, x_24);
if (lean_obj_tag(x_269) == 0)
{
lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_object* x_273;
@ -9408,7 +9408,7 @@ x_272 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_simpForall___lam__0___boxed
lean_closure_set(x_272, 0, x_267);
lean_inc_ref(x_15);
lean_inc(x_14);
x_273 = l_Lean_Meta_withLocalDeclD___at___Lean_Meta_Grind_simpForall_spec__0___redArg(x_14, x_15, x_272, x_21, x_24, x_25, x_23, x_22, x_19, x_18, x_271);
x_273 = l_Lean_Meta_withLocalDeclD___at___Lean_Meta_Grind_simpForall_spec__0___redArg(x_14, x_15, x_272, x_21, x_19, x_20, x_25, x_18, x_22, x_23, x_271);
if (lean_obj_tag(x_273) == 0)
{
uint8_t x_274;
@ -9557,11 +9557,11 @@ lean_free_object(x_262);
lean_dec(x_266);
lean_free_object(x_76);
lean_dec_ref(x_75);
lean_dec(x_25);
lean_dec_ref(x_24);
lean_dec_ref(x_23);
lean_dec(x_22);
lean_dec_ref(x_25);
lean_dec(x_23);
lean_dec_ref(x_22);
lean_dec(x_21);
lean_dec(x_20);
lean_dec_ref(x_19);
lean_dec(x_18);
lean_dec_ref(x_15);
@ -9595,12 +9595,12 @@ x_323 = lean_ctor_get(x_264, 1);
lean_inc(x_323);
lean_inc(x_322);
lean_dec(x_264);
lean_inc(x_23);
lean_inc_ref(x_22);
lean_inc(x_18);
lean_inc_ref(x_19);
lean_inc(x_22);
lean_inc_ref(x_23);
lean_inc_ref(x_25);
lean_inc_ref(x_15);
x_324 = l_Lean_Meta_getLevel(x_15, x_23, x_22, x_19, x_18, x_20);
x_324 = l_Lean_Meta_getLevel(x_15, x_25, x_18, x_22, x_23, x_24);
if (lean_obj_tag(x_324) == 0)
{
lean_object* x_325; lean_object* x_326; lean_object* x_327; lean_object* x_328;
@ -9614,7 +9614,7 @@ x_327 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_simpForall___lam__0___boxed
lean_closure_set(x_327, 0, x_322);
lean_inc_ref(x_15);
lean_inc(x_14);
x_328 = l_Lean_Meta_withLocalDeclD___at___Lean_Meta_Grind_simpForall_spec__0___redArg(x_14, x_15, x_327, x_21, x_24, x_25, x_23, x_22, x_19, x_18, x_326);
x_328 = l_Lean_Meta_withLocalDeclD___at___Lean_Meta_Grind_simpForall_spec__0___redArg(x_14, x_15, x_327, x_21, x_19, x_20, x_25, x_18, x_22, x_23, x_326);
if (lean_obj_tag(x_328) == 0)
{
lean_object* x_329; lean_object* x_330; lean_object* x_331; lean_object* x_332; uint8_t x_333; lean_object* x_334; lean_object* x_335; lean_object* x_336; lean_object* x_337; lean_object* x_338; lean_object* x_339; lean_object* x_340; lean_object* x_341; lean_object* x_342; lean_object* x_343; lean_object* x_344; lean_object* x_345; lean_object* x_346; lean_object* x_347; lean_object* x_348; lean_object* x_349; lean_object* x_350;
@ -9723,11 +9723,11 @@ lean_free_object(x_262);
lean_dec(x_321);
lean_free_object(x_76);
lean_dec_ref(x_75);
lean_dec(x_25);
lean_dec_ref(x_24);
lean_dec_ref(x_23);
lean_dec(x_22);
lean_dec_ref(x_25);
lean_dec(x_23);
lean_dec_ref(x_22);
lean_dec(x_21);
lean_dec(x_20);
lean_dec_ref(x_19);
lean_dec(x_18);
lean_dec_ref(x_15);
@ -9775,12 +9775,12 @@ if (lean_is_exclusive(x_359)) {
lean_dec_ref(x_359);
x_363 = lean_box(0);
}
lean_inc(x_23);
lean_inc_ref(x_22);
lean_inc(x_18);
lean_inc_ref(x_19);
lean_inc(x_22);
lean_inc_ref(x_23);
lean_inc_ref(x_25);
lean_inc_ref(x_15);
x_364 = l_Lean_Meta_getLevel(x_15, x_23, x_22, x_19, x_18, x_20);
x_364 = l_Lean_Meta_getLevel(x_15, x_25, x_18, x_22, x_23, x_24);
if (lean_obj_tag(x_364) == 0)
{
lean_object* x_365; lean_object* x_366; lean_object* x_367; lean_object* x_368;
@ -9794,7 +9794,7 @@ x_367 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_simpForall___lam__0___boxed
lean_closure_set(x_367, 0, x_361);
lean_inc_ref(x_15);
lean_inc(x_14);
x_368 = l_Lean_Meta_withLocalDeclD___at___Lean_Meta_Grind_simpForall_spec__0___redArg(x_14, x_15, x_367, x_21, x_24, x_25, x_23, x_22, x_19, x_18, x_366);
x_368 = l_Lean_Meta_withLocalDeclD___at___Lean_Meta_Grind_simpForall_spec__0___redArg(x_14, x_15, x_367, x_21, x_19, x_20, x_25, x_18, x_22, x_23, x_366);
if (lean_obj_tag(x_368) == 0)
{
lean_object* x_369; lean_object* x_370; lean_object* x_371; lean_object* x_372; uint8_t x_373; lean_object* x_374; lean_object* x_375; lean_object* x_376; lean_object* x_377; lean_object* x_378; lean_object* x_379; lean_object* x_380; lean_object* x_381; lean_object* x_382; lean_object* x_383; lean_object* x_384; lean_object* x_385; lean_object* x_386; lean_object* x_387; lean_object* x_388; lean_object* x_389; lean_object* x_390; lean_object* x_391;
@ -9908,11 +9908,11 @@ lean_dec(x_361);
lean_dec(x_360);
lean_free_object(x_76);
lean_dec_ref(x_75);
lean_dec(x_25);
lean_dec_ref(x_24);
lean_dec_ref(x_23);
lean_dec(x_22);
lean_dec_ref(x_25);
lean_dec(x_23);
lean_dec_ref(x_22);
lean_dec(x_21);
lean_dec(x_20);
lean_dec_ref(x_19);
lean_dec(x_18);
lean_dec_ref(x_15);
@ -9970,12 +9970,12 @@ if (lean_is_exclusive(x_401)) {
lean_dec_ref(x_401);
x_406 = lean_box(0);
}
lean_inc(x_23);
lean_inc_ref(x_22);
lean_inc(x_18);
lean_inc_ref(x_19);
lean_inc(x_22);
lean_inc_ref(x_23);
lean_inc_ref(x_25);
lean_inc_ref(x_15);
x_407 = l_Lean_Meta_getLevel(x_15, x_23, x_22, x_19, x_18, x_20);
x_407 = l_Lean_Meta_getLevel(x_15, x_25, x_18, x_22, x_23, x_24);
if (lean_obj_tag(x_407) == 0)
{
lean_object* x_408; lean_object* x_409; lean_object* x_410; lean_object* x_411;
@ -9989,7 +9989,7 @@ x_410 = lean_alloc_closure((void*)(l_Lean_Meta_Grind_simpForall___lam__0___boxed
lean_closure_set(x_410, 0, x_404);
lean_inc_ref(x_15);
lean_inc(x_14);
x_411 = l_Lean_Meta_withLocalDeclD___at___Lean_Meta_Grind_simpForall_spec__0___redArg(x_14, x_15, x_410, x_21, x_24, x_25, x_23, x_22, x_19, x_18, x_409);
x_411 = l_Lean_Meta_withLocalDeclD___at___Lean_Meta_Grind_simpForall_spec__0___redArg(x_14, x_15, x_410, x_21, x_19, x_20, x_25, x_18, x_22, x_23, x_409);
if (lean_obj_tag(x_411) == 0)
{
lean_object* x_412; lean_object* x_413; lean_object* x_414; lean_object* x_415; uint8_t x_416; lean_object* x_417; lean_object* x_418; lean_object* x_419; lean_object* x_420; lean_object* x_421; lean_object* x_422; lean_object* x_423; lean_object* x_424; lean_object* x_425; lean_object* x_426; lean_object* x_427; lean_object* x_428; lean_object* x_429; lean_object* x_430; lean_object* x_431; lean_object* x_432; lean_object* x_433; lean_object* x_434; lean_object* x_435;
@ -10109,11 +10109,11 @@ lean_dec(x_404);
lean_dec(x_403);
lean_dec(x_402);
lean_dec_ref(x_75);
lean_dec(x_25);
lean_dec_ref(x_24);
lean_dec_ref(x_23);
lean_dec(x_22);
lean_dec_ref(x_25);
lean_dec(x_23);
lean_dec_ref(x_22);
lean_dec(x_21);
lean_dec(x_20);
lean_dec_ref(x_19);
lean_dec(x_18);
lean_dec_ref(x_15);
@ -10148,11 +10148,11 @@ else
lean_object* x_444; lean_object* x_445;
lean_dec_ref(x_28);
lean_dec_ref(x_27);
lean_dec(x_25);
lean_dec_ref(x_24);
lean_dec_ref(x_23);
lean_dec(x_22);
lean_dec_ref(x_25);
lean_dec(x_23);
lean_dec_ref(x_22);
lean_dec(x_21);
lean_dec(x_20);
lean_dec_ref(x_19);
lean_dec(x_18);
lean_dec_ref(x_16);
@ -10161,7 +10161,7 @@ lean_dec(x_14);
x_444 = l_Lean_Meta_Grind_simpForall___closed__0;
x_445 = lean_alloc_ctor(0, 2, 0);
lean_ctor_set(x_445, 0, x_444);
lean_ctor_set(x_445, 1, x_20);
lean_ctor_set(x_445, 1, x_24);
return x_445;
}
}
@ -10172,14 +10172,14 @@ uint8_t x_455;
x_455 = l_Lean_Expr_isApp(x_16);
if (x_455 == 0)
{
x_18 = x_453;
x_19 = x_452;
x_20 = x_454;
x_18 = x_451;
x_19 = x_448;
x_20 = x_449;
x_21 = x_447;
x_22 = x_451;
x_23 = x_450;
x_24 = x_448;
x_25 = x_449;
x_22 = x_452;
x_23 = x_453;
x_24 = x_454;
x_25 = x_450;
x_26 = x_455;
goto block_446;
}
@ -10190,14 +10190,14 @@ x_456 = l_Lean_Expr_getAppNumArgs(x_16);
x_457 = lean_unsigned_to_nat(2u);
x_458 = lean_nat_dec_eq(x_456, x_457);
lean_dec(x_456);
x_18 = x_453;
x_19 = x_452;
x_20 = x_454;
x_18 = x_451;
x_19 = x_448;
x_20 = x_449;
x_21 = x_447;
x_22 = x_451;
x_23 = x_450;
x_24 = x_448;
x_25 = x_449;
x_22 = x_452;
x_23 = x_453;
x_24 = x_454;
x_25 = x_450;
x_26 = x_458;
goto block_446;
}
@ -10514,7 +10514,7 @@ lean_inc_ref(x_22);
lean_dec_ref(x_15);
if (lean_obj_tag(x_22) == 6)
{
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; uint8_t x_94; lean_object* x_95; lean_object* x_96; uint8_t x_97; uint8_t x_124; uint8_t x_154;
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_94; lean_object* x_95; uint8_t x_96; uint8_t x_97; uint8_t x_124; uint8_t x_154;
x_23 = lean_ctor_get(x_22, 0);
lean_inc(x_23);
x_24 = lean_ctor_get(x_22, 2);
@ -10823,13 +10823,13 @@ block_123:
if (x_97 == 0)
{
uint8_t x_98;
x_98 = l_Lean_Expr_hasLooseBVars(x_96);
x_98 = l_Lean_Expr_hasLooseBVars(x_95);
if (x_98 == 0)
{
if (x_94 == 0)
if (x_96 == 0)
{
lean_dec_ref(x_96);
lean_dec_ref(x_95);
lean_dec_ref(x_94);
lean_dec(x_23);
x_26 = x_2;
x_27 = x_3;
@ -10848,18 +10848,18 @@ lean_dec(x_3);
lean_dec_ref(x_2);
x_99 = 0;
lean_inc_ref(x_25);
x_100 = l_Lean_mkLambda(x_23, x_99, x_25, x_95);
x_100 = l_Lean_mkLambda(x_23, x_99, x_25, x_94);
lean_inc_ref(x_100);
lean_inc_ref(x_25);
lean_inc_ref(x_19);
x_101 = l_Lean_mkAppB(x_19, x_25, x_100);
lean_inc_ref(x_96);
x_102 = l_Lean_mkAnd(x_101, x_96);
lean_inc_ref(x_95);
x_102 = l_Lean_mkAnd(x_101, x_95);
x_103 = l_Lean_Expr_constLevels_x21(x_19);
lean_dec_ref(x_19);
x_104 = l_Lean_Meta_Grind_simpExists___redArg___closed__8;
x_105 = l_Lean_mkConst(x_104, x_103);
x_106 = l_Lean_mkApp3(x_105, x_25, x_100, x_96);
x_106 = l_Lean_mkApp3(x_105, x_25, x_100, x_95);
x_107 = lean_alloc_ctor(1, 1, 0);
lean_ctor_set(x_107, 0, x_106);
x_108 = lean_alloc_ctor(0, 2, 1);
@ -10876,8 +10876,8 @@ return x_110;
}
else
{
lean_dec_ref(x_96);
lean_dec_ref(x_95);
lean_dec_ref(x_94);
lean_dec(x_23);
x_26 = x_2;
x_27 = x_3;
@ -10897,18 +10897,18 @@ lean_dec(x_3);
lean_dec_ref(x_2);
x_111 = 0;
lean_inc_ref(x_25);
x_112 = l_Lean_mkLambda(x_23, x_111, x_25, x_96);
x_112 = l_Lean_mkLambda(x_23, x_111, x_25, x_95);
lean_inc_ref(x_112);
lean_inc_ref(x_25);
lean_inc_ref(x_19);
x_113 = l_Lean_mkAppB(x_19, x_25, x_112);
lean_inc_ref(x_95);
x_114 = l_Lean_mkAnd(x_95, x_113);
lean_inc_ref(x_94);
x_114 = l_Lean_mkAnd(x_94, x_113);
x_115 = l_Lean_Expr_constLevels_x21(x_19);
lean_dec_ref(x_19);
x_116 = l_Lean_Meta_Grind_simpExists___redArg___closed__10;
x_117 = l_Lean_mkConst(x_116, x_115);
x_118 = l_Lean_mkApp3(x_117, x_25, x_112, x_95);
x_118 = l_Lean_mkApp3(x_117, x_25, x_112, x_94);
x_119 = lean_alloc_ctor(1, 1, 0);
lean_ctor_set(x_119, 0, x_118);
x_120 = lean_alloc_ctor(0, 2, 1);
@ -10974,17 +10974,17 @@ x_133 = l_Lean_Expr_appArg_x21(x_24);
x_134 = l_Lean_Expr_hasLooseBVars(x_132);
if (x_134 == 0)
{
x_94 = x_131;
x_95 = x_132;
x_96 = x_133;
x_94 = x_132;
x_95 = x_133;
x_96 = x_131;
x_97 = x_131;
goto block_123;
}
else
{
x_94 = x_131;
x_95 = x_132;
x_96 = x_133;
x_94 = x_132;
x_95 = x_133;
x_96 = x_131;
x_97 = x_129;
goto block_123;
}