/*===========================================================================*/
/*   (Inline/loop.scm)                                                       */
/*   Bigloo (2.6b)                                                           */
/*   Inria -- Sophia Antipolis (c)       Mon Dec 15 12:14:36 CET 2003        */
/*===========================================================================*/
/* COMPILATION: (/users/serrano/prgm/project/bigloo/bin/bigloo -q -afile .afile -fsharing -fno-reflection -cc gcc-2.95 -lib-dir /users/serrano/prgm/project/bigloo/lib/2.6b -unsafev -no-hello -O2 -rm -unsafe -s -indent Inline/loop.scm)*/
/* GC selection */
#define THE_GC BOEHM_GC

#include <bigloo.h>


/* Object type definitions */
typedef struct BgL_typez00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_idz00;
   obj_t BgL_namez00;
   obj_t BgL_siza7eza7;
   obj_t BgL_classz00;
   obj_t BgL_coercezd2tozd2;
   obj_t BgL_parentsz00;
   bool_t BgL_initzf3zf3;
   bool_t BgL_magiczf3zf3;
   obj_t BgL_z42z42;
   obj_t BgL_aliasz00;
   obj_t BgL_pointedzd2tozd2byz00;
   obj_t BgL_tvectorz00;
   obj_t BgL_locationz00;
   obj_t BgL_importzd2locationzd2;
} *BgL_typez00_bglt;

typedef struct BgL_valuez00_bgl {
   header_t header;
   obj_t widening;
} *BgL_valuez00_bglt;

typedef struct BgL_variablez00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_idz00;
   obj_t BgL_namez00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_valuez00_bgl * BgL_valuez00;
   obj_t BgL_accessz00;
   obj_t BgL_fastzd2alphazd2;
   obj_t BgL_removablez00;
   long BgL_occurrencez00;
} *BgL_variablez00_bglt;

typedef struct BgL_globalz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_idz00;
   obj_t BgL_namez00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_valuez00_bgl * BgL_valuez00;
   obj_t BgL_accessz00;
   obj_t BgL_fastzd2alphazd2;
   obj_t BgL_removablez00;
   long BgL_occurrencez00;
   obj_t BgL_modulez00;
   obj_t BgL_importz00;
   bool_t BgL_evaluablezf3zf3;
   bool_t BgL_libraryzf3zf3;
   bool_t BgL_userzf3zf3;
   obj_t BgL_pragmaz00;
   obj_t BgL_srcz00;
   obj_t BgL_jvmzd2typezd2namez00;
} *BgL_globalz00_bglt;

typedef struct BgL_localz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_idz00;
   obj_t BgL_namez00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_valuez00_bgl * BgL_valuez00;
   obj_t BgL_accessz00;
   obj_t BgL_fastzd2alphazd2;
   obj_t BgL_removablez00;
   long BgL_occurrencez00;
   bool_t BgL_userzf3zf3;
   long BgL_keyz00;
} *BgL_localz00_bglt;

typedef struct BgL_funz00_bgl {
   header_t header;
   obj_t widening;
   long BgL_arityz00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_predicatezd2ofzd2;
   obj_t BgL_stackzd2allocatorzd2;
   bool_t BgL_topzf3zf3;
   obj_t BgL_thezd2closurezd2;
   obj_t BgL_effectz00;
} *BgL_funz00_bglt;

typedef struct BgL_sfunz00_bgl {
   header_t header;
   obj_t widening;
   long BgL_arityz00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_predicatezd2ofzd2;
   obj_t BgL_stackzd2allocatorzd2;
   bool_t BgL_topzf3zf3;
   obj_t BgL_thezd2closurezd2;
   obj_t BgL_effectz00;
   obj_t BgL_propertyz00;
   obj_t BgL_argsz00;
   obj_t BgL_bodyz00;
   obj_t BgL_classz00;
   obj_t BgL_dssslzd2keywordszd2;
   obj_t BgL_locz00;
} *BgL_sfunz00_bglt;

typedef struct BgL_cfunz00_bgl {
   header_t header;
   obj_t widening;
   long BgL_arityz00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_predicatezd2ofzd2;
   obj_t BgL_stackzd2allocatorzd2;
   bool_t BgL_topzf3zf3;
   obj_t BgL_thezd2closurezd2;
   obj_t BgL_effectz00;
   obj_t BgL_argszd2typezd2;
   bool_t BgL_macrozf3zf3;
   bool_t BgL_infixzf3zf3;
   obj_t BgL_methodz00;
} *BgL_cfunz00_bglt;

typedef struct BgL_svarz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
} *BgL_svarz00_bglt;

typedef struct BgL_scnstz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_nodez00;
   obj_t BgL_classz00;
   obj_t BgL_locz00;
} *BgL_scnstz00_bglt;

typedef struct BgL_cvarz00_bgl {
   header_t header;
   obj_t widening;
   bool_t BgL_macrozf3zf3;
} *BgL_cvarz00_bglt;

typedef struct BgL_sexitz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_handlerz00;
   bool_t BgL_detachedzf3zf3;
} *BgL_sexitz00_bglt;

typedef struct BgL_feffectz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_readz00;
   obj_t BgL_writez00;
} *BgL_feffectz00_bglt;

typedef struct BgL_nodez00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
} *BgL_nodez00_bglt;

typedef struct BgL_nodezf2effectzf2_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
} *BgL_nodezf2effectzf2_bglt;

typedef struct BgL_atomz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_valuez00;
} *BgL_atomz00_bglt;

typedef struct BgL_varz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_variablez00_bgl * BgL_variablez00;
} *BgL_varz00_bglt;

typedef struct BgL_closurez00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_variablez00_bgl * BgL_variablez00;
} *BgL_closurez00_bglt;

typedef struct BgL_kwotez00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_valuez00;
} *BgL_kwotez00_bglt;

typedef struct BgL_sequencez00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_nodesz00;
} *BgL_sequencez00_bglt;

typedef struct BgL_appz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   struct BgL_varz00_bgl * BgL_funz00;
   obj_t BgL_argsz00;
} *BgL_appz00_bglt;

typedef struct BgL_appzd2lyzd2_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_nodez00_bgl * BgL_funz00;
   struct BgL_nodez00_bgl * BgL_argz00;
} *BgL_appzd2lyzd2_bglt;

typedef struct BgL_funcallz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_nodez00_bgl * BgL_funz00;
   obj_t BgL_argsz00;
   obj_t BgL_strengthz00;
} *BgL_funcallz00_bglt;

typedef struct BgL_externz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_exprza2za2;
   obj_t BgL_effectz00;
} *BgL_externz00_bglt;

typedef struct BgL_pragmaz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_exprza2za2;
   obj_t BgL_effectz00;
   obj_t BgL_formatz00;
} *BgL_pragmaz00_bglt;

typedef struct BgL_getfieldz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_exprza2za2;
   obj_t BgL_effectz00;
   obj_t BgL_fnamez00;
   struct BgL_typez00_bgl * BgL_ftypez00;
   struct BgL_typez00_bgl * BgL_otypez00;
} *BgL_getfieldz00_bglt;

typedef struct BgL_setfieldz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_exprza2za2;
   obj_t BgL_effectz00;
   obj_t BgL_fnamez00;
   struct BgL_typez00_bgl * BgL_ftypez00;
   struct BgL_typez00_bgl * BgL_otypez00;
} *BgL_setfieldz00_bglt;

typedef struct BgL_newz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_exprza2za2;
   obj_t BgL_effectz00;
} *BgL_newz00_bglt;

typedef struct BgL_vallocz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_exprza2za2;
   obj_t BgL_effectz00;
   obj_t BgL_czd2heapzd2formatz00;
   struct BgL_typez00_bgl * BgL_ftypez00;
   struct BgL_typez00_bgl * BgL_otypez00;
} *BgL_vallocz00_bglt;

typedef struct BgL_vrefz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_exprza2za2;
   obj_t BgL_effectz00;
   obj_t BgL_czd2formatzd2;
   struct BgL_typez00_bgl * BgL_ftypez00;
   struct BgL_typez00_bgl * BgL_otypez00;
   struct BgL_typez00_bgl * BgL_vtypez00;
} *BgL_vrefz00_bglt;

typedef struct BgL_vsetz12z12_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_exprza2za2;
   obj_t BgL_effectz00;
   obj_t BgL_czd2formatzd2;
   struct BgL_typez00_bgl * BgL_ftypez00;
   struct BgL_typez00_bgl * BgL_otypez00;
   struct BgL_typez00_bgl * BgL_vtypez00;
} *BgL_vsetz12z12_bglt;

typedef struct BgL_vlengthz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_exprza2za2;
   obj_t BgL_effectz00;
   obj_t BgL_czd2formatzd2;
   struct BgL_typez00_bgl * BgL_vtypez00;
} *BgL_vlengthz00_bglt;

typedef struct BgL_isaz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_exprza2za2;
   obj_t BgL_effectz00;
   struct BgL_typez00_bgl * BgL_classz00;
} *BgL_isaz00_bglt;

typedef struct BgL_castz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_nodez00_bgl * BgL_argz00;
} *BgL_castz00_bglt;

typedef struct BgL_setqz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_varz00_bgl * BgL_varz00;
   struct BgL_nodez00_bgl * BgL_valuez00;
} *BgL_setqz00_bglt;

typedef struct BgL_conditionalz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   struct BgL_nodez00_bgl * BgL_testz00;
   struct BgL_nodez00_bgl * BgL_truez00;
   struct BgL_nodez00_bgl * BgL_falsez00;
} *BgL_conditionalz00_bglt;

typedef struct BgL_failz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_nodez00_bgl * BgL_procz00;
   struct BgL_nodez00_bgl * BgL_msgz00;
   struct BgL_nodez00_bgl * BgL_objz00;
} *BgL_failz00_bglt;

typedef struct BgL_selectz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   struct BgL_nodez00_bgl * BgL_testz00;
   obj_t BgL_clausesz00;
   struct BgL_typez00_bgl * BgL_itemzd2typezd2;
} *BgL_selectz00_bglt;

typedef struct BgL_letzd2funzd2_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_localsz00;
   struct BgL_nodez00_bgl * BgL_bodyz00;
} *BgL_letzd2funzd2_bglt;

typedef struct BgL_letzd2varzd2_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_bindingsz00;
   struct BgL_nodez00_bgl * BgL_bodyz00;
   bool_t BgL_removablezf3zf3;
} *BgL_letzd2varzd2_bglt;

typedef struct BgL_setzd2exzd2itz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_varz00_bgl * BgL_varz00;
   struct BgL_nodez00_bgl * BgL_bodyz00;
} *BgL_setzd2exzd2itz00_bglt;

typedef struct BgL_jumpzd2exzd2itz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_nodez00_bgl * BgL_exitz00;
   struct BgL_nodez00_bgl * BgL_valuez00;
} *BgL_jumpzd2exzd2itz00_bglt;

typedef struct BgL_makezd2boxzd2_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   struct BgL_nodez00_bgl * BgL_valuez00;
} *BgL_makezd2boxzd2_bglt;

typedef struct BgL_boxzd2refzd2_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   struct BgL_varz00_bgl * BgL_varz00;
} *BgL_boxzd2refzd2_bglt;

typedef struct BgL_boxzd2setz12zc0_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_varz00_bgl * BgL_varz00;
   struct BgL_nodez00_bgl * BgL_valuez00;
} *BgL_boxzd2setz12zc0_bglt;

typedef struct BgL_isfunz00_bgl {
   struct BgL_nodez00_bgl * BgL_originalzd2bodyzd2;
   obj_t BgL_recursivezd2callszd2;
} *BgL_isfunz00_bglt;

typedef struct BgL_localzf2variantzf2_bgl {
   bool_t BgL_variantz00;
} *BgL_localzf2variantzf2_bglt;


static obj_t BGl_nestzd2loopz12zd2letzd2fun2903zc0zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_nestzd2loopz12zd2conditional2896z12zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
static bool_t BGl_findzd2letzd2funzf3za2z51zzinline_loopz00(obj_t);
static obj_t BGl_methodzd2initzd2zzinline_loopz00();
static obj_t BGl_findzd2letzd2funzf3zd2fail2855z21zzinline_loopz00(obj_t, obj_t);
BGL_IMPORT obj_t open_input_string(obj_t);
static obj_t BGl_nestzd2loopz12zd2kwote2878z12zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
extern obj_t BGl_letzd2funzd2zzast_nodez00;
static obj_t BGl__nestzd2loopz12zc0zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
BGL_IMPORT obj_t BGl_readz00zz__readerz00(obj_t);
BGL_IMPORT bool_t BGl_iszd2azf3z21zz__objectz00(obj_t, obj_t);
static obj_t BGl__findzd2letzd2funzf3zd2default2836z21zzinline_loopz00(obj_t, obj_t);
static obj_t BGl_nestzd2loopz12zd2letzd2var2906zc0zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_nestzd2loopz12zd2cast2892z12zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_nestzd2loopz12zd2appzd2ly2886zc0zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
static BgL_nodez00_bglt BGl_nestzd2loopz12zd2default2873z12zzinline_loopz00(BgL_nodez00_bglt, BgL_localz00_bglt, obj_t);
BGL_IMPORT obj_t BGl_addzd2genericz12zc0zz__objectz00(obj_t, obj_t);
static obj_t BGl__nestzd2loopz12zd2default2873z12zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
extern obj_t BGl_letzd2varzd2zzast_nodez00;
static obj_t BGl_nestzd2loopz12zd2jumpzd2exzd2it2910z12zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
extern obj_t BGl_kwotez00zzast_nodez00;
static obj_t BGl_nestzd2loopz12zd2app2884z12zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_innerzd2loopzf3z21zzinline_loopz00(BgL_variablez00_bglt);
BGL_EXPORTED_DECL bool_t BGl_iszd2loopzf3z21zzinline_loopz00(BgL_variablez00_bglt);
static obj_t BGl_findzd2letzd2funzf3zd2conditional2853z21zzinline_loopz00(obj_t, obj_t);
extern obj_t BGl_castz00zzast_nodez00;
static obj_t BGl_findzd2letzd2funzf3zd2app2841z21zzinline_loopz00(obj_t, obj_t);
extern obj_t BGl_boxzd2refzd2zzast_nodez00;
extern bool_t BGl_iszd2recursivezf3z21zzinline_recursionz00(BgL_variablez00_bglt);
extern obj_t BGl_varz00zzast_nodez00;
static obj_t BGl_cnstzd2initzd2zzinline_loopz00();
extern obj_t BGl_atomz00zzast_nodez00;
extern obj_t BGl_failz00zzast_nodez00;
extern obj_t BGl_funcallz00zzast_nodez00;
static obj_t BGl_findzd2letzd2funzf3zd2cast2849z21zzinline_loopz00(obj_t, obj_t);
static obj_t BGl_findzd2letzd2funzf3zd2setzd2exzd2it2863z21zzinline_loopz00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_nodez00_bglt BGl_nestzd2loopz12zc0zzinline_loopz00(BgL_nodez00_bglt, BgL_localz00_bglt, obj_t);
static obj_t BGl_importedzd2moduleszd2initz00zzinline_loopz00();
extern obj_t BGl_makezd2boxzd2zzast_nodez00;
static obj_t BGl_nestzd2loopz12zd2select2901z12zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_findzd2letzd2funzf3zd2funcall2845z21zzinline_loopz00(obj_t, obj_t);
static obj_t BGl_nestzd2loopz12zd2fail2899z12zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
BGL_IMPORT obj_t BGl_addzd2methodz12zc0zz__objectz00(obj_t, obj_t, obj_t);
static obj_t BGl_findzd2letzd2funzf3zf3zzinline_loopz00(BgL_nodez00_bglt);
static obj_t BGl__innerzd2loopzf3z21zzinline_loopz00(obj_t, obj_t);
extern obj_t BGl_selectz00zzast_nodez00;
static obj_t BGl_toplevelzd2initzd2zzinline_loopz00();
extern obj_t BGl_appzd2lyzd2zzast_nodez00;
extern obj_t BGl_boxzd2setz12zc0zzast_nodez00;
static obj_t BGl_findzd2letzd2funzf3zd2extern2847z21zzinline_loopz00(obj_t, obj_t);
static obj_t BGl_nestzd2loopz12zd2boxzd2ref2914zc0zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_modulezd2initializa7ationz75zzinline_loopz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_tracez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzengine_paramz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_typez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_varz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_nodez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_localz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_sexpz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_speekz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_shapez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_errorz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzinline_inlinez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzinline_variantz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzinline_recursionz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzeffect_effectz00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__objectz00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__readerz00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(long, char *);
static obj_t BGl__iszd2loopzf3z21zzinline_loopz00(obj_t, obj_t);
static obj_t BGl_nestzd2loopz12zd2setzd2exzd2it2908z12zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
BGL_IMPORT long bgl_list_length(obj_t);
static obj_t BGl_findzd2letzd2funzf3zd2letzd2var2861zf3zzinline_loopz00(obj_t, obj_t);
static obj_t BGl_findzd2letzd2funzf3zd2appzd2ly2843zf3zzinline_loopz00(obj_t, obj_t);
static obj_t BGl_nestzd2loopz12zd2boxzd2setz122916zd2zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_findzd2letzd2funzf3zd2jumpzd2exzd2it2865z21zzinline_loopz00(obj_t, obj_t);
static obj_t BGl_findzd2letzd2funzf3zd2setq2851z21zzinline_loopz00(obj_t, obj_t);
static obj_t BGl_findzd2letzd2funzf3zd2makezd2box2867zf3zzinline_loopz00(obj_t, obj_t);
extern obj_t BGl_setzd2exzd2itz00zzast_nodez00;
static obj_t BGl_findzd2letzd2funzf3zd2letzd2fun2859zf3zzinline_loopz00(obj_t, obj_t);
static obj_t BGl_nestzd2loopz12za2z62zzinline_loopz00(obj_t, obj_t, obj_t);
static obj_t BGl_nestzd2loopz12zd2sequence2882z12zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_nestzd2loopz12zd2atom2876z12zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_nestzd2loopz12zd2var2880z12zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
extern obj_t BGl_jumpzd2exzd2itz00zzast_nodez00;
static obj_t BGl__findzd2letzd2funzf3zf3zzinline_loopz00(obj_t, obj_t);
extern obj_t BGl_externz00zzast_nodez00;
extern obj_t BGl_conditionalz00zzast_nodez00;
extern obj_t BGl_sequencez00zzast_nodez00;
static obj_t BGl_findzd2letzd2funzf3zd2sequence2839z21zzinline_loopz00(obj_t, obj_t);
extern obj_t BGl_appz00zzast_nodez00;
static obj_t BGl_nestzd2loopz12zd2extern2890z12zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_findzd2letzd2funzf3zd2boxzd2setz122872ze1zzinline_loopz00(obj_t, obj_t);
static obj_t BGl_nestzd2loopz12zd2setq2894z12zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_findzd2letzd2funzf3zd2boxzd2ref2870zf3zzinline_loopz00(obj_t, obj_t);
static obj_t BGl_requirezd2initializa7ationz75zzinline_loopz00 = BUNSPEC;
static obj_t BGl_nestzd2loopz12zd2funcall2888z12zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_findzd2letzd2funzf3zd2select2857z21zzinline_loopz00(obj_t, obj_t);
static obj_t BGl_libraryzd2moduleszd2initz00zzinline_loopz00();
static obj_t BGl_nestzd2loopz12zd2makezd2box2912zc0zzinline_loopz00(obj_t, obj_t, obj_t, obj_t);
extern obj_t BGl_setqz00zzast_nodez00;
static obj_t __cnst[ 2 ] ;


DEFINE_EXPORT_PROCEDURE( BGl_innerzd2loopzf3zd2envzf3zzinline_loopz00, BgL_bgl__innerza7d2loopza7f3za721za7za7inline_loopza7004942z00, BGl__innerzd2loopzf3z21zzinline_loopz00, 0L, 1 );
DEFINE_STRING( BGl_string4910z00zzinline_loopz00, BgL_bgl_string4910za700za7za7inline_loopza7004943z00, "nest-loop!-default2873 done ", 28 );
DEFINE_STRING( BGl_string4909z00zzinline_loopz00, BgL_bgl_string4909za700za7za7inline_loopza7004944z00, "No method for this object", 25 );
DEFINE_STATIC_PROCEDURE( BGl_findzd2letzd2funzf3zd2default2836zd2envzf3zzinline_loopz00, BgL_bgl__findza7d2letza7d2funza7f3za7d2default2836za721za7za7inline_loopza7004945z00, BGl__findzd2letzd2funzf3zd2default2836z21zzinline_loopz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_nestzd2loopz12zd2default2873zd2envzc0zzinline_loopz00, BgL_bgl__nestza7d2loopza712za7d2default2873za712za7za7inline_loopza7004946za7, BGl__nestzd2loopz12zd2default2873z12zzinline_loopz00, 0L, 3 );
DEFINE_STATIC_GENERIC( BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_bgl__findza7d2letza7d2funza7f3za7f3za7za7inline_loopza7004947za7, BGl__findzd2letzd2funzf3zf3zzinline_loopz00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_iszd2loopzf3zd2envzf3zzinline_loopz00, BgL_bgl__isza7d2loopza7f3za721za7za7inline_loopza7004948z00, BGl__iszd2loopzf3z21zzinline_loopz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4872z00zzinline_loopz00, BgL_bgl_findza7d2letza7d2funza7f3za7d2sequence2839za721za7za7inline_loopza7004949z00, BGl_findzd2letzd2funzf3zd2sequence2839z21zzinline_loopz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4873z00zzinline_loopz00, BgL_bgl_findza7d2letza7d2funza7f3za7d2app2841za721za7za7inline_loopza7004950z00, BGl_findzd2letzd2funzf3zd2app2841z21zzinline_loopz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4874z00zzinline_loopz00, BgL_bgl_findza7d2letza7d2funza7f3za7d2appza7d2ly2843za7f3za7za7inline_loopza7004951za7, BGl_findzd2letzd2funzf3zd2appzd2ly2843zf3zzinline_loopz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4875z00zzinline_loopz00, BgL_bgl_findza7d2letza7d2funza7f3za7d2funcall2845za721za7za7inline_loopza7004952z00, BGl_findzd2letzd2funzf3zd2funcall2845z21zzinline_loopz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4876z00zzinline_loopz00, BgL_bgl_findza7d2letza7d2funza7f3za7d2extern2847za721za7za7inline_loopza7004953z00, BGl_findzd2letzd2funzf3zd2extern2847z21zzinline_loopz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4877z00zzinline_loopz00, BgL_bgl_findza7d2letza7d2funza7f3za7d2cast2849za721za7za7inline_loopza7004954z00, BGl_findzd2letzd2funzf3zd2cast2849z21zzinline_loopz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4878z00zzinline_loopz00, BgL_bgl_findza7d2letza7d2funza7f3za7d2setq2851za721za7za7inline_loopza7004955z00, BGl_findzd2letzd2funzf3zd2setq2851z21zzinline_loopz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4880z00zzinline_loopz00, BgL_bgl_findza7d2letza7d2funza7f3za7d2fail2855za721za7za7inline_loopza7004956z00, BGl_findzd2letzd2funzf3zd2fail2855z21zzinline_loopz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4879z00zzinline_loopz00, BgL_bgl_findza7d2letza7d2funza7f3za7d2conditional2853za721za7za7inline_loopza7004957z00, BGl_findzd2letzd2funzf3zd2conditional2853z21zzinline_loopz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4881z00zzinline_loopz00, BgL_bgl_findza7d2letza7d2funza7f3za7d2select2857za721za7za7inline_loopza7004958z00, BGl_findzd2letzd2funzf3zd2select2857z21zzinline_loopz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4882z00zzinline_loopz00, BgL_bgl_findza7d2letza7d2funza7f3za7d2letza7d2fun2859za7f3za7za7inline_loopza7004959za7, BGl_findzd2letzd2funzf3zd2letzd2fun2859zf3zzinline_loopz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4883z00zzinline_loopz00, BgL_bgl_findza7d2letza7d2funza7f3za7d2letza7d2var2861za7f3za7za7inline_loopza7004960za7, BGl_findzd2letzd2funzf3zd2letzd2var2861zf3zzinline_loopz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4884z00zzinline_loopz00, BgL_bgl_findza7d2letza7d2funza7f3za7d2setza7d2exza7d2it2863za721za7za7inline_loopza7004961z00, BGl_findzd2letzd2funzf3zd2setzd2exzd2it2863z21zzinline_loopz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4885z00zzinline_loopz00, BgL_bgl_findza7d2letza7d2funza7f3za7d2jumpza7d2exza7d2it2865za721za7za7inline_loopza7004962z00, BGl_findzd2letzd2funzf3zd2jumpzd2exzd2it2865z21zzinline_loopz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4886z00zzinline_loopz00, BgL_bgl_findza7d2letza7d2funza7f3za7d2makeza7d2box2867za7f3za7za7inline_loopza7004963za7, BGl_findzd2letzd2funzf3zd2makezd2box2867zf3zzinline_loopz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4887z00zzinline_loopz00, BgL_bgl_findza7d2letza7d2funza7f3za7d2boxza7d2ref2870za7f3za7za7inline_loopza7004964za7, BGl_findzd2letzd2funzf3zd2boxzd2ref2870zf3zzinline_loopz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4888z00zzinline_loopz00, BgL_bgl_findza7d2letza7d2funza7f3za7d2boxza7d2setza7122872za7e1za7za7inline_loopza7004965z00, BGl_findzd2letzd2funzf3zd2boxzd2setz122872ze1zzinline_loopz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4900z00zzinline_loopz00, BgL_bgl_nestza7d2loopza712za7d2fail2899za712za7za7inline_loopza7004966za7, BGl_nestzd2loopz12zd2fail2899z12zzinline_loopz00, 0L, 3 );
DEFINE_STATIC_PROCEDURE( BGl_proc4890z00zzinline_loopz00, BgL_bgl_nestza7d2loopza712za7d2kwote2878za712za7za7inline_loopza7004967za7, BGl_nestzd2loopz12zd2kwote2878z12zzinline_loopz00, 0L, 3 );
DEFINE_STATIC_PROCEDURE( BGl_proc4889z00zzinline_loopz00, BgL_bgl_nestza7d2loopza712za7d2atom2876za712za7za7inline_loopza7004968za7, BGl_nestzd2loopz12zd2atom2876z12zzinline_loopz00, 0L, 3 );
DEFINE_STATIC_PROCEDURE( BGl_proc4901z00zzinline_loopz00, BgL_bgl_nestza7d2loopza712za7d2select2901za712za7za7inline_loopza7004969za7, BGl_nestzd2loopz12zd2select2901z12zzinline_loopz00, 0L, 3 );
DEFINE_STATIC_PROCEDURE( BGl_proc4891z00zzinline_loopz00, BgL_bgl_nestza7d2loopza712za7d2var2880za712za7za7inline_loopza7004970za7, BGl_nestzd2loopz12zd2var2880z12zzinline_loopz00, 0L, 3 );
DEFINE_STATIC_PROCEDURE( BGl_proc4902z00zzinline_loopz00, BgL_bgl_nestza7d2loopza712za7d2letza7d2fun2903za7c0za7za7inline_loopza7004971z00, BGl_nestzd2loopz12zd2letzd2fun2903zc0zzinline_loopz00, 0L, 3 );
DEFINE_STATIC_PROCEDURE( BGl_proc4892z00zzinline_loopz00, BgL_bgl_nestza7d2loopza712za7d2sequence2882za712za7za7inline_loopza7004972za7, BGl_nestzd2loopz12zd2sequence2882z12zzinline_loopz00, 0L, 3 );
DEFINE_STATIC_PROCEDURE( BGl_proc4903z00zzinline_loopz00, BgL_bgl_nestza7d2loopza712za7d2letza7d2var2906za7c0za7za7inline_loopza7004973z00, BGl_nestzd2loopz12zd2letzd2var2906zc0zzinline_loopz00, 0L, 3 );
DEFINE_STATIC_PROCEDURE( BGl_proc4893z00zzinline_loopz00, BgL_bgl_nestza7d2loopza712za7d2app2884za712za7za7inline_loopza7004974za7, BGl_nestzd2loopz12zd2app2884z12zzinline_loopz00, 0L, 3 );
DEFINE_STATIC_PROCEDURE( BGl_proc4904z00zzinline_loopz00, BgL_bgl_nestza7d2loopza712za7d2setza7d2exza7d2it2908za712za7za7inline_loopza7004975za7, BGl_nestzd2loopz12zd2setzd2exzd2it2908z12zzinline_loopz00, 0L, 3 );
DEFINE_STATIC_PROCEDURE( BGl_proc4894z00zzinline_loopz00, BgL_bgl_nestza7d2loopza712za7d2appza7d2ly2886za7c0za7za7inline_loopza7004976z00, BGl_nestzd2loopz12zd2appzd2ly2886zc0zzinline_loopz00, 0L, 3 );
DEFINE_STATIC_PROCEDURE( BGl_proc4905z00zzinline_loopz00, BgL_bgl_nestza7d2loopza712za7d2jumpza7d2exza7d2it2910za712za7za7inline_loopza7004977za7, BGl_nestzd2loopz12zd2jumpzd2exzd2it2910z12zzinline_loopz00, 0L, 3 );
DEFINE_STATIC_PROCEDURE( BGl_proc4895z00zzinline_loopz00, BgL_bgl_nestza7d2loopza712za7d2funcall2888za712za7za7inline_loopza7004978za7, BGl_nestzd2loopz12zd2funcall2888z12zzinline_loopz00, 0L, 3 );
DEFINE_STATIC_PROCEDURE( BGl_proc4906z00zzinline_loopz00, BgL_bgl_nestza7d2loopza712za7d2makeza7d2box2912za7c0za7za7inline_loopza7004979z00, BGl_nestzd2loopz12zd2makezd2box2912zc0zzinline_loopz00, 0L, 3 );
DEFINE_STATIC_PROCEDURE( BGl_proc4896z00zzinline_loopz00, BgL_bgl_nestza7d2loopza712za7d2extern2890za712za7za7inline_loopza7004980za7, BGl_nestzd2loopz12zd2extern2890z12zzinline_loopz00, 0L, 3 );
DEFINE_STATIC_PROCEDURE( BGl_proc4907z00zzinline_loopz00, BgL_bgl_nestza7d2loopza712za7d2boxza7d2ref2914za7c0za7za7inline_loopza7004981z00, BGl_nestzd2loopz12zd2boxzd2ref2914zc0zzinline_loopz00, 0L, 3 );
DEFINE_STATIC_PROCEDURE( BGl_proc4897z00zzinline_loopz00, BgL_bgl_nestza7d2loopza712za7d2cast2892za712za7za7inline_loopza7004982za7, BGl_nestzd2loopz12zd2cast2892z12zzinline_loopz00, 0L, 3 );
DEFINE_STATIC_PROCEDURE( BGl_proc4908z00zzinline_loopz00, BgL_bgl_nestza7d2loopza712za7d2boxza7d2setza7122916za7d2za7za7inline_loopza7004983za7, BGl_nestzd2loopz12zd2boxzd2setz122916zd2zzinline_loopz00, 0L, 3 );
DEFINE_STATIC_PROCEDURE( BGl_proc4898z00zzinline_loopz00, BgL_bgl_nestza7d2loopza712za7d2setq2894za712za7za7inline_loopza7004984za7, BGl_nestzd2loopz12zd2setq2894z12zzinline_loopz00, 0L, 3 );
DEFINE_STATIC_PROCEDURE( BGl_proc4899z00zzinline_loopz00, BgL_bgl_nestza7d2loopza712za7d2conditional2896za712za7za7inline_loopza7004985za7, BGl_nestzd2loopz12zd2conditional2896z12zzinline_loopz00, 0L, 3 );
DEFINE_EXPORT_GENERIC( BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_bgl__nestza7d2loopza712za7c0za7za7inline_loopza7004986z00, BGl__nestzd2loopz12zc0zzinline_loopz00, 0L, 3 );



/* module-initialization */
BGL_EXPORTED_DEF obj_t BGl_modulezd2initializa7ationz75zzinline_loopz00(long BgL_checksumz00_3271, char * BgL_fromz00_3272)
{ AN_OBJECT;
{ 
if(
CBOOL(BGl_requirezd2initializa7ationz75zzinline_loopz00))
{ 
BGl_requirezd2initializa7ationz75zzinline_loopz00 = 
BBOOL(((bool_t)0)); 
BGl_libraryzd2moduleszd2initz00zzinline_loopz00(); 
BGl_cnstzd2initzd2zzinline_loopz00(); 
BGl_importedzd2moduleszd2initz00zzinline_loopz00(); 
BGl_methodzd2initzd2zzinline_loopz00(); 
return BUNSPEC;}  else 
{ 
return BUNSPEC;} } 
}



/* library-modules-init */
obj_t BGl_libraryzd2moduleszd2initz00zzinline_loopz00()
{ AN_OBJECT;
{ /* ./Inline/loop.scm 15 */
BGl_modulezd2initializa7ationz75zz__readerz00(((long)0), "inline_loop"); 
BGl_modulezd2initializa7ationz75zz__objectz00(((long)0), "inline_loop"); 
BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(((long)0), "inline_loop"); 
return BUNSPEC;} 
}



/* cnst-init */
obj_t BGl_cnstzd2initzd2zzinline_loopz00()
{ AN_OBJECT;
{ /* ./Inline/loop.scm 15 */
{ /* ./Inline/loop.scm 15 */
obj_t BgL_cportz00_3248;
BgL_cportz00_3248 = 
open_input_string(BGl_string4910z00zzinline_loopz00); 
{ 
long BgL_iz00_3249;
BgL_iz00_3249 = ((long)1); 
BgL_loopz00_3250:
{ /* ./Inline/loop.scm 15 */
bool_t BgL_test4912z00_3251;
BgL_test4912z00_3251 = 
(BgL_iz00_3249==((long)-1)); 
if(BgL_test4912z00_3251)
{ /* ./Inline/loop.scm 15 */
return BUNSPEC;}  else 
{ /* ./Inline/loop.scm 15 */
{ /* ./Inline/loop.scm 15 */
obj_t BgL_arg4914z00_3252;
{ /* ./Inline/loop.scm 15 */
obj_t BgL_list4917z00_3253;
BgL_list4917z00_3253 = 
MAKE_PAIR(BgL_cportz00_3248, BNIL); 
BgL_arg4914z00_3252 = 
BGl_readz00zz__readerz00(BgL_list4917z00_3253); } 
{ /* ./Inline/loop.scm 15 */
int BgL_auxz00_3288;
BgL_auxz00_3288 = 
(int)(BgL_iz00_3249); 
CNST_TABLE_SET(BgL_auxz00_3288, BgL_arg4914z00_3252); } } 
{ /* ./Inline/loop.scm 15 */
int BgL_auxz00_3254;
{ /* ./Inline/loop.scm 15 */
long BgL_auxz00_3291;
BgL_auxz00_3291 = 
(BgL_iz00_3249-((long)1)); 
BgL_auxz00_3254 = 
(int)(BgL_auxz00_3291); } 
{ 
long BgL_iz00_3294;
BgL_iz00_3294 = 
(long)(BgL_auxz00_3254); 
BgL_iz00_3249 = BgL_iz00_3294; 
goto BgL_loopz00_3250;} } } } } } } 
}



/* toplevel-init */
obj_t BGl_toplevelzd2initzd2zzinline_loopz00()
{ AN_OBJECT;
{ /* ./Inline/loop.scm 15 */
return BUNSPEC;} 
}



/* is-loop? */
BGL_EXPORTED_DEF bool_t BGl_iszd2loopzf3z21zzinline_loopz00(BgL_variablez00_bglt BgL_variablez00_1)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 39 */
{ /* ./Inline/loop.scm 41 */
bool_t BgL__andtest_2779z00_763;
BgL__andtest_2779z00_763 = 
BGl_iszd2recursivezf3z21zzinline_recursionz00(BgL_variablez00_1); 
if(BgL__andtest_2779z00_763)
{ /* ./Inline/loop.scm 42 */
long BgL_auxz00_3298;
{ /* ./Inline/loop.scm 42 */
obj_t BgL_auxz00_3299;
{ /* ./Inline/loop.scm 42 */
BgL_isfunz00_bglt BgL_obj2687z00_1518;
{ /* ./Inline/loop.scm 42 */
BgL_valuez00_bglt BgL_auxz00_3300;
BgL_auxz00_3300 = 
(((BgL_variablez00_bglt)CREF(BgL_variablez00_1))->BgL_valuez00); 
BgL_obj2687z00_1518 = 
(BgL_isfunz00_bglt)(BgL_auxz00_3300); } 
{ 
obj_t BgL_auxz00_3303;
{ /* ./Inline/loop.scm 42 */
BgL_objectz00_bglt BgL_auxz00_3304;
BgL_auxz00_3304 = 
(BgL_objectz00_bglt)(BgL_obj2687z00_1518); 
BgL_auxz00_3303 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3304); } 
BgL_auxz00_3299 = 
(((BgL_isfunz00_bglt)CREF(BgL_auxz00_3303))->BgL_recursivezd2callszd2); } } 
BgL_auxz00_3298 = 
bgl_list_length(BgL_auxz00_3299); } 
return 
(BgL_auxz00_3298==((long)1));}  else 
{ /* ./Inline/loop.scm 41 */
return ((bool_t)0);} } } 
}



/* _is-loop? */
obj_t BGl__iszd2loopzf3z21zzinline_loopz00(obj_t BgL_envz00_3081, obj_t BgL_variablez00_3082)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 39 */
{ /* ./Inline/loop.scm 41 */
bool_t BgL_auxz00_3310;
BgL_auxz00_3310 = 
BGl_iszd2loopzf3z21zzinline_loopz00(
(BgL_variablez00_bglt)(BgL_variablez00_3082)); 
return 
BBOOL(BgL_auxz00_3310);} } 
}



/* inner-loop? */
BGL_EXPORTED_DEF bool_t BGl_innerzd2loopzf3z21zzinline_loopz00(BgL_variablez00_bglt BgL_variablez00_2)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 49 */
{ /* ./Inline/loop.scm 50 */
obj_t BgL_arg2932z00_1521;
{ /* ./Inline/loop.scm 50 */
BgL_sfunz00_bglt BgL_obj1370z00_1524;
{ /* ./Inline/loop.scm 50 */
BgL_valuez00_bglt BgL_auxz00_3314;
BgL_auxz00_3314 = 
(((BgL_variablez00_bglt)CREF(BgL_variablez00_2))->BgL_valuez00); 
BgL_obj1370z00_1524 = 
(BgL_sfunz00_bglt)(BgL_auxz00_3314); } 
BgL_arg2932z00_1521 = 
(((BgL_sfunz00_bglt)CREF(BgL_obj1370z00_1524))->BgL_bodyz00); } 
{ /* ./Inline/loop.scm 50 */
BgL_nodez00_bglt BgL_nodez00_1525;
BgL_nodez00_1525 = 
(BgL_nodez00_bglt)(BgL_arg2932z00_1521); 
{ /* ./Inline/loop.scm 50 */
obj_t BgL_method2837z00_1526;
{ /* ./Inline/loop.scm 50 */
BgL_objectz00_bglt BgL_objz00_1527;
BgL_objz00_1527 = 
(BgL_objectz00_bglt)(BgL_nodez00_1525); 
{ /* ./Inline/loop.scm 50 */
long BgL_objzd2classzd2numz00_1528;
BgL_objzd2classzd2numz00_1528 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1527); 
{ /* ./Inline/loop.scm 50 */
obj_t BgL_arg2017z00_1529;
{ /* ./Inline/loop.scm 50 */
int BgL_auxz00_3321;
BgL_auxz00_3321 = 
(int)(((long)1)); 
BgL_arg2017z00_1529 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_3321); } 
{ /* ./Inline/loop.scm 50 */
int BgL_offsetz00_1532;
BgL_offsetz00_1532 = 
(int)(BgL_objzd2classzd2numz00_1528); 
{ /* ./Inline/loop.scm 50 */
long BgL_offsetz00_1533;
{ /* ./Inline/loop.scm 50 */
long BgL_auxz00_3325;
BgL_auxz00_3325 = 
(long)(BgL_offsetz00_1532); 
BgL_offsetz00_1533 = 
(BgL_auxz00_3325-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 50 */
long BgL_modz00_1534;
{ /* ./Inline/loop.scm 50 */
int BgL_arg2028z00_1535;
BgL_arg2028z00_1535 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 50 */
long BgL_n2z00_1543;
BgL_n2z00_1543 = 
(long)(BgL_arg2028z00_1535); 
BgL_modz00_1534 = 
(BgL_offsetz00_1533/BgL_n2z00_1543); } } 
{ /* ./Inline/loop.scm 50 */
long BgL_restz00_1536;
{ /* ./Inline/loop.scm 50 */
int BgL_arg2024z00_1537;
BgL_arg2024z00_1537 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 50 */
long BgL_n2z00_1546;
BgL_n2z00_1546 = 
(long)(BgL_arg2024z00_1537); 
BgL_restz00_1536 = 
(BgL_offsetz00_1533%BgL_n2z00_1546); } } 
{ /* ./Inline/loop.scm 50 */

{ /* ./Inline/loop.scm 50 */
obj_t BgL_bucketz00_1538;
{ /* ./Inline/loop.scm 50 */
int BgL_kz00_1548;
BgL_kz00_1548 = 
(int)(BgL_modz00_1534); 
BgL_bucketz00_1538 = 
VECTOR_REF(BgL_arg2017z00_1529,BgL_kz00_1548); } 
{ /* ./Inline/loop.scm 50 */
int BgL_kz00_1550;
BgL_kz00_1550 = 
(int)(BgL_restz00_1536); 
BgL_method2837z00_1526 = 
VECTOR_REF(BgL_bucketz00_1538,BgL_kz00_1550); } } } } } } } } } } 
{ /* ./Inline/loop.scm 50 */
obj_t BgL_auxz00_3338;
BgL_auxz00_3338 = 
PROCEDURE_ENTRY(BgL_method2837z00_1526)(BgL_method2837z00_1526, 
(obj_t)(BgL_nodez00_1525), BEOA); 
return 
CBOOL(BgL_auxz00_3338);} } } } } 
}



/* _inner-loop? */
obj_t BGl__innerzd2loopzf3z21zzinline_loopz00(obj_t BgL_envz00_3083, obj_t BgL_variablez00_3084)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 49 */
{ /* ./Inline/loop.scm 50 */
bool_t BgL_auxz00_3343;
BgL_auxz00_3343 = 
BGl_innerzd2loopzf3z21zzinline_loopz00(
(BgL_variablez00_bglt)(BgL_variablez00_3084)); 
return 
BBOOL(BgL_auxz00_3343);} } 
}



/* find-let-fun?* */
bool_t BGl_findzd2letzd2funzf3za2z51zzinline_loopz00(obj_t BgL_nodeza2za2_22)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 189 */
{ 
obj_t BgL_nodeza2za2_770;
BgL_nodeza2za2_770 = BgL_nodeza2za2_22; 
BgL_loopz00_771:
{ /* ./Inline/loop.scm 192 */
bool_t BgL_test2939z00_772;
BgL_test2939z00_772 = 
NULLP(BgL_nodeza2za2_770); 
if(BgL_test2939z00_772)
{ /* ./Inline/loop.scm 192 */
return ((bool_t)0);}  else 
{ /* ./Inline/loop.scm 194 */
bool_t BgL_test2940z00_773;
{ /* ./Inline/loop.scm 194 */
obj_t BgL_arg2946z00_775;
BgL_arg2946z00_775 = 
CAR(BgL_nodeza2za2_770); 
{ /* ./Inline/loop.scm 194 */
BgL_nodez00_bglt BgL_nodez00_1553;
BgL_nodez00_1553 = 
(BgL_nodez00_bglt)(BgL_arg2946z00_775); 
{ /* ./Inline/loop.scm 194 */
obj_t BgL_method2837z00_1554;
{ /* ./Inline/loop.scm 194 */
BgL_objectz00_bglt BgL_objz00_1555;
BgL_objz00_1555 = 
(BgL_objectz00_bglt)(BgL_nodez00_1553); 
{ /* ./Inline/loop.scm 194 */
long BgL_objzd2classzd2numz00_1556;
BgL_objzd2classzd2numz00_1556 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1555); 
{ /* ./Inline/loop.scm 194 */
obj_t BgL_arg2017z00_1557;
{ /* ./Inline/loop.scm 194 */
int BgL_auxz00_3353;
BgL_auxz00_3353 = 
(int)(((long)1)); 
BgL_arg2017z00_1557 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_3353); } 
{ /* ./Inline/loop.scm 194 */
int BgL_offsetz00_1560;
BgL_offsetz00_1560 = 
(int)(BgL_objzd2classzd2numz00_1556); 
{ /* ./Inline/loop.scm 194 */
long BgL_offsetz00_1561;
{ /* ./Inline/loop.scm 194 */
long BgL_auxz00_3357;
BgL_auxz00_3357 = 
(long)(BgL_offsetz00_1560); 
BgL_offsetz00_1561 = 
(BgL_auxz00_3357-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 194 */
long BgL_modz00_1562;
{ /* ./Inline/loop.scm 194 */
int BgL_arg2028z00_1563;
BgL_arg2028z00_1563 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 194 */
long BgL_n2z00_1571;
BgL_n2z00_1571 = 
(long)(BgL_arg2028z00_1563); 
BgL_modz00_1562 = 
(BgL_offsetz00_1561/BgL_n2z00_1571); } } 
{ /* ./Inline/loop.scm 194 */
long BgL_restz00_1564;
{ /* ./Inline/loop.scm 194 */
int BgL_arg2024z00_1565;
BgL_arg2024z00_1565 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 194 */
long BgL_n2z00_1574;
BgL_n2z00_1574 = 
(long)(BgL_arg2024z00_1565); 
BgL_restz00_1564 = 
(BgL_offsetz00_1561%BgL_n2z00_1574); } } 
{ /* ./Inline/loop.scm 194 */

{ /* ./Inline/loop.scm 194 */
obj_t BgL_bucketz00_1566;
{ /* ./Inline/loop.scm 194 */
int BgL_kz00_1576;
BgL_kz00_1576 = 
(int)(BgL_modz00_1562); 
BgL_bucketz00_1566 = 
VECTOR_REF(BgL_arg2017z00_1557,BgL_kz00_1576); } 
{ /* ./Inline/loop.scm 194 */
int BgL_kz00_1578;
BgL_kz00_1578 = 
(int)(BgL_restz00_1564); 
BgL_method2837z00_1554 = 
VECTOR_REF(BgL_bucketz00_1566,BgL_kz00_1578); } } } } } } } } } } 
{ /* ./Inline/loop.scm 194 */
obj_t BgL_auxz00_3370;
BgL_auxz00_3370 = 
PROCEDURE_ENTRY(BgL_method2837z00_1554)(BgL_method2837z00_1554, 
(obj_t)(BgL_nodez00_1553), BEOA); 
BgL_test2940z00_773 = 
CBOOL(BgL_auxz00_3370); } } } } 
if(BgL_test2940z00_773)
{ /* ./Inline/loop.scm 194 */
return ((bool_t)1);}  else 
{ /* ./Inline/loop.scm 194 */
{ /* ./Inline/loop.scm 197 */
obj_t BgL_arg2942z00_774;
BgL_arg2942z00_774 = 
CDR(BgL_nodeza2za2_770); 
{ 
obj_t BgL_nodeza2za2_3377;
BgL_nodeza2za2_3377 = BgL_arg2942z00_774; 
BgL_nodeza2za2_770 = BgL_nodeza2za2_3377; 
goto BgL_loopz00_771;} } } } } } } 
}



/* nest-loop!* */
obj_t BGl_nestzd2loopz12za2z62zzinline_loopz00(obj_t BgL_nodeza2za2_89, obj_t BgL_varz00_90, obj_t BgL_nesterz00_91)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 381 */
{ 
obj_t BgL_nodeza2za2_776;
BgL_nodeza2za2_776 = BgL_nodeza2za2_89; 
BgL_loopz00_777:
{ /* ./Inline/loop.scm 383 */
bool_t BgL_test2951z00_778;
BgL_test2951z00_778 = 
NULLP(BgL_nodeza2za2_776); 
if(BgL_test2951z00_778)
{ /* ./Inline/loop.scm 383 */
return 
CNST_TABLE_REF(((long)0));}  else 
{ /* ./Inline/loop.scm 383 */
{ /* ./Inline/loop.scm 386 */
BgL_nodez00_bglt BgL_arg2953z00_779;
{ /* ./Inline/loop.scm 386 */
obj_t BgL_arg2956z00_780;
BgL_arg2956z00_780 = 
CAR(BgL_nodeza2za2_776); 
{ /* ./Inline/loop.scm 386 */
BgL_nodez00_bglt BgL_res3915z00_1610;
{ /* ./Inline/loop.scm 386 */
BgL_nodez00_bglt BgL_nodez00_1582;BgL_localz00_bglt BgL_localz00_1583;
BgL_nodez00_1582 = 
(BgL_nodez00_bglt)(BgL_arg2956z00_780); 
BgL_localz00_1583 = 
(BgL_localz00_bglt)(BgL_varz00_90); 
{ /* ./Inline/loop.scm 386 */
obj_t BgL_method2874z00_1585;
{ /* ./Inline/loop.scm 386 */
BgL_objectz00_bglt BgL_objz00_1586;
BgL_objz00_1586 = 
(BgL_objectz00_bglt)(BgL_nodez00_1582); 
{ /* ./Inline/loop.scm 386 */
long BgL_objzd2classzd2numz00_1587;
BgL_objzd2classzd2numz00_1587 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1586); 
{ /* ./Inline/loop.scm 386 */
obj_t BgL_arg2017z00_1588;
{ /* ./Inline/loop.scm 386 */
int BgL_auxz00_3386;
BgL_auxz00_3386 = 
(int)(((long)1)); 
BgL_arg2017z00_1588 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_3386); } 
{ /* ./Inline/loop.scm 386 */
int BgL_offsetz00_1591;
BgL_offsetz00_1591 = 
(int)(BgL_objzd2classzd2numz00_1587); 
{ /* ./Inline/loop.scm 386 */
long BgL_offsetz00_1592;
{ /* ./Inline/loop.scm 386 */
long BgL_auxz00_3390;
BgL_auxz00_3390 = 
(long)(BgL_offsetz00_1591); 
BgL_offsetz00_1592 = 
(BgL_auxz00_3390-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 386 */
long BgL_modz00_1593;
{ /* ./Inline/loop.scm 386 */
int BgL_arg2028z00_1594;
BgL_arg2028z00_1594 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 386 */
long BgL_n2z00_1602;
BgL_n2z00_1602 = 
(long)(BgL_arg2028z00_1594); 
BgL_modz00_1593 = 
(BgL_offsetz00_1592/BgL_n2z00_1602); } } 
{ /* ./Inline/loop.scm 386 */
long BgL_restz00_1595;
{ /* ./Inline/loop.scm 386 */
int BgL_arg2024z00_1596;
BgL_arg2024z00_1596 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 386 */
long BgL_n2z00_1605;
BgL_n2z00_1605 = 
(long)(BgL_arg2024z00_1596); 
BgL_restz00_1595 = 
(BgL_offsetz00_1592%BgL_n2z00_1605); } } 
{ /* ./Inline/loop.scm 386 */

{ /* ./Inline/loop.scm 386 */
obj_t BgL_bucketz00_1597;
{ /* ./Inline/loop.scm 386 */
int BgL_kz00_1607;
BgL_kz00_1607 = 
(int)(BgL_modz00_1593); 
BgL_bucketz00_1597 = 
VECTOR_REF(BgL_arg2017z00_1588,BgL_kz00_1607); } 
{ /* ./Inline/loop.scm 386 */
int BgL_kz00_1609;
BgL_kz00_1609 = 
(int)(BgL_restz00_1595); 
BgL_method2874z00_1585 = 
VECTOR_REF(BgL_bucketz00_1597,BgL_kz00_1609); } } } } } } } } } } 
{ /* ./Inline/loop.scm 386 */
obj_t BgL_auxz00_3403;
BgL_auxz00_3403 = 
PROCEDURE_ENTRY(BgL_method2874z00_1585)(BgL_method2874z00_1585, 
(obj_t)(BgL_nodez00_1582), 
(obj_t)(BgL_localz00_1583), BgL_nesterz00_91, BEOA); 
BgL_res3915z00_1610 = 
(BgL_nodez00_bglt)(BgL_auxz00_3403); } } } 
BgL_arg2953z00_779 = BgL_res3915z00_1610; } } 
{ /* ./Inline/loop.scm 386 */
obj_t BgL_objz00_1612;
BgL_objz00_1612 = 
(obj_t)(BgL_arg2953z00_779); 
SET_CAR(BgL_nodeza2za2_776, BgL_objz00_1612); } } 
{ /* ./Inline/loop.scm 387 */
obj_t BgL_arg2960z00_781;
BgL_arg2960z00_781 = 
CDR(BgL_nodeza2za2_776); 
{ 
obj_t BgL_nodeza2za2_3412;
BgL_nodeza2za2_3412 = BgL_arg2960z00_781; 
BgL_nodeza2za2_776 = BgL_nodeza2za2_3412; 
goto BgL_loopz00_777;} } } } } } 
}



/* method-init */
obj_t BGl_methodzd2initzd2zzinline_loopz00()
{ AN_OBJECT;
{ /* ./Inline/loop.scm 15 */
BGl_addzd2genericz12zc0zz__objectz00(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BGl_findzd2letzd2funzf3zd2default2836zd2envzf3zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BGl_sequencez00zzast_nodez00, BGl_proc4872z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BGl_appz00zzast_nodez00, BGl_proc4873z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BGl_appzd2lyzd2zzast_nodez00, BGl_proc4874z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BGl_funcallz00zzast_nodez00, BGl_proc4875z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BGl_externz00zzast_nodez00, BGl_proc4876z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BGl_castz00zzast_nodez00, BGl_proc4877z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BGl_setqz00zzast_nodez00, BGl_proc4878z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BGl_conditionalz00zzast_nodez00, BGl_proc4879z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BGl_failz00zzast_nodez00, BGl_proc4880z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BGl_selectz00zzast_nodez00, BGl_proc4881z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BGl_letzd2funzd2zzast_nodez00, BGl_proc4882z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BGl_letzd2varzd2zzast_nodez00, BGl_proc4883z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BGl_setzd2exzd2itz00zzast_nodez00, BGl_proc4884z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BGl_jumpzd2exzd2itz00zzast_nodez00, BGl_proc4885z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BGl_makezd2boxzd2zzast_nodez00, BGl_proc4886z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BGl_boxzd2refzd2zzast_nodez00, BGl_proc4887z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BGl_boxzd2setz12zc0zzast_nodez00, BGl_proc4888z00zzinline_loopz00); 
BGl_addzd2genericz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_nestzd2loopz12zd2default2873zd2envzc0zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_atomz00zzast_nodez00, BGl_proc4889z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_kwotez00zzast_nodez00, BGl_proc4890z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_varz00zzast_nodez00, BGl_proc4891z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_sequencez00zzast_nodez00, BGl_proc4892z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_appz00zzast_nodez00, BGl_proc4893z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_appzd2lyzd2zzast_nodez00, BGl_proc4894z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_funcallz00zzast_nodez00, BGl_proc4895z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_externz00zzast_nodez00, BGl_proc4896z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_castz00zzast_nodez00, BGl_proc4897z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_setqz00zzast_nodez00, BGl_proc4898z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_conditionalz00zzast_nodez00, BGl_proc4899z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_failz00zzast_nodez00, BGl_proc4900z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_selectz00zzast_nodez00, BGl_proc4901z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_letzd2funzd2zzast_nodez00, BGl_proc4902z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_letzd2varzd2zzast_nodez00, BGl_proc4903z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_setzd2exzd2itz00zzast_nodez00, BGl_proc4904z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_jumpzd2exzd2itz00zzast_nodez00, BGl_proc4905z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_makezd2boxzd2zzast_nodez00, BGl_proc4906z00zzinline_loopz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_boxzd2refzd2zzast_nodez00, BGl_proc4907z00zzinline_loopz00); 
return 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BGl_boxzd2setz12zc0zzast_nodez00, BGl_proc4908z00zzinline_loopz00);} 
}



/* nest-loop!-box-set!2916 */
obj_t BGl_nestzd2loopz12zd2boxzd2setz122916zd2zzinline_loopz00(obj_t BgL_envz00_3128, obj_t BgL_nodez00_3129, obj_t BgL_vz00_3130, obj_t BgL_nesterz00_3131)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 372 */
{ 
BgL_boxzd2setz12zc0_bglt BgL_nodez00_1503;obj_t BgL_vz00_1504;obj_t BgL_nesterz00_1505;
{ /* ./Inline/loop.scm 373 */
BgL_boxzd2setz12zc0_bglt BgL_auxz00_3452;
BgL_nodez00_1503 = 
(BgL_boxzd2setz12zc0_bglt)(BgL_nodez00_3129); 
BgL_vz00_1504 = BgL_vz00_3130; 
BgL_nesterz00_1505 = BgL_nesterz00_3131; 
{ /* ./Inline/loop.scm 374 */
BgL_nodez00_bglt BgL_arg3871z00_1509;
{ /* ./Inline/loop.scm 374 */
BgL_varz00_bglt BgL_arg3874z00_1510;
BgL_arg3874z00_1510 = 
(((BgL_boxzd2setz12zc0_bglt)CREF(BgL_nodez00_1503))->BgL_varz00); 
{ /* ./Inline/loop.scm 374 */
BgL_nodez00_bglt BgL_res4028z00_2993;
{ /* ./Inline/loop.scm 374 */
BgL_nodez00_bglt BgL_nodez00_2965;BgL_localz00_bglt BgL_localz00_2966;
BgL_nodez00_2965 = 
(BgL_nodez00_bglt)(BgL_arg3874z00_1510); 
BgL_localz00_2966 = 
(BgL_localz00_bglt)(BgL_vz00_1504); 
{ /* ./Inline/loop.scm 374 */
obj_t BgL_method2874z00_2968;
{ /* ./Inline/loop.scm 374 */
BgL_objectz00_bglt BgL_objz00_2969;
BgL_objz00_2969 = 
(BgL_objectz00_bglt)(BgL_nodez00_2965); 
{ /* ./Inline/loop.scm 374 */
long BgL_objzd2classzd2numz00_2970;
BgL_objzd2classzd2numz00_2970 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2969); 
{ /* ./Inline/loop.scm 374 */
obj_t BgL_arg2017z00_2971;
{ /* ./Inline/loop.scm 374 */
int BgL_auxz00_3458;
BgL_auxz00_3458 = 
(int)(((long)1)); 
BgL_arg2017z00_2971 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_3458); } 
{ /* ./Inline/loop.scm 374 */
int BgL_offsetz00_2974;
BgL_offsetz00_2974 = 
(int)(BgL_objzd2classzd2numz00_2970); 
{ /* ./Inline/loop.scm 374 */
long BgL_offsetz00_2975;
{ /* ./Inline/loop.scm 374 */
long BgL_auxz00_3462;
BgL_auxz00_3462 = 
(long)(BgL_offsetz00_2974); 
BgL_offsetz00_2975 = 
(BgL_auxz00_3462-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 374 */
long BgL_modz00_2976;
{ /* ./Inline/loop.scm 374 */
int BgL_arg2028z00_2977;
BgL_arg2028z00_2977 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 374 */
long BgL_n2z00_2985;
BgL_n2z00_2985 = 
(long)(BgL_arg2028z00_2977); 
BgL_modz00_2976 = 
(BgL_offsetz00_2975/BgL_n2z00_2985); } } 
{ /* ./Inline/loop.scm 374 */
long BgL_restz00_2978;
{ /* ./Inline/loop.scm 374 */
int BgL_arg2024z00_2979;
BgL_arg2024z00_2979 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 374 */
long BgL_n2z00_2988;
BgL_n2z00_2988 = 
(long)(BgL_arg2024z00_2979); 
BgL_restz00_2978 = 
(BgL_offsetz00_2975%BgL_n2z00_2988); } } 
{ /* ./Inline/loop.scm 374 */

{ /* ./Inline/loop.scm 374 */
obj_t BgL_bucketz00_2980;
{ /* ./Inline/loop.scm 374 */
int BgL_kz00_2990;
BgL_kz00_2990 = 
(int)(BgL_modz00_2976); 
BgL_bucketz00_2980 = 
VECTOR_REF(BgL_arg2017z00_2971,BgL_kz00_2990); } 
{ /* ./Inline/loop.scm 374 */
int BgL_kz00_2992;
BgL_kz00_2992 = 
(int)(BgL_restz00_2978); 
BgL_method2874z00_2968 = 
VECTOR_REF(BgL_bucketz00_2980,BgL_kz00_2992); } } } } } } } } } } 
{ /* ./Inline/loop.scm 374 */
obj_t BgL_auxz00_3475;
BgL_auxz00_3475 = 
PROCEDURE_ENTRY(BgL_method2874z00_2968)(BgL_method2874z00_2968, 
(obj_t)(BgL_nodez00_2965), 
(obj_t)(BgL_localz00_2966), BgL_nesterz00_1505, BEOA); 
BgL_res4028z00_2993 = 
(BgL_nodez00_bglt)(BgL_auxz00_3475); } } } 
BgL_arg3871z00_1509 = BgL_res4028z00_2993; } } 
{ /* ./Inline/loop.scm 374 */
BgL_boxzd2setz12zc0_bglt BgL_obj2642z00_2994;BgL_varz00_bglt BgL_val2641z00_2995;
BgL_obj2642z00_2994 = BgL_nodez00_1503; 
BgL_val2641z00_2995 = 
(BgL_varz00_bglt)(BgL_arg3871z00_1509); 
((((BgL_boxzd2setz12zc0_bglt)CREF(BgL_obj2642z00_2994))->BgL_varz00) = ((BgL_varz00_bglt)BgL_val2641z00_2995), BUNSPEC); } } 
{ /* ./Inline/loop.scm 375 */
BgL_nodez00_bglt BgL_arg3879z00_1511;
{ /* ./Inline/loop.scm 375 */
BgL_nodez00_bglt BgL_arg3882z00_1512;
BgL_arg3882z00_1512 = 
(((BgL_boxzd2setz12zc0_bglt)CREF(BgL_nodez00_1503))->BgL_valuez00); 
{ /* ./Inline/loop.scm 375 */
BgL_nodez00_bglt BgL_res4031z00_3025;
{ /* ./Inline/loop.scm 375 */
BgL_localz00_bglt BgL_localz00_2998;
BgL_localz00_2998 = 
(BgL_localz00_bglt)(BgL_vz00_1504); 
{ /* ./Inline/loop.scm 375 */
obj_t BgL_method2874z00_3000;
{ /* ./Inline/loop.scm 375 */
BgL_objectz00_bglt BgL_objz00_3001;
BgL_objz00_3001 = 
(BgL_objectz00_bglt)(BgL_arg3882z00_1512); 
{ /* ./Inline/loop.scm 375 */
long BgL_objzd2classzd2numz00_3002;
BgL_objzd2classzd2numz00_3002 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3001); 
{ /* ./Inline/loop.scm 375 */
obj_t BgL_arg2017z00_3003;
{ /* ./Inline/loop.scm 375 */
int BgL_auxz00_3487;
BgL_auxz00_3487 = 
(int)(((long)1)); 
BgL_arg2017z00_3003 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_3487); } 
{ /* ./Inline/loop.scm 375 */
int BgL_offsetz00_3006;
BgL_offsetz00_3006 = 
(int)(BgL_objzd2classzd2numz00_3002); 
{ /* ./Inline/loop.scm 375 */
long BgL_offsetz00_3007;
{ /* ./Inline/loop.scm 375 */
long BgL_auxz00_3491;
BgL_auxz00_3491 = 
(long)(BgL_offsetz00_3006); 
BgL_offsetz00_3007 = 
(BgL_auxz00_3491-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 375 */
long BgL_modz00_3008;
{ /* ./Inline/loop.scm 375 */
int BgL_arg2028z00_3009;
BgL_arg2028z00_3009 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 375 */
long BgL_n2z00_3017;
BgL_n2z00_3017 = 
(long)(BgL_arg2028z00_3009); 
BgL_modz00_3008 = 
(BgL_offsetz00_3007/BgL_n2z00_3017); } } 
{ /* ./Inline/loop.scm 375 */
long BgL_restz00_3010;
{ /* ./Inline/loop.scm 375 */
int BgL_arg2024z00_3011;
BgL_arg2024z00_3011 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 375 */
long BgL_n2z00_3020;
BgL_n2z00_3020 = 
(long)(BgL_arg2024z00_3011); 
BgL_restz00_3010 = 
(BgL_offsetz00_3007%BgL_n2z00_3020); } } 
{ /* ./Inline/loop.scm 375 */

{ /* ./Inline/loop.scm 375 */
obj_t BgL_bucketz00_3012;
{ /* ./Inline/loop.scm 375 */
int BgL_kz00_3022;
BgL_kz00_3022 = 
(int)(BgL_modz00_3008); 
BgL_bucketz00_3012 = 
VECTOR_REF(BgL_arg2017z00_3003,BgL_kz00_3022); } 
{ /* ./Inline/loop.scm 375 */
int BgL_kz00_3024;
BgL_kz00_3024 = 
(int)(BgL_restz00_3010); 
BgL_method2874z00_3000 = 
VECTOR_REF(BgL_bucketz00_3012,BgL_kz00_3024); } } } } } } } } } } 
{ /* ./Inline/loop.scm 375 */
obj_t BgL_auxz00_3504;
BgL_auxz00_3504 = 
PROCEDURE_ENTRY(BgL_method2874z00_3000)(BgL_method2874z00_3000, 
(obj_t)(BgL_arg3882z00_1512), 
(obj_t)(BgL_localz00_2998), BgL_nesterz00_1505, BEOA); 
BgL_res4031z00_3025 = 
(BgL_nodez00_bglt)(BgL_auxz00_3504); } } } 
BgL_arg3879z00_1511 = BgL_res4031z00_3025; } } 
{ /* ./Inline/loop.scm 375 */
BgL_boxzd2setz12zc0_bglt BgL_obj2645z00_3026;BgL_nodez00_bglt BgL_val2644z00_3027;
BgL_obj2645z00_3026 = BgL_nodez00_1503; 
BgL_val2644z00_3027 = BgL_arg3879z00_1511; 
((((BgL_boxzd2setz12zc0_bglt)CREF(BgL_obj2645z00_3026))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_val2644z00_3027), BUNSPEC); } } 
BgL_auxz00_3452 = BgL_nodez00_1503; 
return 
(obj_t)(BgL_auxz00_3452);} } } 
}



/* nest-loop!-box-ref2914 */
obj_t BGl_nestzd2loopz12zd2boxzd2ref2914zc0zzinline_loopz00(obj_t BgL_envz00_3132, obj_t BgL_nodez00_3133, obj_t BgL_vz00_3134, obj_t BgL_nesterz00_3135)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 364 */
{ 
BgL_boxzd2refzd2_bglt BgL_nodez00_1493;obj_t BgL_vz00_1494;obj_t BgL_nesterz00_1495;
{ /* ./Inline/loop.scm 365 */
BgL_boxzd2refzd2_bglt BgL_auxz00_3513;
BgL_nodez00_1493 = 
(BgL_boxzd2refzd2_bglt)(BgL_nodez00_3133); 
BgL_vz00_1494 = BgL_vz00_3134; 
BgL_nesterz00_1495 = BgL_nesterz00_3135; 
{ /* ./Inline/loop.scm 365 */
BgL_nodez00_bglt BgL_arg3858z00_2930;
{ /* ./Inline/loop.scm 365 */
BgL_varz00_bglt BgL_arg3861z00_2931;
BgL_arg3861z00_2931 = 
(((BgL_boxzd2refzd2_bglt)CREF(BgL_nodez00_1493))->BgL_varz00); 
{ /* ./Inline/loop.scm 365 */
BgL_nodez00_bglt BgL_res4025z00_2961;
{ /* ./Inline/loop.scm 365 */
BgL_nodez00_bglt BgL_nodez00_2933;BgL_localz00_bglt BgL_localz00_2934;
BgL_nodez00_2933 = 
(BgL_nodez00_bglt)(BgL_arg3861z00_2931); 
BgL_localz00_2934 = 
(BgL_localz00_bglt)(BgL_vz00_1494); 
{ /* ./Inline/loop.scm 365 */
obj_t BgL_method2874z00_2936;
{ /* ./Inline/loop.scm 365 */
BgL_objectz00_bglt BgL_objz00_2937;
BgL_objz00_2937 = 
(BgL_objectz00_bglt)(BgL_nodez00_2933); 
{ /* ./Inline/loop.scm 365 */
long BgL_objzd2classzd2numz00_2938;
BgL_objzd2classzd2numz00_2938 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2937); 
{ /* ./Inline/loop.scm 365 */
obj_t BgL_arg2017z00_2939;
{ /* ./Inline/loop.scm 365 */
int BgL_auxz00_3519;
BgL_auxz00_3519 = 
(int)(((long)1)); 
BgL_arg2017z00_2939 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_3519); } 
{ /* ./Inline/loop.scm 365 */
int BgL_offsetz00_2942;
BgL_offsetz00_2942 = 
(int)(BgL_objzd2classzd2numz00_2938); 
{ /* ./Inline/loop.scm 365 */
long BgL_offsetz00_2943;
{ /* ./Inline/loop.scm 365 */
long BgL_auxz00_3523;
BgL_auxz00_3523 = 
(long)(BgL_offsetz00_2942); 
BgL_offsetz00_2943 = 
(BgL_auxz00_3523-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 365 */
long BgL_modz00_2944;
{ /* ./Inline/loop.scm 365 */
int BgL_arg2028z00_2945;
BgL_arg2028z00_2945 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 365 */
long BgL_n2z00_2953;
BgL_n2z00_2953 = 
(long)(BgL_arg2028z00_2945); 
BgL_modz00_2944 = 
(BgL_offsetz00_2943/BgL_n2z00_2953); } } 
{ /* ./Inline/loop.scm 365 */
long BgL_restz00_2946;
{ /* ./Inline/loop.scm 365 */
int BgL_arg2024z00_2947;
BgL_arg2024z00_2947 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 365 */
long BgL_n2z00_2956;
BgL_n2z00_2956 = 
(long)(BgL_arg2024z00_2947); 
BgL_restz00_2946 = 
(BgL_offsetz00_2943%BgL_n2z00_2956); } } 
{ /* ./Inline/loop.scm 365 */

{ /* ./Inline/loop.scm 365 */
obj_t BgL_bucketz00_2948;
{ /* ./Inline/loop.scm 365 */
int BgL_kz00_2958;
BgL_kz00_2958 = 
(int)(BgL_modz00_2944); 
BgL_bucketz00_2948 = 
VECTOR_REF(BgL_arg2017z00_2939,BgL_kz00_2958); } 
{ /* ./Inline/loop.scm 365 */
int BgL_kz00_2960;
BgL_kz00_2960 = 
(int)(BgL_restz00_2946); 
BgL_method2874z00_2936 = 
VECTOR_REF(BgL_bucketz00_2948,BgL_kz00_2960); } } } } } } } } } } 
{ /* ./Inline/loop.scm 365 */
obj_t BgL_auxz00_3536;
BgL_auxz00_3536 = 
PROCEDURE_ENTRY(BgL_method2874z00_2936)(BgL_method2874z00_2936, 
(obj_t)(BgL_nodez00_2933), 
(obj_t)(BgL_localz00_2934), BgL_nesterz00_1495, BEOA); 
BgL_res4025z00_2961 = 
(BgL_nodez00_bglt)(BgL_auxz00_3536); } } } 
BgL_arg3858z00_2930 = BgL_res4025z00_2961; } } 
{ /* ./Inline/loop.scm 365 */
BgL_boxzd2refzd2_bglt BgL_obj2616z00_2962;BgL_varz00_bglt BgL_val2615z00_2963;
BgL_obj2616z00_2962 = BgL_nodez00_1493; 
BgL_val2615z00_2963 = 
(BgL_varz00_bglt)(BgL_arg3858z00_2930); 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_obj2616z00_2962))->BgL_varz00) = ((BgL_varz00_bglt)BgL_val2615z00_2963), BUNSPEC); } } 
BgL_auxz00_3513 = BgL_nodez00_1493; 
return 
(obj_t)(BgL_auxz00_3513);} } } 
}



/* nest-loop!-make-box2912 */
obj_t BGl_nestzd2loopz12zd2makezd2box2912zc0zzinline_loopz00(obj_t BgL_envz00_3136, obj_t BgL_nodez00_3137, obj_t BgL_varz00_3138, obj_t BgL_nesterz00_3139)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 356 */
{ 
BgL_makezd2boxzd2_bglt BgL_nodez00_1483;obj_t BgL_varz00_1484;obj_t BgL_nesterz00_1485;
{ /* ./Inline/loop.scm 357 */
BgL_makezd2boxzd2_bglt BgL_auxz00_3546;
BgL_nodez00_1483 = 
(BgL_makezd2boxzd2_bglt)(BgL_nodez00_3137); 
BgL_varz00_1484 = BgL_varz00_3138; 
BgL_nesterz00_1485 = BgL_nesterz00_3139; 
{ /* ./Inline/loop.scm 357 */
BgL_nodez00_bglt BgL_arg3845z00_2895;
{ /* ./Inline/loop.scm 357 */
BgL_nodez00_bglt BgL_arg3848z00_2896;
BgL_arg3848z00_2896 = 
(((BgL_makezd2boxzd2_bglt)CREF(BgL_nodez00_1483))->BgL_valuez00); 
{ /* ./Inline/loop.scm 357 */
BgL_nodez00_bglt BgL_res4022z00_2926;
{ /* ./Inline/loop.scm 357 */
BgL_localz00_bglt BgL_localz00_2899;
BgL_localz00_2899 = 
(BgL_localz00_bglt)(BgL_varz00_1484); 
{ /* ./Inline/loop.scm 357 */
obj_t BgL_method2874z00_2901;
{ /* ./Inline/loop.scm 357 */
BgL_objectz00_bglt BgL_objz00_2902;
BgL_objz00_2902 = 
(BgL_objectz00_bglt)(BgL_arg3848z00_2896); 
{ /* ./Inline/loop.scm 357 */
long BgL_objzd2classzd2numz00_2903;
BgL_objzd2classzd2numz00_2903 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2902); 
{ /* ./Inline/loop.scm 357 */
obj_t BgL_arg2017z00_2904;
{ /* ./Inline/loop.scm 357 */
int BgL_auxz00_3551;
BgL_auxz00_3551 = 
(int)(((long)1)); 
BgL_arg2017z00_2904 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_3551); } 
{ /* ./Inline/loop.scm 357 */
int BgL_offsetz00_2907;
BgL_offsetz00_2907 = 
(int)(BgL_objzd2classzd2numz00_2903); 
{ /* ./Inline/loop.scm 357 */
long BgL_offsetz00_2908;
{ /* ./Inline/loop.scm 357 */
long BgL_auxz00_3555;
BgL_auxz00_3555 = 
(long)(BgL_offsetz00_2907); 
BgL_offsetz00_2908 = 
(BgL_auxz00_3555-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 357 */
long BgL_modz00_2909;
{ /* ./Inline/loop.scm 357 */
int BgL_arg2028z00_2910;
BgL_arg2028z00_2910 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 357 */
long BgL_n2z00_2918;
BgL_n2z00_2918 = 
(long)(BgL_arg2028z00_2910); 
BgL_modz00_2909 = 
(BgL_offsetz00_2908/BgL_n2z00_2918); } } 
{ /* ./Inline/loop.scm 357 */
long BgL_restz00_2911;
{ /* ./Inline/loop.scm 357 */
int BgL_arg2024z00_2912;
BgL_arg2024z00_2912 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 357 */
long BgL_n2z00_2921;
BgL_n2z00_2921 = 
(long)(BgL_arg2024z00_2912); 
BgL_restz00_2911 = 
(BgL_offsetz00_2908%BgL_n2z00_2921); } } 
{ /* ./Inline/loop.scm 357 */

{ /* ./Inline/loop.scm 357 */
obj_t BgL_bucketz00_2913;
{ /* ./Inline/loop.scm 357 */
int BgL_kz00_2923;
BgL_kz00_2923 = 
(int)(BgL_modz00_2909); 
BgL_bucketz00_2913 = 
VECTOR_REF(BgL_arg2017z00_2904,BgL_kz00_2923); } 
{ /* ./Inline/loop.scm 357 */
int BgL_kz00_2925;
BgL_kz00_2925 = 
(int)(BgL_restz00_2911); 
BgL_method2874z00_2901 = 
VECTOR_REF(BgL_bucketz00_2913,BgL_kz00_2925); } } } } } } } } } } 
{ /* ./Inline/loop.scm 357 */
obj_t BgL_auxz00_3568;
BgL_auxz00_3568 = 
PROCEDURE_ENTRY(BgL_method2874z00_2901)(BgL_method2874z00_2901, 
(obj_t)(BgL_arg3848z00_2896), 
(obj_t)(BgL_localz00_2899), BgL_nesterz00_1485, BEOA); 
BgL_res4022z00_2926 = 
(BgL_nodez00_bglt)(BgL_auxz00_3568); } } } 
BgL_arg3845z00_2895 = BgL_res4022z00_2926; } } 
{ /* ./Inline/loop.scm 357 */
BgL_makezd2boxzd2_bglt BgL_obj2584z00_2927;BgL_nodez00_bglt BgL_val2583z00_2928;
BgL_obj2584z00_2927 = BgL_nodez00_1483; 
BgL_val2583z00_2928 = BgL_arg3845z00_2895; 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_obj2584z00_2927))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_val2583z00_2928), BUNSPEC); } } 
BgL_auxz00_3546 = BgL_nodez00_1483; 
return 
(obj_t)(BgL_auxz00_3546);} } } 
}



/* nest-loop!-jump-ex-it2910 */
obj_t BGl_nestzd2loopz12zd2jumpzd2exzd2it2910z12zzinline_loopz00(obj_t BgL_envz00_3140, obj_t BgL_nodez00_3141, obj_t BgL_vz00_3142, obj_t BgL_nesterz00_3143)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 347 */
{ 
BgL_jumpzd2exzd2itz00_bglt BgL_nodez00_1471;obj_t BgL_vz00_1472;obj_t BgL_nesterz00_1473;
{ /* ./Inline/loop.scm 348 */
BgL_jumpzd2exzd2itz00_bglt BgL_auxz00_3577;
BgL_nodez00_1471 = 
(BgL_jumpzd2exzd2itz00_bglt)(BgL_nodez00_3141); 
BgL_vz00_1472 = BgL_vz00_3142; 
BgL_nesterz00_1473 = BgL_nesterz00_3143; 
{ /* ./Inline/loop.scm 349 */
BgL_nodez00_bglt BgL_arg3825z00_1477;
{ /* ./Inline/loop.scm 349 */
BgL_nodez00_bglt BgL_arg3828z00_1478;
BgL_arg3828z00_1478 = 
(((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_nodez00_1471))->BgL_exitz00); 
{ /* ./Inline/loop.scm 349 */
BgL_nodez00_bglt BgL_res4016z00_2859;
{ /* ./Inline/loop.scm 349 */
BgL_localz00_bglt BgL_localz00_2832;
BgL_localz00_2832 = 
(BgL_localz00_bglt)(BgL_vz00_1472); 
{ /* ./Inline/loop.scm 349 */
obj_t BgL_method2874z00_2834;
{ /* ./Inline/loop.scm 349 */
BgL_objectz00_bglt BgL_objz00_2835;
BgL_objz00_2835 = 
(BgL_objectz00_bglt)(BgL_arg3828z00_1478); 
{ /* ./Inline/loop.scm 349 */
long BgL_objzd2classzd2numz00_2836;
BgL_objzd2classzd2numz00_2836 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2835); 
{ /* ./Inline/loop.scm 349 */
obj_t BgL_arg2017z00_2837;
{ /* ./Inline/loop.scm 349 */
int BgL_auxz00_3582;
BgL_auxz00_3582 = 
(int)(((long)1)); 
BgL_arg2017z00_2837 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_3582); } 
{ /* ./Inline/loop.scm 349 */
int BgL_offsetz00_2840;
BgL_offsetz00_2840 = 
(int)(BgL_objzd2classzd2numz00_2836); 
{ /* ./Inline/loop.scm 349 */
long BgL_offsetz00_2841;
{ /* ./Inline/loop.scm 349 */
long BgL_auxz00_3586;
BgL_auxz00_3586 = 
(long)(BgL_offsetz00_2840); 
BgL_offsetz00_2841 = 
(BgL_auxz00_3586-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 349 */
long BgL_modz00_2842;
{ /* ./Inline/loop.scm 349 */
int BgL_arg2028z00_2843;
BgL_arg2028z00_2843 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 349 */
long BgL_n2z00_2851;
BgL_n2z00_2851 = 
(long)(BgL_arg2028z00_2843); 
BgL_modz00_2842 = 
(BgL_offsetz00_2841/BgL_n2z00_2851); } } 
{ /* ./Inline/loop.scm 349 */
long BgL_restz00_2844;
{ /* ./Inline/loop.scm 349 */
int BgL_arg2024z00_2845;
BgL_arg2024z00_2845 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 349 */
long BgL_n2z00_2854;
BgL_n2z00_2854 = 
(long)(BgL_arg2024z00_2845); 
BgL_restz00_2844 = 
(BgL_offsetz00_2841%BgL_n2z00_2854); } } 
{ /* ./Inline/loop.scm 349 */

{ /* ./Inline/loop.scm 349 */
obj_t BgL_bucketz00_2846;
{ /* ./Inline/loop.scm 349 */
int BgL_kz00_2856;
BgL_kz00_2856 = 
(int)(BgL_modz00_2842); 
BgL_bucketz00_2846 = 
VECTOR_REF(BgL_arg2017z00_2837,BgL_kz00_2856); } 
{ /* ./Inline/loop.scm 349 */
int BgL_kz00_2858;
BgL_kz00_2858 = 
(int)(BgL_restz00_2844); 
BgL_method2874z00_2834 = 
VECTOR_REF(BgL_bucketz00_2846,BgL_kz00_2858); } } } } } } } } } } 
{ /* ./Inline/loop.scm 349 */
obj_t BgL_auxz00_3599;
BgL_auxz00_3599 = 
PROCEDURE_ENTRY(BgL_method2874z00_2834)(BgL_method2874z00_2834, 
(obj_t)(BgL_arg3828z00_1478), 
(obj_t)(BgL_localz00_2832), BgL_nesterz00_1473, BEOA); 
BgL_res4016z00_2859 = 
(BgL_nodez00_bglt)(BgL_auxz00_3599); } } } 
BgL_arg3825z00_1477 = BgL_res4016z00_2859; } } 
{ /* ./Inline/loop.scm 349 */
BgL_jumpzd2exzd2itz00_bglt BgL_obj2552z00_2860;BgL_nodez00_bglt BgL_val2551z00_2861;
BgL_obj2552z00_2860 = BgL_nodez00_1471; 
BgL_val2551z00_2861 = BgL_arg3825z00_1477; 
((((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_obj2552z00_2860))->BgL_exitz00) = ((BgL_nodez00_bglt)BgL_val2551z00_2861), BUNSPEC); } } 
{ /* ./Inline/loop.scm 350 */
BgL_nodez00_bglt BgL_arg3832z00_1479;
{ /* ./Inline/loop.scm 350 */
BgL_nodez00_bglt BgL_arg3835z00_1480;
BgL_arg3835z00_1480 = 
(((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_nodez00_1471))->BgL_valuez00); 
{ /* ./Inline/loop.scm 350 */
BgL_nodez00_bglt BgL_res4019z00_2891;
{ /* ./Inline/loop.scm 350 */
BgL_localz00_bglt BgL_localz00_2864;
BgL_localz00_2864 = 
(BgL_localz00_bglt)(BgL_vz00_1472); 
{ /* ./Inline/loop.scm 350 */
obj_t BgL_method2874z00_2866;
{ /* ./Inline/loop.scm 350 */
BgL_objectz00_bglt BgL_objz00_2867;
BgL_objz00_2867 = 
(BgL_objectz00_bglt)(BgL_arg3835z00_1480); 
{ /* ./Inline/loop.scm 350 */
long BgL_objzd2classzd2numz00_2868;
BgL_objzd2classzd2numz00_2868 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2867); 
{ /* ./Inline/loop.scm 350 */
obj_t BgL_arg2017z00_2869;
{ /* ./Inline/loop.scm 350 */
int BgL_auxz00_3610;
BgL_auxz00_3610 = 
(int)(((long)1)); 
BgL_arg2017z00_2869 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_3610); } 
{ /* ./Inline/loop.scm 350 */
int BgL_offsetz00_2872;
BgL_offsetz00_2872 = 
(int)(BgL_objzd2classzd2numz00_2868); 
{ /* ./Inline/loop.scm 350 */
long BgL_offsetz00_2873;
{ /* ./Inline/loop.scm 350 */
long BgL_auxz00_3614;
BgL_auxz00_3614 = 
(long)(BgL_offsetz00_2872); 
BgL_offsetz00_2873 = 
(BgL_auxz00_3614-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 350 */
long BgL_modz00_2874;
{ /* ./Inline/loop.scm 350 */
int BgL_arg2028z00_2875;
BgL_arg2028z00_2875 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 350 */
long BgL_n2z00_2883;
BgL_n2z00_2883 = 
(long)(BgL_arg2028z00_2875); 
BgL_modz00_2874 = 
(BgL_offsetz00_2873/BgL_n2z00_2883); } } 
{ /* ./Inline/loop.scm 350 */
long BgL_restz00_2876;
{ /* ./Inline/loop.scm 350 */
int BgL_arg2024z00_2877;
BgL_arg2024z00_2877 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 350 */
long BgL_n2z00_2886;
BgL_n2z00_2886 = 
(long)(BgL_arg2024z00_2877); 
BgL_restz00_2876 = 
(BgL_offsetz00_2873%BgL_n2z00_2886); } } 
{ /* ./Inline/loop.scm 350 */

{ /* ./Inline/loop.scm 350 */
obj_t BgL_bucketz00_2878;
{ /* ./Inline/loop.scm 350 */
int BgL_kz00_2888;
BgL_kz00_2888 = 
(int)(BgL_modz00_2874); 
BgL_bucketz00_2878 = 
VECTOR_REF(BgL_arg2017z00_2869,BgL_kz00_2888); } 
{ /* ./Inline/loop.scm 350 */
int BgL_kz00_2890;
BgL_kz00_2890 = 
(int)(BgL_restz00_2876); 
BgL_method2874z00_2866 = 
VECTOR_REF(BgL_bucketz00_2878,BgL_kz00_2890); } } } } } } } } } } 
{ /* ./Inline/loop.scm 350 */
obj_t BgL_auxz00_3627;
BgL_auxz00_3627 = 
PROCEDURE_ENTRY(BgL_method2874z00_2866)(BgL_method2874z00_2866, 
(obj_t)(BgL_arg3835z00_1480), 
(obj_t)(BgL_localz00_2864), BgL_nesterz00_1473, BEOA); 
BgL_res4019z00_2891 = 
(BgL_nodez00_bglt)(BgL_auxz00_3627); } } } 
BgL_arg3832z00_1479 = BgL_res4019z00_2891; } } 
{ /* ./Inline/loop.scm 350 */
BgL_jumpzd2exzd2itz00_bglt BgL_obj2555z00_2892;BgL_nodez00_bglt BgL_val2554z00_2893;
BgL_obj2555z00_2892 = BgL_nodez00_1471; 
BgL_val2554z00_2893 = BgL_arg3832z00_1479; 
((((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_obj2555z00_2892))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_val2554z00_2893), BUNSPEC); } } 
BgL_auxz00_3577 = BgL_nodez00_1471; 
return 
(obj_t)(BgL_auxz00_3577);} } } 
}



/* nest-loop!-set-ex-it2908 */
obj_t BGl_nestzd2loopz12zd2setzd2exzd2it2908z12zzinline_loopz00(obj_t BgL_envz00_3144, obj_t BgL_nodez00_3145, obj_t BgL_varz00_3146, obj_t BgL_nesterz00_3147)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 339 */
{ 
BgL_setzd2exzd2itz00_bglt BgL_nodez00_1461;obj_t BgL_varz00_1462;obj_t BgL_nesterz00_1463;
{ /* ./Inline/loop.scm 340 */
BgL_setzd2exzd2itz00_bglt BgL_auxz00_3636;
BgL_nodez00_1461 = 
(BgL_setzd2exzd2itz00_bglt)(BgL_nodez00_3145); 
BgL_varz00_1462 = BgL_varz00_3146; 
BgL_nesterz00_1463 = BgL_nesterz00_3147; 
{ /* ./Inline/loop.scm 340 */
BgL_nodez00_bglt BgL_arg3812z00_2796;
{ /* ./Inline/loop.scm 340 */
BgL_nodez00_bglt BgL_arg3815z00_2797;
BgL_arg3815z00_2797 = 
(((BgL_setzd2exzd2itz00_bglt)CREF(BgL_nodez00_1461))->BgL_bodyz00); 
{ /* ./Inline/loop.scm 340 */
BgL_nodez00_bglt BgL_res4013z00_2827;
{ /* ./Inline/loop.scm 340 */
BgL_localz00_bglt BgL_localz00_2800;
BgL_localz00_2800 = 
(BgL_localz00_bglt)(BgL_varz00_1462); 
{ /* ./Inline/loop.scm 340 */
obj_t BgL_method2874z00_2802;
{ /* ./Inline/loop.scm 340 */
BgL_objectz00_bglt BgL_objz00_2803;
BgL_objz00_2803 = 
(BgL_objectz00_bglt)(BgL_arg3815z00_2797); 
{ /* ./Inline/loop.scm 340 */
long BgL_objzd2classzd2numz00_2804;
BgL_objzd2classzd2numz00_2804 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2803); 
{ /* ./Inline/loop.scm 340 */
obj_t BgL_arg2017z00_2805;
{ /* ./Inline/loop.scm 340 */
int BgL_auxz00_3641;
BgL_auxz00_3641 = 
(int)(((long)1)); 
BgL_arg2017z00_2805 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_3641); } 
{ /* ./Inline/loop.scm 340 */
int BgL_offsetz00_2808;
BgL_offsetz00_2808 = 
(int)(BgL_objzd2classzd2numz00_2804); 
{ /* ./Inline/loop.scm 340 */
long BgL_offsetz00_2809;
{ /* ./Inline/loop.scm 340 */
long BgL_auxz00_3645;
BgL_auxz00_3645 = 
(long)(BgL_offsetz00_2808); 
BgL_offsetz00_2809 = 
(BgL_auxz00_3645-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 340 */
long BgL_modz00_2810;
{ /* ./Inline/loop.scm 340 */
int BgL_arg2028z00_2811;
BgL_arg2028z00_2811 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 340 */
long BgL_n2z00_2819;
BgL_n2z00_2819 = 
(long)(BgL_arg2028z00_2811); 
BgL_modz00_2810 = 
(BgL_offsetz00_2809/BgL_n2z00_2819); } } 
{ /* ./Inline/loop.scm 340 */
long BgL_restz00_2812;
{ /* ./Inline/loop.scm 340 */
int BgL_arg2024z00_2813;
BgL_arg2024z00_2813 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 340 */
long BgL_n2z00_2822;
BgL_n2z00_2822 = 
(long)(BgL_arg2024z00_2813); 
BgL_restz00_2812 = 
(BgL_offsetz00_2809%BgL_n2z00_2822); } } 
{ /* ./Inline/loop.scm 340 */

{ /* ./Inline/loop.scm 340 */
obj_t BgL_bucketz00_2814;
{ /* ./Inline/loop.scm 340 */
int BgL_kz00_2824;
BgL_kz00_2824 = 
(int)(BgL_modz00_2810); 
BgL_bucketz00_2814 = 
VECTOR_REF(BgL_arg2017z00_2805,BgL_kz00_2824); } 
{ /* ./Inline/loop.scm 340 */
int BgL_kz00_2826;
BgL_kz00_2826 = 
(int)(BgL_restz00_2812); 
BgL_method2874z00_2802 = 
VECTOR_REF(BgL_bucketz00_2814,BgL_kz00_2826); } } } } } } } } } } 
{ /* ./Inline/loop.scm 340 */
obj_t BgL_auxz00_3658;
BgL_auxz00_3658 = 
PROCEDURE_ENTRY(BgL_method2874z00_2802)(BgL_method2874z00_2802, 
(obj_t)(BgL_arg3815z00_2797), 
(obj_t)(BgL_localz00_2800), BgL_nesterz00_1463, BEOA); 
BgL_res4013z00_2827 = 
(BgL_nodez00_bglt)(BgL_auxz00_3658); } } } 
BgL_arg3812z00_2796 = BgL_res4013z00_2827; } } 
{ /* ./Inline/loop.scm 340 */
BgL_setzd2exzd2itz00_bglt BgL_obj2529z00_2828;BgL_nodez00_bglt BgL_val2528z00_2829;
BgL_obj2529z00_2828 = BgL_nodez00_1461; 
BgL_val2528z00_2829 = BgL_arg3812z00_2796; 
((((BgL_setzd2exzd2itz00_bglt)CREF(BgL_obj2529z00_2828))->BgL_bodyz00) = ((BgL_nodez00_bglt)BgL_val2528z00_2829), BUNSPEC); } } 
BgL_auxz00_3636 = BgL_nodez00_1461; 
return 
(obj_t)(BgL_auxz00_3636);} } } 
}



/* nest-loop!-let-var2906 */
obj_t BGl_nestzd2loopz12zd2letzd2var2906zc0zzinline_loopz00(obj_t BgL_envz00_3148, obj_t BgL_nodez00_3149, obj_t BgL_varz00_3150, obj_t BgL_nesterz00_3151)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 328 */
{ 
BgL_letzd2varzd2_bglt BgL_nodez00_1443;obj_t BgL_varz00_1444;obj_t BgL_nesterz00_1445;
{ /* ./Inline/loop.scm 329 */
BgL_letzd2varzd2_bglt BgL_auxz00_3667;
BgL_nodez00_1443 = 
(BgL_letzd2varzd2_bglt)(BgL_nodez00_3149); 
BgL_varz00_1444 = BgL_varz00_3150; 
BgL_nesterz00_1445 = BgL_nesterz00_3151; 
{ /* ./Inline/loop.scm 330 */
BgL_nodez00_bglt BgL_arg3781z00_1449;
{ /* ./Inline/loop.scm 330 */
BgL_nodez00_bglt BgL_arg3784z00_1450;
BgL_arg3784z00_1450 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_nodez00_1443))->BgL_bodyz00); 
{ /* ./Inline/loop.scm 330 */
BgL_nodez00_bglt BgL_res4007z00_2756;
{ /* ./Inline/loop.scm 330 */
BgL_localz00_bglt BgL_localz00_2729;
BgL_localz00_2729 = 
(BgL_localz00_bglt)(BgL_varz00_1444); 
{ /* ./Inline/loop.scm 330 */
obj_t BgL_method2874z00_2731;
{ /* ./Inline/loop.scm 330 */
BgL_objectz00_bglt BgL_objz00_2732;
BgL_objz00_2732 = 
(BgL_objectz00_bglt)(BgL_arg3784z00_1450); 
{ /* ./Inline/loop.scm 330 */
long BgL_objzd2classzd2numz00_2733;
BgL_objzd2classzd2numz00_2733 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2732); 
{ /* ./Inline/loop.scm 330 */
obj_t BgL_arg2017z00_2734;
{ /* ./Inline/loop.scm 330 */
int BgL_auxz00_3672;
BgL_auxz00_3672 = 
(int)(((long)1)); 
BgL_arg2017z00_2734 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_3672); } 
{ /* ./Inline/loop.scm 330 */
int BgL_offsetz00_2737;
BgL_offsetz00_2737 = 
(int)(BgL_objzd2classzd2numz00_2733); 
{ /* ./Inline/loop.scm 330 */
long BgL_offsetz00_2738;
{ /* ./Inline/loop.scm 330 */
long BgL_auxz00_3676;
BgL_auxz00_3676 = 
(long)(BgL_offsetz00_2737); 
BgL_offsetz00_2738 = 
(BgL_auxz00_3676-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 330 */
long BgL_modz00_2739;
{ /* ./Inline/loop.scm 330 */
int BgL_arg2028z00_2740;
BgL_arg2028z00_2740 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 330 */
long BgL_n2z00_2748;
BgL_n2z00_2748 = 
(long)(BgL_arg2028z00_2740); 
BgL_modz00_2739 = 
(BgL_offsetz00_2738/BgL_n2z00_2748); } } 
{ /* ./Inline/loop.scm 330 */
long BgL_restz00_2741;
{ /* ./Inline/loop.scm 330 */
int BgL_arg2024z00_2742;
BgL_arg2024z00_2742 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 330 */
long BgL_n2z00_2751;
BgL_n2z00_2751 = 
(long)(BgL_arg2024z00_2742); 
BgL_restz00_2741 = 
(BgL_offsetz00_2738%BgL_n2z00_2751); } } 
{ /* ./Inline/loop.scm 330 */

{ /* ./Inline/loop.scm 330 */
obj_t BgL_bucketz00_2743;
{ /* ./Inline/loop.scm 330 */
int BgL_kz00_2753;
BgL_kz00_2753 = 
(int)(BgL_modz00_2739); 
BgL_bucketz00_2743 = 
VECTOR_REF(BgL_arg2017z00_2734,BgL_kz00_2753); } 
{ /* ./Inline/loop.scm 330 */
int BgL_kz00_2755;
BgL_kz00_2755 = 
(int)(BgL_restz00_2741); 
BgL_method2874z00_2731 = 
VECTOR_REF(BgL_bucketz00_2743,BgL_kz00_2755); } } } } } } } } } } 
{ /* ./Inline/loop.scm 330 */
obj_t BgL_auxz00_3689;
BgL_auxz00_3689 = 
PROCEDURE_ENTRY(BgL_method2874z00_2731)(BgL_method2874z00_2731, 
(obj_t)(BgL_arg3784z00_1450), 
(obj_t)(BgL_localz00_2729), BgL_nesterz00_1445, BEOA); 
BgL_res4007z00_2756 = 
(BgL_nodez00_bglt)(BgL_auxz00_3689); } } } 
BgL_arg3781z00_1449 = BgL_res4007z00_2756; } } 
{ /* ./Inline/loop.scm 330 */
BgL_letzd2varzd2_bglt BgL_obj2491z00_2757;BgL_nodez00_bglt BgL_val2490z00_2758;
BgL_obj2491z00_2757 = BgL_nodez00_1443; 
BgL_val2490z00_2758 = BgL_arg3781z00_1449; 
((((BgL_letzd2varzd2_bglt)CREF(BgL_obj2491z00_2757))->BgL_bodyz00) = ((BgL_nodez00_bglt)BgL_val2490z00_2758), BUNSPEC); } } 
{ 
obj_t BgL_l2824z00_1451;
{ /* ./Inline/loop.scm 331 */
obj_t BgL_arg3788z00_1453;
BgL_arg3788z00_1453 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_nodez00_1443))->BgL_bindingsz00); 
BgL_l2824z00_1451 = BgL_arg3788z00_1453; 
BgL_forzd2each2825zd2_1452:
{ /* ./Inline/loop.scm 331 */
bool_t BgL_test3791z00_1454;
BgL_test3791z00_1454 = 
PAIRP(BgL_l2824z00_1451); 
if(BgL_test3791z00_1454)
{ /* ./Inline/loop.scm 331 */
{ /* ./Inline/loop.scm 332 */
obj_t BgL_bindingz00_1455;
BgL_bindingz00_1455 = 
CAR(BgL_l2824z00_1451); 
{ /* ./Inline/loop.scm 332 */
BgL_nodez00_bglt BgL_arg3793z00_1456;
{ /* ./Inline/loop.scm 332 */
obj_t BgL_arg3796z00_1457;
BgL_arg3796z00_1457 = 
CDR(BgL_bindingz00_1455); 
{ /* ./Inline/loop.scm 332 */
BgL_nodez00_bglt BgL_res4010z00_2791;
{ /* ./Inline/loop.scm 332 */
BgL_nodez00_bglt BgL_nodez00_2763;BgL_localz00_bglt BgL_localz00_2764;
BgL_nodez00_2763 = 
(BgL_nodez00_bglt)(BgL_arg3796z00_1457); 
BgL_localz00_2764 = 
(BgL_localz00_bglt)(BgL_varz00_1444); 
{ /* ./Inline/loop.scm 332 */
obj_t BgL_method2874z00_2766;
{ /* ./Inline/loop.scm 332 */
BgL_objectz00_bglt BgL_objz00_2767;
BgL_objz00_2767 = 
(BgL_objectz00_bglt)(BgL_nodez00_2763); 
{ /* ./Inline/loop.scm 332 */
long BgL_objzd2classzd2numz00_2768;
BgL_objzd2classzd2numz00_2768 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2767); 
{ /* ./Inline/loop.scm 332 */
obj_t BgL_arg2017z00_2769;
{ /* ./Inline/loop.scm 332 */
int BgL_auxz00_3705;
BgL_auxz00_3705 = 
(int)(((long)1)); 
BgL_arg2017z00_2769 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_3705); } 
{ /* ./Inline/loop.scm 332 */
int BgL_offsetz00_2772;
BgL_offsetz00_2772 = 
(int)(BgL_objzd2classzd2numz00_2768); 
{ /* ./Inline/loop.scm 332 */
long BgL_offsetz00_2773;
{ /* ./Inline/loop.scm 332 */
long BgL_auxz00_3709;
BgL_auxz00_3709 = 
(long)(BgL_offsetz00_2772); 
BgL_offsetz00_2773 = 
(BgL_auxz00_3709-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 332 */
long BgL_modz00_2774;
{ /* ./Inline/loop.scm 332 */
int BgL_arg2028z00_2775;
BgL_arg2028z00_2775 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 332 */
long BgL_n2z00_2783;
BgL_n2z00_2783 = 
(long)(BgL_arg2028z00_2775); 
BgL_modz00_2774 = 
(BgL_offsetz00_2773/BgL_n2z00_2783); } } 
{ /* ./Inline/loop.scm 332 */
long BgL_restz00_2776;
{ /* ./Inline/loop.scm 332 */
int BgL_arg2024z00_2777;
BgL_arg2024z00_2777 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 332 */
long BgL_n2z00_2786;
BgL_n2z00_2786 = 
(long)(BgL_arg2024z00_2777); 
BgL_restz00_2776 = 
(BgL_offsetz00_2773%BgL_n2z00_2786); } } 
{ /* ./Inline/loop.scm 332 */

{ /* ./Inline/loop.scm 332 */
obj_t BgL_bucketz00_2778;
{ /* ./Inline/loop.scm 332 */
int BgL_kz00_2788;
BgL_kz00_2788 = 
(int)(BgL_modz00_2774); 
BgL_bucketz00_2778 = 
VECTOR_REF(BgL_arg2017z00_2769,BgL_kz00_2788); } 
{ /* ./Inline/loop.scm 332 */
int BgL_kz00_2790;
BgL_kz00_2790 = 
(int)(BgL_restz00_2776); 
BgL_method2874z00_2766 = 
VECTOR_REF(BgL_bucketz00_2778,BgL_kz00_2790); } } } } } } } } } } 
{ /* ./Inline/loop.scm 332 */
obj_t BgL_auxz00_3722;
BgL_auxz00_3722 = 
PROCEDURE_ENTRY(BgL_method2874z00_2766)(BgL_method2874z00_2766, 
(obj_t)(BgL_nodez00_2763), 
(obj_t)(BgL_localz00_2764), BgL_nesterz00_1445, BEOA); 
BgL_res4010z00_2791 = 
(BgL_nodez00_bglt)(BgL_auxz00_3722); } } } 
BgL_arg3793z00_1456 = BgL_res4010z00_2791; } } 
{ /* ./Inline/loop.scm 332 */
obj_t BgL_objz00_2793;
BgL_objz00_2793 = 
(obj_t)(BgL_arg3793z00_1456); 
SET_CDR(BgL_bindingz00_1455, BgL_objz00_2793); } } } 
{ /* ./Inline/loop.scm 331 */
obj_t BgL_arg3801z00_1458;
BgL_arg3801z00_1458 = 
CDR(BgL_l2824z00_1451); 
{ 
obj_t BgL_l2824z00_3731;
BgL_l2824z00_3731 = BgL_arg3801z00_1458; 
BgL_l2824z00_1451 = BgL_l2824z00_3731; 
goto BgL_forzd2each2825zd2_1452;} } }  else 
{ /* ./Inline/loop.scm 331 */((bool_t)1); } } } } 
BgL_auxz00_3667 = BgL_nodez00_1443; 
return 
(obj_t)(BgL_auxz00_3667);} } } 
}



/* nest-loop!-let-fun2903 */
obj_t BGl_nestzd2loopz12zd2letzd2fun2903zc0zzinline_loopz00(obj_t BgL_envz00_3152, obj_t BgL_nodez00_3153, obj_t BgL_varz00_3154, obj_t BgL_nesterz00_3155)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 313 */
{ 
BgL_letzd2funzd2_bglt BgL_nodez00_1424;obj_t BgL_varz00_1425;obj_t BgL_nesterz00_1426;
{ /* ./Inline/loop.scm 314 */
BgL_letzd2funzd2_bglt BgL_auxz00_3734;
BgL_nodez00_1424 = 
(BgL_letzd2funzd2_bglt)(BgL_nodez00_3153); 
BgL_varz00_1425 = BgL_varz00_3154; 
BgL_nesterz00_1426 = BgL_nesterz00_3155; 
{ /* ./Inline/loop.scm 315 */
BgL_nodez00_bglt BgL_arg3749z00_1430;
{ /* ./Inline/loop.scm 315 */
BgL_nodez00_bglt BgL_arg3752z00_1431;
BgL_arg3752z00_1431 = 
(((BgL_letzd2funzd2_bglt)CREF(BgL_nodez00_1424))->BgL_bodyz00); 
{ /* ./Inline/loop.scm 315 */
BgL_nodez00_bglt BgL_res4001z00_2687;
{ /* ./Inline/loop.scm 315 */
BgL_localz00_bglt BgL_localz00_2660;
BgL_localz00_2660 = 
(BgL_localz00_bglt)(BgL_varz00_1425); 
{ /* ./Inline/loop.scm 315 */
obj_t BgL_method2874z00_2662;
{ /* ./Inline/loop.scm 315 */
BgL_objectz00_bglt BgL_objz00_2663;
BgL_objz00_2663 = 
(BgL_objectz00_bglt)(BgL_arg3752z00_1431); 
{ /* ./Inline/loop.scm 315 */
long BgL_objzd2classzd2numz00_2664;
BgL_objzd2classzd2numz00_2664 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2663); 
{ /* ./Inline/loop.scm 315 */
obj_t BgL_arg2017z00_2665;
{ /* ./Inline/loop.scm 315 */
int BgL_auxz00_3739;
BgL_auxz00_3739 = 
(int)(((long)1)); 
BgL_arg2017z00_2665 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_3739); } 
{ /* ./Inline/loop.scm 315 */
int BgL_offsetz00_2668;
BgL_offsetz00_2668 = 
(int)(BgL_objzd2classzd2numz00_2664); 
{ /* ./Inline/loop.scm 315 */
long BgL_offsetz00_2669;
{ /* ./Inline/loop.scm 315 */
long BgL_auxz00_3743;
BgL_auxz00_3743 = 
(long)(BgL_offsetz00_2668); 
BgL_offsetz00_2669 = 
(BgL_auxz00_3743-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 315 */
long BgL_modz00_2670;
{ /* ./Inline/loop.scm 315 */
int BgL_arg2028z00_2671;
BgL_arg2028z00_2671 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 315 */
long BgL_n2z00_2679;
BgL_n2z00_2679 = 
(long)(BgL_arg2028z00_2671); 
BgL_modz00_2670 = 
(BgL_offsetz00_2669/BgL_n2z00_2679); } } 
{ /* ./Inline/loop.scm 315 */
long BgL_restz00_2672;
{ /* ./Inline/loop.scm 315 */
int BgL_arg2024z00_2673;
BgL_arg2024z00_2673 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 315 */
long BgL_n2z00_2682;
BgL_n2z00_2682 = 
(long)(BgL_arg2024z00_2673); 
BgL_restz00_2672 = 
(BgL_offsetz00_2669%BgL_n2z00_2682); } } 
{ /* ./Inline/loop.scm 315 */

{ /* ./Inline/loop.scm 315 */
obj_t BgL_bucketz00_2674;
{ /* ./Inline/loop.scm 315 */
int BgL_kz00_2684;
BgL_kz00_2684 = 
(int)(BgL_modz00_2670); 
BgL_bucketz00_2674 = 
VECTOR_REF(BgL_arg2017z00_2665,BgL_kz00_2684); } 
{ /* ./Inline/loop.scm 315 */
int BgL_kz00_2686;
BgL_kz00_2686 = 
(int)(BgL_restz00_2672); 
BgL_method2874z00_2662 = 
VECTOR_REF(BgL_bucketz00_2674,BgL_kz00_2686); } } } } } } } } } } 
{ /* ./Inline/loop.scm 315 */
obj_t BgL_auxz00_3756;
BgL_auxz00_3756 = 
PROCEDURE_ENTRY(BgL_method2874z00_2662)(BgL_method2874z00_2662, 
(obj_t)(BgL_arg3752z00_1431), 
(obj_t)(BgL_localz00_2660), BgL_nesterz00_1426, BEOA); 
BgL_res4001z00_2687 = 
(BgL_nodez00_bglt)(BgL_auxz00_3756); } } } 
BgL_arg3749z00_1430 = BgL_res4001z00_2687; } } 
{ /* ./Inline/loop.scm 315 */
BgL_letzd2funzd2_bglt BgL_obj2453z00_2688;BgL_nodez00_bglt BgL_val2452z00_2689;
BgL_obj2453z00_2688 = BgL_nodez00_1424; 
BgL_val2452z00_2689 = BgL_arg3749z00_1430; 
((((BgL_letzd2funzd2_bglt)CREF(BgL_obj2453z00_2688))->BgL_bodyz00) = ((BgL_nodez00_bglt)BgL_val2452z00_2689), BUNSPEC); } } 
{ 
obj_t BgL_l2820z00_1432;
{ /* ./Inline/loop.scm 316 */
obj_t BgL_arg3756z00_1434;
BgL_arg3756z00_1434 = 
(((BgL_letzd2funzd2_bglt)CREF(BgL_nodez00_1424))->BgL_localsz00); 
BgL_l2820z00_1432 = BgL_arg3756z00_1434; 
BgL_forzd2each2821zd2_1433:
{ /* ./Inline/loop.scm 316 */
bool_t BgL_test3759z00_1435;
BgL_test3759z00_1435 = 
PAIRP(BgL_l2820z00_1432); 
if(BgL_test3759z00_1435)
{ /* ./Inline/loop.scm 316 */
{ /* ./Inline/loop.scm 317 */
obj_t BgL_localz00_1436;
BgL_localz00_1436 = 
CAR(BgL_l2820z00_1432); 
{ /* ./Inline/loop.scm 317 */
BgL_valuez00_bglt BgL_sfunz00_1437;
{ /* ./Inline/loop.scm 317 */
BgL_variablez00_bglt BgL_obj1100z00_2693;
BgL_obj1100z00_2693 = 
(BgL_variablez00_bglt)(BgL_localz00_1436); 
BgL_sfunz00_1437 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1100z00_2693))->BgL_valuez00); } 
{ /* ./Inline/loop.scm 319 */
BgL_nodez00_bglt BgL_arg3761z00_1438;
{ /* ./Inline/loop.scm 319 */
obj_t BgL_arg3764z00_1439;
{ /* ./Inline/loop.scm 319 */
BgL_sfunz00_bglt BgL_obj1370z00_2694;
BgL_obj1370z00_2694 = 
(BgL_sfunz00_bglt)(BgL_sfunz00_1437); 
BgL_arg3764z00_1439 = 
(((BgL_sfunz00_bglt)CREF(BgL_obj1370z00_2694))->BgL_bodyz00); } 
{ /* ./Inline/loop.scm 319 */
BgL_nodez00_bglt BgL_res4004z00_2723;
{ /* ./Inline/loop.scm 319 */
BgL_nodez00_bglt BgL_nodez00_2695;BgL_localz00_bglt BgL_localz00_2696;
BgL_nodez00_2695 = 
(BgL_nodez00_bglt)(BgL_arg3764z00_1439); 
BgL_localz00_2696 = 
(BgL_localz00_bglt)(BgL_varz00_1425); 
{ /* ./Inline/loop.scm 319 */
obj_t BgL_method2874z00_2698;
{ /* ./Inline/loop.scm 319 */
BgL_objectz00_bglt BgL_objz00_2699;
BgL_objz00_2699 = 
(BgL_objectz00_bglt)(BgL_nodez00_2695); 
{ /* ./Inline/loop.scm 319 */
long BgL_objzd2classzd2numz00_2700;
BgL_objzd2classzd2numz00_2700 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2699); 
{ /* ./Inline/loop.scm 319 */
obj_t BgL_arg2017z00_2701;
{ /* ./Inline/loop.scm 319 */
int BgL_auxz00_3775;
BgL_auxz00_3775 = 
(int)(((long)1)); 
BgL_arg2017z00_2701 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_3775); } 
{ /* ./Inline/loop.scm 319 */
int BgL_offsetz00_2704;
BgL_offsetz00_2704 = 
(int)(BgL_objzd2classzd2numz00_2700); 
{ /* ./Inline/loop.scm 319 */
long BgL_offsetz00_2705;
{ /* ./Inline/loop.scm 319 */
long BgL_auxz00_3779;
BgL_auxz00_3779 = 
(long)(BgL_offsetz00_2704); 
BgL_offsetz00_2705 = 
(BgL_auxz00_3779-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 319 */
long BgL_modz00_2706;
{ /* ./Inline/loop.scm 319 */
int BgL_arg2028z00_2707;
BgL_arg2028z00_2707 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 319 */
long BgL_n2z00_2715;
BgL_n2z00_2715 = 
(long)(BgL_arg2028z00_2707); 
BgL_modz00_2706 = 
(BgL_offsetz00_2705/BgL_n2z00_2715); } } 
{ /* ./Inline/loop.scm 319 */
long BgL_restz00_2708;
{ /* ./Inline/loop.scm 319 */
int BgL_arg2024z00_2709;
BgL_arg2024z00_2709 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 319 */
long BgL_n2z00_2718;
BgL_n2z00_2718 = 
(long)(BgL_arg2024z00_2709); 
BgL_restz00_2708 = 
(BgL_offsetz00_2705%BgL_n2z00_2718); } } 
{ /* ./Inline/loop.scm 319 */

{ /* ./Inline/loop.scm 319 */
obj_t BgL_bucketz00_2710;
{ /* ./Inline/loop.scm 319 */
int BgL_kz00_2720;
BgL_kz00_2720 = 
(int)(BgL_modz00_2706); 
BgL_bucketz00_2710 = 
VECTOR_REF(BgL_arg2017z00_2701,BgL_kz00_2720); } 
{ /* ./Inline/loop.scm 319 */
int BgL_kz00_2722;
BgL_kz00_2722 = 
(int)(BgL_restz00_2708); 
BgL_method2874z00_2698 = 
VECTOR_REF(BgL_bucketz00_2710,BgL_kz00_2722); } } } } } } } } } } 
{ /* ./Inline/loop.scm 319 */
obj_t BgL_auxz00_3792;
BgL_auxz00_3792 = 
PROCEDURE_ENTRY(BgL_method2874z00_2698)(BgL_method2874z00_2698, 
(obj_t)(BgL_nodez00_2695), 
(obj_t)(BgL_localz00_2696), BgL_nesterz00_1426, BEOA); 
BgL_res4004z00_2723 = 
(BgL_nodez00_bglt)(BgL_auxz00_3792); } } } 
BgL_arg3761z00_1438 = BgL_res4004z00_2723; } } 
{ /* ./Inline/loop.scm 318 */
BgL_sfunz00_bglt BgL_obj1373z00_2724;obj_t BgL_val1371z00_2725;
BgL_obj1373z00_2724 = 
(BgL_sfunz00_bglt)(BgL_sfunz00_1437); 
BgL_val1371z00_2725 = 
(obj_t)(BgL_arg3761z00_1438); 
((((BgL_sfunz00_bglt)CREF(BgL_obj1373z00_2724))->BgL_bodyz00) = ((obj_t)BgL_val1371z00_2725), BUNSPEC); } } } } 
{ /* ./Inline/loop.scm 316 */
obj_t BgL_arg3770z00_1440;
BgL_arg3770z00_1440 = 
CDR(BgL_l2820z00_1432); 
{ 
obj_t BgL_l2820z00_3802;
BgL_l2820z00_3802 = BgL_arg3770z00_1440; 
BgL_l2820z00_1432 = BgL_l2820z00_3802; 
goto BgL_forzd2each2821zd2_1433;} } }  else 
{ /* ./Inline/loop.scm 316 */((bool_t)1); } } } } 
BgL_auxz00_3734 = BgL_nodez00_1424; 
return 
(obj_t)(BgL_auxz00_3734);} } } 
}



/* nest-loop!-select2901 */
obj_t BGl_nestzd2loopz12zd2select2901z12zzinline_loopz00(obj_t BgL_envz00_3156, obj_t BgL_nodez00_3157, obj_t BgL_varz00_3158, obj_t BgL_nesterz00_3159)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 302 */
{ 
BgL_selectz00_bglt BgL_nodez00_1406;obj_t BgL_varz00_1407;obj_t BgL_nesterz00_1408;
{ /* ./Inline/loop.scm 303 */
BgL_selectz00_bglt BgL_auxz00_3805;
BgL_nodez00_1406 = 
(BgL_selectz00_bglt)(BgL_nodez00_3157); 
BgL_varz00_1407 = BgL_varz00_3158; 
BgL_nesterz00_1408 = BgL_nesterz00_3159; 
{ /* ./Inline/loop.scm 304 */
BgL_nodez00_bglt BgL_arg3718z00_1412;
{ /* ./Inline/loop.scm 304 */
BgL_nodez00_bglt BgL_arg3721z00_1413;
BgL_arg3721z00_1413 = 
(((BgL_selectz00_bglt)CREF(BgL_nodez00_1406))->BgL_testz00); 
{ /* ./Inline/loop.scm 304 */
BgL_nodez00_bglt BgL_res3995z00_2619;
{ /* ./Inline/loop.scm 304 */
BgL_localz00_bglt BgL_localz00_2592;
BgL_localz00_2592 = 
(BgL_localz00_bglt)(BgL_varz00_1407); 
{ /* ./Inline/loop.scm 304 */
obj_t BgL_method2874z00_2594;
{ /* ./Inline/loop.scm 304 */
BgL_objectz00_bglt BgL_objz00_2595;
BgL_objz00_2595 = 
(BgL_objectz00_bglt)(BgL_arg3721z00_1413); 
{ /* ./Inline/loop.scm 304 */
long BgL_objzd2classzd2numz00_2596;
BgL_objzd2classzd2numz00_2596 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2595); 
{ /* ./Inline/loop.scm 304 */
obj_t BgL_arg2017z00_2597;
{ /* ./Inline/loop.scm 304 */
int BgL_auxz00_3810;
BgL_auxz00_3810 = 
(int)(((long)1)); 
BgL_arg2017z00_2597 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_3810); } 
{ /* ./Inline/loop.scm 304 */
int BgL_offsetz00_2600;
BgL_offsetz00_2600 = 
(int)(BgL_objzd2classzd2numz00_2596); 
{ /* ./Inline/loop.scm 304 */
long BgL_offsetz00_2601;
{ /* ./Inline/loop.scm 304 */
long BgL_auxz00_3814;
BgL_auxz00_3814 = 
(long)(BgL_offsetz00_2600); 
BgL_offsetz00_2601 = 
(BgL_auxz00_3814-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 304 */
long BgL_modz00_2602;
{ /* ./Inline/loop.scm 304 */
int BgL_arg2028z00_2603;
BgL_arg2028z00_2603 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 304 */
long BgL_n2z00_2611;
BgL_n2z00_2611 = 
(long)(BgL_arg2028z00_2603); 
BgL_modz00_2602 = 
(BgL_offsetz00_2601/BgL_n2z00_2611); } } 
{ /* ./Inline/loop.scm 304 */
long BgL_restz00_2604;
{ /* ./Inline/loop.scm 304 */
int BgL_arg2024z00_2605;
BgL_arg2024z00_2605 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 304 */
long BgL_n2z00_2614;
BgL_n2z00_2614 = 
(long)(BgL_arg2024z00_2605); 
BgL_restz00_2604 = 
(BgL_offsetz00_2601%BgL_n2z00_2614); } } 
{ /* ./Inline/loop.scm 304 */

{ /* ./Inline/loop.scm 304 */
obj_t BgL_bucketz00_2606;
{ /* ./Inline/loop.scm 304 */
int BgL_kz00_2616;
BgL_kz00_2616 = 
(int)(BgL_modz00_2602); 
BgL_bucketz00_2606 = 
VECTOR_REF(BgL_arg2017z00_2597,BgL_kz00_2616); } 
{ /* ./Inline/loop.scm 304 */
int BgL_kz00_2618;
BgL_kz00_2618 = 
(int)(BgL_restz00_2604); 
BgL_method2874z00_2594 = 
VECTOR_REF(BgL_bucketz00_2606,BgL_kz00_2618); } } } } } } } } } } 
{ /* ./Inline/loop.scm 304 */
obj_t BgL_auxz00_3827;
BgL_auxz00_3827 = 
PROCEDURE_ENTRY(BgL_method2874z00_2594)(BgL_method2874z00_2594, 
(obj_t)(BgL_arg3721z00_1413), 
(obj_t)(BgL_localz00_2592), BgL_nesterz00_1408, BEOA); 
BgL_res3995z00_2619 = 
(BgL_nodez00_bglt)(BgL_auxz00_3827); } } } 
BgL_arg3718z00_1412 = BgL_res3995z00_2619; } } 
{ /* ./Inline/loop.scm 304 */
BgL_selectz00_bglt BgL_obj2410z00_2620;BgL_nodez00_bglt BgL_val2409z00_2621;
BgL_obj2410z00_2620 = BgL_nodez00_1406; 
BgL_val2409z00_2621 = BgL_arg3718z00_1412; 
((((BgL_selectz00_bglt)CREF(BgL_obj2410z00_2620))->BgL_testz00) = ((BgL_nodez00_bglt)BgL_val2409z00_2621), BUNSPEC); } } 
{ 
obj_t BgL_l2816z00_1414;
{ /* ./Inline/loop.scm 305 */
obj_t BgL_arg3725z00_1416;
BgL_arg3725z00_1416 = 
(((BgL_selectz00_bglt)CREF(BgL_nodez00_1406))->BgL_clausesz00); 
BgL_l2816z00_1414 = BgL_arg3725z00_1416; 
BgL_forzd2each2817zd2_1415:
{ /* ./Inline/loop.scm 305 */
bool_t BgL_test3728z00_1417;
BgL_test3728z00_1417 = 
PAIRP(BgL_l2816z00_1414); 
if(BgL_test3728z00_1417)
{ /* ./Inline/loop.scm 305 */
{ /* ./Inline/loop.scm 306 */
obj_t BgL_clausez00_1418;
BgL_clausez00_1418 = 
CAR(BgL_l2816z00_1414); 
{ /* ./Inline/loop.scm 306 */
BgL_nodez00_bglt BgL_arg3730z00_1419;
{ /* ./Inline/loop.scm 306 */
obj_t BgL_arg3733z00_1420;
BgL_arg3733z00_1420 = 
CDR(BgL_clausez00_1418); 
{ /* ./Inline/loop.scm 306 */
BgL_nodez00_bglt BgL_res3998z00_2654;
{ /* ./Inline/loop.scm 306 */
BgL_nodez00_bglt BgL_nodez00_2626;BgL_localz00_bglt BgL_localz00_2627;
BgL_nodez00_2626 = 
(BgL_nodez00_bglt)(BgL_arg3733z00_1420); 
BgL_localz00_2627 = 
(BgL_localz00_bglt)(BgL_varz00_1407); 
{ /* ./Inline/loop.scm 306 */
obj_t BgL_method2874z00_2629;
{ /* ./Inline/loop.scm 306 */
BgL_objectz00_bglt BgL_objz00_2630;
BgL_objz00_2630 = 
(BgL_objectz00_bglt)(BgL_nodez00_2626); 
{ /* ./Inline/loop.scm 306 */
long BgL_objzd2classzd2numz00_2631;
BgL_objzd2classzd2numz00_2631 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2630); 
{ /* ./Inline/loop.scm 306 */
obj_t BgL_arg2017z00_2632;
{ /* ./Inline/loop.scm 306 */
int BgL_auxz00_3843;
BgL_auxz00_3843 = 
(int)(((long)1)); 
BgL_arg2017z00_2632 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_3843); } 
{ /* ./Inline/loop.scm 306 */
int BgL_offsetz00_2635;
BgL_offsetz00_2635 = 
(int)(BgL_objzd2classzd2numz00_2631); 
{ /* ./Inline/loop.scm 306 */
long BgL_offsetz00_2636;
{ /* ./Inline/loop.scm 306 */
long BgL_auxz00_3847;
BgL_auxz00_3847 = 
(long)(BgL_offsetz00_2635); 
BgL_offsetz00_2636 = 
(BgL_auxz00_3847-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 306 */
long BgL_modz00_2637;
{ /* ./Inline/loop.scm 306 */
int BgL_arg2028z00_2638;
BgL_arg2028z00_2638 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 306 */
long BgL_n2z00_2646;
BgL_n2z00_2646 = 
(long)(BgL_arg2028z00_2638); 
BgL_modz00_2637 = 
(BgL_offsetz00_2636/BgL_n2z00_2646); } } 
{ /* ./Inline/loop.scm 306 */
long BgL_restz00_2639;
{ /* ./Inline/loop.scm 306 */
int BgL_arg2024z00_2640;
BgL_arg2024z00_2640 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 306 */
long BgL_n2z00_2649;
BgL_n2z00_2649 = 
(long)(BgL_arg2024z00_2640); 
BgL_restz00_2639 = 
(BgL_offsetz00_2636%BgL_n2z00_2649); } } 
{ /* ./Inline/loop.scm 306 */

{ /* ./Inline/loop.scm 306 */
obj_t BgL_bucketz00_2641;
{ /* ./Inline/loop.scm 306 */
int BgL_kz00_2651;
BgL_kz00_2651 = 
(int)(BgL_modz00_2637); 
BgL_bucketz00_2641 = 
VECTOR_REF(BgL_arg2017z00_2632,BgL_kz00_2651); } 
{ /* ./Inline/loop.scm 306 */
int BgL_kz00_2653;
BgL_kz00_2653 = 
(int)(BgL_restz00_2639); 
BgL_method2874z00_2629 = 
VECTOR_REF(BgL_bucketz00_2641,BgL_kz00_2653); } } } } } } } } } } 
{ /* ./Inline/loop.scm 306 */
obj_t BgL_auxz00_3860;
BgL_auxz00_3860 = 
PROCEDURE_ENTRY(BgL_method2874z00_2629)(BgL_method2874z00_2629, 
(obj_t)(BgL_nodez00_2626), 
(obj_t)(BgL_localz00_2627), BgL_nesterz00_1408, BEOA); 
BgL_res3998z00_2654 = 
(BgL_nodez00_bglt)(BgL_auxz00_3860); } } } 
BgL_arg3730z00_1419 = BgL_res3998z00_2654; } } 
{ /* ./Inline/loop.scm 306 */
obj_t BgL_objz00_2656;
BgL_objz00_2656 = 
(obj_t)(BgL_arg3730z00_1419); 
SET_CDR(BgL_clausez00_1418, BgL_objz00_2656); } } } 
{ /* ./Inline/loop.scm 305 */
obj_t BgL_arg3738z00_1421;
BgL_arg3738z00_1421 = 
CDR(BgL_l2816z00_1414); 
{ 
obj_t BgL_l2816z00_3869;
BgL_l2816z00_3869 = BgL_arg3738z00_1421; 
BgL_l2816z00_1414 = BgL_l2816z00_3869; 
goto BgL_forzd2each2817zd2_1415;} } }  else 
{ /* ./Inline/loop.scm 305 */((bool_t)1); } } } } 
BgL_auxz00_3805 = BgL_nodez00_1406; 
return 
(obj_t)(BgL_auxz00_3805);} } } 
}



/* nest-loop!-fail2899 */
obj_t BGl_nestzd2loopz12zd2fail2899z12zzinline_loopz00(obj_t BgL_envz00_3160, obj_t BgL_nodez00_3161, obj_t BgL_varz00_3162, obj_t BgL_nesterz00_3163)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 292 */
{ 
BgL_failz00_bglt BgL_nodez00_1392;obj_t BgL_varz00_1393;obj_t BgL_nesterz00_1394;
{ /* ./Inline/loop.scm 293 */
BgL_failz00_bglt BgL_auxz00_3872;
BgL_nodez00_1392 = 
(BgL_failz00_bglt)(BgL_nodez00_3161); 
BgL_varz00_1393 = BgL_varz00_3162; 
BgL_nesterz00_1394 = BgL_nesterz00_3163; 
{ /* ./Inline/loop.scm 294 */
BgL_nodez00_bglt BgL_arg3691z00_1398;
{ /* ./Inline/loop.scm 294 */
BgL_nodez00_bglt BgL_arg3694z00_1399;
BgL_arg3694z00_1399 = 
(((BgL_failz00_bglt)CREF(BgL_nodez00_1392))->BgL_procz00); 
{ /* ./Inline/loop.scm 294 */
BgL_nodez00_bglt BgL_res3986z00_2523;
{ /* ./Inline/loop.scm 294 */
BgL_localz00_bglt BgL_localz00_2496;
BgL_localz00_2496 = 
(BgL_localz00_bglt)(BgL_varz00_1393); 
{ /* ./Inline/loop.scm 294 */
obj_t BgL_method2874z00_2498;
{ /* ./Inline/loop.scm 294 */
BgL_objectz00_bglt BgL_objz00_2499;
BgL_objz00_2499 = 
(BgL_objectz00_bglt)(BgL_arg3694z00_1399); 
{ /* ./Inline/loop.scm 294 */
long BgL_objzd2classzd2numz00_2500;
BgL_objzd2classzd2numz00_2500 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2499); 
{ /* ./Inline/loop.scm 294 */
obj_t BgL_arg2017z00_2501;
{ /* ./Inline/loop.scm 294 */
int BgL_auxz00_3877;
BgL_auxz00_3877 = 
(int)(((long)1)); 
BgL_arg2017z00_2501 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_3877); } 
{ /* ./Inline/loop.scm 294 */
int BgL_offsetz00_2504;
BgL_offsetz00_2504 = 
(int)(BgL_objzd2classzd2numz00_2500); 
{ /* ./Inline/loop.scm 294 */
long BgL_offsetz00_2505;
{ /* ./Inline/loop.scm 294 */
long BgL_auxz00_3881;
BgL_auxz00_3881 = 
(long)(BgL_offsetz00_2504); 
BgL_offsetz00_2505 = 
(BgL_auxz00_3881-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 294 */
long BgL_modz00_2506;
{ /* ./Inline/loop.scm 294 */
int BgL_arg2028z00_2507;
BgL_arg2028z00_2507 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 294 */
long BgL_n2z00_2515;
BgL_n2z00_2515 = 
(long)(BgL_arg2028z00_2507); 
BgL_modz00_2506 = 
(BgL_offsetz00_2505/BgL_n2z00_2515); } } 
{ /* ./Inline/loop.scm 294 */
long BgL_restz00_2508;
{ /* ./Inline/loop.scm 294 */
int BgL_arg2024z00_2509;
BgL_arg2024z00_2509 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 294 */
long BgL_n2z00_2518;
BgL_n2z00_2518 = 
(long)(BgL_arg2024z00_2509); 
BgL_restz00_2508 = 
(BgL_offsetz00_2505%BgL_n2z00_2518); } } 
{ /* ./Inline/loop.scm 294 */

{ /* ./Inline/loop.scm 294 */
obj_t BgL_bucketz00_2510;
{ /* ./Inline/loop.scm 294 */
int BgL_kz00_2520;
BgL_kz00_2520 = 
(int)(BgL_modz00_2506); 
BgL_bucketz00_2510 = 
VECTOR_REF(BgL_arg2017z00_2501,BgL_kz00_2520); } 
{ /* ./Inline/loop.scm 294 */
int BgL_kz00_2522;
BgL_kz00_2522 = 
(int)(BgL_restz00_2508); 
BgL_method2874z00_2498 = 
VECTOR_REF(BgL_bucketz00_2510,BgL_kz00_2522); } } } } } } } } } } 
{ /* ./Inline/loop.scm 294 */
obj_t BgL_auxz00_3894;
BgL_auxz00_3894 = 
PROCEDURE_ENTRY(BgL_method2874z00_2498)(BgL_method2874z00_2498, 
(obj_t)(BgL_arg3694z00_1399), 
(obj_t)(BgL_localz00_2496), BgL_nesterz00_1394, BEOA); 
BgL_res3986z00_2523 = 
(BgL_nodez00_bglt)(BgL_auxz00_3894); } } } 
BgL_arg3691z00_1398 = BgL_res3986z00_2523; } } 
{ /* ./Inline/loop.scm 294 */
BgL_failz00_bglt BgL_obj2372z00_2524;BgL_nodez00_bglt BgL_val2371z00_2525;
BgL_obj2372z00_2524 = BgL_nodez00_1392; 
BgL_val2371z00_2525 = BgL_arg3691z00_1398; 
((((BgL_failz00_bglt)CREF(BgL_obj2372z00_2524))->BgL_procz00) = ((BgL_nodez00_bglt)BgL_val2371z00_2525), BUNSPEC); } } 
{ /* ./Inline/loop.scm 295 */
BgL_nodez00_bglt BgL_arg3698z00_1400;
{ /* ./Inline/loop.scm 295 */
BgL_nodez00_bglt BgL_arg3701z00_1401;
BgL_arg3701z00_1401 = 
(((BgL_failz00_bglt)CREF(BgL_nodez00_1392))->BgL_msgz00); 
{ /* ./Inline/loop.scm 295 */
BgL_nodez00_bglt BgL_res3989z00_2555;
{ /* ./Inline/loop.scm 295 */
BgL_localz00_bglt BgL_localz00_2528;
BgL_localz00_2528 = 
(BgL_localz00_bglt)(BgL_varz00_1393); 
{ /* ./Inline/loop.scm 295 */
obj_t BgL_method2874z00_2530;
{ /* ./Inline/loop.scm 295 */
BgL_objectz00_bglt BgL_objz00_2531;
BgL_objz00_2531 = 
(BgL_objectz00_bglt)(BgL_arg3701z00_1401); 
{ /* ./Inline/loop.scm 295 */
long BgL_objzd2classzd2numz00_2532;
BgL_objzd2classzd2numz00_2532 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2531); 
{ /* ./Inline/loop.scm 295 */
obj_t BgL_arg2017z00_2533;
{ /* ./Inline/loop.scm 295 */
int BgL_auxz00_3905;
BgL_auxz00_3905 = 
(int)(((long)1)); 
BgL_arg2017z00_2533 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_3905); } 
{ /* ./Inline/loop.scm 295 */
int BgL_offsetz00_2536;
BgL_offsetz00_2536 = 
(int)(BgL_objzd2classzd2numz00_2532); 
{ /* ./Inline/loop.scm 295 */
long BgL_offsetz00_2537;
{ /* ./Inline/loop.scm 295 */
long BgL_auxz00_3909;
BgL_auxz00_3909 = 
(long)(BgL_offsetz00_2536); 
BgL_offsetz00_2537 = 
(BgL_auxz00_3909-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 295 */
long BgL_modz00_2538;
{ /* ./Inline/loop.scm 295 */
int BgL_arg2028z00_2539;
BgL_arg2028z00_2539 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 295 */
long BgL_n2z00_2547;
BgL_n2z00_2547 = 
(long)(BgL_arg2028z00_2539); 
BgL_modz00_2538 = 
(BgL_offsetz00_2537/BgL_n2z00_2547); } } 
{ /* ./Inline/loop.scm 295 */
long BgL_restz00_2540;
{ /* ./Inline/loop.scm 295 */
int BgL_arg2024z00_2541;
BgL_arg2024z00_2541 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 295 */
long BgL_n2z00_2550;
BgL_n2z00_2550 = 
(long)(BgL_arg2024z00_2541); 
BgL_restz00_2540 = 
(BgL_offsetz00_2537%BgL_n2z00_2550); } } 
{ /* ./Inline/loop.scm 295 */

{ /* ./Inline/loop.scm 295 */
obj_t BgL_bucketz00_2542;
{ /* ./Inline/loop.scm 295 */
int BgL_kz00_2552;
BgL_kz00_2552 = 
(int)(BgL_modz00_2538); 
BgL_bucketz00_2542 = 
VECTOR_REF(BgL_arg2017z00_2533,BgL_kz00_2552); } 
{ /* ./Inline/loop.scm 295 */
int BgL_kz00_2554;
BgL_kz00_2554 = 
(int)(BgL_restz00_2540); 
BgL_method2874z00_2530 = 
VECTOR_REF(BgL_bucketz00_2542,BgL_kz00_2554); } } } } } } } } } } 
{ /* ./Inline/loop.scm 295 */
obj_t BgL_auxz00_3922;
BgL_auxz00_3922 = 
PROCEDURE_ENTRY(BgL_method2874z00_2530)(BgL_method2874z00_2530, 
(obj_t)(BgL_arg3701z00_1401), 
(obj_t)(BgL_localz00_2528), BgL_nesterz00_1394, BEOA); 
BgL_res3989z00_2555 = 
(BgL_nodez00_bglt)(BgL_auxz00_3922); } } } 
BgL_arg3698z00_1400 = BgL_res3989z00_2555; } } 
{ /* ./Inline/loop.scm 295 */
BgL_failz00_bglt BgL_obj2375z00_2556;BgL_nodez00_bglt BgL_val2374z00_2557;
BgL_obj2375z00_2556 = BgL_nodez00_1392; 
BgL_val2374z00_2557 = BgL_arg3698z00_1400; 
((((BgL_failz00_bglt)CREF(BgL_obj2375z00_2556))->BgL_msgz00) = ((BgL_nodez00_bglt)BgL_val2374z00_2557), BUNSPEC); } } 
{ /* ./Inline/loop.scm 296 */
BgL_nodez00_bglt BgL_arg3705z00_1402;
{ /* ./Inline/loop.scm 296 */
BgL_nodez00_bglt BgL_arg3708z00_1403;
BgL_arg3708z00_1403 = 
(((BgL_failz00_bglt)CREF(BgL_nodez00_1392))->BgL_objz00); 
{ /* ./Inline/loop.scm 296 */
BgL_nodez00_bglt BgL_res3992z00_2587;
{ /* ./Inline/loop.scm 296 */
BgL_localz00_bglt BgL_localz00_2560;
BgL_localz00_2560 = 
(BgL_localz00_bglt)(BgL_varz00_1393); 
{ /* ./Inline/loop.scm 296 */
obj_t BgL_method2874z00_2562;
{ /* ./Inline/loop.scm 296 */
BgL_objectz00_bglt BgL_objz00_2563;
BgL_objz00_2563 = 
(BgL_objectz00_bglt)(BgL_arg3708z00_1403); 
{ /* ./Inline/loop.scm 296 */
long BgL_objzd2classzd2numz00_2564;
BgL_objzd2classzd2numz00_2564 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2563); 
{ /* ./Inline/loop.scm 296 */
obj_t BgL_arg2017z00_2565;
{ /* ./Inline/loop.scm 296 */
int BgL_auxz00_3933;
BgL_auxz00_3933 = 
(int)(((long)1)); 
BgL_arg2017z00_2565 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_3933); } 
{ /* ./Inline/loop.scm 296 */
int BgL_offsetz00_2568;
BgL_offsetz00_2568 = 
(int)(BgL_objzd2classzd2numz00_2564); 
{ /* ./Inline/loop.scm 296 */
long BgL_offsetz00_2569;
{ /* ./Inline/loop.scm 296 */
long BgL_auxz00_3937;
BgL_auxz00_3937 = 
(long)(BgL_offsetz00_2568); 
BgL_offsetz00_2569 = 
(BgL_auxz00_3937-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 296 */
long BgL_modz00_2570;
{ /* ./Inline/loop.scm 296 */
int BgL_arg2028z00_2571;
BgL_arg2028z00_2571 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 296 */
long BgL_n2z00_2579;
BgL_n2z00_2579 = 
(long)(BgL_arg2028z00_2571); 
BgL_modz00_2570 = 
(BgL_offsetz00_2569/BgL_n2z00_2579); } } 
{ /* ./Inline/loop.scm 296 */
long BgL_restz00_2572;
{ /* ./Inline/loop.scm 296 */
int BgL_arg2024z00_2573;
BgL_arg2024z00_2573 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 296 */
long BgL_n2z00_2582;
BgL_n2z00_2582 = 
(long)(BgL_arg2024z00_2573); 
BgL_restz00_2572 = 
(BgL_offsetz00_2569%BgL_n2z00_2582); } } 
{ /* ./Inline/loop.scm 296 */

{ /* ./Inline/loop.scm 296 */
obj_t BgL_bucketz00_2574;
{ /* ./Inline/loop.scm 296 */
int BgL_kz00_2584;
BgL_kz00_2584 = 
(int)(BgL_modz00_2570); 
BgL_bucketz00_2574 = 
VECTOR_REF(BgL_arg2017z00_2565,BgL_kz00_2584); } 
{ /* ./Inline/loop.scm 296 */
int BgL_kz00_2586;
BgL_kz00_2586 = 
(int)(BgL_restz00_2572); 
BgL_method2874z00_2562 = 
VECTOR_REF(BgL_bucketz00_2574,BgL_kz00_2586); } } } } } } } } } } 
{ /* ./Inline/loop.scm 296 */
obj_t BgL_auxz00_3950;
BgL_auxz00_3950 = 
PROCEDURE_ENTRY(BgL_method2874z00_2562)(BgL_method2874z00_2562, 
(obj_t)(BgL_arg3708z00_1403), 
(obj_t)(BgL_localz00_2560), BgL_nesterz00_1394, BEOA); 
BgL_res3992z00_2587 = 
(BgL_nodez00_bglt)(BgL_auxz00_3950); } } } 
BgL_arg3705z00_1402 = BgL_res3992z00_2587; } } 
{ /* ./Inline/loop.scm 296 */
BgL_failz00_bglt BgL_obj2378z00_2588;BgL_nodez00_bglt BgL_val2377z00_2589;
BgL_obj2378z00_2588 = BgL_nodez00_1392; 
BgL_val2377z00_2589 = BgL_arg3705z00_1402; 
((((BgL_failz00_bglt)CREF(BgL_obj2378z00_2588))->BgL_objz00) = ((BgL_nodez00_bglt)BgL_val2377z00_2589), BUNSPEC); } } 
BgL_auxz00_3872 = BgL_nodez00_1392; 
return 
(obj_t)(BgL_auxz00_3872);} } } 
}



/* nest-loop!-conditional2896 */
obj_t BGl_nestzd2loopz12zd2conditional2896z12zzinline_loopz00(obj_t BgL_envz00_3164, obj_t BgL_nodez00_3165, obj_t BgL_varz00_3166, obj_t BgL_nesterz00_3167)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 282 */
{ 
BgL_conditionalz00_bglt BgL_nodez00_1378;obj_t BgL_varz00_1379;obj_t BgL_nesterz00_1380;
{ /* ./Inline/loop.scm 283 */
BgL_conditionalz00_bglt BgL_auxz00_3959;
BgL_nodez00_1378 = 
(BgL_conditionalz00_bglt)(BgL_nodez00_3165); 
BgL_varz00_1379 = BgL_varz00_3166; 
BgL_nesterz00_1380 = BgL_nesterz00_3167; 
{ /* ./Inline/loop.scm 284 */
BgL_nodez00_bglt BgL_arg3663z00_1384;
{ /* ./Inline/loop.scm 284 */
BgL_nodez00_bglt BgL_arg3666z00_1385;
BgL_arg3666z00_1385 = 
(((BgL_conditionalz00_bglt)CREF(BgL_nodez00_1378))->BgL_testz00); 
{ /* ./Inline/loop.scm 284 */
BgL_nodez00_bglt BgL_res3977z00_2427;
{ /* ./Inline/loop.scm 284 */
BgL_localz00_bglt BgL_localz00_2400;
BgL_localz00_2400 = 
(BgL_localz00_bglt)(BgL_varz00_1379); 
{ /* ./Inline/loop.scm 284 */
obj_t BgL_method2874z00_2402;
{ /* ./Inline/loop.scm 284 */
BgL_objectz00_bglt BgL_objz00_2403;
BgL_objz00_2403 = 
(BgL_objectz00_bglt)(BgL_arg3666z00_1385); 
{ /* ./Inline/loop.scm 284 */
long BgL_objzd2classzd2numz00_2404;
BgL_objzd2classzd2numz00_2404 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2403); 
{ /* ./Inline/loop.scm 284 */
obj_t BgL_arg2017z00_2405;
{ /* ./Inline/loop.scm 284 */
int BgL_auxz00_3964;
BgL_auxz00_3964 = 
(int)(((long)1)); 
BgL_arg2017z00_2405 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_3964); } 
{ /* ./Inline/loop.scm 284 */
int BgL_offsetz00_2408;
BgL_offsetz00_2408 = 
(int)(BgL_objzd2classzd2numz00_2404); 
{ /* ./Inline/loop.scm 284 */
long BgL_offsetz00_2409;
{ /* ./Inline/loop.scm 284 */
long BgL_auxz00_3968;
BgL_auxz00_3968 = 
(long)(BgL_offsetz00_2408); 
BgL_offsetz00_2409 = 
(BgL_auxz00_3968-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 284 */
long BgL_modz00_2410;
{ /* ./Inline/loop.scm 284 */
int BgL_arg2028z00_2411;
BgL_arg2028z00_2411 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 284 */
long BgL_n2z00_2419;
BgL_n2z00_2419 = 
(long)(BgL_arg2028z00_2411); 
BgL_modz00_2410 = 
(BgL_offsetz00_2409/BgL_n2z00_2419); } } 
{ /* ./Inline/loop.scm 284 */
long BgL_restz00_2412;
{ /* ./Inline/loop.scm 284 */
int BgL_arg2024z00_2413;
BgL_arg2024z00_2413 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 284 */
long BgL_n2z00_2422;
BgL_n2z00_2422 = 
(long)(BgL_arg2024z00_2413); 
BgL_restz00_2412 = 
(BgL_offsetz00_2409%BgL_n2z00_2422); } } 
{ /* ./Inline/loop.scm 284 */

{ /* ./Inline/loop.scm 284 */
obj_t BgL_bucketz00_2414;
{ /* ./Inline/loop.scm 284 */
int BgL_kz00_2424;
BgL_kz00_2424 = 
(int)(BgL_modz00_2410); 
BgL_bucketz00_2414 = 
VECTOR_REF(BgL_arg2017z00_2405,BgL_kz00_2424); } 
{ /* ./Inline/loop.scm 284 */
int BgL_kz00_2426;
BgL_kz00_2426 = 
(int)(BgL_restz00_2412); 
BgL_method2874z00_2402 = 
VECTOR_REF(BgL_bucketz00_2414,BgL_kz00_2426); } } } } } } } } } } 
{ /* ./Inline/loop.scm 284 */
obj_t BgL_auxz00_3981;
BgL_auxz00_3981 = 
PROCEDURE_ENTRY(BgL_method2874z00_2402)(BgL_method2874z00_2402, 
(obj_t)(BgL_arg3666z00_1385), 
(obj_t)(BgL_localz00_2400), BgL_nesterz00_1380, BEOA); 
BgL_res3977z00_2427 = 
(BgL_nodez00_bglt)(BgL_auxz00_3981); } } } 
BgL_arg3663z00_1384 = BgL_res3977z00_2427; } } 
{ /* ./Inline/loop.scm 284 */
BgL_conditionalz00_bglt BgL_obj2334z00_2428;BgL_nodez00_bglt BgL_val2333z00_2429;
BgL_obj2334z00_2428 = BgL_nodez00_1378; 
BgL_val2333z00_2429 = BgL_arg3663z00_1384; 
((((BgL_conditionalz00_bglt)CREF(BgL_obj2334z00_2428))->BgL_testz00) = ((BgL_nodez00_bglt)BgL_val2333z00_2429), BUNSPEC); } } 
{ /* ./Inline/loop.scm 285 */
BgL_nodez00_bglt BgL_arg3670z00_1386;
{ /* ./Inline/loop.scm 285 */
BgL_nodez00_bglt BgL_arg3673z00_1387;
BgL_arg3673z00_1387 = 
(((BgL_conditionalz00_bglt)CREF(BgL_nodez00_1378))->BgL_truez00); 
{ /* ./Inline/loop.scm 285 */
BgL_nodez00_bglt BgL_res3980z00_2459;
{ /* ./Inline/loop.scm 285 */
BgL_localz00_bglt BgL_localz00_2432;
BgL_localz00_2432 = 
(BgL_localz00_bglt)(BgL_varz00_1379); 
{ /* ./Inline/loop.scm 285 */
obj_t BgL_method2874z00_2434;
{ /* ./Inline/loop.scm 285 */
BgL_objectz00_bglt BgL_objz00_2435;
BgL_objz00_2435 = 
(BgL_objectz00_bglt)(BgL_arg3673z00_1387); 
{ /* ./Inline/loop.scm 285 */
long BgL_objzd2classzd2numz00_2436;
BgL_objzd2classzd2numz00_2436 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2435); 
{ /* ./Inline/loop.scm 285 */
obj_t BgL_arg2017z00_2437;
{ /* ./Inline/loop.scm 285 */
int BgL_auxz00_3992;
BgL_auxz00_3992 = 
(int)(((long)1)); 
BgL_arg2017z00_2437 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_3992); } 
{ /* ./Inline/loop.scm 285 */
int BgL_offsetz00_2440;
BgL_offsetz00_2440 = 
(int)(BgL_objzd2classzd2numz00_2436); 
{ /* ./Inline/loop.scm 285 */
long BgL_offsetz00_2441;
{ /* ./Inline/loop.scm 285 */
long BgL_auxz00_3996;
BgL_auxz00_3996 = 
(long)(BgL_offsetz00_2440); 
BgL_offsetz00_2441 = 
(BgL_auxz00_3996-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 285 */
long BgL_modz00_2442;
{ /* ./Inline/loop.scm 285 */
int BgL_arg2028z00_2443;
BgL_arg2028z00_2443 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 285 */
long BgL_n2z00_2451;
BgL_n2z00_2451 = 
(long)(BgL_arg2028z00_2443); 
BgL_modz00_2442 = 
(BgL_offsetz00_2441/BgL_n2z00_2451); } } 
{ /* ./Inline/loop.scm 285 */
long BgL_restz00_2444;
{ /* ./Inline/loop.scm 285 */
int BgL_arg2024z00_2445;
BgL_arg2024z00_2445 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 285 */
long BgL_n2z00_2454;
BgL_n2z00_2454 = 
(long)(BgL_arg2024z00_2445); 
BgL_restz00_2444 = 
(BgL_offsetz00_2441%BgL_n2z00_2454); } } 
{ /* ./Inline/loop.scm 285 */

{ /* ./Inline/loop.scm 285 */
obj_t BgL_bucketz00_2446;
{ /* ./Inline/loop.scm 285 */
int BgL_kz00_2456;
BgL_kz00_2456 = 
(int)(BgL_modz00_2442); 
BgL_bucketz00_2446 = 
VECTOR_REF(BgL_arg2017z00_2437,BgL_kz00_2456); } 
{ /* ./Inline/loop.scm 285 */
int BgL_kz00_2458;
BgL_kz00_2458 = 
(int)(BgL_restz00_2444); 
BgL_method2874z00_2434 = 
VECTOR_REF(BgL_bucketz00_2446,BgL_kz00_2458); } } } } } } } } } } 
{ /* ./Inline/loop.scm 285 */
obj_t BgL_auxz00_4009;
BgL_auxz00_4009 = 
PROCEDURE_ENTRY(BgL_method2874z00_2434)(BgL_method2874z00_2434, 
(obj_t)(BgL_arg3673z00_1387), 
(obj_t)(BgL_localz00_2432), BgL_nesterz00_1380, BEOA); 
BgL_res3980z00_2459 = 
(BgL_nodez00_bglt)(BgL_auxz00_4009); } } } 
BgL_arg3670z00_1386 = BgL_res3980z00_2459; } } 
{ /* ./Inline/loop.scm 285 */
BgL_conditionalz00_bglt BgL_obj2337z00_2460;BgL_nodez00_bglt BgL_val2336z00_2461;
BgL_obj2337z00_2460 = BgL_nodez00_1378; 
BgL_val2336z00_2461 = BgL_arg3670z00_1386; 
((((BgL_conditionalz00_bglt)CREF(BgL_obj2337z00_2460))->BgL_truez00) = ((BgL_nodez00_bglt)BgL_val2336z00_2461), BUNSPEC); } } 
{ /* ./Inline/loop.scm 286 */
BgL_nodez00_bglt BgL_arg3677z00_1388;
{ /* ./Inline/loop.scm 286 */
BgL_nodez00_bglt BgL_arg3681z00_1389;
BgL_arg3681z00_1389 = 
(((BgL_conditionalz00_bglt)CREF(BgL_nodez00_1378))->BgL_falsez00); 
{ /* ./Inline/loop.scm 286 */
BgL_nodez00_bglt BgL_res3983z00_2491;
{ /* ./Inline/loop.scm 286 */
BgL_localz00_bglt BgL_localz00_2464;
BgL_localz00_2464 = 
(BgL_localz00_bglt)(BgL_varz00_1379); 
{ /* ./Inline/loop.scm 286 */
obj_t BgL_method2874z00_2466;
{ /* ./Inline/loop.scm 286 */
BgL_objectz00_bglt BgL_objz00_2467;
BgL_objz00_2467 = 
(BgL_objectz00_bglt)(BgL_arg3681z00_1389); 
{ /* ./Inline/loop.scm 286 */
long BgL_objzd2classzd2numz00_2468;
BgL_objzd2classzd2numz00_2468 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2467); 
{ /* ./Inline/loop.scm 286 */
obj_t BgL_arg2017z00_2469;
{ /* ./Inline/loop.scm 286 */
int BgL_auxz00_4020;
BgL_auxz00_4020 = 
(int)(((long)1)); 
BgL_arg2017z00_2469 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_4020); } 
{ /* ./Inline/loop.scm 286 */
int BgL_offsetz00_2472;
BgL_offsetz00_2472 = 
(int)(BgL_objzd2classzd2numz00_2468); 
{ /* ./Inline/loop.scm 286 */
long BgL_offsetz00_2473;
{ /* ./Inline/loop.scm 286 */
long BgL_auxz00_4024;
BgL_auxz00_4024 = 
(long)(BgL_offsetz00_2472); 
BgL_offsetz00_2473 = 
(BgL_auxz00_4024-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 286 */
long BgL_modz00_2474;
{ /* ./Inline/loop.scm 286 */
int BgL_arg2028z00_2475;
BgL_arg2028z00_2475 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 286 */
long BgL_n2z00_2483;
BgL_n2z00_2483 = 
(long)(BgL_arg2028z00_2475); 
BgL_modz00_2474 = 
(BgL_offsetz00_2473/BgL_n2z00_2483); } } 
{ /* ./Inline/loop.scm 286 */
long BgL_restz00_2476;
{ /* ./Inline/loop.scm 286 */
int BgL_arg2024z00_2477;
BgL_arg2024z00_2477 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 286 */
long BgL_n2z00_2486;
BgL_n2z00_2486 = 
(long)(BgL_arg2024z00_2477); 
BgL_restz00_2476 = 
(BgL_offsetz00_2473%BgL_n2z00_2486); } } 
{ /* ./Inline/loop.scm 286 */

{ /* ./Inline/loop.scm 286 */
obj_t BgL_bucketz00_2478;
{ /* ./Inline/loop.scm 286 */
int BgL_kz00_2488;
BgL_kz00_2488 = 
(int)(BgL_modz00_2474); 
BgL_bucketz00_2478 = 
VECTOR_REF(BgL_arg2017z00_2469,BgL_kz00_2488); } 
{ /* ./Inline/loop.scm 286 */
int BgL_kz00_2490;
BgL_kz00_2490 = 
(int)(BgL_restz00_2476); 
BgL_method2874z00_2466 = 
VECTOR_REF(BgL_bucketz00_2478,BgL_kz00_2490); } } } } } } } } } } 
{ /* ./Inline/loop.scm 286 */
obj_t BgL_auxz00_4037;
BgL_auxz00_4037 = 
PROCEDURE_ENTRY(BgL_method2874z00_2466)(BgL_method2874z00_2466, 
(obj_t)(BgL_arg3681z00_1389), 
(obj_t)(BgL_localz00_2464), BgL_nesterz00_1380, BEOA); 
BgL_res3983z00_2491 = 
(BgL_nodez00_bglt)(BgL_auxz00_4037); } } } 
BgL_arg3677z00_1388 = BgL_res3983z00_2491; } } 
{ /* ./Inline/loop.scm 286 */
BgL_conditionalz00_bglt BgL_obj2340z00_2492;BgL_nodez00_bglt BgL_val2339z00_2493;
BgL_obj2340z00_2492 = BgL_nodez00_1378; 
BgL_val2339z00_2493 = BgL_arg3677z00_1388; 
((((BgL_conditionalz00_bglt)CREF(BgL_obj2340z00_2492))->BgL_falsez00) = ((BgL_nodez00_bglt)BgL_val2339z00_2493), BUNSPEC); } } 
BgL_auxz00_3959 = BgL_nodez00_1378; 
return 
(obj_t)(BgL_auxz00_3959);} } } 
}



/* nest-loop!-setq2894 */
obj_t BGl_nestzd2loopz12zd2setq2894z12zzinline_loopz00(obj_t BgL_envz00_3168, obj_t BgL_nodez00_3169, obj_t BgL_varz00_3170, obj_t BgL_nesterz00_3171)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 275 */
{ 
BgL_setqz00_bglt BgL_nodez00_1370;obj_t BgL_varz00_1371;obj_t BgL_nesterz00_1372;
{ /* ./Inline/loop.scm 276 */
BgL_setqz00_bglt BgL_auxz00_4046;
BgL_nodez00_1370 = 
(BgL_setqz00_bglt)(BgL_nodez00_3169); 
BgL_varz00_1371 = BgL_varz00_3170; 
BgL_nesterz00_1372 = BgL_nesterz00_3171; 
{ /* ./Inline/loop.scm 276 */
BgL_nodez00_bglt BgL_arg3653z00_2367;
BgL_arg3653z00_2367 = 
(((BgL_setqz00_bglt)CREF(BgL_nodez00_1370))->BgL_valuez00); 
{ /* ./Inline/loop.scm 276 */
BgL_nodez00_bglt BgL_res3974z00_2397;
{ /* ./Inline/loop.scm 276 */
BgL_localz00_bglt BgL_localz00_2370;
BgL_localz00_2370 = 
(BgL_localz00_bglt)(BgL_varz00_1371); 
{ /* ./Inline/loop.scm 276 */
obj_t BgL_method2874z00_2372;
{ /* ./Inline/loop.scm 276 */
BgL_objectz00_bglt BgL_objz00_2373;
BgL_objz00_2373 = 
(BgL_objectz00_bglt)(BgL_arg3653z00_2367); 
{ /* ./Inline/loop.scm 276 */
long BgL_objzd2classzd2numz00_2374;
BgL_objzd2classzd2numz00_2374 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2373); 
{ /* ./Inline/loop.scm 276 */
obj_t BgL_arg2017z00_2375;
{ /* ./Inline/loop.scm 276 */
int BgL_auxz00_4051;
BgL_auxz00_4051 = 
(int)(((long)1)); 
BgL_arg2017z00_2375 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_4051); } 
{ /* ./Inline/loop.scm 276 */
int BgL_offsetz00_2378;
BgL_offsetz00_2378 = 
(int)(BgL_objzd2classzd2numz00_2374); 
{ /* ./Inline/loop.scm 276 */
long BgL_offsetz00_2379;
{ /* ./Inline/loop.scm 276 */
long BgL_auxz00_4055;
BgL_auxz00_4055 = 
(long)(BgL_offsetz00_2378); 
BgL_offsetz00_2379 = 
(BgL_auxz00_4055-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 276 */
long BgL_modz00_2380;
{ /* ./Inline/loop.scm 276 */
int BgL_arg2028z00_2381;
BgL_arg2028z00_2381 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 276 */
long BgL_n2z00_2389;
BgL_n2z00_2389 = 
(long)(BgL_arg2028z00_2381); 
BgL_modz00_2380 = 
(BgL_offsetz00_2379/BgL_n2z00_2389); } } 
{ /* ./Inline/loop.scm 276 */
long BgL_restz00_2382;
{ /* ./Inline/loop.scm 276 */
int BgL_arg2024z00_2383;
BgL_arg2024z00_2383 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 276 */
long BgL_n2z00_2392;
BgL_n2z00_2392 = 
(long)(BgL_arg2024z00_2383); 
BgL_restz00_2382 = 
(BgL_offsetz00_2379%BgL_n2z00_2392); } } 
{ /* ./Inline/loop.scm 276 */

{ /* ./Inline/loop.scm 276 */
obj_t BgL_bucketz00_2384;
{ /* ./Inline/loop.scm 276 */
int BgL_kz00_2394;
BgL_kz00_2394 = 
(int)(BgL_modz00_2380); 
BgL_bucketz00_2384 = 
VECTOR_REF(BgL_arg2017z00_2375,BgL_kz00_2394); } 
{ /* ./Inline/loop.scm 276 */
int BgL_kz00_2396;
BgL_kz00_2396 = 
(int)(BgL_restz00_2382); 
BgL_method2874z00_2372 = 
VECTOR_REF(BgL_bucketz00_2384,BgL_kz00_2396); } } } } } } } } } } 
{ /* ./Inline/loop.scm 276 */
obj_t BgL_auxz00_4068;
BgL_auxz00_4068 = 
PROCEDURE_ENTRY(BgL_method2874z00_2372)(BgL_method2874z00_2372, 
(obj_t)(BgL_arg3653z00_2367), 
(obj_t)(BgL_localz00_2370), BgL_nesterz00_1372, BEOA); 
BgL_res3974z00_2397 = 
(BgL_nodez00_bglt)(BgL_auxz00_4068); } } } BgL_res3974z00_2397; } } 
BgL_auxz00_4046 = BgL_nodez00_1370; 
return 
(obj_t)(BgL_auxz00_4046);} } } 
}



/* nest-loop!-cast2892 */
obj_t BGl_nestzd2loopz12zd2cast2892z12zzinline_loopz00(obj_t BgL_envz00_3172, obj_t BgL_nodez00_3173, obj_t BgL_varz00_3174, obj_t BgL_nesterz00_3175)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 268 */
{ 
BgL_castz00_bglt BgL_nodez00_1362;obj_t BgL_varz00_1363;obj_t BgL_nesterz00_1364;
{ /* ./Inline/loop.scm 269 */
BgL_castz00_bglt BgL_auxz00_4076;
BgL_nodez00_1362 = 
(BgL_castz00_bglt)(BgL_nodez00_3173); 
BgL_varz00_1363 = BgL_varz00_3174; 
BgL_nesterz00_1364 = BgL_nesterz00_3175; 
{ /* ./Inline/loop.scm 269 */
BgL_nodez00_bglt BgL_arg3643z00_2336;
BgL_arg3643z00_2336 = 
(((BgL_castz00_bglt)CREF(BgL_nodez00_1362))->BgL_argz00); 
{ /* ./Inline/loop.scm 269 */
BgL_nodez00_bglt BgL_res3971z00_2366;
{ /* ./Inline/loop.scm 269 */
BgL_localz00_bglt BgL_localz00_2339;
BgL_localz00_2339 = 
(BgL_localz00_bglt)(BgL_varz00_1363); 
{ /* ./Inline/loop.scm 269 */
obj_t BgL_method2874z00_2341;
{ /* ./Inline/loop.scm 269 */
BgL_objectz00_bglt BgL_objz00_2342;
BgL_objz00_2342 = 
(BgL_objectz00_bglt)(BgL_arg3643z00_2336); 
{ /* ./Inline/loop.scm 269 */
long BgL_objzd2classzd2numz00_2343;
BgL_objzd2classzd2numz00_2343 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2342); 
{ /* ./Inline/loop.scm 269 */
obj_t BgL_arg2017z00_2344;
{ /* ./Inline/loop.scm 269 */
int BgL_auxz00_4081;
BgL_auxz00_4081 = 
(int)(((long)1)); 
BgL_arg2017z00_2344 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_4081); } 
{ /* ./Inline/loop.scm 269 */
int BgL_offsetz00_2347;
BgL_offsetz00_2347 = 
(int)(BgL_objzd2classzd2numz00_2343); 
{ /* ./Inline/loop.scm 269 */
long BgL_offsetz00_2348;
{ /* ./Inline/loop.scm 269 */
long BgL_auxz00_4085;
BgL_auxz00_4085 = 
(long)(BgL_offsetz00_2347); 
BgL_offsetz00_2348 = 
(BgL_auxz00_4085-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 269 */
long BgL_modz00_2349;
{ /* ./Inline/loop.scm 269 */
int BgL_arg2028z00_2350;
BgL_arg2028z00_2350 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 269 */
long BgL_n2z00_2358;
BgL_n2z00_2358 = 
(long)(BgL_arg2028z00_2350); 
BgL_modz00_2349 = 
(BgL_offsetz00_2348/BgL_n2z00_2358); } } 
{ /* ./Inline/loop.scm 269 */
long BgL_restz00_2351;
{ /* ./Inline/loop.scm 269 */
int BgL_arg2024z00_2352;
BgL_arg2024z00_2352 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 269 */
long BgL_n2z00_2361;
BgL_n2z00_2361 = 
(long)(BgL_arg2024z00_2352); 
BgL_restz00_2351 = 
(BgL_offsetz00_2348%BgL_n2z00_2361); } } 
{ /* ./Inline/loop.scm 269 */

{ /* ./Inline/loop.scm 269 */
obj_t BgL_bucketz00_2353;
{ /* ./Inline/loop.scm 269 */
int BgL_kz00_2363;
BgL_kz00_2363 = 
(int)(BgL_modz00_2349); 
BgL_bucketz00_2353 = 
VECTOR_REF(BgL_arg2017z00_2344,BgL_kz00_2363); } 
{ /* ./Inline/loop.scm 269 */
int BgL_kz00_2365;
BgL_kz00_2365 = 
(int)(BgL_restz00_2351); 
BgL_method2874z00_2341 = 
VECTOR_REF(BgL_bucketz00_2353,BgL_kz00_2365); } } } } } } } } } } 
{ /* ./Inline/loop.scm 269 */
obj_t BgL_auxz00_4098;
BgL_auxz00_4098 = 
PROCEDURE_ENTRY(BgL_method2874z00_2341)(BgL_method2874z00_2341, 
(obj_t)(BgL_arg3643z00_2336), 
(obj_t)(BgL_localz00_2339), BgL_nesterz00_1364, BEOA); 
BgL_res3971z00_2366 = 
(BgL_nodez00_bglt)(BgL_auxz00_4098); } } } BgL_res3971z00_2366; } } 
BgL_auxz00_4076 = BgL_nodez00_1362; 
return 
(obj_t)(BgL_auxz00_4076);} } } 
}



/* nest-loop!-extern2890 */
obj_t BGl_nestzd2loopz12zd2extern2890z12zzinline_loopz00(obj_t BgL_envz00_3176, obj_t BgL_nodez00_3177, obj_t BgL_varz00_3178, obj_t BgL_nesterz00_3179)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 261 */
{ 
BgL_externz00_bglt BgL_nodez00_1354;obj_t BgL_varz00_1355;obj_t BgL_nesterz00_1356;
{ /* ./Inline/loop.scm 262 */
BgL_externz00_bglt BgL_auxz00_4106;
BgL_nodez00_1354 = 
(BgL_externz00_bglt)(BgL_nodez00_3177); 
BgL_varz00_1355 = BgL_varz00_3178; 
BgL_nesterz00_1356 = BgL_nesterz00_3179; 
{ /* ./Inline/loop.scm 262 */
obj_t BgL_arg3633z00_2334;
BgL_arg3633z00_2334 = 
(((BgL_externz00_bglt)CREF(BgL_nodez00_1354))->BgL_exprza2za2); 
BGl_nestzd2loopz12za2z62zzinline_loopz00(BgL_arg3633z00_2334, BgL_varz00_1355, BgL_nesterz00_1356); } 
BgL_auxz00_4106 = BgL_nodez00_1354; 
return 
(obj_t)(BgL_auxz00_4106);} } } 
}



/* nest-loop!-funcall2888 */
obj_t BGl_nestzd2loopz12zd2funcall2888z12zzinline_loopz00(obj_t BgL_envz00_3180, obj_t BgL_nodez00_3181, obj_t BgL_varz00_3182, obj_t BgL_nesterz00_3183)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 252 */
{ 
BgL_funcallz00_bglt BgL_nodez00_1343;obj_t BgL_varz00_1344;obj_t BgL_nesterz00_1345;
{ /* ./Inline/loop.scm 253 */
BgL_funcallz00_bglt BgL_auxz00_4111;
BgL_nodez00_1343 = 
(BgL_funcallz00_bglt)(BgL_nodez00_3181); 
BgL_varz00_1344 = BgL_varz00_3182; 
BgL_nesterz00_1345 = BgL_nesterz00_3183; 
{ /* ./Inline/loop.scm 254 */
BgL_nodez00_bglt BgL_arg3615z00_1349;
{ /* ./Inline/loop.scm 254 */
BgL_nodez00_bglt BgL_arg3618z00_1350;
BgL_arg3618z00_1350 = 
(((BgL_funcallz00_bglt)CREF(BgL_nodez00_1343))->BgL_funz00); 
{ /* ./Inline/loop.scm 254 */
BgL_nodez00_bglt BgL_res3968z00_2330;
{ /* ./Inline/loop.scm 254 */
BgL_localz00_bglt BgL_localz00_2303;
BgL_localz00_2303 = 
(BgL_localz00_bglt)(BgL_varz00_1344); 
{ /* ./Inline/loop.scm 254 */
obj_t BgL_method2874z00_2305;
{ /* ./Inline/loop.scm 254 */
BgL_objectz00_bglt BgL_objz00_2306;
BgL_objz00_2306 = 
(BgL_objectz00_bglt)(BgL_arg3618z00_1350); 
{ /* ./Inline/loop.scm 254 */
long BgL_objzd2classzd2numz00_2307;
BgL_objzd2classzd2numz00_2307 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2306); 
{ /* ./Inline/loop.scm 254 */
obj_t BgL_arg2017z00_2308;
{ /* ./Inline/loop.scm 254 */
int BgL_auxz00_4116;
BgL_auxz00_4116 = 
(int)(((long)1)); 
BgL_arg2017z00_2308 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_4116); } 
{ /* ./Inline/loop.scm 254 */
int BgL_offsetz00_2311;
BgL_offsetz00_2311 = 
(int)(BgL_objzd2classzd2numz00_2307); 
{ /* ./Inline/loop.scm 254 */
long BgL_offsetz00_2312;
{ /* ./Inline/loop.scm 254 */
long BgL_auxz00_4120;
BgL_auxz00_4120 = 
(long)(BgL_offsetz00_2311); 
BgL_offsetz00_2312 = 
(BgL_auxz00_4120-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 254 */
long BgL_modz00_2313;
{ /* ./Inline/loop.scm 254 */
int BgL_arg2028z00_2314;
BgL_arg2028z00_2314 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 254 */
long BgL_n2z00_2322;
BgL_n2z00_2322 = 
(long)(BgL_arg2028z00_2314); 
BgL_modz00_2313 = 
(BgL_offsetz00_2312/BgL_n2z00_2322); } } 
{ /* ./Inline/loop.scm 254 */
long BgL_restz00_2315;
{ /* ./Inline/loop.scm 254 */
int BgL_arg2024z00_2316;
BgL_arg2024z00_2316 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 254 */
long BgL_n2z00_2325;
BgL_n2z00_2325 = 
(long)(BgL_arg2024z00_2316); 
BgL_restz00_2315 = 
(BgL_offsetz00_2312%BgL_n2z00_2325); } } 
{ /* ./Inline/loop.scm 254 */

{ /* ./Inline/loop.scm 254 */
obj_t BgL_bucketz00_2317;
{ /* ./Inline/loop.scm 254 */
int BgL_kz00_2327;
BgL_kz00_2327 = 
(int)(BgL_modz00_2313); 
BgL_bucketz00_2317 = 
VECTOR_REF(BgL_arg2017z00_2308,BgL_kz00_2327); } 
{ /* ./Inline/loop.scm 254 */
int BgL_kz00_2329;
BgL_kz00_2329 = 
(int)(BgL_restz00_2315); 
BgL_method2874z00_2305 = 
VECTOR_REF(BgL_bucketz00_2317,BgL_kz00_2329); } } } } } } } } } } 
{ /* ./Inline/loop.scm 254 */
obj_t BgL_auxz00_4133;
BgL_auxz00_4133 = 
PROCEDURE_ENTRY(BgL_method2874z00_2305)(BgL_method2874z00_2305, 
(obj_t)(BgL_arg3618z00_1350), 
(obj_t)(BgL_localz00_2303), BgL_nesterz00_1345, BEOA); 
BgL_res3968z00_2330 = 
(BgL_nodez00_bglt)(BgL_auxz00_4133); } } } 
BgL_arg3615z00_1349 = BgL_res3968z00_2330; } } 
{ /* ./Inline/loop.scm 254 */
BgL_funcallz00_bglt BgL_obj1781z00_2331;BgL_nodez00_bglt BgL_val1780z00_2332;
BgL_obj1781z00_2331 = BgL_nodez00_1343; 
BgL_val1780z00_2332 = BgL_arg3615z00_1349; 
((((BgL_funcallz00_bglt)CREF(BgL_obj1781z00_2331))->BgL_funz00) = ((BgL_nodez00_bglt)BgL_val1780z00_2332), BUNSPEC); } } 
{ /* ./Inline/loop.scm 255 */
obj_t BgL_arg3623z00_1351;
BgL_arg3623z00_1351 = 
(((BgL_funcallz00_bglt)CREF(BgL_nodez00_1343))->BgL_argsz00); 
BGl_nestzd2loopz12za2z62zzinline_loopz00(BgL_arg3623z00_1351, BgL_varz00_1344, BgL_nesterz00_1345); } 
BgL_auxz00_4111 = BgL_nodez00_1343; 
return 
(obj_t)(BgL_auxz00_4111);} } } 
}



/* nest-loop!-app-ly2886 */
obj_t BGl_nestzd2loopz12zd2appzd2ly2886zc0zzinline_loopz00(obj_t BgL_envz00_3184, obj_t BgL_nodez00_3185, obj_t BgL_varz00_3186, obj_t BgL_nesterz00_3187)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 243 */
{ 
BgL_appzd2lyzd2_bglt BgL_nodez00_1331;obj_t BgL_varz00_1332;obj_t BgL_nesterz00_1333;
{ /* ./Inline/loop.scm 244 */
BgL_appzd2lyzd2_bglt BgL_auxz00_4144;
BgL_nodez00_1331 = 
(BgL_appzd2lyzd2_bglt)(BgL_nodez00_3185); 
BgL_varz00_1332 = BgL_varz00_3186; 
BgL_nesterz00_1333 = BgL_nesterz00_3187; 
{ /* ./Inline/loop.scm 245 */
BgL_nodez00_bglt BgL_arg3595z00_1337;
{ /* ./Inline/loop.scm 245 */
BgL_nodez00_bglt BgL_arg3598z00_1338;
BgL_arg3598z00_1338 = 
(((BgL_appzd2lyzd2_bglt)CREF(BgL_nodez00_1331))->BgL_funz00); 
{ /* ./Inline/loop.scm 245 */
BgL_nodez00_bglt BgL_res3962z00_2266;
{ /* ./Inline/loop.scm 245 */
BgL_localz00_bglt BgL_localz00_2239;
BgL_localz00_2239 = 
(BgL_localz00_bglt)(BgL_varz00_1332); 
{ /* ./Inline/loop.scm 245 */
obj_t BgL_method2874z00_2241;
{ /* ./Inline/loop.scm 245 */
BgL_objectz00_bglt BgL_objz00_2242;
BgL_objz00_2242 = 
(BgL_objectz00_bglt)(BgL_arg3598z00_1338); 
{ /* ./Inline/loop.scm 245 */
long BgL_objzd2classzd2numz00_2243;
BgL_objzd2classzd2numz00_2243 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2242); 
{ /* ./Inline/loop.scm 245 */
obj_t BgL_arg2017z00_2244;
{ /* ./Inline/loop.scm 245 */
int BgL_auxz00_4149;
BgL_auxz00_4149 = 
(int)(((long)1)); 
BgL_arg2017z00_2244 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_4149); } 
{ /* ./Inline/loop.scm 245 */
int BgL_offsetz00_2247;
BgL_offsetz00_2247 = 
(int)(BgL_objzd2classzd2numz00_2243); 
{ /* ./Inline/loop.scm 245 */
long BgL_offsetz00_2248;
{ /* ./Inline/loop.scm 245 */
long BgL_auxz00_4153;
BgL_auxz00_4153 = 
(long)(BgL_offsetz00_2247); 
BgL_offsetz00_2248 = 
(BgL_auxz00_4153-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 245 */
long BgL_modz00_2249;
{ /* ./Inline/loop.scm 245 */
int BgL_arg2028z00_2250;
BgL_arg2028z00_2250 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 245 */
long BgL_n2z00_2258;
BgL_n2z00_2258 = 
(long)(BgL_arg2028z00_2250); 
BgL_modz00_2249 = 
(BgL_offsetz00_2248/BgL_n2z00_2258); } } 
{ /* ./Inline/loop.scm 245 */
long BgL_restz00_2251;
{ /* ./Inline/loop.scm 245 */
int BgL_arg2024z00_2252;
BgL_arg2024z00_2252 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 245 */
long BgL_n2z00_2261;
BgL_n2z00_2261 = 
(long)(BgL_arg2024z00_2252); 
BgL_restz00_2251 = 
(BgL_offsetz00_2248%BgL_n2z00_2261); } } 
{ /* ./Inline/loop.scm 245 */

{ /* ./Inline/loop.scm 245 */
obj_t BgL_bucketz00_2253;
{ /* ./Inline/loop.scm 245 */
int BgL_kz00_2263;
BgL_kz00_2263 = 
(int)(BgL_modz00_2249); 
BgL_bucketz00_2253 = 
VECTOR_REF(BgL_arg2017z00_2244,BgL_kz00_2263); } 
{ /* ./Inline/loop.scm 245 */
int BgL_kz00_2265;
BgL_kz00_2265 = 
(int)(BgL_restz00_2251); 
BgL_method2874z00_2241 = 
VECTOR_REF(BgL_bucketz00_2253,BgL_kz00_2265); } } } } } } } } } } 
{ /* ./Inline/loop.scm 245 */
obj_t BgL_auxz00_4166;
BgL_auxz00_4166 = 
PROCEDURE_ENTRY(BgL_method2874z00_2241)(BgL_method2874z00_2241, 
(obj_t)(BgL_arg3598z00_1338), 
(obj_t)(BgL_localz00_2239), BgL_nesterz00_1333, BEOA); 
BgL_res3962z00_2266 = 
(BgL_nodez00_bglt)(BgL_auxz00_4166); } } } 
BgL_arg3595z00_1337 = BgL_res3962z00_2266; } } 
{ /* ./Inline/loop.scm 245 */
BgL_appzd2lyzd2_bglt BgL_obj1753z00_2267;BgL_nodez00_bglt BgL_val1752z00_2268;
BgL_obj1753z00_2267 = BgL_nodez00_1331; 
BgL_val1752z00_2268 = BgL_arg3595z00_1337; 
((((BgL_appzd2lyzd2_bglt)CREF(BgL_obj1753z00_2267))->BgL_funz00) = ((BgL_nodez00_bglt)BgL_val1752z00_2268), BUNSPEC); } } 
{ /* ./Inline/loop.scm 246 */
BgL_nodez00_bglt BgL_arg3602z00_1339;
{ /* ./Inline/loop.scm 246 */
BgL_nodez00_bglt BgL_arg3605z00_1340;
BgL_arg3605z00_1340 = 
(((BgL_appzd2lyzd2_bglt)CREF(BgL_nodez00_1331))->BgL_argz00); 
{ /* ./Inline/loop.scm 246 */
BgL_nodez00_bglt BgL_res3965z00_2298;
{ /* ./Inline/loop.scm 246 */
BgL_localz00_bglt BgL_localz00_2271;
BgL_localz00_2271 = 
(BgL_localz00_bglt)(BgL_varz00_1332); 
{ /* ./Inline/loop.scm 246 */
obj_t BgL_method2874z00_2273;
{ /* ./Inline/loop.scm 246 */
BgL_objectz00_bglt BgL_objz00_2274;
BgL_objz00_2274 = 
(BgL_objectz00_bglt)(BgL_arg3605z00_1340); 
{ /* ./Inline/loop.scm 246 */
long BgL_objzd2classzd2numz00_2275;
BgL_objzd2classzd2numz00_2275 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2274); 
{ /* ./Inline/loop.scm 246 */
obj_t BgL_arg2017z00_2276;
{ /* ./Inline/loop.scm 246 */
int BgL_auxz00_4177;
BgL_auxz00_4177 = 
(int)(((long)1)); 
BgL_arg2017z00_2276 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_4177); } 
{ /* ./Inline/loop.scm 246 */
int BgL_offsetz00_2279;
BgL_offsetz00_2279 = 
(int)(BgL_objzd2classzd2numz00_2275); 
{ /* ./Inline/loop.scm 246 */
long BgL_offsetz00_2280;
{ /* ./Inline/loop.scm 246 */
long BgL_auxz00_4181;
BgL_auxz00_4181 = 
(long)(BgL_offsetz00_2279); 
BgL_offsetz00_2280 = 
(BgL_auxz00_4181-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 246 */
long BgL_modz00_2281;
{ /* ./Inline/loop.scm 246 */
int BgL_arg2028z00_2282;
BgL_arg2028z00_2282 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 246 */
long BgL_n2z00_2290;
BgL_n2z00_2290 = 
(long)(BgL_arg2028z00_2282); 
BgL_modz00_2281 = 
(BgL_offsetz00_2280/BgL_n2z00_2290); } } 
{ /* ./Inline/loop.scm 246 */
long BgL_restz00_2283;
{ /* ./Inline/loop.scm 246 */
int BgL_arg2024z00_2284;
BgL_arg2024z00_2284 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 246 */
long BgL_n2z00_2293;
BgL_n2z00_2293 = 
(long)(BgL_arg2024z00_2284); 
BgL_restz00_2283 = 
(BgL_offsetz00_2280%BgL_n2z00_2293); } } 
{ /* ./Inline/loop.scm 246 */

{ /* ./Inline/loop.scm 246 */
obj_t BgL_bucketz00_2285;
{ /* ./Inline/loop.scm 246 */
int BgL_kz00_2295;
BgL_kz00_2295 = 
(int)(BgL_modz00_2281); 
BgL_bucketz00_2285 = 
VECTOR_REF(BgL_arg2017z00_2276,BgL_kz00_2295); } 
{ /* ./Inline/loop.scm 246 */
int BgL_kz00_2297;
BgL_kz00_2297 = 
(int)(BgL_restz00_2283); 
BgL_method2874z00_2273 = 
VECTOR_REF(BgL_bucketz00_2285,BgL_kz00_2297); } } } } } } } } } } 
{ /* ./Inline/loop.scm 246 */
obj_t BgL_auxz00_4194;
BgL_auxz00_4194 = 
PROCEDURE_ENTRY(BgL_method2874z00_2273)(BgL_method2874z00_2273, 
(obj_t)(BgL_arg3605z00_1340), 
(obj_t)(BgL_localz00_2271), BgL_nesterz00_1333, BEOA); 
BgL_res3965z00_2298 = 
(BgL_nodez00_bglt)(BgL_auxz00_4194); } } } 
BgL_arg3602z00_1339 = BgL_res3965z00_2298; } } 
{ /* ./Inline/loop.scm 246 */
BgL_appzd2lyzd2_bglt BgL_obj1756z00_2299;BgL_nodez00_bglt BgL_val1755z00_2300;
BgL_obj1756z00_2299 = BgL_nodez00_1331; 
BgL_val1755z00_2300 = BgL_arg3602z00_1339; 
((((BgL_appzd2lyzd2_bglt)CREF(BgL_obj1756z00_2299))->BgL_argz00) = ((BgL_nodez00_bglt)BgL_val1755z00_2300), BUNSPEC); } } 
BgL_auxz00_4144 = BgL_nodez00_1331; 
return 
(obj_t)(BgL_auxz00_4144);} } } 
}



/* nest-loop!-app2884 */
obj_t BGl_nestzd2loopz12zd2app2884z12zzinline_loopz00(obj_t BgL_envz00_3188, obj_t BgL_nodez00_3189, obj_t BgL_varz00_3190, obj_t BgL_nesterz00_3191)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 233 */
{ 
BgL_appz00_bglt BgL_nodez00_1317;obj_t BgL_varz00_1318;obj_t BgL_nesterz00_1319;
BgL_nodez00_1317 = 
(BgL_appz00_bglt)(BgL_nodez00_3189); 
BgL_varz00_1318 = BgL_varz00_3190; 
BgL_nesterz00_1319 = BgL_nesterz00_3191; 
{ /* ./Inline/loop.scm 235 */
obj_t BgL_arg3570z00_1323;
BgL_arg3570z00_1323 = 
(((BgL_appz00_bglt)CREF(BgL_nodez00_1317))->BgL_argsz00); 
BGl_nestzd2loopz12za2z62zzinline_loopz00(BgL_arg3570z00_1323, BgL_varz00_1318, BgL_nesterz00_1319); } 
{ /* ./Inline/loop.scm 236 */
bool_t BgL_test3573z00_1324;
{ /* ./Inline/loop.scm 236 */
bool_t BgL_test3575z00_1325;
{ /* ./Inline/loop.scm 236 */
BgL_varz00_bglt BgL_arg3585z00_1328;
BgL_arg3585z00_1328 = 
(((BgL_appz00_bglt)CREF(BgL_nodez00_1317))->BgL_funz00); 
{ /* ./Inline/loop.scm 236 */
obj_t BgL_obj1640z00_2234;
BgL_obj1640z00_2234 = 
(obj_t)(BgL_arg3585z00_1328); 
BgL_test3575z00_1325 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1640z00_2234, BGl_varz00zzast_nodez00); } } 
if(BgL_test3575z00_1325)
{ /* ./Inline/loop.scm 236 */
obj_t BgL_auxz00_4209;
{ /* ./Inline/loop.scm 236 */
BgL_variablez00_bglt BgL_auxz00_4210;
{ /* ./Inline/loop.scm 236 */
BgL_varz00_bglt BgL_arg3580z00_1327;
BgL_arg3580z00_1327 = 
(((BgL_appz00_bglt)CREF(BgL_nodez00_1317))->BgL_funz00); 
BgL_auxz00_4210 = 
(((BgL_varz00_bglt)CREF(BgL_arg3580z00_1327))->BgL_variablez00); } 
BgL_auxz00_4209 = 
(obj_t)(BgL_auxz00_4210); } 
BgL_test3573z00_1324 = 
(BgL_auxz00_4209==BgL_varz00_1318); }  else 
{ /* ./Inline/loop.scm 236 */
BgL_test3573z00_1324 = ((bool_t)0); } } 
if(BgL_test3573z00_1324)
{ /* ./Inline/loop.scm 236 */
return 
PROCEDURE_ENTRY(BgL_nesterz00_1319)(BgL_nesterz00_1319, 
(obj_t)(BgL_nodez00_1317), BEOA);}  else 
{ /* ./Inline/loop.scm 236 */
return 
(obj_t)(BgL_nodez00_1317);} } } } 
}



/* nest-loop!-sequence2882 */
obj_t BGl_nestzd2loopz12zd2sequence2882z12zzinline_loopz00(obj_t BgL_envz00_3192, obj_t BgL_nodez00_3193, obj_t BgL_varz00_3194, obj_t BgL_nesterz00_3195)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 225 */
{ 
BgL_sequencez00_bglt BgL_nodez00_1308;obj_t BgL_varz00_1309;obj_t BgL_nesterz00_1310;
{ /* ./Inline/loop.scm 226 */
BgL_sequencez00_bglt BgL_auxz00_4221;
BgL_nodez00_1308 = 
(BgL_sequencez00_bglt)(BgL_nodez00_3193); 
BgL_varz00_1309 = BgL_varz00_3194; 
BgL_nesterz00_1310 = BgL_nesterz00_3195; 
{ /* ./Inline/loop.scm 226 */
obj_t BgL_arg3560z00_2230;
BgL_arg3560z00_2230 = 
(((BgL_sequencez00_bglt)CREF(BgL_nodez00_1308))->BgL_nodesz00); 
BGl_nestzd2loopz12za2z62zzinline_loopz00(BgL_arg3560z00_2230, BgL_varz00_1309, BgL_nesterz00_1310); } 
BgL_auxz00_4221 = BgL_nodez00_1308; 
return 
(obj_t)(BgL_auxz00_4221);} } } 
}



/* nest-loop!-var2880 */
obj_t BGl_nestzd2loopz12zd2var2880z12zzinline_loopz00(obj_t BgL_envz00_3196, obj_t BgL_nodez00_3197, obj_t BgL_varz00_3198, obj_t BgL_nesterz00_3199)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 219 */
{ /* ./Inline/loop.scm 220 */
BgL_varz00_bglt BgL_auxz00_4226;
BgL_auxz00_4226 = 
(BgL_varz00_bglt)(BgL_nodez00_3197); 
return 
(obj_t)(BgL_auxz00_4226);} } 
}



/* nest-loop!-kwote2878 */
obj_t BGl_nestzd2loopz12zd2kwote2878z12zzinline_loopz00(obj_t BgL_envz00_3200, obj_t BgL_nodez00_3201, obj_t BgL_varz00_3202, obj_t BgL_nesterz00_3203)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 213 */
{ /* ./Inline/loop.scm 214 */
BgL_kwotez00_bglt BgL_auxz00_4229;
BgL_auxz00_4229 = 
(BgL_kwotez00_bglt)(BgL_nodez00_3201); 
return 
(obj_t)(BgL_auxz00_4229);} } 
}



/* nest-loop!-atom2876 */
obj_t BGl_nestzd2loopz12zd2atom2876z12zzinline_loopz00(obj_t BgL_envz00_3204, obj_t BgL_nodez00_3205, obj_t BgL_varz00_3206, obj_t BgL_nesterz00_3207)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 207 */
{ /* ./Inline/loop.scm 208 */
BgL_atomz00_bglt BgL_auxz00_4232;
BgL_auxz00_4232 = 
(BgL_atomz00_bglt)(BgL_nodez00_3205); 
return 
(obj_t)(BgL_auxz00_4232);} } 
}



/* find-let-fun?-box-set!2872 */
obj_t BGl_findzd2letzd2funzf3zd2boxzd2setz122872ze1zzinline_loopz00(obj_t BgL_envz00_3208, obj_t BgL_nodez00_3209)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 182 */
{ 
BgL_boxzd2setz12zc0_bglt BgL_nodez00_1278;
BgL_nodez00_1278 = 
(BgL_boxzd2setz12zc0_bglt)(BgL_nodez00_3209); 
{ /* ./Inline/loop.scm 184 */
obj_t BgL__ortest_2801z00_1282;
{ /* ./Inline/loop.scm 184 */
BgL_varz00_bglt BgL_arg3531z00_1284;
BgL_arg3531z00_1284 = 
(((BgL_boxzd2setz12zc0_bglt)CREF(BgL_nodez00_1278))->BgL_varz00); 
{ /* ./Inline/loop.scm 184 */
BgL_nodez00_bglt BgL_nodez00_2176;
BgL_nodez00_2176 = 
(BgL_nodez00_bglt)(BgL_arg3531z00_1284); 
{ /* ./Inline/loop.scm 184 */
obj_t BgL_method2837z00_2177;
{ /* ./Inline/loop.scm 184 */
BgL_objectz00_bglt BgL_objz00_2178;
BgL_objz00_2178 = 
(BgL_objectz00_bglt)(BgL_nodez00_2176); 
{ /* ./Inline/loop.scm 184 */
long BgL_objzd2classzd2numz00_2179;
BgL_objzd2classzd2numz00_2179 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2178); 
{ /* ./Inline/loop.scm 184 */
obj_t BgL_arg2017z00_2180;
{ /* ./Inline/loop.scm 184 */
int BgL_auxz00_4239;
BgL_auxz00_4239 = 
(int)(((long)1)); 
BgL_arg2017z00_2180 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4239); } 
{ /* ./Inline/loop.scm 184 */
int BgL_offsetz00_2183;
BgL_offsetz00_2183 = 
(int)(BgL_objzd2classzd2numz00_2179); 
{ /* ./Inline/loop.scm 184 */
long BgL_offsetz00_2184;
{ /* ./Inline/loop.scm 184 */
long BgL_auxz00_4243;
BgL_auxz00_4243 = 
(long)(BgL_offsetz00_2183); 
BgL_offsetz00_2184 = 
(BgL_auxz00_4243-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 184 */
long BgL_modz00_2185;
{ /* ./Inline/loop.scm 184 */
int BgL_arg2028z00_2186;
BgL_arg2028z00_2186 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 184 */
long BgL_n2z00_2194;
BgL_n2z00_2194 = 
(long)(BgL_arg2028z00_2186); 
BgL_modz00_2185 = 
(BgL_offsetz00_2184/BgL_n2z00_2194); } } 
{ /* ./Inline/loop.scm 184 */
long BgL_restz00_2187;
{ /* ./Inline/loop.scm 184 */
int BgL_arg2024z00_2188;
BgL_arg2024z00_2188 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 184 */
long BgL_n2z00_2197;
BgL_n2z00_2197 = 
(long)(BgL_arg2024z00_2188); 
BgL_restz00_2187 = 
(BgL_offsetz00_2184%BgL_n2z00_2197); } } 
{ /* ./Inline/loop.scm 184 */

{ /* ./Inline/loop.scm 184 */
obj_t BgL_bucketz00_2189;
{ /* ./Inline/loop.scm 184 */
int BgL_kz00_2199;
BgL_kz00_2199 = 
(int)(BgL_modz00_2185); 
BgL_bucketz00_2189 = 
VECTOR_REF(BgL_arg2017z00_2180,BgL_kz00_2199); } 
{ /* ./Inline/loop.scm 184 */
int BgL_kz00_2201;
BgL_kz00_2201 = 
(int)(BgL_restz00_2187); 
BgL_method2837z00_2177 = 
VECTOR_REF(BgL_bucketz00_2189,BgL_kz00_2201); } } } } } } } } } } 
BgL__ortest_2801z00_1282 = 
PROCEDURE_ENTRY(BgL_method2837z00_2177)(BgL_method2837z00_2177, 
(obj_t)(BgL_nodez00_2176), BEOA); } } } 
if(
CBOOL(BgL__ortest_2801z00_1282))
{ /* ./Inline/loop.scm 184 */
return BgL__ortest_2801z00_1282;}  else 
{ /* ./Inline/loop.scm 184 */
BgL_nodez00_bglt BgL_arg3527z00_1283;
BgL_arg3527z00_1283 = 
(((BgL_boxzd2setz12zc0_bglt)CREF(BgL_nodez00_1278))->BgL_valuez00); 
{ /* ./Inline/loop.scm 184 */
obj_t BgL_method2837z00_2204;
{ /* ./Inline/loop.scm 184 */
BgL_objectz00_bglt BgL_objz00_2205;
BgL_objz00_2205 = 
(BgL_objectz00_bglt)(BgL_arg3527z00_1283); 
{ /* ./Inline/loop.scm 184 */
long BgL_objzd2classzd2numz00_2206;
BgL_objzd2classzd2numz00_2206 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2205); 
{ /* ./Inline/loop.scm 184 */
obj_t BgL_arg2017z00_2207;
{ /* ./Inline/loop.scm 184 */
int BgL_auxz00_4264;
BgL_auxz00_4264 = 
(int)(((long)1)); 
BgL_arg2017z00_2207 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4264); } 
{ /* ./Inline/loop.scm 184 */
int BgL_offsetz00_2210;
BgL_offsetz00_2210 = 
(int)(BgL_objzd2classzd2numz00_2206); 
{ /* ./Inline/loop.scm 184 */
long BgL_offsetz00_2211;
{ /* ./Inline/loop.scm 184 */
long BgL_auxz00_4268;
BgL_auxz00_4268 = 
(long)(BgL_offsetz00_2210); 
BgL_offsetz00_2211 = 
(BgL_auxz00_4268-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 184 */
long BgL_modz00_2212;
{ /* ./Inline/loop.scm 184 */
int BgL_arg2028z00_2213;
BgL_arg2028z00_2213 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 184 */
long BgL_n2z00_2221;
BgL_n2z00_2221 = 
(long)(BgL_arg2028z00_2213); 
BgL_modz00_2212 = 
(BgL_offsetz00_2211/BgL_n2z00_2221); } } 
{ /* ./Inline/loop.scm 184 */
long BgL_restz00_2214;
{ /* ./Inline/loop.scm 184 */
int BgL_arg2024z00_2215;
BgL_arg2024z00_2215 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 184 */
long BgL_n2z00_2224;
BgL_n2z00_2224 = 
(long)(BgL_arg2024z00_2215); 
BgL_restz00_2214 = 
(BgL_offsetz00_2211%BgL_n2z00_2224); } } 
{ /* ./Inline/loop.scm 184 */

{ /* ./Inline/loop.scm 184 */
obj_t BgL_bucketz00_2216;
{ /* ./Inline/loop.scm 184 */
int BgL_kz00_2226;
BgL_kz00_2226 = 
(int)(BgL_modz00_2212); 
BgL_bucketz00_2216 = 
VECTOR_REF(BgL_arg2017z00_2207,BgL_kz00_2226); } 
{ /* ./Inline/loop.scm 184 */
int BgL_kz00_2228;
BgL_kz00_2228 = 
(int)(BgL_restz00_2214); 
BgL_method2837z00_2204 = 
VECTOR_REF(BgL_bucketz00_2216,BgL_kz00_2228); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2837z00_2204)(BgL_method2837z00_2204, 
(obj_t)(BgL_arg3527z00_1283), BEOA);} } } } } 
}



/* find-let-fun?-box-ref2870 */
obj_t BGl_findzd2letzd2funzf3zd2boxzd2ref2870zf3zzinline_loopz00(obj_t BgL_envz00_3210, obj_t BgL_nodez00_3211)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 176 */
{ 
BgL_boxzd2refzd2_bglt BgL_nodez00_1272;
BgL_nodez00_1272 = 
(BgL_boxzd2refzd2_bglt)(BgL_nodez00_3211); 
{ /* ./Inline/loop.scm 177 */
BgL_varz00_bglt BgL_arg3517z00_2147;
BgL_arg3517z00_2147 = 
(((BgL_boxzd2refzd2_bglt)CREF(BgL_nodez00_1272))->BgL_varz00); 
{ /* ./Inline/loop.scm 177 */
BgL_nodez00_bglt BgL_nodez00_2149;
BgL_nodez00_2149 = 
(BgL_nodez00_bglt)(BgL_arg3517z00_2147); 
{ /* ./Inline/loop.scm 177 */
obj_t BgL_method2837z00_2150;
{ /* ./Inline/loop.scm 177 */
BgL_objectz00_bglt BgL_objz00_2151;
BgL_objz00_2151 = 
(BgL_objectz00_bglt)(BgL_nodez00_2149); 
{ /* ./Inline/loop.scm 177 */
long BgL_objzd2classzd2numz00_2152;
BgL_objzd2classzd2numz00_2152 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2151); 
{ /* ./Inline/loop.scm 177 */
obj_t BgL_arg2017z00_2153;
{ /* ./Inline/loop.scm 177 */
int BgL_auxz00_4289;
BgL_auxz00_4289 = 
(int)(((long)1)); 
BgL_arg2017z00_2153 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4289); } 
{ /* ./Inline/loop.scm 177 */
int BgL_offsetz00_2156;
BgL_offsetz00_2156 = 
(int)(BgL_objzd2classzd2numz00_2152); 
{ /* ./Inline/loop.scm 177 */
long BgL_offsetz00_2157;
{ /* ./Inline/loop.scm 177 */
long BgL_auxz00_4293;
BgL_auxz00_4293 = 
(long)(BgL_offsetz00_2156); 
BgL_offsetz00_2157 = 
(BgL_auxz00_4293-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 177 */
long BgL_modz00_2158;
{ /* ./Inline/loop.scm 177 */
int BgL_arg2028z00_2159;
BgL_arg2028z00_2159 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 177 */
long BgL_n2z00_2167;
BgL_n2z00_2167 = 
(long)(BgL_arg2028z00_2159); 
BgL_modz00_2158 = 
(BgL_offsetz00_2157/BgL_n2z00_2167); } } 
{ /* ./Inline/loop.scm 177 */
long BgL_restz00_2160;
{ /* ./Inline/loop.scm 177 */
int BgL_arg2024z00_2161;
BgL_arg2024z00_2161 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 177 */
long BgL_n2z00_2170;
BgL_n2z00_2170 = 
(long)(BgL_arg2024z00_2161); 
BgL_restz00_2160 = 
(BgL_offsetz00_2157%BgL_n2z00_2170); } } 
{ /* ./Inline/loop.scm 177 */

{ /* ./Inline/loop.scm 177 */
obj_t BgL_bucketz00_2162;
{ /* ./Inline/loop.scm 177 */
int BgL_kz00_2172;
BgL_kz00_2172 = 
(int)(BgL_modz00_2158); 
BgL_bucketz00_2162 = 
VECTOR_REF(BgL_arg2017z00_2153,BgL_kz00_2172); } 
{ /* ./Inline/loop.scm 177 */
int BgL_kz00_2174;
BgL_kz00_2174 = 
(int)(BgL_restz00_2160); 
BgL_method2837z00_2150 = 
VECTOR_REF(BgL_bucketz00_2162,BgL_kz00_2174); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2837z00_2150)(BgL_method2837z00_2150, 
(obj_t)(BgL_nodez00_2149), BEOA);} } } } } 
}



/* find-let-fun?-make-box2867 */
obj_t BGl_findzd2letzd2funzf3zd2makezd2box2867zf3zzinline_loopz00(obj_t BgL_envz00_3212, obj_t BgL_nodez00_3213)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 170 */
{ 
BgL_makezd2boxzd2_bglt BgL_nodez00_1266;
BgL_nodez00_1266 = 
(BgL_makezd2boxzd2_bglt)(BgL_nodez00_3213); 
{ /* ./Inline/loop.scm 171 */
BgL_nodez00_bglt BgL_arg3506z00_2119;
BgL_arg3506z00_2119 = 
(((BgL_makezd2boxzd2_bglt)CREF(BgL_nodez00_1266))->BgL_valuez00); 
{ /* ./Inline/loop.scm 171 */
obj_t BgL_method2837z00_2122;
{ /* ./Inline/loop.scm 171 */
BgL_objectz00_bglt BgL_objz00_2123;
BgL_objz00_2123 = 
(BgL_objectz00_bglt)(BgL_arg3506z00_2119); 
{ /* ./Inline/loop.scm 171 */
long BgL_objzd2classzd2numz00_2124;
BgL_objzd2classzd2numz00_2124 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2123); 
{ /* ./Inline/loop.scm 171 */
obj_t BgL_arg2017z00_2125;
{ /* ./Inline/loop.scm 171 */
int BgL_auxz00_4313;
BgL_auxz00_4313 = 
(int)(((long)1)); 
BgL_arg2017z00_2125 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4313); } 
{ /* ./Inline/loop.scm 171 */
int BgL_offsetz00_2128;
BgL_offsetz00_2128 = 
(int)(BgL_objzd2classzd2numz00_2124); 
{ /* ./Inline/loop.scm 171 */
long BgL_offsetz00_2129;
{ /* ./Inline/loop.scm 171 */
long BgL_auxz00_4317;
BgL_auxz00_4317 = 
(long)(BgL_offsetz00_2128); 
BgL_offsetz00_2129 = 
(BgL_auxz00_4317-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 171 */
long BgL_modz00_2130;
{ /* ./Inline/loop.scm 171 */
int BgL_arg2028z00_2131;
BgL_arg2028z00_2131 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 171 */
long BgL_n2z00_2139;
BgL_n2z00_2139 = 
(long)(BgL_arg2028z00_2131); 
BgL_modz00_2130 = 
(BgL_offsetz00_2129/BgL_n2z00_2139); } } 
{ /* ./Inline/loop.scm 171 */
long BgL_restz00_2132;
{ /* ./Inline/loop.scm 171 */
int BgL_arg2024z00_2133;
BgL_arg2024z00_2133 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 171 */
long BgL_n2z00_2142;
BgL_n2z00_2142 = 
(long)(BgL_arg2024z00_2133); 
BgL_restz00_2132 = 
(BgL_offsetz00_2129%BgL_n2z00_2142); } } 
{ /* ./Inline/loop.scm 171 */

{ /* ./Inline/loop.scm 171 */
obj_t BgL_bucketz00_2134;
{ /* ./Inline/loop.scm 171 */
int BgL_kz00_2144;
BgL_kz00_2144 = 
(int)(BgL_modz00_2130); 
BgL_bucketz00_2134 = 
VECTOR_REF(BgL_arg2017z00_2125,BgL_kz00_2144); } 
{ /* ./Inline/loop.scm 171 */
int BgL_kz00_2146;
BgL_kz00_2146 = 
(int)(BgL_restz00_2132); 
BgL_method2837z00_2122 = 
VECTOR_REF(BgL_bucketz00_2134,BgL_kz00_2146); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2837z00_2122)(BgL_method2837z00_2122, 
(obj_t)(BgL_arg3506z00_2119), BEOA);} } } } 
}



/* find-let-fun?-jump-ex-it2865 */
obj_t BGl_findzd2letzd2funzf3zd2jumpzd2exzd2it2865z21zzinline_loopz00(obj_t BgL_envz00_3214, obj_t BgL_nodez00_3215)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 163 */
{ 
BgL_jumpzd2exzd2itz00_bglt BgL_nodez00_1257;
BgL_nodez00_1257 = 
(BgL_jumpzd2exzd2itz00_bglt)(BgL_nodez00_3215); 
{ /* ./Inline/loop.scm 165 */
obj_t BgL__ortest_2798z00_1261;
{ /* ./Inline/loop.scm 165 */
BgL_nodez00_bglt BgL_arg3495z00_1263;
BgL_arg3495z00_1263 = 
(((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_nodez00_1257))->BgL_exitz00); 
{ /* ./Inline/loop.scm 165 */
obj_t BgL_method2837z00_2067;
{ /* ./Inline/loop.scm 165 */
BgL_objectz00_bglt BgL_objz00_2068;
BgL_objz00_2068 = 
(BgL_objectz00_bglt)(BgL_arg3495z00_1263); 
{ /* ./Inline/loop.scm 165 */
long BgL_objzd2classzd2numz00_2069;
BgL_objzd2classzd2numz00_2069 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2068); 
{ /* ./Inline/loop.scm 165 */
obj_t BgL_arg2017z00_2070;
{ /* ./Inline/loop.scm 165 */
int BgL_auxz00_4337;
BgL_auxz00_4337 = 
(int)(((long)1)); 
BgL_arg2017z00_2070 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4337); } 
{ /* ./Inline/loop.scm 165 */
int BgL_offsetz00_2073;
BgL_offsetz00_2073 = 
(int)(BgL_objzd2classzd2numz00_2069); 
{ /* ./Inline/loop.scm 165 */
long BgL_offsetz00_2074;
{ /* ./Inline/loop.scm 165 */
long BgL_auxz00_4341;
BgL_auxz00_4341 = 
(long)(BgL_offsetz00_2073); 
BgL_offsetz00_2074 = 
(BgL_auxz00_4341-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 165 */
long BgL_modz00_2075;
{ /* ./Inline/loop.scm 165 */
int BgL_arg2028z00_2076;
BgL_arg2028z00_2076 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 165 */
long BgL_n2z00_2084;
BgL_n2z00_2084 = 
(long)(BgL_arg2028z00_2076); 
BgL_modz00_2075 = 
(BgL_offsetz00_2074/BgL_n2z00_2084); } } 
{ /* ./Inline/loop.scm 165 */
long BgL_restz00_2077;
{ /* ./Inline/loop.scm 165 */
int BgL_arg2024z00_2078;
BgL_arg2024z00_2078 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 165 */
long BgL_n2z00_2087;
BgL_n2z00_2087 = 
(long)(BgL_arg2024z00_2078); 
BgL_restz00_2077 = 
(BgL_offsetz00_2074%BgL_n2z00_2087); } } 
{ /* ./Inline/loop.scm 165 */

{ /* ./Inline/loop.scm 165 */
obj_t BgL_bucketz00_2079;
{ /* ./Inline/loop.scm 165 */
int BgL_kz00_2089;
BgL_kz00_2089 = 
(int)(BgL_modz00_2075); 
BgL_bucketz00_2079 = 
VECTOR_REF(BgL_arg2017z00_2070,BgL_kz00_2089); } 
{ /* ./Inline/loop.scm 165 */
int BgL_kz00_2091;
BgL_kz00_2091 = 
(int)(BgL_restz00_2077); 
BgL_method2837z00_2067 = 
VECTOR_REF(BgL_bucketz00_2079,BgL_kz00_2091); } } } } } } } } } } 
BgL__ortest_2798z00_1261 = 
PROCEDURE_ENTRY(BgL_method2837z00_2067)(BgL_method2837z00_2067, 
(obj_t)(BgL_arg3495z00_1263), BEOA); } } 
if(
CBOOL(BgL__ortest_2798z00_1261))
{ /* ./Inline/loop.scm 165 */
return BgL__ortest_2798z00_1261;}  else 
{ /* ./Inline/loop.scm 165 */
BgL_nodez00_bglt BgL_arg3491z00_1262;
BgL_arg3491z00_1262 = 
(((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_nodez00_1257))->BgL_valuez00); 
{ /* ./Inline/loop.scm 165 */
obj_t BgL_method2837z00_2094;
{ /* ./Inline/loop.scm 165 */
BgL_objectz00_bglt BgL_objz00_2095;
BgL_objz00_2095 = 
(BgL_objectz00_bglt)(BgL_arg3491z00_1262); 
{ /* ./Inline/loop.scm 165 */
long BgL_objzd2classzd2numz00_2096;
BgL_objzd2classzd2numz00_2096 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2095); 
{ /* ./Inline/loop.scm 165 */
obj_t BgL_arg2017z00_2097;
{ /* ./Inline/loop.scm 165 */
int BgL_auxz00_4362;
BgL_auxz00_4362 = 
(int)(((long)1)); 
BgL_arg2017z00_2097 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4362); } 
{ /* ./Inline/loop.scm 165 */
int BgL_offsetz00_2100;
BgL_offsetz00_2100 = 
(int)(BgL_objzd2classzd2numz00_2096); 
{ /* ./Inline/loop.scm 165 */
long BgL_offsetz00_2101;
{ /* ./Inline/loop.scm 165 */
long BgL_auxz00_4366;
BgL_auxz00_4366 = 
(long)(BgL_offsetz00_2100); 
BgL_offsetz00_2101 = 
(BgL_auxz00_4366-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 165 */
long BgL_modz00_2102;
{ /* ./Inline/loop.scm 165 */
int BgL_arg2028z00_2103;
BgL_arg2028z00_2103 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 165 */
long BgL_n2z00_2111;
BgL_n2z00_2111 = 
(long)(BgL_arg2028z00_2103); 
BgL_modz00_2102 = 
(BgL_offsetz00_2101/BgL_n2z00_2111); } } 
{ /* ./Inline/loop.scm 165 */
long BgL_restz00_2104;
{ /* ./Inline/loop.scm 165 */
int BgL_arg2024z00_2105;
BgL_arg2024z00_2105 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 165 */
long BgL_n2z00_2114;
BgL_n2z00_2114 = 
(long)(BgL_arg2024z00_2105); 
BgL_restz00_2104 = 
(BgL_offsetz00_2101%BgL_n2z00_2114); } } 
{ /* ./Inline/loop.scm 165 */

{ /* ./Inline/loop.scm 165 */
obj_t BgL_bucketz00_2106;
{ /* ./Inline/loop.scm 165 */
int BgL_kz00_2116;
BgL_kz00_2116 = 
(int)(BgL_modz00_2102); 
BgL_bucketz00_2106 = 
VECTOR_REF(BgL_arg2017z00_2097,BgL_kz00_2116); } 
{ /* ./Inline/loop.scm 165 */
int BgL_kz00_2118;
BgL_kz00_2118 = 
(int)(BgL_restz00_2104); 
BgL_method2837z00_2094 = 
VECTOR_REF(BgL_bucketz00_2106,BgL_kz00_2118); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2837z00_2094)(BgL_method2837z00_2094, 
(obj_t)(BgL_arg3491z00_1262), BEOA);} } } } } 
}



/* find-let-fun?-set-ex-it2863 */
obj_t BGl_findzd2letzd2funzf3zd2setzd2exzd2it2863z21zzinline_loopz00(obj_t BgL_envz00_3216, obj_t BgL_nodez00_3217)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 157 */
{ 
BgL_setzd2exzd2itz00_bglt BgL_nodez00_1251;
BgL_nodez00_1251 = 
(BgL_setzd2exzd2itz00_bglt)(BgL_nodez00_3217); 
{ /* ./Inline/loop.scm 158 */
BgL_nodez00_bglt BgL_arg3481z00_2037;
BgL_arg3481z00_2037 = 
(((BgL_setzd2exzd2itz00_bglt)CREF(BgL_nodez00_1251))->BgL_bodyz00); 
{ /* ./Inline/loop.scm 158 */
obj_t BgL_method2837z00_2040;
{ /* ./Inline/loop.scm 158 */
BgL_objectz00_bglt BgL_objz00_2041;
BgL_objz00_2041 = 
(BgL_objectz00_bglt)(BgL_arg3481z00_2037); 
{ /* ./Inline/loop.scm 158 */
long BgL_objzd2classzd2numz00_2042;
BgL_objzd2classzd2numz00_2042 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2041); 
{ /* ./Inline/loop.scm 158 */
obj_t BgL_arg2017z00_2043;
{ /* ./Inline/loop.scm 158 */
int BgL_auxz00_4386;
BgL_auxz00_4386 = 
(int)(((long)1)); 
BgL_arg2017z00_2043 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4386); } 
{ /* ./Inline/loop.scm 158 */
int BgL_offsetz00_2046;
BgL_offsetz00_2046 = 
(int)(BgL_objzd2classzd2numz00_2042); 
{ /* ./Inline/loop.scm 158 */
long BgL_offsetz00_2047;
{ /* ./Inline/loop.scm 158 */
long BgL_auxz00_4390;
BgL_auxz00_4390 = 
(long)(BgL_offsetz00_2046); 
BgL_offsetz00_2047 = 
(BgL_auxz00_4390-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 158 */
long BgL_modz00_2048;
{ /* ./Inline/loop.scm 158 */
int BgL_arg2028z00_2049;
BgL_arg2028z00_2049 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 158 */
long BgL_n2z00_2057;
BgL_n2z00_2057 = 
(long)(BgL_arg2028z00_2049); 
BgL_modz00_2048 = 
(BgL_offsetz00_2047/BgL_n2z00_2057); } } 
{ /* ./Inline/loop.scm 158 */
long BgL_restz00_2050;
{ /* ./Inline/loop.scm 158 */
int BgL_arg2024z00_2051;
BgL_arg2024z00_2051 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 158 */
long BgL_n2z00_2060;
BgL_n2z00_2060 = 
(long)(BgL_arg2024z00_2051); 
BgL_restz00_2050 = 
(BgL_offsetz00_2047%BgL_n2z00_2060); } } 
{ /* ./Inline/loop.scm 158 */

{ /* ./Inline/loop.scm 158 */
obj_t BgL_bucketz00_2052;
{ /* ./Inline/loop.scm 158 */
int BgL_kz00_2062;
BgL_kz00_2062 = 
(int)(BgL_modz00_2048); 
BgL_bucketz00_2052 = 
VECTOR_REF(BgL_arg2017z00_2043,BgL_kz00_2062); } 
{ /* ./Inline/loop.scm 158 */
int BgL_kz00_2064;
BgL_kz00_2064 = 
(int)(BgL_restz00_2050); 
BgL_method2837z00_2040 = 
VECTOR_REF(BgL_bucketz00_2052,BgL_kz00_2064); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2837z00_2040)(BgL_method2837z00_2040, 
(obj_t)(BgL_arg3481z00_2037), BEOA);} } } } 
}



/* find-let-fun?-let-var2861 */
obj_t BGl_findzd2letzd2funzf3zd2letzd2var2861zf3zzinline_loopz00(obj_t BgL_envz00_3218, obj_t BgL_nodez00_3219)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 144 */
{ 
BgL_letzd2varzd2_bglt BgL_nodez00_1237;
BgL_nodez00_1237 = 
(BgL_letzd2varzd2_bglt)(BgL_nodez00_3219); 
{ 
obj_t BgL_bindingsz00_1240;
{ /* ./Inline/loop.scm 145 */
obj_t BgL_arg3453z00_1242;
BgL_arg3453z00_1242 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_nodez00_1237))->BgL_bindingsz00); 
BgL_bindingsz00_1240 = BgL_arg3453z00_1242; 
BgL_loopz00_1241:
{ /* ./Inline/loop.scm 147 */
bool_t BgL_test3456z00_1243;
BgL_test3456z00_1243 = 
NULLP(BgL_bindingsz00_1240); 
if(BgL_test3456z00_1243)
{ /* ./Inline/loop.scm 147 */
{ /* ./Inline/loop.scm 148 */
BgL_nodez00_bglt BgL_arg3458z00_1244;
BgL_arg3458z00_1244 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_nodez00_1237))->BgL_bodyz00); 
{ /* ./Inline/loop.scm 148 */
obj_t BgL_method2837z00_1983;
{ /* ./Inline/loop.scm 148 */
BgL_objectz00_bglt BgL_objz00_1984;
BgL_objz00_1984 = 
(BgL_objectz00_bglt)(BgL_arg3458z00_1244); 
{ /* ./Inline/loop.scm 148 */
long BgL_objzd2classzd2numz00_1985;
BgL_objzd2classzd2numz00_1985 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1984); 
{ /* ./Inline/loop.scm 148 */
obj_t BgL_arg2017z00_1986;
{ /* ./Inline/loop.scm 148 */
int BgL_auxz00_4413;
BgL_auxz00_4413 = 
(int)(((long)1)); 
BgL_arg2017z00_1986 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4413); } 
{ /* ./Inline/loop.scm 148 */
int BgL_offsetz00_1989;
BgL_offsetz00_1989 = 
(int)(BgL_objzd2classzd2numz00_1985); 
{ /* ./Inline/loop.scm 148 */
long BgL_offsetz00_1990;
{ /* ./Inline/loop.scm 148 */
long BgL_auxz00_4417;
BgL_auxz00_4417 = 
(long)(BgL_offsetz00_1989); 
BgL_offsetz00_1990 = 
(BgL_auxz00_4417-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 148 */
long BgL_modz00_1991;
{ /* ./Inline/loop.scm 148 */
int BgL_arg2028z00_1992;
BgL_arg2028z00_1992 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 148 */
long BgL_n2z00_2000;
BgL_n2z00_2000 = 
(long)(BgL_arg2028z00_1992); 
BgL_modz00_1991 = 
(BgL_offsetz00_1990/BgL_n2z00_2000); } } 
{ /* ./Inline/loop.scm 148 */
long BgL_restz00_1993;
{ /* ./Inline/loop.scm 148 */
int BgL_arg2024z00_1994;
BgL_arg2024z00_1994 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 148 */
long BgL_n2z00_2003;
BgL_n2z00_2003 = 
(long)(BgL_arg2024z00_1994); 
BgL_restz00_1993 = 
(BgL_offsetz00_1990%BgL_n2z00_2003); } } 
{ /* ./Inline/loop.scm 148 */

{ /* ./Inline/loop.scm 148 */
obj_t BgL_bucketz00_1995;
{ /* ./Inline/loop.scm 148 */
int BgL_kz00_2005;
BgL_kz00_2005 = 
(int)(BgL_modz00_1991); 
BgL_bucketz00_1995 = 
VECTOR_REF(BgL_arg2017z00_1986,BgL_kz00_2005); } 
{ /* ./Inline/loop.scm 148 */
int BgL_kz00_2007;
BgL_kz00_2007 = 
(int)(BgL_restz00_1993); 
BgL_method2837z00_1983 = 
VECTOR_REF(BgL_bucketz00_1995,BgL_kz00_2007); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2837z00_1983)(BgL_method2837z00_1983, 
(obj_t)(BgL_arg3458z00_1244), BEOA);} } }  else 
{ /* ./Inline/loop.scm 149 */
bool_t BgL_test3461z00_1245;
{ /* ./Inline/loop.scm 149 */
obj_t BgL_arg3467z00_1247;
{ /* ./Inline/loop.scm 149 */
obj_t BgL_auxz00_4433;
BgL_auxz00_4433 = 
CAR(BgL_bindingsz00_1240); 
BgL_arg3467z00_1247 = 
CDR(BgL_auxz00_4433); } 
{ /* ./Inline/loop.scm 149 */
BgL_nodez00_bglt BgL_nodez00_2010;
BgL_nodez00_2010 = 
(BgL_nodez00_bglt)(BgL_arg3467z00_1247); 
{ /* ./Inline/loop.scm 149 */
obj_t BgL_method2837z00_2011;
{ /* ./Inline/loop.scm 149 */
BgL_objectz00_bglt BgL_objz00_2012;
BgL_objz00_2012 = 
(BgL_objectz00_bglt)(BgL_nodez00_2010); 
{ /* ./Inline/loop.scm 149 */
long BgL_objzd2classzd2numz00_2013;
BgL_objzd2classzd2numz00_2013 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2012); 
{ /* ./Inline/loop.scm 149 */
obj_t BgL_arg2017z00_2014;
{ /* ./Inline/loop.scm 149 */
int BgL_auxz00_4439;
BgL_auxz00_4439 = 
(int)(((long)1)); 
BgL_arg2017z00_2014 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4439); } 
{ /* ./Inline/loop.scm 149 */
int BgL_offsetz00_2017;
BgL_offsetz00_2017 = 
(int)(BgL_objzd2classzd2numz00_2013); 
{ /* ./Inline/loop.scm 149 */
long BgL_offsetz00_2018;
{ /* ./Inline/loop.scm 149 */
long BgL_auxz00_4443;
BgL_auxz00_4443 = 
(long)(BgL_offsetz00_2017); 
BgL_offsetz00_2018 = 
(BgL_auxz00_4443-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 149 */
long BgL_modz00_2019;
{ /* ./Inline/loop.scm 149 */
int BgL_arg2028z00_2020;
BgL_arg2028z00_2020 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 149 */
long BgL_n2z00_2028;
BgL_n2z00_2028 = 
(long)(BgL_arg2028z00_2020); 
BgL_modz00_2019 = 
(BgL_offsetz00_2018/BgL_n2z00_2028); } } 
{ /* ./Inline/loop.scm 149 */
long BgL_restz00_2021;
{ /* ./Inline/loop.scm 149 */
int BgL_arg2024z00_2022;
BgL_arg2024z00_2022 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 149 */
long BgL_n2z00_2031;
BgL_n2z00_2031 = 
(long)(BgL_arg2024z00_2022); 
BgL_restz00_2021 = 
(BgL_offsetz00_2018%BgL_n2z00_2031); } } 
{ /* ./Inline/loop.scm 149 */

{ /* ./Inline/loop.scm 149 */
obj_t BgL_bucketz00_2023;
{ /* ./Inline/loop.scm 149 */
int BgL_kz00_2033;
BgL_kz00_2033 = 
(int)(BgL_modz00_2019); 
BgL_bucketz00_2023 = 
VECTOR_REF(BgL_arg2017z00_2014,BgL_kz00_2033); } 
{ /* ./Inline/loop.scm 149 */
int BgL_kz00_2035;
BgL_kz00_2035 = 
(int)(BgL_restz00_2021); 
BgL_method2837z00_2011 = 
VECTOR_REF(BgL_bucketz00_2023,BgL_kz00_2035); } } } } } } } } } } 
{ /* ./Inline/loop.scm 149 */
obj_t BgL_auxz00_4456;
BgL_auxz00_4456 = 
PROCEDURE_ENTRY(BgL_method2837z00_2011)(BgL_method2837z00_2011, 
(obj_t)(BgL_nodez00_2010), BEOA); 
BgL_test3461z00_1245 = 
CBOOL(BgL_auxz00_4456); } } } } 
if(BgL_test3461z00_1245)
{ /* ./Inline/loop.scm 149 */
return BTRUE;}  else 
{ /* ./Inline/loop.scm 149 */
{ /* ./Inline/loop.scm 152 */
obj_t BgL_arg3463z00_1246;
BgL_arg3463z00_1246 = 
CDR(BgL_bindingsz00_1240); 
{ 
obj_t BgL_bindingsz00_4463;
BgL_bindingsz00_4463 = BgL_arg3463z00_1246; 
BgL_bindingsz00_1240 = BgL_bindingsz00_4463; 
goto BgL_loopz00_1241;} } } } } } } } } 
}



/* find-let-fun?-let-fun2859 */
obj_t BGl_findzd2letzd2funzf3zd2letzd2fun2859zf3zzinline_loopz00(obj_t BgL_envz00_3220, obj_t BgL_nodez00_3221)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 138 */
{ /* ./Inline/loop.scm 139 */
bool_t BgL_auxz00_4465;
BgL_auxz00_4465 = ((bool_t)1); 
return 
BBOOL(BgL_auxz00_4465);} } 
}



/* find-let-fun?-select2857 */
obj_t BGl_findzd2letzd2funzf3zd2select2857z21zzinline_loopz00(obj_t BgL_envz00_3222, obj_t BgL_nodez00_3223)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 125 */
{ 
BgL_selectz00_bglt BgL_nodez00_1218;
BgL_nodez00_1218 = 
(BgL_selectz00_bglt)(BgL_nodez00_3223); 
{ 
obj_t BgL_clausesz00_1221;
{ /* ./Inline/loop.scm 126 */
obj_t BgL_arg3418z00_1223;
BgL_arg3418z00_1223 = 
(((BgL_selectz00_bglt)CREF(BgL_nodez00_1218))->BgL_clausesz00); 
BgL_clausesz00_1221 = BgL_arg3418z00_1223; 
BgL_loopz00_1222:
{ /* ./Inline/loop.scm 128 */
bool_t BgL_test3421z00_1224;
BgL_test3421z00_1224 = 
NULLP(BgL_clausesz00_1221); 
if(BgL_test3421z00_1224)
{ /* ./Inline/loop.scm 128 */
{ /* ./Inline/loop.scm 129 */
BgL_nodez00_bglt BgL_arg3423z00_1225;
BgL_arg3423z00_1225 = 
(((BgL_selectz00_bglt)CREF(BgL_nodez00_1218))->BgL_testz00); 
{ /* ./Inline/loop.scm 129 */
obj_t BgL_method2837z00_1925;
{ /* ./Inline/loop.scm 129 */
BgL_objectz00_bglt BgL_objz00_1926;
BgL_objz00_1926 = 
(BgL_objectz00_bglt)(BgL_arg3423z00_1225); 
{ /* ./Inline/loop.scm 129 */
long BgL_objzd2classzd2numz00_1927;
BgL_objzd2classzd2numz00_1927 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1926); 
{ /* ./Inline/loop.scm 129 */
obj_t BgL_arg2017z00_1928;
{ /* ./Inline/loop.scm 129 */
int BgL_auxz00_4473;
BgL_auxz00_4473 = 
(int)(((long)1)); 
BgL_arg2017z00_1928 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4473); } 
{ /* ./Inline/loop.scm 129 */
int BgL_offsetz00_1931;
BgL_offsetz00_1931 = 
(int)(BgL_objzd2classzd2numz00_1927); 
{ /* ./Inline/loop.scm 129 */
long BgL_offsetz00_1932;
{ /* ./Inline/loop.scm 129 */
long BgL_auxz00_4477;
BgL_auxz00_4477 = 
(long)(BgL_offsetz00_1931); 
BgL_offsetz00_1932 = 
(BgL_auxz00_4477-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 129 */
long BgL_modz00_1933;
{ /* ./Inline/loop.scm 129 */
int BgL_arg2028z00_1934;
BgL_arg2028z00_1934 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 129 */
long BgL_n2z00_1942;
BgL_n2z00_1942 = 
(long)(BgL_arg2028z00_1934); 
BgL_modz00_1933 = 
(BgL_offsetz00_1932/BgL_n2z00_1942); } } 
{ /* ./Inline/loop.scm 129 */
long BgL_restz00_1935;
{ /* ./Inline/loop.scm 129 */
int BgL_arg2024z00_1936;
BgL_arg2024z00_1936 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 129 */
long BgL_n2z00_1945;
BgL_n2z00_1945 = 
(long)(BgL_arg2024z00_1936); 
BgL_restz00_1935 = 
(BgL_offsetz00_1932%BgL_n2z00_1945); } } 
{ /* ./Inline/loop.scm 129 */

{ /* ./Inline/loop.scm 129 */
obj_t BgL_bucketz00_1937;
{ /* ./Inline/loop.scm 129 */
int BgL_kz00_1947;
BgL_kz00_1947 = 
(int)(BgL_modz00_1933); 
BgL_bucketz00_1937 = 
VECTOR_REF(BgL_arg2017z00_1928,BgL_kz00_1947); } 
{ /* ./Inline/loop.scm 129 */
int BgL_kz00_1949;
BgL_kz00_1949 = 
(int)(BgL_restz00_1935); 
BgL_method2837z00_1925 = 
VECTOR_REF(BgL_bucketz00_1937,BgL_kz00_1949); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2837z00_1925)(BgL_method2837z00_1925, 
(obj_t)(BgL_arg3423z00_1225), BEOA);} } }  else 
{ /* ./Inline/loop.scm 130 */
bool_t BgL_test3426z00_1226;
{ /* ./Inline/loop.scm 130 */
obj_t BgL_arg3432z00_1228;
{ /* ./Inline/loop.scm 130 */
obj_t BgL_auxz00_4493;
BgL_auxz00_4493 = 
CAR(BgL_clausesz00_1221); 
BgL_arg3432z00_1228 = 
CDR(BgL_auxz00_4493); } 
{ /* ./Inline/loop.scm 130 */
BgL_nodez00_bglt BgL_nodez00_1952;
BgL_nodez00_1952 = 
(BgL_nodez00_bglt)(BgL_arg3432z00_1228); 
{ /* ./Inline/loop.scm 130 */
obj_t BgL_method2837z00_1953;
{ /* ./Inline/loop.scm 130 */
BgL_objectz00_bglt BgL_objz00_1954;
BgL_objz00_1954 = 
(BgL_objectz00_bglt)(BgL_nodez00_1952); 
{ /* ./Inline/loop.scm 130 */
long BgL_objzd2classzd2numz00_1955;
BgL_objzd2classzd2numz00_1955 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1954); 
{ /* ./Inline/loop.scm 130 */
obj_t BgL_arg2017z00_1956;
{ /* ./Inline/loop.scm 130 */
int BgL_auxz00_4499;
BgL_auxz00_4499 = 
(int)(((long)1)); 
BgL_arg2017z00_1956 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4499); } 
{ /* ./Inline/loop.scm 130 */
int BgL_offsetz00_1959;
BgL_offsetz00_1959 = 
(int)(BgL_objzd2classzd2numz00_1955); 
{ /* ./Inline/loop.scm 130 */
long BgL_offsetz00_1960;
{ /* ./Inline/loop.scm 130 */
long BgL_auxz00_4503;
BgL_auxz00_4503 = 
(long)(BgL_offsetz00_1959); 
BgL_offsetz00_1960 = 
(BgL_auxz00_4503-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 130 */
long BgL_modz00_1961;
{ /* ./Inline/loop.scm 130 */
int BgL_arg2028z00_1962;
BgL_arg2028z00_1962 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 130 */
long BgL_n2z00_1970;
BgL_n2z00_1970 = 
(long)(BgL_arg2028z00_1962); 
BgL_modz00_1961 = 
(BgL_offsetz00_1960/BgL_n2z00_1970); } } 
{ /* ./Inline/loop.scm 130 */
long BgL_restz00_1963;
{ /* ./Inline/loop.scm 130 */
int BgL_arg2024z00_1964;
BgL_arg2024z00_1964 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 130 */
long BgL_n2z00_1973;
BgL_n2z00_1973 = 
(long)(BgL_arg2024z00_1964); 
BgL_restz00_1963 = 
(BgL_offsetz00_1960%BgL_n2z00_1973); } } 
{ /* ./Inline/loop.scm 130 */

{ /* ./Inline/loop.scm 130 */
obj_t BgL_bucketz00_1965;
{ /* ./Inline/loop.scm 130 */
int BgL_kz00_1975;
BgL_kz00_1975 = 
(int)(BgL_modz00_1961); 
BgL_bucketz00_1965 = 
VECTOR_REF(BgL_arg2017z00_1956,BgL_kz00_1975); } 
{ /* ./Inline/loop.scm 130 */
int BgL_kz00_1977;
BgL_kz00_1977 = 
(int)(BgL_restz00_1963); 
BgL_method2837z00_1953 = 
VECTOR_REF(BgL_bucketz00_1965,BgL_kz00_1977); } } } } } } } } } } 
{ /* ./Inline/loop.scm 130 */
obj_t BgL_auxz00_4516;
BgL_auxz00_4516 = 
PROCEDURE_ENTRY(BgL_method2837z00_1953)(BgL_method2837z00_1953, 
(obj_t)(BgL_nodez00_1952), BEOA); 
BgL_test3426z00_1226 = 
CBOOL(BgL_auxz00_4516); } } } } 
if(BgL_test3426z00_1226)
{ /* ./Inline/loop.scm 130 */
return BTRUE;}  else 
{ /* ./Inline/loop.scm 130 */
{ /* ./Inline/loop.scm 133 */
obj_t BgL_arg3428z00_1227;
BgL_arg3428z00_1227 = 
CDR(BgL_clausesz00_1221); 
{ 
obj_t BgL_clausesz00_4523;
BgL_clausesz00_4523 = BgL_arg3428z00_1227; 
BgL_clausesz00_1221 = BgL_clausesz00_4523; 
goto BgL_loopz00_1222;} } } } } } } } } 
}



/* find-let-fun?-fail2855 */
obj_t BGl_findzd2letzd2funzf3zd2fail2855z21zzinline_loopz00(obj_t BgL_envz00_3224, obj_t BgL_nodez00_3225)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 116 */
{ 
BgL_failz00_bglt BgL_nodez00_1207;
BgL_nodez00_1207 = 
(BgL_failz00_bglt)(BgL_nodez00_3225); 
{ /* ./Inline/loop.scm 118 */
obj_t BgL__ortest_2794z00_1211;
{ /* ./Inline/loop.scm 118 */
BgL_nodez00_bglt BgL_arg3408z00_1215;
BgL_arg3408z00_1215 = 
(((BgL_failz00_bglt)CREF(BgL_nodez00_1207))->BgL_procz00); 
{ /* ./Inline/loop.scm 118 */
obj_t BgL_method2837z00_1842;
{ /* ./Inline/loop.scm 118 */
BgL_objectz00_bglt BgL_objz00_1843;
BgL_objz00_1843 = 
(BgL_objectz00_bglt)(BgL_arg3408z00_1215); 
{ /* ./Inline/loop.scm 118 */
long BgL_objzd2classzd2numz00_1844;
BgL_objzd2classzd2numz00_1844 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1843); 
{ /* ./Inline/loop.scm 118 */
obj_t BgL_arg2017z00_1845;
{ /* ./Inline/loop.scm 118 */
int BgL_auxz00_4528;
BgL_auxz00_4528 = 
(int)(((long)1)); 
BgL_arg2017z00_1845 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4528); } 
{ /* ./Inline/loop.scm 118 */
int BgL_offsetz00_1848;
BgL_offsetz00_1848 = 
(int)(BgL_objzd2classzd2numz00_1844); 
{ /* ./Inline/loop.scm 118 */
long BgL_offsetz00_1849;
{ /* ./Inline/loop.scm 118 */
long BgL_auxz00_4532;
BgL_auxz00_4532 = 
(long)(BgL_offsetz00_1848); 
BgL_offsetz00_1849 = 
(BgL_auxz00_4532-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 118 */
long BgL_modz00_1850;
{ /* ./Inline/loop.scm 118 */
int BgL_arg2028z00_1851;
BgL_arg2028z00_1851 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 118 */
long BgL_n2z00_1859;
BgL_n2z00_1859 = 
(long)(BgL_arg2028z00_1851); 
BgL_modz00_1850 = 
(BgL_offsetz00_1849/BgL_n2z00_1859); } } 
{ /* ./Inline/loop.scm 118 */
long BgL_restz00_1852;
{ /* ./Inline/loop.scm 118 */
int BgL_arg2024z00_1853;
BgL_arg2024z00_1853 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 118 */
long BgL_n2z00_1862;
BgL_n2z00_1862 = 
(long)(BgL_arg2024z00_1853); 
BgL_restz00_1852 = 
(BgL_offsetz00_1849%BgL_n2z00_1862); } } 
{ /* ./Inline/loop.scm 118 */

{ /* ./Inline/loop.scm 118 */
obj_t BgL_bucketz00_1854;
{ /* ./Inline/loop.scm 118 */
int BgL_kz00_1864;
BgL_kz00_1864 = 
(int)(BgL_modz00_1850); 
BgL_bucketz00_1854 = 
VECTOR_REF(BgL_arg2017z00_1845,BgL_kz00_1864); } 
{ /* ./Inline/loop.scm 118 */
int BgL_kz00_1866;
BgL_kz00_1866 = 
(int)(BgL_restz00_1852); 
BgL_method2837z00_1842 = 
VECTOR_REF(BgL_bucketz00_1854,BgL_kz00_1866); } } } } } } } } } } 
BgL__ortest_2794z00_1211 = 
PROCEDURE_ENTRY(BgL_method2837z00_1842)(BgL_method2837z00_1842, 
(obj_t)(BgL_arg3408z00_1215), BEOA); } } 
if(
CBOOL(BgL__ortest_2794z00_1211))
{ /* ./Inline/loop.scm 118 */
return BgL__ortest_2794z00_1211;}  else 
{ /* ./Inline/loop.scm 119 */
obj_t BgL__ortest_2795z00_1212;
{ /* ./Inline/loop.scm 119 */
BgL_nodez00_bglt BgL_arg3404z00_1214;
BgL_arg3404z00_1214 = 
(((BgL_failz00_bglt)CREF(BgL_nodez00_1207))->BgL_msgz00); 
{ /* ./Inline/loop.scm 119 */
obj_t BgL_method2837z00_1869;
{ /* ./Inline/loop.scm 119 */
BgL_objectz00_bglt BgL_objz00_1870;
BgL_objz00_1870 = 
(BgL_objectz00_bglt)(BgL_arg3404z00_1214); 
{ /* ./Inline/loop.scm 119 */
long BgL_objzd2classzd2numz00_1871;
BgL_objzd2classzd2numz00_1871 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1870); 
{ /* ./Inline/loop.scm 119 */
obj_t BgL_arg2017z00_1872;
{ /* ./Inline/loop.scm 119 */
int BgL_auxz00_4553;
BgL_auxz00_4553 = 
(int)(((long)1)); 
BgL_arg2017z00_1872 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4553); } 
{ /* ./Inline/loop.scm 119 */
int BgL_offsetz00_1875;
BgL_offsetz00_1875 = 
(int)(BgL_objzd2classzd2numz00_1871); 
{ /* ./Inline/loop.scm 119 */
long BgL_offsetz00_1876;
{ /* ./Inline/loop.scm 119 */
long BgL_auxz00_4557;
BgL_auxz00_4557 = 
(long)(BgL_offsetz00_1875); 
BgL_offsetz00_1876 = 
(BgL_auxz00_4557-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 119 */
long BgL_modz00_1877;
{ /* ./Inline/loop.scm 119 */
int BgL_arg2028z00_1878;
BgL_arg2028z00_1878 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 119 */
long BgL_n2z00_1886;
BgL_n2z00_1886 = 
(long)(BgL_arg2028z00_1878); 
BgL_modz00_1877 = 
(BgL_offsetz00_1876/BgL_n2z00_1886); } } 
{ /* ./Inline/loop.scm 119 */
long BgL_restz00_1879;
{ /* ./Inline/loop.scm 119 */
int BgL_arg2024z00_1880;
BgL_arg2024z00_1880 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 119 */
long BgL_n2z00_1889;
BgL_n2z00_1889 = 
(long)(BgL_arg2024z00_1880); 
BgL_restz00_1879 = 
(BgL_offsetz00_1876%BgL_n2z00_1889); } } 
{ /* ./Inline/loop.scm 119 */

{ /* ./Inline/loop.scm 119 */
obj_t BgL_bucketz00_1881;
{ /* ./Inline/loop.scm 119 */
int BgL_kz00_1891;
BgL_kz00_1891 = 
(int)(BgL_modz00_1877); 
BgL_bucketz00_1881 = 
VECTOR_REF(BgL_arg2017z00_1872,BgL_kz00_1891); } 
{ /* ./Inline/loop.scm 119 */
int BgL_kz00_1893;
BgL_kz00_1893 = 
(int)(BgL_restz00_1879); 
BgL_method2837z00_1869 = 
VECTOR_REF(BgL_bucketz00_1881,BgL_kz00_1893); } } } } } } } } } } 
BgL__ortest_2795z00_1212 = 
PROCEDURE_ENTRY(BgL_method2837z00_1869)(BgL_method2837z00_1869, 
(obj_t)(BgL_arg3404z00_1214), BEOA); } } 
if(
CBOOL(BgL__ortest_2795z00_1212))
{ /* ./Inline/loop.scm 119 */
return BgL__ortest_2795z00_1212;}  else 
{ /* ./Inline/loop.scm 120 */
BgL_nodez00_bglt BgL_arg3400z00_1213;
BgL_arg3400z00_1213 = 
(((BgL_failz00_bglt)CREF(BgL_nodez00_1207))->BgL_objz00); 
{ /* ./Inline/loop.scm 120 */
obj_t BgL_method2837z00_1896;
{ /* ./Inline/loop.scm 120 */
BgL_objectz00_bglt BgL_objz00_1897;
BgL_objz00_1897 = 
(BgL_objectz00_bglt)(BgL_arg3400z00_1213); 
{ /* ./Inline/loop.scm 120 */
long BgL_objzd2classzd2numz00_1898;
BgL_objzd2classzd2numz00_1898 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1897); 
{ /* ./Inline/loop.scm 120 */
obj_t BgL_arg2017z00_1899;
{ /* ./Inline/loop.scm 120 */
int BgL_auxz00_4578;
BgL_auxz00_4578 = 
(int)(((long)1)); 
BgL_arg2017z00_1899 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4578); } 
{ /* ./Inline/loop.scm 120 */
int BgL_offsetz00_1902;
BgL_offsetz00_1902 = 
(int)(BgL_objzd2classzd2numz00_1898); 
{ /* ./Inline/loop.scm 120 */
long BgL_offsetz00_1903;
{ /* ./Inline/loop.scm 120 */
long BgL_auxz00_4582;
BgL_auxz00_4582 = 
(long)(BgL_offsetz00_1902); 
BgL_offsetz00_1903 = 
(BgL_auxz00_4582-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 120 */
long BgL_modz00_1904;
{ /* ./Inline/loop.scm 120 */
int BgL_arg2028z00_1905;
BgL_arg2028z00_1905 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 120 */
long BgL_n2z00_1913;
BgL_n2z00_1913 = 
(long)(BgL_arg2028z00_1905); 
BgL_modz00_1904 = 
(BgL_offsetz00_1903/BgL_n2z00_1913); } } 
{ /* ./Inline/loop.scm 120 */
long BgL_restz00_1906;
{ /* ./Inline/loop.scm 120 */
int BgL_arg2024z00_1907;
BgL_arg2024z00_1907 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 120 */
long BgL_n2z00_1916;
BgL_n2z00_1916 = 
(long)(BgL_arg2024z00_1907); 
BgL_restz00_1906 = 
(BgL_offsetz00_1903%BgL_n2z00_1916); } } 
{ /* ./Inline/loop.scm 120 */

{ /* ./Inline/loop.scm 120 */
obj_t BgL_bucketz00_1908;
{ /* ./Inline/loop.scm 120 */
int BgL_kz00_1918;
BgL_kz00_1918 = 
(int)(BgL_modz00_1904); 
BgL_bucketz00_1908 = 
VECTOR_REF(BgL_arg2017z00_1899,BgL_kz00_1918); } 
{ /* ./Inline/loop.scm 120 */
int BgL_kz00_1920;
BgL_kz00_1920 = 
(int)(BgL_restz00_1906); 
BgL_method2837z00_1896 = 
VECTOR_REF(BgL_bucketz00_1908,BgL_kz00_1920); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2837z00_1896)(BgL_method2837z00_1896, 
(obj_t)(BgL_arg3400z00_1213), BEOA);} } } } } } 
}



/* find-let-fun?-conditional2853 */
obj_t BGl_findzd2letzd2funzf3zd2conditional2853z21zzinline_loopz00(obj_t BgL_envz00_3226, obj_t BgL_nodez00_3227)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 107 */
{ 
BgL_conditionalz00_bglt BgL_nodez00_1196;
BgL_nodez00_1196 = 
(BgL_conditionalz00_bglt)(BgL_nodez00_3227); 
{ /* ./Inline/loop.scm 109 */
obj_t BgL__ortest_2790z00_1200;
{ /* ./Inline/loop.scm 109 */
BgL_nodez00_bglt BgL_arg3390z00_1204;
BgL_arg3390z00_1204 = 
(((BgL_conditionalz00_bglt)CREF(BgL_nodez00_1196))->BgL_testz00); 
{ /* ./Inline/loop.scm 109 */
obj_t BgL_method2837z00_1761;
{ /* ./Inline/loop.scm 109 */
BgL_objectz00_bglt BgL_objz00_1762;
BgL_objz00_1762 = 
(BgL_objectz00_bglt)(BgL_arg3390z00_1204); 
{ /* ./Inline/loop.scm 109 */
long BgL_objzd2classzd2numz00_1763;
BgL_objzd2classzd2numz00_1763 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1762); 
{ /* ./Inline/loop.scm 109 */
obj_t BgL_arg2017z00_1764;
{ /* ./Inline/loop.scm 109 */
int BgL_auxz00_4602;
BgL_auxz00_4602 = 
(int)(((long)1)); 
BgL_arg2017z00_1764 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4602); } 
{ /* ./Inline/loop.scm 109 */
int BgL_offsetz00_1767;
BgL_offsetz00_1767 = 
(int)(BgL_objzd2classzd2numz00_1763); 
{ /* ./Inline/loop.scm 109 */
long BgL_offsetz00_1768;
{ /* ./Inline/loop.scm 109 */
long BgL_auxz00_4606;
BgL_auxz00_4606 = 
(long)(BgL_offsetz00_1767); 
BgL_offsetz00_1768 = 
(BgL_auxz00_4606-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 109 */
long BgL_modz00_1769;
{ /* ./Inline/loop.scm 109 */
int BgL_arg2028z00_1770;
BgL_arg2028z00_1770 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 109 */
long BgL_n2z00_1778;
BgL_n2z00_1778 = 
(long)(BgL_arg2028z00_1770); 
BgL_modz00_1769 = 
(BgL_offsetz00_1768/BgL_n2z00_1778); } } 
{ /* ./Inline/loop.scm 109 */
long BgL_restz00_1771;
{ /* ./Inline/loop.scm 109 */
int BgL_arg2024z00_1772;
BgL_arg2024z00_1772 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 109 */
long BgL_n2z00_1781;
BgL_n2z00_1781 = 
(long)(BgL_arg2024z00_1772); 
BgL_restz00_1771 = 
(BgL_offsetz00_1768%BgL_n2z00_1781); } } 
{ /* ./Inline/loop.scm 109 */

{ /* ./Inline/loop.scm 109 */
obj_t BgL_bucketz00_1773;
{ /* ./Inline/loop.scm 109 */
int BgL_kz00_1783;
BgL_kz00_1783 = 
(int)(BgL_modz00_1769); 
BgL_bucketz00_1773 = 
VECTOR_REF(BgL_arg2017z00_1764,BgL_kz00_1783); } 
{ /* ./Inline/loop.scm 109 */
int BgL_kz00_1785;
BgL_kz00_1785 = 
(int)(BgL_restz00_1771); 
BgL_method2837z00_1761 = 
VECTOR_REF(BgL_bucketz00_1773,BgL_kz00_1785); } } } } } } } } } } 
BgL__ortest_2790z00_1200 = 
PROCEDURE_ENTRY(BgL_method2837z00_1761)(BgL_method2837z00_1761, 
(obj_t)(BgL_arg3390z00_1204), BEOA); } } 
if(
CBOOL(BgL__ortest_2790z00_1200))
{ /* ./Inline/loop.scm 109 */
return BgL__ortest_2790z00_1200;}  else 
{ /* ./Inline/loop.scm 110 */
obj_t BgL__ortest_2791z00_1201;
{ /* ./Inline/loop.scm 110 */
BgL_nodez00_bglt BgL_arg3386z00_1203;
BgL_arg3386z00_1203 = 
(((BgL_conditionalz00_bglt)CREF(BgL_nodez00_1196))->BgL_truez00); 
{ /* ./Inline/loop.scm 110 */
obj_t BgL_method2837z00_1788;
{ /* ./Inline/loop.scm 110 */
BgL_objectz00_bglt BgL_objz00_1789;
BgL_objz00_1789 = 
(BgL_objectz00_bglt)(BgL_arg3386z00_1203); 
{ /* ./Inline/loop.scm 110 */
long BgL_objzd2classzd2numz00_1790;
BgL_objzd2classzd2numz00_1790 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1789); 
{ /* ./Inline/loop.scm 110 */
obj_t BgL_arg2017z00_1791;
{ /* ./Inline/loop.scm 110 */
int BgL_auxz00_4627;
BgL_auxz00_4627 = 
(int)(((long)1)); 
BgL_arg2017z00_1791 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4627); } 
{ /* ./Inline/loop.scm 110 */
int BgL_offsetz00_1794;
BgL_offsetz00_1794 = 
(int)(BgL_objzd2classzd2numz00_1790); 
{ /* ./Inline/loop.scm 110 */
long BgL_offsetz00_1795;
{ /* ./Inline/loop.scm 110 */
long BgL_auxz00_4631;
BgL_auxz00_4631 = 
(long)(BgL_offsetz00_1794); 
BgL_offsetz00_1795 = 
(BgL_auxz00_4631-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 110 */
long BgL_modz00_1796;
{ /* ./Inline/loop.scm 110 */
int BgL_arg2028z00_1797;
BgL_arg2028z00_1797 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 110 */
long BgL_n2z00_1805;
BgL_n2z00_1805 = 
(long)(BgL_arg2028z00_1797); 
BgL_modz00_1796 = 
(BgL_offsetz00_1795/BgL_n2z00_1805); } } 
{ /* ./Inline/loop.scm 110 */
long BgL_restz00_1798;
{ /* ./Inline/loop.scm 110 */
int BgL_arg2024z00_1799;
BgL_arg2024z00_1799 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 110 */
long BgL_n2z00_1808;
BgL_n2z00_1808 = 
(long)(BgL_arg2024z00_1799); 
BgL_restz00_1798 = 
(BgL_offsetz00_1795%BgL_n2z00_1808); } } 
{ /* ./Inline/loop.scm 110 */

{ /* ./Inline/loop.scm 110 */
obj_t BgL_bucketz00_1800;
{ /* ./Inline/loop.scm 110 */
int BgL_kz00_1810;
BgL_kz00_1810 = 
(int)(BgL_modz00_1796); 
BgL_bucketz00_1800 = 
VECTOR_REF(BgL_arg2017z00_1791,BgL_kz00_1810); } 
{ /* ./Inline/loop.scm 110 */
int BgL_kz00_1812;
BgL_kz00_1812 = 
(int)(BgL_restz00_1798); 
BgL_method2837z00_1788 = 
VECTOR_REF(BgL_bucketz00_1800,BgL_kz00_1812); } } } } } } } } } } 
BgL__ortest_2791z00_1201 = 
PROCEDURE_ENTRY(BgL_method2837z00_1788)(BgL_method2837z00_1788, 
(obj_t)(BgL_arg3386z00_1203), BEOA); } } 
if(
CBOOL(BgL__ortest_2791z00_1201))
{ /* ./Inline/loop.scm 110 */
return BgL__ortest_2791z00_1201;}  else 
{ /* ./Inline/loop.scm 111 */
BgL_nodez00_bglt BgL_arg3382z00_1202;
BgL_arg3382z00_1202 = 
(((BgL_conditionalz00_bglt)CREF(BgL_nodez00_1196))->BgL_falsez00); 
{ /* ./Inline/loop.scm 111 */
obj_t BgL_method2837z00_1815;
{ /* ./Inline/loop.scm 111 */
BgL_objectz00_bglt BgL_objz00_1816;
BgL_objz00_1816 = 
(BgL_objectz00_bglt)(BgL_arg3382z00_1202); 
{ /* ./Inline/loop.scm 111 */
long BgL_objzd2classzd2numz00_1817;
BgL_objzd2classzd2numz00_1817 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1816); 
{ /* ./Inline/loop.scm 111 */
obj_t BgL_arg2017z00_1818;
{ /* ./Inline/loop.scm 111 */
int BgL_auxz00_4652;
BgL_auxz00_4652 = 
(int)(((long)1)); 
BgL_arg2017z00_1818 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4652); } 
{ /* ./Inline/loop.scm 111 */
int BgL_offsetz00_1821;
BgL_offsetz00_1821 = 
(int)(BgL_objzd2classzd2numz00_1817); 
{ /* ./Inline/loop.scm 111 */
long BgL_offsetz00_1822;
{ /* ./Inline/loop.scm 111 */
long BgL_auxz00_4656;
BgL_auxz00_4656 = 
(long)(BgL_offsetz00_1821); 
BgL_offsetz00_1822 = 
(BgL_auxz00_4656-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 111 */
long BgL_modz00_1823;
{ /* ./Inline/loop.scm 111 */
int BgL_arg2028z00_1824;
BgL_arg2028z00_1824 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 111 */
long BgL_n2z00_1832;
BgL_n2z00_1832 = 
(long)(BgL_arg2028z00_1824); 
BgL_modz00_1823 = 
(BgL_offsetz00_1822/BgL_n2z00_1832); } } 
{ /* ./Inline/loop.scm 111 */
long BgL_restz00_1825;
{ /* ./Inline/loop.scm 111 */
int BgL_arg2024z00_1826;
BgL_arg2024z00_1826 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 111 */
long BgL_n2z00_1835;
BgL_n2z00_1835 = 
(long)(BgL_arg2024z00_1826); 
BgL_restz00_1825 = 
(BgL_offsetz00_1822%BgL_n2z00_1835); } } 
{ /* ./Inline/loop.scm 111 */

{ /* ./Inline/loop.scm 111 */
obj_t BgL_bucketz00_1827;
{ /* ./Inline/loop.scm 111 */
int BgL_kz00_1837;
BgL_kz00_1837 = 
(int)(BgL_modz00_1823); 
BgL_bucketz00_1827 = 
VECTOR_REF(BgL_arg2017z00_1818,BgL_kz00_1837); } 
{ /* ./Inline/loop.scm 111 */
int BgL_kz00_1839;
BgL_kz00_1839 = 
(int)(BgL_restz00_1825); 
BgL_method2837z00_1815 = 
VECTOR_REF(BgL_bucketz00_1827,BgL_kz00_1839); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2837z00_1815)(BgL_method2837z00_1815, 
(obj_t)(BgL_arg3382z00_1202), BEOA);} } } } } } 
}



/* find-let-fun?-setq2851 */
obj_t BGl_findzd2letzd2funzf3zd2setq2851z21zzinline_loopz00(obj_t BgL_envz00_3228, obj_t BgL_nodez00_3229)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 101 */
{ 
BgL_setqz00_bglt BgL_nodez00_1190;
BgL_nodez00_1190 = 
(BgL_setqz00_bglt)(BgL_nodez00_3229); 
{ /* ./Inline/loop.scm 102 */
BgL_nodez00_bglt BgL_arg3372z00_1731;
BgL_arg3372z00_1731 = 
(((BgL_setqz00_bglt)CREF(BgL_nodez00_1190))->BgL_valuez00); 
{ /* ./Inline/loop.scm 102 */
obj_t BgL_method2837z00_1734;
{ /* ./Inline/loop.scm 102 */
BgL_objectz00_bglt BgL_objz00_1735;
BgL_objz00_1735 = 
(BgL_objectz00_bglt)(BgL_arg3372z00_1731); 
{ /* ./Inline/loop.scm 102 */
long BgL_objzd2classzd2numz00_1736;
BgL_objzd2classzd2numz00_1736 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1735); 
{ /* ./Inline/loop.scm 102 */
obj_t BgL_arg2017z00_1737;
{ /* ./Inline/loop.scm 102 */
int BgL_auxz00_4676;
BgL_auxz00_4676 = 
(int)(((long)1)); 
BgL_arg2017z00_1737 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4676); } 
{ /* ./Inline/loop.scm 102 */
int BgL_offsetz00_1740;
BgL_offsetz00_1740 = 
(int)(BgL_objzd2classzd2numz00_1736); 
{ /* ./Inline/loop.scm 102 */
long BgL_offsetz00_1741;
{ /* ./Inline/loop.scm 102 */
long BgL_auxz00_4680;
BgL_auxz00_4680 = 
(long)(BgL_offsetz00_1740); 
BgL_offsetz00_1741 = 
(BgL_auxz00_4680-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 102 */
long BgL_modz00_1742;
{ /* ./Inline/loop.scm 102 */
int BgL_arg2028z00_1743;
BgL_arg2028z00_1743 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 102 */
long BgL_n2z00_1751;
BgL_n2z00_1751 = 
(long)(BgL_arg2028z00_1743); 
BgL_modz00_1742 = 
(BgL_offsetz00_1741/BgL_n2z00_1751); } } 
{ /* ./Inline/loop.scm 102 */
long BgL_restz00_1744;
{ /* ./Inline/loop.scm 102 */
int BgL_arg2024z00_1745;
BgL_arg2024z00_1745 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 102 */
long BgL_n2z00_1754;
BgL_n2z00_1754 = 
(long)(BgL_arg2024z00_1745); 
BgL_restz00_1744 = 
(BgL_offsetz00_1741%BgL_n2z00_1754); } } 
{ /* ./Inline/loop.scm 102 */

{ /* ./Inline/loop.scm 102 */
obj_t BgL_bucketz00_1746;
{ /* ./Inline/loop.scm 102 */
int BgL_kz00_1756;
BgL_kz00_1756 = 
(int)(BgL_modz00_1742); 
BgL_bucketz00_1746 = 
VECTOR_REF(BgL_arg2017z00_1737,BgL_kz00_1756); } 
{ /* ./Inline/loop.scm 102 */
int BgL_kz00_1758;
BgL_kz00_1758 = 
(int)(BgL_restz00_1744); 
BgL_method2837z00_1734 = 
VECTOR_REF(BgL_bucketz00_1746,BgL_kz00_1758); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2837z00_1734)(BgL_method2837z00_1734, 
(obj_t)(BgL_arg3372z00_1731), BEOA);} } } } 
}



/* find-let-fun?-cast2849 */
obj_t BGl_findzd2letzd2funzf3zd2cast2849z21zzinline_loopz00(obj_t BgL_envz00_3230, obj_t BgL_nodez00_3231)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 95 */
{ 
BgL_castz00_bglt BgL_nodez00_1184;
BgL_nodez00_1184 = 
(BgL_castz00_bglt)(BgL_nodez00_3231); 
{ /* ./Inline/loop.scm 96 */
BgL_nodez00_bglt BgL_arg3362z00_1703;
BgL_arg3362z00_1703 = 
(((BgL_castz00_bglt)CREF(BgL_nodez00_1184))->BgL_argz00); 
{ /* ./Inline/loop.scm 96 */
obj_t BgL_method2837z00_1706;
{ /* ./Inline/loop.scm 96 */
BgL_objectz00_bglt BgL_objz00_1707;
BgL_objz00_1707 = 
(BgL_objectz00_bglt)(BgL_arg3362z00_1703); 
{ /* ./Inline/loop.scm 96 */
long BgL_objzd2classzd2numz00_1708;
BgL_objzd2classzd2numz00_1708 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1707); 
{ /* ./Inline/loop.scm 96 */
obj_t BgL_arg2017z00_1709;
{ /* ./Inline/loop.scm 96 */
int BgL_auxz00_4700;
BgL_auxz00_4700 = 
(int)(((long)1)); 
BgL_arg2017z00_1709 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4700); } 
{ /* ./Inline/loop.scm 96 */
int BgL_offsetz00_1712;
BgL_offsetz00_1712 = 
(int)(BgL_objzd2classzd2numz00_1708); 
{ /* ./Inline/loop.scm 96 */
long BgL_offsetz00_1713;
{ /* ./Inline/loop.scm 96 */
long BgL_auxz00_4704;
BgL_auxz00_4704 = 
(long)(BgL_offsetz00_1712); 
BgL_offsetz00_1713 = 
(BgL_auxz00_4704-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 96 */
long BgL_modz00_1714;
{ /* ./Inline/loop.scm 96 */
int BgL_arg2028z00_1715;
BgL_arg2028z00_1715 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 96 */
long BgL_n2z00_1723;
BgL_n2z00_1723 = 
(long)(BgL_arg2028z00_1715); 
BgL_modz00_1714 = 
(BgL_offsetz00_1713/BgL_n2z00_1723); } } 
{ /* ./Inline/loop.scm 96 */
long BgL_restz00_1716;
{ /* ./Inline/loop.scm 96 */
int BgL_arg2024z00_1717;
BgL_arg2024z00_1717 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 96 */
long BgL_n2z00_1726;
BgL_n2z00_1726 = 
(long)(BgL_arg2024z00_1717); 
BgL_restz00_1716 = 
(BgL_offsetz00_1713%BgL_n2z00_1726); } } 
{ /* ./Inline/loop.scm 96 */

{ /* ./Inline/loop.scm 96 */
obj_t BgL_bucketz00_1718;
{ /* ./Inline/loop.scm 96 */
int BgL_kz00_1728;
BgL_kz00_1728 = 
(int)(BgL_modz00_1714); 
BgL_bucketz00_1718 = 
VECTOR_REF(BgL_arg2017z00_1709,BgL_kz00_1728); } 
{ /* ./Inline/loop.scm 96 */
int BgL_kz00_1730;
BgL_kz00_1730 = 
(int)(BgL_restz00_1716); 
BgL_method2837z00_1706 = 
VECTOR_REF(BgL_bucketz00_1718,BgL_kz00_1730); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2837z00_1706)(BgL_method2837z00_1706, 
(obj_t)(BgL_arg3362z00_1703), BEOA);} } } } 
}



/* find-let-fun?-extern2847 */
obj_t BGl_findzd2letzd2funzf3zd2extern2847z21zzinline_loopz00(obj_t BgL_envz00_3232, obj_t BgL_nodez00_3233)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 89 */
{ 
BgL_externz00_bglt BgL_nodez00_1178;
{ /* ./Inline/loop.scm 90 */
bool_t BgL_auxz00_4721;
BgL_nodez00_1178 = 
(BgL_externz00_bglt)(BgL_nodez00_3233); 
{ /* ./Inline/loop.scm 90 */
obj_t BgL_arg3351z00_1701;
BgL_arg3351z00_1701 = 
(((BgL_externz00_bglt)CREF(BgL_nodez00_1178))->BgL_exprza2za2); 
BgL_auxz00_4721 = 
BGl_findzd2letzd2funzf3za2z51zzinline_loopz00(BgL_arg3351z00_1701); } 
return 
BBOOL(BgL_auxz00_4721);} } } 
}



/* find-let-fun?-funcall2845 */
obj_t BGl_findzd2letzd2funzf3zd2funcall2845z21zzinline_loopz00(obj_t BgL_envz00_3234, obj_t BgL_nodez00_3235)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 81 */
{ 
BgL_funcallz00_bglt BgL_nodez00_1169;
BgL_nodez00_1169 = 
(BgL_funcallz00_bglt)(BgL_nodez00_3235); 
{ /* ./Inline/loop.scm 83 */
obj_t BgL__ortest_2787z00_1173;
{ /* ./Inline/loop.scm 83 */
BgL_nodez00_bglt BgL_arg3341z00_1175;
BgL_arg3341z00_1175 = 
(((BgL_funcallz00_bglt)CREF(BgL_nodez00_1169))->BgL_funz00); 
{ /* ./Inline/loop.scm 83 */
obj_t BgL_method2837z00_1675;
{ /* ./Inline/loop.scm 83 */
BgL_objectz00_bglt BgL_objz00_1676;
BgL_objz00_1676 = 
(BgL_objectz00_bglt)(BgL_arg3341z00_1175); 
{ /* ./Inline/loop.scm 83 */
long BgL_objzd2classzd2numz00_1677;
BgL_objzd2classzd2numz00_1677 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1676); 
{ /* ./Inline/loop.scm 83 */
obj_t BgL_arg2017z00_1678;
{ /* ./Inline/loop.scm 83 */
int BgL_auxz00_4729;
BgL_auxz00_4729 = 
(int)(((long)1)); 
BgL_arg2017z00_1678 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4729); } 
{ /* ./Inline/loop.scm 83 */
int BgL_offsetz00_1681;
BgL_offsetz00_1681 = 
(int)(BgL_objzd2classzd2numz00_1677); 
{ /* ./Inline/loop.scm 83 */
long BgL_offsetz00_1682;
{ /* ./Inline/loop.scm 83 */
long BgL_auxz00_4733;
BgL_auxz00_4733 = 
(long)(BgL_offsetz00_1681); 
BgL_offsetz00_1682 = 
(BgL_auxz00_4733-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 83 */
long BgL_modz00_1683;
{ /* ./Inline/loop.scm 83 */
int BgL_arg2028z00_1684;
BgL_arg2028z00_1684 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 83 */
long BgL_n2z00_1692;
BgL_n2z00_1692 = 
(long)(BgL_arg2028z00_1684); 
BgL_modz00_1683 = 
(BgL_offsetz00_1682/BgL_n2z00_1692); } } 
{ /* ./Inline/loop.scm 83 */
long BgL_restz00_1685;
{ /* ./Inline/loop.scm 83 */
int BgL_arg2024z00_1686;
BgL_arg2024z00_1686 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 83 */
long BgL_n2z00_1695;
BgL_n2z00_1695 = 
(long)(BgL_arg2024z00_1686); 
BgL_restz00_1685 = 
(BgL_offsetz00_1682%BgL_n2z00_1695); } } 
{ /* ./Inline/loop.scm 83 */

{ /* ./Inline/loop.scm 83 */
obj_t BgL_bucketz00_1687;
{ /* ./Inline/loop.scm 83 */
int BgL_kz00_1697;
BgL_kz00_1697 = 
(int)(BgL_modz00_1683); 
BgL_bucketz00_1687 = 
VECTOR_REF(BgL_arg2017z00_1678,BgL_kz00_1697); } 
{ /* ./Inline/loop.scm 83 */
int BgL_kz00_1699;
BgL_kz00_1699 = 
(int)(BgL_restz00_1685); 
BgL_method2837z00_1675 = 
VECTOR_REF(BgL_bucketz00_1687,BgL_kz00_1699); } } } } } } } } } } 
BgL__ortest_2787z00_1173 = 
PROCEDURE_ENTRY(BgL_method2837z00_1675)(BgL_method2837z00_1675, 
(obj_t)(BgL_arg3341z00_1175), BEOA); } } 
if(
CBOOL(BgL__ortest_2787z00_1173))
{ /* ./Inline/loop.scm 83 */
return BgL__ortest_2787z00_1173;}  else 
{ /* ./Inline/loop.scm 84 */
obj_t BgL_arg3337z00_1174;
BgL_arg3337z00_1174 = 
(((BgL_funcallz00_bglt)CREF(BgL_nodez00_1169))->BgL_argsz00); 
{ /* ./Inline/loop.scm 84 */
bool_t BgL_auxz00_4752;
BgL_auxz00_4752 = 
BGl_findzd2letzd2funzf3za2z51zzinline_loopz00(BgL_arg3337z00_1174); 
return 
BBOOL(BgL_auxz00_4752);} } } } } 
}



/* find-let-fun?-app-ly2843 */
obj_t BGl_findzd2letzd2funzf3zd2appzd2ly2843zf3zzinline_loopz00(obj_t BgL_envz00_3236, obj_t BgL_nodez00_3237)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 74 */
{ 
BgL_appzd2lyzd2_bglt BgL_nodez00_1160;
BgL_nodez00_1160 = 
(BgL_appzd2lyzd2_bglt)(BgL_nodez00_3237); 
{ /* ./Inline/loop.scm 76 */
obj_t BgL__ortest_2784z00_1164;
{ /* ./Inline/loop.scm 76 */
BgL_nodez00_bglt BgL_arg3327z00_1166;
BgL_arg3327z00_1166 = 
(((BgL_appzd2lyzd2_bglt)CREF(BgL_nodez00_1160))->BgL_funz00); 
{ /* ./Inline/loop.scm 76 */
obj_t BgL_method2837z00_1621;
{ /* ./Inline/loop.scm 76 */
BgL_objectz00_bglt BgL_objz00_1622;
BgL_objz00_1622 = 
(BgL_objectz00_bglt)(BgL_arg3327z00_1166); 
{ /* ./Inline/loop.scm 76 */
long BgL_objzd2classzd2numz00_1623;
BgL_objzd2classzd2numz00_1623 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1622); 
{ /* ./Inline/loop.scm 76 */
obj_t BgL_arg2017z00_1624;
{ /* ./Inline/loop.scm 76 */
int BgL_auxz00_4759;
BgL_auxz00_4759 = 
(int)(((long)1)); 
BgL_arg2017z00_1624 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4759); } 
{ /* ./Inline/loop.scm 76 */
int BgL_offsetz00_1627;
BgL_offsetz00_1627 = 
(int)(BgL_objzd2classzd2numz00_1623); 
{ /* ./Inline/loop.scm 76 */
long BgL_offsetz00_1628;
{ /* ./Inline/loop.scm 76 */
long BgL_auxz00_4763;
BgL_auxz00_4763 = 
(long)(BgL_offsetz00_1627); 
BgL_offsetz00_1628 = 
(BgL_auxz00_4763-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 76 */
long BgL_modz00_1629;
{ /* ./Inline/loop.scm 76 */
int BgL_arg2028z00_1630;
BgL_arg2028z00_1630 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 76 */
long BgL_n2z00_1638;
BgL_n2z00_1638 = 
(long)(BgL_arg2028z00_1630); 
BgL_modz00_1629 = 
(BgL_offsetz00_1628/BgL_n2z00_1638); } } 
{ /* ./Inline/loop.scm 76 */
long BgL_restz00_1631;
{ /* ./Inline/loop.scm 76 */
int BgL_arg2024z00_1632;
BgL_arg2024z00_1632 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 76 */
long BgL_n2z00_1641;
BgL_n2z00_1641 = 
(long)(BgL_arg2024z00_1632); 
BgL_restz00_1631 = 
(BgL_offsetz00_1628%BgL_n2z00_1641); } } 
{ /* ./Inline/loop.scm 76 */

{ /* ./Inline/loop.scm 76 */
obj_t BgL_bucketz00_1633;
{ /* ./Inline/loop.scm 76 */
int BgL_kz00_1643;
BgL_kz00_1643 = 
(int)(BgL_modz00_1629); 
BgL_bucketz00_1633 = 
VECTOR_REF(BgL_arg2017z00_1624,BgL_kz00_1643); } 
{ /* ./Inline/loop.scm 76 */
int BgL_kz00_1645;
BgL_kz00_1645 = 
(int)(BgL_restz00_1631); 
BgL_method2837z00_1621 = 
VECTOR_REF(BgL_bucketz00_1633,BgL_kz00_1645); } } } } } } } } } } 
BgL__ortest_2784z00_1164 = 
PROCEDURE_ENTRY(BgL_method2837z00_1621)(BgL_method2837z00_1621, 
(obj_t)(BgL_arg3327z00_1166), BEOA); } } 
if(
CBOOL(BgL__ortest_2784z00_1164))
{ /* ./Inline/loop.scm 76 */
return BgL__ortest_2784z00_1164;}  else 
{ /* ./Inline/loop.scm 76 */
BgL_nodez00_bglt BgL_arg3323z00_1165;
BgL_arg3323z00_1165 = 
(((BgL_appzd2lyzd2_bglt)CREF(BgL_nodez00_1160))->BgL_argz00); 
{ /* ./Inline/loop.scm 76 */
obj_t BgL_method2837z00_1648;
{ /* ./Inline/loop.scm 76 */
BgL_objectz00_bglt BgL_objz00_1649;
BgL_objz00_1649 = 
(BgL_objectz00_bglt)(BgL_arg3323z00_1165); 
{ /* ./Inline/loop.scm 76 */
long BgL_objzd2classzd2numz00_1650;
BgL_objzd2classzd2numz00_1650 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1649); 
{ /* ./Inline/loop.scm 76 */
obj_t BgL_arg2017z00_1651;
{ /* ./Inline/loop.scm 76 */
int BgL_auxz00_4784;
BgL_auxz00_4784 = 
(int)(((long)1)); 
BgL_arg2017z00_1651 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4784); } 
{ /* ./Inline/loop.scm 76 */
int BgL_offsetz00_1654;
BgL_offsetz00_1654 = 
(int)(BgL_objzd2classzd2numz00_1650); 
{ /* ./Inline/loop.scm 76 */
long BgL_offsetz00_1655;
{ /* ./Inline/loop.scm 76 */
long BgL_auxz00_4788;
BgL_auxz00_4788 = 
(long)(BgL_offsetz00_1654); 
BgL_offsetz00_1655 = 
(BgL_auxz00_4788-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 76 */
long BgL_modz00_1656;
{ /* ./Inline/loop.scm 76 */
int BgL_arg2028z00_1657;
BgL_arg2028z00_1657 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 76 */
long BgL_n2z00_1665;
BgL_n2z00_1665 = 
(long)(BgL_arg2028z00_1657); 
BgL_modz00_1656 = 
(BgL_offsetz00_1655/BgL_n2z00_1665); } } 
{ /* ./Inline/loop.scm 76 */
long BgL_restz00_1658;
{ /* ./Inline/loop.scm 76 */
int BgL_arg2024z00_1659;
BgL_arg2024z00_1659 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 76 */
long BgL_n2z00_1668;
BgL_n2z00_1668 = 
(long)(BgL_arg2024z00_1659); 
BgL_restz00_1658 = 
(BgL_offsetz00_1655%BgL_n2z00_1668); } } 
{ /* ./Inline/loop.scm 76 */

{ /* ./Inline/loop.scm 76 */
obj_t BgL_bucketz00_1660;
{ /* ./Inline/loop.scm 76 */
int BgL_kz00_1670;
BgL_kz00_1670 = 
(int)(BgL_modz00_1656); 
BgL_bucketz00_1660 = 
VECTOR_REF(BgL_arg2017z00_1651,BgL_kz00_1670); } 
{ /* ./Inline/loop.scm 76 */
int BgL_kz00_1672;
BgL_kz00_1672 = 
(int)(BgL_restz00_1658); 
BgL_method2837z00_1648 = 
VECTOR_REF(BgL_bucketz00_1660,BgL_kz00_1672); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2837z00_1648)(BgL_method2837z00_1648, 
(obj_t)(BgL_arg3323z00_1165), BEOA);} } } } } 
}



/* find-let-fun?-app2841 */
obj_t BGl_findzd2letzd2funzf3zd2app2841z21zzinline_loopz00(obj_t BgL_envz00_3238, obj_t BgL_nodez00_3239)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 67 */
{ 
BgL_appz00_bglt BgL_nodez00_1153;
{ /* ./Inline/loop.scm 68 */
bool_t BgL_auxz00_4805;
BgL_nodez00_1153 = 
(BgL_appz00_bglt)(BgL_nodez00_3239); 
{ /* ./Inline/loop.scm 68 */
obj_t BgL_arg3313z00_1617;
BgL_arg3313z00_1617 = 
(((BgL_appz00_bglt)CREF(BgL_nodez00_1153))->BgL_argsz00); 
BgL_auxz00_4805 = 
BGl_findzd2letzd2funzf3za2z51zzinline_loopz00(BgL_arg3313z00_1617); } 
return 
BBOOL(BgL_auxz00_4805);} } } 
}



/* find-let-fun?-sequence2839 */
obj_t BGl_findzd2letzd2funzf3zd2sequence2839z21zzinline_loopz00(obj_t BgL_envz00_3240, obj_t BgL_nodez00_3241)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 61 */
{ 
BgL_sequencez00_bglt BgL_nodez00_1147;
{ /* ./Inline/loop.scm 62 */
bool_t BgL_auxz00_4810;
BgL_nodez00_1147 = 
(BgL_sequencez00_bglt)(BgL_nodez00_3241); 
{ /* ./Inline/loop.scm 62 */
obj_t BgL_arg3303z00_1614;
BgL_arg3303z00_1614 = 
(((BgL_sequencez00_bglt)CREF(BgL_nodez00_1147))->BgL_nodesz00); 
BgL_auxz00_4810 = 
BGl_findzd2letzd2funzf3za2z51zzinline_loopz00(BgL_arg3303z00_1614); } 
return 
BBOOL(BgL_auxz00_4810);} } } 
}



/* find-let-fun? */
obj_t BGl_findzd2letzd2funzf3zf3zzinline_loopz00(BgL_nodez00_bglt BgL_nodez00_3)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 55 */
{ /* ./Inline/loop.scm 55 */
obj_t BgL_method2837z00_3028;
{ /* ./Inline/loop.scm 55 */
BgL_objectz00_bglt BgL_objz00_3029;
BgL_objz00_3029 = 
(BgL_objectz00_bglt)(BgL_nodez00_3); 
{ /* ./Inline/loop.scm 55 */
long BgL_objzd2classzd2numz00_3030;
BgL_objzd2classzd2numz00_3030 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3029); 
{ /* ./Inline/loop.scm 55 */
obj_t BgL_arg2017z00_3031;
{ /* ./Inline/loop.scm 55 */
int BgL_auxz00_4817;
BgL_auxz00_4817 = 
(int)(((long)1)); 
BgL_arg2017z00_3031 = 
PROCEDURE_REF(BGl_findzd2letzd2funzf3zd2envz21zzinline_loopz00, BgL_auxz00_4817); } 
{ /* ./Inline/loop.scm 55 */
int BgL_offsetz00_3034;
BgL_offsetz00_3034 = 
(int)(BgL_objzd2classzd2numz00_3030); 
{ /* ./Inline/loop.scm 55 */
long BgL_offsetz00_3035;
{ /* ./Inline/loop.scm 55 */
long BgL_auxz00_4821;
BgL_auxz00_4821 = 
(long)(BgL_offsetz00_3034); 
BgL_offsetz00_3035 = 
(BgL_auxz00_4821-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 55 */
long BgL_modz00_3036;
{ /* ./Inline/loop.scm 55 */
int BgL_arg2028z00_3037;
BgL_arg2028z00_3037 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 55 */
long BgL_n2z00_3045;
BgL_n2z00_3045 = 
(long)(BgL_arg2028z00_3037); 
BgL_modz00_3036 = 
(BgL_offsetz00_3035/BgL_n2z00_3045); } } 
{ /* ./Inline/loop.scm 55 */
long BgL_restz00_3038;
{ /* ./Inline/loop.scm 55 */
int BgL_arg2024z00_3039;
BgL_arg2024z00_3039 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 55 */
long BgL_n2z00_3048;
BgL_n2z00_3048 = 
(long)(BgL_arg2024z00_3039); 
BgL_restz00_3038 = 
(BgL_offsetz00_3035%BgL_n2z00_3048); } } 
{ /* ./Inline/loop.scm 55 */

{ /* ./Inline/loop.scm 55 */
obj_t BgL_bucketz00_3040;
{ /* ./Inline/loop.scm 55 */
int BgL_kz00_3050;
BgL_kz00_3050 = 
(int)(BgL_modz00_3036); 
BgL_bucketz00_3040 = 
VECTOR_REF(BgL_arg2017z00_3031,BgL_kz00_3050); } 
{ /* ./Inline/loop.scm 55 */
int BgL_kz00_3052;
BgL_kz00_3052 = 
(int)(BgL_restz00_3038); 
BgL_method2837z00_3028 = 
VECTOR_REF(BgL_bucketz00_3040,BgL_kz00_3052); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2837z00_3028)(BgL_method2837z00_3028, 
(obj_t)(BgL_nodez00_3), BEOA);} } 
}



/* _find-let-fun? */
obj_t BGl__findzd2letzd2funzf3zf3zzinline_loopz00(obj_t BgL_envz00_3085, obj_t BgL_nodez00_3086)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 55 */
return 
BGl_findzd2letzd2funzf3zf3zzinline_loopz00(
(BgL_nodez00_bglt)(BgL_nodez00_3086));} 
}



/* _find-let-fun?-default2836 */
obj_t BGl__findzd2letzd2funzf3zd2default2836z21zzinline_loopz00(obj_t BgL_envz00_3242, obj_t BgL_nodez00_3243)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 15 */
{ /* ./Inline/loop.scm 56 */
bool_t BgL_auxz00_4839;
BgL_auxz00_4839 = ((bool_t)0); 
return 
BBOOL(BgL_auxz00_4839);} } 
}



/* nest-loop! */
BGL_EXPORTED_DEF BgL_nodez00_bglt BGl_nestzd2loopz12zc0zzinline_loopz00(BgL_nodez00_bglt BgL_nodez00_23, BgL_localz00_bglt BgL_localz00_24, obj_t BgL_nesterz00_25)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 202 */
{ /* ./Inline/loop.scm 202 */
obj_t BgL_method2874z00_3053;
{ /* ./Inline/loop.scm 202 */
BgL_objectz00_bglt BgL_objz00_3054;
BgL_objz00_3054 = 
(BgL_objectz00_bglt)(BgL_nodez00_23); 
{ /* ./Inline/loop.scm 202 */
long BgL_objzd2classzd2numz00_3055;
BgL_objzd2classzd2numz00_3055 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3054); 
{ /* ./Inline/loop.scm 202 */
obj_t BgL_arg2017z00_3056;
{ /* ./Inline/loop.scm 202 */
int BgL_auxz00_4843;
BgL_auxz00_4843 = 
(int)(((long)1)); 
BgL_arg2017z00_3056 = 
PROCEDURE_REF(BGl_nestzd2loopz12zd2envz12zzinline_loopz00, BgL_auxz00_4843); } 
{ /* ./Inline/loop.scm 202 */
int BgL_offsetz00_3059;
BgL_offsetz00_3059 = 
(int)(BgL_objzd2classzd2numz00_3055); 
{ /* ./Inline/loop.scm 202 */
long BgL_offsetz00_3060;
{ /* ./Inline/loop.scm 202 */
long BgL_auxz00_4847;
BgL_auxz00_4847 = 
(long)(BgL_offsetz00_3059); 
BgL_offsetz00_3060 = 
(BgL_auxz00_4847-OBJECT_TYPE); } 
{ /* ./Inline/loop.scm 202 */
long BgL_modz00_3061;
{ /* ./Inline/loop.scm 202 */
int BgL_arg2028z00_3062;
BgL_arg2028z00_3062 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 202 */
long BgL_n2z00_3070;
BgL_n2z00_3070 = 
(long)(BgL_arg2028z00_3062); 
BgL_modz00_3061 = 
(BgL_offsetz00_3060/BgL_n2z00_3070); } } 
{ /* ./Inline/loop.scm 202 */
long BgL_restz00_3063;
{ /* ./Inline/loop.scm 202 */
int BgL_arg2024z00_3064;
BgL_arg2024z00_3064 = 
(int)(((long)8)); 
{ /* ./Inline/loop.scm 202 */
long BgL_n2z00_3073;
BgL_n2z00_3073 = 
(long)(BgL_arg2024z00_3064); 
BgL_restz00_3063 = 
(BgL_offsetz00_3060%BgL_n2z00_3073); } } 
{ /* ./Inline/loop.scm 202 */

{ /* ./Inline/loop.scm 202 */
obj_t BgL_bucketz00_3065;
{ /* ./Inline/loop.scm 202 */
int BgL_kz00_3075;
BgL_kz00_3075 = 
(int)(BgL_modz00_3061); 
BgL_bucketz00_3065 = 
VECTOR_REF(BgL_arg2017z00_3056,BgL_kz00_3075); } 
{ /* ./Inline/loop.scm 202 */
int BgL_kz00_3077;
BgL_kz00_3077 = 
(int)(BgL_restz00_3063); 
BgL_method2874z00_3053 = 
VECTOR_REF(BgL_bucketz00_3065,BgL_kz00_3077); } } } } } } } } } } 
{ /* ./Inline/loop.scm 202 */
obj_t BgL_auxz00_4860;
BgL_auxz00_4860 = 
PROCEDURE_ENTRY(BgL_method2874z00_3053)(BgL_method2874z00_3053, 
(obj_t)(BgL_nodez00_23), 
(obj_t)(BgL_localz00_24), BgL_nesterz00_25, BEOA); 
return 
(BgL_nodez00_bglt)(BgL_auxz00_4860);} } } 
}



/* _nest-loop! */
obj_t BGl__nestzd2loopz12zc0zzinline_loopz00(obj_t BgL_envz00_3087, obj_t BgL_nodez00_3088, obj_t BgL_localz00_3089, obj_t BgL_nesterz00_3090)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 202 */
{ /* ./Inline/loop.scm 202 */
BgL_nodez00_bglt BgL_auxz00_4866;
BgL_auxz00_4866 = 
BGl_nestzd2loopz12zc0zzinline_loopz00(
(BgL_nodez00_bglt)(BgL_nodez00_3088), 
(BgL_localz00_bglt)(BgL_localz00_3089), BgL_nesterz00_3090); 
return 
(obj_t)(BgL_auxz00_4866);} } 
}



/* nest-loop!-default2873 */
BgL_nodez00_bglt BGl_nestzd2loopz12zd2default2873z12zzinline_loopz00(BgL_nodez00_bglt BgL_nodez00_26, BgL_localz00_bglt BgL_localz00_27, obj_t BgL_nesterz00_28)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 15 */
{ /* ./Inline/loop.scm 15 */
obj_t BgL_procz00_3078;obj_t BgL_objectz00_3080;
BgL_procz00_3078 = 
CNST_TABLE_REF(((long)1)); 
BgL_objectz00_3080 = 
(obj_t)(BgL_nodez00_26); 
FAILURE(BgL_procz00_3078,BGl_string4909z00zzinline_loopz00,BgL_objectz00_3080);} } 
}



/* _nest-loop!-default2873 */
obj_t BGl__nestzd2loopz12zd2default2873z12zzinline_loopz00(obj_t BgL_envz00_3244, obj_t BgL_nodez00_3245, obj_t BgL_localz00_3246, obj_t BgL_nesterz00_3247)
{ AN_OBJECT;
{ /* ./Inline/loop.scm 15 */
{ /* ./Inline/loop.scm 15 */
BgL_nodez00_bglt BgL_auxz00_4874;
BgL_auxz00_4874 = 
BGl_nestzd2loopz12zd2default2873z12zzinline_loopz00(
(BgL_nodez00_bglt)(BgL_nodez00_3245), 
(BgL_localz00_bglt)(BgL_localz00_3246), BgL_nesterz00_3247); 
return 
(obj_t)(BgL_auxz00_4874);} } 
}



/* imported-modules-init */
obj_t BGl_importedzd2moduleszd2initz00zzinline_loopz00()
{ AN_OBJECT;
{ /* ./Inline/loop.scm 15 */
BGl_modulezd2initializa7ationz75zztools_tracez00(((long)59211), "inline_loop"); 
BGl_modulezd2initializa7ationz75zzengine_paramz00(((long)14260), "inline_loop"); 
BGl_modulezd2initializa7ationz75zztype_typez00(((long)19090), "inline_loop"); 
BGl_modulezd2initializa7ationz75zzast_varz00(((long)44246), "inline_loop"); 
BGl_modulezd2initializa7ationz75zzast_nodez00(((long)50868), "inline_loop"); 
BGl_modulezd2initializa7ationz75zzast_localz00(((long)28959), "inline_loop"); 
BGl_modulezd2initializa7ationz75zzast_sexpz00(((long)15705), "inline_loop"); 
BGl_modulezd2initializa7ationz75zztools_speekz00(((long)23537), "inline_loop"); 
BGl_modulezd2initializa7ationz75zztools_shapez00(((long)30833), "inline_loop"); 
BGl_modulezd2initializa7ationz75zztools_errorz00(((long)25566), "inline_loop"); 
BGl_modulezd2initializa7ationz75zzinline_inlinez00(((long)63036), "inline_loop"); 
BGl_modulezd2initializa7ationz75zzinline_variantz00(((long)49153), "inline_loop"); 
BGl_modulezd2initializa7ationz75zzinline_recursionz00(((long)57168), "inline_loop"); 
return 
BGl_modulezd2initializa7ationz75zzeffect_effectz00(((long)14017), "inline_loop");} 
}

