/* gen164/5/co_roco.c ** ** This file is in the public domain. */ #include "all.h" #include "../pit.h" /* functions */ u2_weak j2_md(Pt5, coco, co, roco)(u2_wire wir_r, u2_noun cor) { u2_atom buz, bas, dop; u2_noun dug; /* tree axes */ /* buz => 4 */ /* bas => 10 */ /* dop => 11 */ /* dug => 3 */ /* if ( u2_no == u2_mean(cor, u2_cv_sam_4, &bas, */ /* u2_cv_sam_5, &min, */ /* u2_cv_sam_3, &par, */ /* 0) ) */ /* { */ /* return u2_bl_bail(wir_r, c3__exit); */ /* } */ return 0; } /* structures */ u2_ho_jet j2_mdj(Pt5, coco, co, roco)[] = { { ".2", c3__lite, j2_md(Pt5, coco, co, roco), u2_jet_dead, u2_none, u2_none }, { } };