} } u2_weak // transfer j2_mb(Pt3, cat)(u2_wire wir_r, u2_noun cor) // retain { u2_noun a, b, c; if ( (u2_no == u2_mean(cor, u2_cv_sam_2, &a, u2_cv_sam_6, &b, u2_cv_sam_7, &c, 0)) || (u2_no == u2_stud(a)) || (u2_no == u2_stud(b)) || (u2_no == u2_stud(c)) ) { return u2_bl_bail(wir_r, c3__exit); } else { return j2_mbc(Pt3, cat)(wir_r, a, b, c); } } /* structures */ u2_ho_jet j2_mbj(Pt3, cat)[] = { { ".2", c3__lite, j2_mb(Pt3, cat), Tier3, u2_none, u2_none }, { } };
j2_mby(Pt6, bull)(u2_wire wir_r, u2_noun bid, // retain u2_noun der) // retain { if ( c3__void == der ) { return c3__void; } else return u2_bt (wir_r, c3__bull, u2_rx(wir_r, bid), u2_rx(wir_r, der)); } u2_noun // transfer j2_mb(Pt6, bull)(u2_wire wir_r, u2_noun cor) // retain { u2_noun bid, der; if ( u2_no == u2_mean(cor, u2_cv_sam_2, &bid, u2_cv_sam_3, &der, 0) ) { return u2_bl_bail(wir_r, c3__fail); } else { return j2_mby(Pt6, bull)(wir_r, bid, der); } } /* structures */ u2_ho_jet j2_mbj(Pt6, bull)[] = { { ".2", c3__hevy, j2_mb(Pt6, bull), Tier6_a, u2_none, u2_none }, { } };
mpz_t a_mp; u2_mp(a_mp, a); mpz_sub_ui(a_mp, a_mp, 1); return u2_rl_mp(wir_r, a_mp); } } u2_weak // transfer j2_mb(Pt1, dec)(u2_wire wir_r, u2_noun cor) // retain { u2_noun a; if ( (u2_none == (a = u2_frag(u2_cw_sam, cor))) || (u2_no == u2_stud(a)) ) { return u2_none; } else { return j2_mbc(Pt1, dec)(wir_r, a); } } /* structures */ u2_ho_jet j2_mbj(Pt1, dec)[] = { { ".3", c3__lite, j2_mb(Pt1, dec), u2_jet_live, u2_none, u2_none }, { } };
u2_noun x = _cue_in(wir_r, a, _0); u2_noun y = u2_rx(wir_r, u2_h(u2_t(x))); u2_na_take(T_r); T_r = 0; u2_rz(wir_r, x); return y; } u2_noun // transfer j2_mb(Pt5, cue)(u2_wire wir_r, u2_noun cor) // retain { u2_noun a; if ( (u2_none == (a = u2_frag(u2_cv_sam, cor))) ) { return u2_bl_bail(wir_r, c3__fail); } else { return j2_mby(Pt5, cue)(wir_r, a); } } /* structures */ u2_ho_jet j2_mbj(Pt5, cue)[] = { { ".2", c3__hevy, j2_mb(Pt5, cue), Tier3, u2_none, u2_none }, { } };
u2_noun a, b; if ( u2_no == u2_mean(cor, u2_cv_sam, &b, u2_cv_con_sam, &a, 0) ) { return u2_bl_bail(wir_r, c3__exit); } else { return j2_mcc(Pt5, og, raw)(wir_r, a, b); } } /* structures */ u2_ho_jet j2_mbj(Pt5, shax)[] = { { ".2", c3__lite, j2_mb(Pt5, shax), Tier5, u2_none, u2_none }, { } }; u2_ho_jet j2_mbj(Pt5, shas)[] = { { ".2", c3__lite, j2_mb(Pt5, shas), Tier5, u2_none, u2_none }, { } }; u2_ho_jet j2_mcj(Pt5, og, raw)[] = { { ".2", c3__lite, j2_mc(Pt5, og, raw), Tier5, u2_none, u2_none }, { } }; u2_ho_driver
mpz_tdiv_r(a_mp, a_mp, b_mp); mpz_clear(b_mp); return u2_rl_mp(wir_r, a_mp); } } u2_weak // transfer j2_mb(Pt1, mod)(u2_wire wir_r, u2_noun cor) // retain { u2_noun a, b; if ( (u2_no == u2_mean(cor, u2_cw_sam_2, &a, u2_cw_sam_3, &b, 0)) || (u2_no == u2_stud(a)) || (u2_no == u2_stud(b)) ) { return u2_none; } else { return j2_mbc(Pt1, mod)(wir_r, a, b); } } /* structures */ u2_ho_jet j2_mbj(Pt1, mod)[] = { { ".3", c3__lite, j2_mb(Pt1, mod), Tier1, u2_none, u2_none }, { } };
} else if ( c3__void == bur ) { return u2_rx(wir_r, hoz); } else if ( c3__void == hoz ) { return u2_rx(wir_r, bur); } else return u2_bt (wir_r, c3__fork, u2_rx(wir_r, hoz), u2_rx(wir_r, bur)); } u2_noun // transfer j2_mb(Pt6, fork)(u2_wire wir_r, u2_noun cor) // retain { u2_noun hoz, bur; if ( u2_no == u2_mean(cor, u2_cw_sam_2, &hoz, u2_cw_sam_3, &bur, 0) ) { return u2_bl_bail(wir_r, c3__fail); } else { return j2_mby(Pt6, fork)(wir_r, hoz, bur); } } /* structures */ u2_ho_jet j2_mbj(Pt6, fork)[] = { { ".3", c3__hevy, j2_mb(Pt6, fork), Tier6_a, u2_none, u2_none }, { } };
len_w--; } if ( u2_no == u2_dust(b) ) { return u2_bl_bail(wir_r, c3__exit); } return u2_rx(wir_r, u2_h(b)); } } u2_noun // transfer j2_mb(Pt2, snag)(u2_wire wir_r, u2_noun cor) // retain { u2_noun a, b; if ( (u2_no == u2_mean(cor, u2_cv_sam_2, &a, u2_cv_sam_3, &b, 0)) || (u2_no == u2_stud(a)) ) { return u2_bl_bail(wir_r, c3__exit); } else { return j2_mbc(Pt2, snag)(wir_r, a, b); } } /* structures */ u2_ho_jet j2_mbj(Pt2, snag)[] = { { ".2", c3__lite, j2_mb(Pt2, snag), Tier2, u2_none, u2_none }, { } };
return u2_bl_bail(wir_r, c3__exit); } else { u2_weak gim = u2_rx(wir_r, u2_h(a)); u2_weak hur = j2_mbc(Pt2, reel)(wir_r, u2_t(a), b); return u2_nk_mong(wir_r, b, u2_rc(wir_r, gim, hur)); } } u2_noun // transfer j2_mb(Pt2, reel)(u2_wire wir_r, u2_noun cor) // retain { u2_noun a, b; if ( u2_no == u2_mean(cor, u2_cv_sam_2, &a, u2_cv_sam_3, &b, 0) ) { return u2_bl_bail(wir_r, c3__exit); } else { return j2_mbc(Pt2, reel)(wir_r, a, b); } } /* structures */ u2_ho_jet j2_mbj(Pt2, reel)[] = { { ".2", c3__lite, j2_mb(Pt2, reel), Tier2, u2_none, u2_none }, { } };
} } u2_noun // transfer j2_mb(Pt2, scag)(u2_wire wir_r, u2_noun cor) // retain { u2_noun a, b; if ( (u2_no == u2_mean(cor, u2_cv_sam_2, &a, u2_cv_sam_3, &b, 0)) || (u2_no == u2_stud(a)) ) { return u2_bl_bail(wir_r, c3__exit); } else { return j2_mbc(Pt2, scag)(wir_r, a, b); } } /* structures */ /* u2_ho_jet */ /* j2_mbj(Pt2, scag)[] = { */ /* { ".2", c3__lite, j2_mb(Pt2, scag), u2_jet_dead, u2_none, u2_none }, */ /* { } */ /* }; */ u2_ho_jet j2_mbj(Pt2, scag)[] = { { ".2", c3__lite, j2_mb(Pt2, scag), u2_jet_dead, u2_none, u2_none }, { } };
else if ( u2_no == u2_dust(a) ) { return u2_bl_bail(wir_r, c3__exit); } else { u2_noun one = u2_nk_mong(wir_r, b, u2_rx(wir_r, u2_h(a))); u2_noun two = j2_mbc(Pt2, turn)(wir_r, u2_t(a), b); return u2_rc(wir_r, one, two); } } u2_noun // transfer j2_mb(Pt2, turn)(u2_wire wir_r, u2_noun cor) // retain { u2_noun a, b; if ( u2_no == u2_mean(cor, u2_cv_sam_2, &a, u2_cv_sam_3, &b, 0) ) { return u2_bl_bail(wir_r, c3__exit); } else { return j2_mbc(Pt2, turn)(wir_r, a, b); } } /* structures */ u2_ho_jet j2_mbj(Pt2, turn)[] = { { ".2", c3__lite, j2_mb(Pt2, turn), Tier2, u2_none, u2_none }, { } };
len_w--; } if ( u2_no == u2_dust(b) ) { return u2_bl_bail(wir_r, c3__exit); } return u2_rx(wir_r, b); } } u2_noun // transfer j2_mb(Pt2, slag)(u2_wire wir_r, u2_noun cor) // retain { u2_noun a, b; if ( (u2_no == u2_mean(cor, u2_cw_sam_2, &a, u2_cw_sam_3, &b, 0)) || (u2_no == u2_stud(a)) ) { return u2_bl_bail(wir_r, c3__exit); } else { return j2_mbc(Pt2, slag)(wir_r, a, b); } } /* structures */ u2_ho_jet j2_mbj(Pt2, slag)[] = { { ".3", c3__lite, j2_mb(Pt2, slag), Tier2, u2_none, u2_none }, { } };
/* functions */ u2_noun // transfer j2_mby(Pt6, look)(u2_wire wir_r, u2_noun cog, // retain u2_noun dab) // retain { return _look_in(wir_r, cog, dab, _1); } u2_noun // transfer j2_mb(Pt6, look)(u2_wire wir_r, u2_noun cor) // retain { u2_noun cog, dab; if ( u2_no == u2_mean(cor, u2_cv_sam_2, &cog, u2_cv_sam_3, &dab, 0) ) { return u2_bl_bail(wir_r, c3__fail); } else { return j2_mby(Pt6, look)(wir_r, cog, dab); } } /* structures */ u2_ho_jet j2_mbj(Pt6, look)[] = { { ".2", c3__hevy, j2_mb(Pt6, look), Tier6_a, u2_none, u2_none }, { } };
u2_rz(wir_r, u); u2_rz(wir_r, v); u2_rz(wir_r, w); u2_rz(wir_r, x); u2_rz(wir_r, y); u2_rz(wir_r, z); return u2_bc(wir_r, p, q); } } u2_noun // transfer j2_mb(Pt5, mat)(u2_wire wir_r, u2_noun cor) // retain { u2_noun a; if ( (u2_none == (a = u2_frag(u2_cw_sam, cor))) ) { return u2_bl_bail(wir_r, c3__fail); } else { return j2_mby(Pt5, mat)(wir_r, a); } } /* structures */ u2_ho_jet j2_mbj(Pt5, mat)[] = { { ".3", c3__hevy, j2_mb(Pt5, mat), Tier3, u2_none, u2_none }, { } };
u2_mp(b_mp, b); mpz_add(a_mp, a_mp, b_mp); mpz_clear(b_mp); return u2_rl_mp(wir_r, a_mp); } u2_weak // transfer j2_mb(Pt1, add)(u2_wire wir_r, u2_noun cor) // retain { u2_noun a, b; if ( (u2_no == u2_mean(cor, u2_cv_sam_2, &a, u2_cv_sam_3, &b, 0)) || (u2_no == u2_stud(a)) || (u2_no == u2_stud(b)) ) { return u2_bl_bail(wir_r, c3__exit); } else { return j2_mbc(Pt1, add)(wir_r, a, b); } } /* structures */ u2_ho_jet j2_mbj(Pt1, add)[] = { { ".2", c3__lite, j2_mb(Pt1, add), u2_jet_live, u2_none, u2_none }, { } };
q = j2_mbc(Pt3, cut)(wir_r, _0, z, e, b); u2_rz(wir_r, w); u2_rz(wir_r, x); u2_rz(wir_r, y); u2_rz(wir_r, z); return u2_bc(wir_r, p, q); } } u2_noun // transfer j2_mb(Pt5, rub)(u2_wire wir_r, u2_noun cor) // retain { u2_noun a, b; if ( (u2_no == u2_mean(cor, u2_cv_sam_2, &a, u2_cv_sam_3, &b, 0)) || (u2_no == u2_stud(a)) || (u2_no == u2_stud(b)) ) { return u2_bl_bail(wir_r, c3__fail); } else { return j2_mby(Pt5, rub)(wir_r, a, b); } } /* structures */ u2_ho_jet j2_mbj(Pt5, rub)[] = { { ".2", c3__hevy, j2_mb(Pt5, rub), Tier5, u2_none, u2_none }, { } };
} u2_noun // produce j2_mb(Pt5, pfix)(u2_wire wir_r, u2_noun cor) // retain { u2_noun vex, sab; if ( (u2_no == u2_mean(cor, u2_cw_sam_2, &vex, u2_cw_sam_3, &sab, 0)) ) { return u2_none; } else { return j2_mbx(Pt5, pfix)(wir_r, vex, sab); } } u2_ho_jet j2_mbj(Pt5, pfix)[] = { { ".3", c3__hevy, j2_mb(Pt5, pfix), Tier5_b, u2_none, u2_none }, { } }; /* plug */ u2_noun // produce j2_mbx(Pt5, plug)(u2_wire wir_r, u2_noun vex, // retain u2_noun sab) // retain { u2_noun p_vex, q_vex; u2_bi_cell(wir_r, vex, &p_vex, &q_vex); if ( u2_no == u2_dust(q_vex) ) { return u2_rx(wir_r, vex);
u2_rl_lose(wir_r, b); return u2_bl_bail(wir_r, c3__exit); } else { b = u2_rc(wir_r, u2_rx(wir_r, u2_h(a)), b); a = u2_t(a); } } } u2_weak // transfer j2_mb(Pt2, flop)(u2_wire wir_r, u2_noun cor) // retain { u2_noun a; if ( u2_none == (a = u2_frag(u2_cv_sam, cor)) ) { return u2_bl_bail(wir_r, c3__exit); } else { return j2_mbc(Pt2, flop)(wir_r, a); } } /* structures */ u2_ho_jet j2_mbj(Pt2, flop)[] = { { ".2", c3__lite, j2_mb(Pt2, flop), Tier2, u2_none, u2_none }, { } };
u2_rl_lose(wir_r, moz); u2_rl_lose(wir_r, zip); u2_rl_lose(wir_r, dof); return fol; } } } u2_noun // transfer j2_mb(Pt6, hike)(u2_wire wir_r, u2_noun cor) // retain { u2_noun axe, pac; if ( (u2_no == u2_mean(cor, u2_cv_sam_2, &axe, u2_cv_sam_3, &pac, 0)) || (u2_no == u2_stud(axe)) ) { return u2_bl_bail(wir_r, c3__fail); } else { return j2_mby(Pt6, hike)(wir_r, axe, pac); } } /* structures */ u2_ho_jet j2_mbj(Pt6, hike)[] = { { ".2", c3__hevy, j2_mb(Pt6, hike), Tier6_a, u2_none, u2_none }, { } };
case u2_yes: typ = u2_rx(wir_r, u2_t(q_pok)); break; case u2_no: typ = _flay_roll(wir_r, u2_t(u2_t(q_pok))); break; } return u2_bc(wir_r, u2_rx(wir_r, p_pok), typ); } u2_noun // transfer j2_mb(Pt6, flay)(u2_wire wir_r, u2_noun cor) // retain { u2_noun pok; if ( (u2_no == u2_mean(cor, u2_cv_sam, &pok, 0)) || (u2_no == u2_dust(pok)) ) { return u2_bl_bail(wir_r, c3__fail); } else { return j2_mby(Pt6, flay)(wir_r, pok); } } /* structures */ u2_ho_jet j2_mbj(Pt6, flay)[] = { { ".2", c3__hevy, j2_mb(Pt6, flay), Tier6_a, u2_none, u2_none }, { } };
if ( !u2_fly_is_cat(met_w) ) { return u2_rl_words(wir_r, 1, &met_w); } else return u2_met(a, b); } } u2_weak // transfer j2_mb(Pt3, met)(u2_wire wir_r, u2_noun cor) // retain { u2_noun a, b; if ( (u2_no == u2_mean(cor, u2_cw_sam_2, &a, u2_cw_sam_3, &b, 0)) || (u2_no == u2_stud(a)) || (u2_no == u2_stud(b)) ) { return u2_bl_bail(wir_r, c3__exit); } else { return j2_mbc(Pt3, met)(wir_r, a, b); } } /* structures */ u2_ho_jet j2_mbj(Pt3, met)[] = { { ".3", c3__lite, j2_mb(Pt3, met), Tier3, u2_none, u2_none }, { } };
u2_bl_bail(wir_r, c3__exit); return u2_nul; } u2_weak // produce j2_mb(Pt5, repg)(u2_wire wir_r, u2_noun cor) // retain { u2_noun lub; u2_noun rad; u2_noun rep; if ( (u2_none == (lub = u2_frag(u2_cv_sam_2, cor))) || (u2_none == (rad = u2_frag(u2_cv_sam_6, cor))) || (u2_none == (rep = u2_frag(u2_cv_sam_7, cor))) ) { return u2_bl_bail(wir_r, c3__fail); } else { return j2_mbc(Pt5, repg)(wir_r, lub, rad, rep); } } /* structures */ u2_ho_jet j2_mbj(Pt5, repg)[] = { { ".2", c3__lite, j2_mb(Pt5, repg), Tier5, u2_none, u2_none }, { } };