/*===========================================================================*/
/*   (Cfa/cinfo2.scm)                                                        */
/*   Bigloo (4.5b)                                                           */
/*   Inria -- Sophia Antipolis (c)       Fri Dec 22 05:17:06 PM CET 2023     */
/*===========================================================================*/
/* COMPILATION: (/home/serrano/prgm/project/bigloo/bigloo/bin/bigloo -ldopt -L/home/serrano/prgm/project/bigloo/bigloo/libbacktrace/home/serrano/prgm/project/bigloo/bigloo/lib/bigloo/4.5b  -q -afile .afile -fsharing -fno-reflection -cc gcc -lib-dir /home/serrano/prgm/project/bigloo/bigloo/lib/bigloo/4.5b -unsafev -gno-error-localization -no-hello -O2 -rm -unsafe -s -stdc -indent Cfa/cinfo2.scm) */
/* GC selection */
#define THE_GC BOEHM_GC

/* unsafe mode */
#define BIGLOO_UNSAFE 1

/* traces mode */
#define BIGLOO_TRACE 0

/* standard Bigloo include */
#include <bigloo.h>

#ifdef __cplusplus
extern "C"
{
#endif
#ifndef BGL_MODULE_TYPE_DEFINITIONS
#define BGL_MODULE_TYPE_DEFINITIONS
#ifndef BGL_CFA_INFO2_TYPE_DEFINITIONS
#define BGL_CFA_INFO2_TYPE_DEFINITIONS

/* 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;
		int BgL_occurrencez00;
	}              *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;
		long BgL_occurrencewz00;
		bool_t BgL_userzf3zf3;
	}                  *BgL_variablez00_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_sidezd2effectzd2;
		obj_t BgL_keyz00;
	}                       *BgL_nodezf2effectzf2_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_appz00_bgl
	{
		header_t header;
		obj_t widening;
		obj_t BgL_locz00;
		struct BgL_typez00_bgl *BgL_typez00;
		obj_t BgL_sidezd2effectzd2;
		obj_t BgL_keyz00;
		struct BgL_varz00_bgl *BgL_funz00;
		obj_t BgL_argsz00;
		obj_t BgL_stackablez00;
	}             *BgL_appz00_bglt;

	typedef struct BgL_approxz00_bgl
	{
		header_t header;
		obj_t widening;
		struct BgL_typez00_bgl *BgL_typez00;
		bool_t BgL_typezd2lockedzf3z21;
		obj_t BgL_allocsz00;
		bool_t BgL_topzf3zf3;
		long BgL_lostzd2stampzd2;
		obj_t BgL_dupz00;
		bool_t BgL_haszd2procedurezf3z21;
	}                *BgL_approxz00_bglt;

	typedef struct BgL_prezd2arithmeticzd2appz00_bgl
	{
		obj_t BgL_speczd2typeszd2;
	}                                *BgL_prezd2arithmeticzd2appz00_bglt;

	typedef struct BgL_arithmeticzd2appzd2_bgl
	{
		struct BgL_approxz00_bgl *BgL_approxz00;
		obj_t BgL_speczd2typeszd2;
	}                          *BgL_arithmeticzd2appzd2_bglt;

	typedef struct BgL_prezd2makezd2procedurezd2appzd2_bgl
	{
		struct BgL_variablez00_bgl *BgL_ownerz00;
	}                                     
		*BgL_prezd2makezd2procedurezd2appzd2_bglt;

	typedef struct BgL_prezd2procedurezd2refzd2appzd2_bgl
	{
	}                                    
		*BgL_prezd2procedurezd2refzd2appzd2_bglt;

	typedef struct BgL_prezd2procedurezd2setz12zd2appzc0_bgl
	{
	}                                       
		*BgL_prezd2procedurezd2setz12zd2appzc0_bglt;

	typedef struct BgL_makezd2procedurezd2appz00_bgl
	{
		struct BgL_approxz00_bgl *BgL_approxz00;
		obj_t BgL_valueszd2approxzd2;
		long BgL_lostzd2stampzd2;
		bool_t BgL_xzd2tzf3z21;
		bool_t BgL_xz00;
		bool_t BgL_tz00;
		struct BgL_variablez00_bgl *BgL_ownerz00;
		obj_t BgL_stackzd2stampzd2;
	}                                *BgL_makezd2procedurezd2appz00_bglt;

	typedef struct BgL_procedurezd2refzd2appz00_bgl
	{
		struct BgL_approxz00_bgl *BgL_approxz00;
	}                               *BgL_procedurezd2refzd2appz00_bglt;

	typedef struct BgL_procedurezd2setz12zd2appz12_bgl
	{
		struct BgL_approxz00_bgl *BgL_approxz00;
		obj_t BgL_vapproxz00;
	}                                  *BgL_procedurezd2setz12zd2appz12_bglt;

	typedef struct BgL_prezd2makezd2vectorzd2appzd2_bgl
	{
		struct BgL_variablez00_bgl *BgL_ownerz00;
	}                                   *BgL_prezd2makezd2vectorzd2appzd2_bglt;

	typedef struct BgL_makezd2vectorzd2appz00_bgl
	{
		struct BgL_approxz00_bgl *BgL_approxz00;
		struct BgL_approxz00_bgl *BgL_valuezd2approxzd2;
		long BgL_lostzd2stampzd2;
		struct BgL_variablez00_bgl *BgL_ownerz00;
		obj_t BgL_stackzd2stampzd2;
		bool_t BgL_seenzf3zf3;
		bool_t BgL_tvectorzf3zf3;
	}                             *BgL_makezd2vectorzd2appz00_bglt;

	typedef struct BgL_prezd2conszd2appz00_bgl
	{
		struct BgL_variablez00_bgl *BgL_ownerz00;
	}                          *BgL_prezd2conszd2appz00_bglt;

	typedef struct BgL_prezd2conszd2refzd2appzd2_bgl
	{
		obj_t BgL_getz00;
	}                                *BgL_prezd2conszd2refzd2appzd2_bglt;

	typedef struct BgL_prezd2conszd2setz12zd2appzc0_bgl
	{
		obj_t BgL_getz00;
	}                                   *BgL_prezd2conszd2setz12zd2appzc0_bglt;

	typedef struct BgL_conszd2appzd2_bgl
	{
		struct BgL_approxz00_bgl *BgL_approxz00;
		obj_t BgL_approxesz00;
		long BgL_lostzd2stampzd2;
		struct BgL_variablez00_bgl *BgL_ownerz00;
		obj_t BgL_stackzd2stampzd2;
		bool_t BgL_seenzf3zf3;
	}                    *BgL_conszd2appzd2_bglt;

	typedef struct BgL_conszd2refzd2appz00_bgl
	{
		struct BgL_approxz00_bgl *BgL_approxz00;
		obj_t BgL_getz00;
	}                          *BgL_conszd2refzd2appz00_bglt;

	typedef struct BgL_conszd2setz12zd2appz12_bgl
	{
		struct BgL_approxz00_bgl *BgL_approxz00;
		obj_t BgL_getz00;
	}                             *BgL_conszd2setz12zd2appz12_bglt;

	typedef struct BgL_prezd2makezd2structzd2appzd2_bgl
	{
		struct BgL_variablez00_bgl *BgL_ownerz00;
	}                                   *BgL_prezd2makezd2structzd2appzd2_bglt;

	typedef struct BgL_prezd2structzd2refzd2appzd2_bgl
	{
	}                                  *BgL_prezd2structzd2refzd2appzd2_bglt;

	typedef struct BgL_prezd2structzd2setz12zd2appzc0_bgl
	{
	}                                    
		*BgL_prezd2structzd2setz12zd2appzc0_bglt;

	typedef struct BgL_makezd2structzd2appz00_bgl
	{
		struct BgL_approxz00_bgl *BgL_approxz00;
		struct BgL_approxz00_bgl *BgL_valuezd2approxzd2;
		long BgL_lostzd2stampzd2;
		struct BgL_variablez00_bgl *BgL_ownerz00;
		obj_t BgL_stackzd2stampzd2;
	}                             *BgL_makezd2structzd2appz00_bglt;

	typedef struct BgL_structzd2refzd2appz00_bgl
	{
		struct BgL_approxz00_bgl *BgL_approxz00;
	}                            *BgL_structzd2refzd2appz00_bglt;

	typedef struct BgL_structzd2setz12zd2appz12_bgl
	{
		struct BgL_approxz00_bgl *BgL_approxz00;
	}                               *BgL_structzd2setz12zd2appz12_bglt;


#endif													// BGL_CFA_INFO2_TYPE_DEFINITIONS
#endif													// BGL_MODULE_TYPE_DEFINITIONS

	static BgL_approxz00_bglt
		BGl_z62structzd2setz12zd2appzd2approxza2zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62structzd2setz12zd2appzd2typezd2setz12z62zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static BgL_approxz00_bglt BGl_z62lambda2659z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62prezd2arithmeticzd2appzd2loczb0zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t
		BGl_z62prezd2conszd2setz12zd2appzd2stackablezd2setz12zb0zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	static BgL_varz00_bglt BGl_z62conszd2refzd2appzd2funzb0zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t
		BGl_z62procedurezd2setz12zd2appzd2funzd2setz12z62zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_arithmeticzd2appzd2keyzd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2setz12zd2appzd2vapproxzd2setz12z00zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2setz12zd2appzd2stackablezc0zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62conszd2setz12zd2appzd2locza2zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62procedurezd2setz12zd2appzd2vapproxzd2setz12z62zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_structzd2refzd2appzd2funzd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_makezd2structzd2appzd2funzd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62lambda2660z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static obj_t
		BGl_z62conszd2refzd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62conszd2appzd2nilz62zzcfa_info2z00(obj_t);
	static obj_t
		BGl_z62prezd2makezd2vectorzd2appzd2stackablezd2setz12za2zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_variablez00_bglt
		BGl_prezd2makezd2vectorzd2appzd2ownerz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2structzd2appzd2argszd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62prezd2procedurezd2refzd2appzf3z43zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2setz12zd2appzd2keyzd2setz12z00zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	static obj_t
		BGl_z62prezd2makezd2structzd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	static obj_t
		BGl_z62prezd2arithmeticzd2appzd2sidezd2effectz62zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DEF obj_t BGl_makezd2structzd2appz00zzcfa_info2z00 = BUNSPEC;
	static BgL_approxz00_bglt
		BGl_z62makezd2vectorzd2appzd2valuezd2approxz62zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62prezd2conszd2setz12zd2appzd2keyzd2setz12zb0zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_IMPORT obj_t BGl_classzd2nilzd2initz12z12zz__objectz00(obj_t);
	static BgL_appz00_bglt BGl_z62prezd2conszd2appzd2nilzb0zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2refzd2appzd2sidezd2effectzd2zzcfa_info2z00
		(BgL_appz00_bglt);
	static BgL_appz00_bglt
		BGl_z62prezd2makezd2procedurezd2appzd2nilz62zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2setz12zd2appzd2locz12zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62structzd2refzd2appzd2sidezd2effectz62zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2refzd2appzd2stackablezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static BgL_varz00_bglt BGl_z62arithmeticzd2appzd2funz62zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t
		BGl_z62prezd2conszd2refzd2appzd2stackablezd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2refzd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2procedurezd2appzd2sidezd2effectzd2zzcfa_info2z00
		(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2procedurezd2appzd2keyzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t
		BGl_z62prezd2makezd2procedurezd2appzd2keyzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_z62makezd2procedurezd2appzd2Xzd2Tzf3z91zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_conszd2appzd2typez00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62conszd2appzd2locz62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62makezd2vectorzd2appzd2lostzd2stampz62zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t
		BGl_z62conszd2appzd2stackzd2stampzd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	extern obj_t BGl_approxz00zzcfa_infoz00;
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2setz12zd2appzd2sidezd2effectz12zzcfa_info2z00
		(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2refzd2appzd2typezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, BgL_typez00_bglt);
	static BgL_appz00_bglt
		BGl_z62structzd2setz12zd2appzd2nilza2zzcfa_info2z00(obj_t);
	static obj_t
		BGl_z62prezd2procedurezd2refzd2appzd2typezd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static BgL_approxz00_bglt
		BGl_z62arithmeticzd2appzd2approxz62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62prezd2conszd2appzd2loczb0zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2conszd2setz12zd2appzc0zzcfa_info2z00(obj_t, BgL_typez00_bglt,
		obj_t, obj_t, BgL_varz00_bglt, obj_t, obj_t, BgL_approxz00_bglt, obj_t);
	static obj_t BGl_z62prezd2makezd2procedurezd2appzd2locz62zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2vectorzd2appzd2typezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, BgL_typez00_bglt);
	static BgL_approxz00_bglt
		BGl_z62structzd2refzd2appzd2approxzb0zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2appzd2typezd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt,
		BgL_typez00_bglt);
	static obj_t BGl_z62prezd2arithmeticzd2appzf3z91zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2refzd2appzd2argszd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	static BgL_approxz00_bglt
		BGl_z62makezd2structzd2appzd2valuezd2approxz62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62conszd2appzd2stackablezd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2setz12zd2appzd2typezd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt, BgL_typez00_bglt);
	static obj_t
		BGl_z62prezd2conszd2refzd2appzd2argszd2setz12za2zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static obj_t BGl_z62zc3z04anonymousza32489ze3ze5zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62prezd2structzd2refzd2appzd2typezd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static BgL_typez00_bglt BGl_z62conszd2refzd2appzd2typezb0zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t
		BGl_z62prezd2makezd2structzd2appzd2typezd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62conszd2refzd2appzd2nilzb0zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL bool_t
		BGl_makezd2procedurezd2appzf3zf3zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_prezd2makezd2procedurezd2appzd2typez00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_procedurezd2setz12zd2appzd2funzc0zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_approxz00_bglt
		BGl_procedurezd2refzd2appzd2approxzd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_structzd2refzd2appzd2nilzd2zzcfa_info2z00(void);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2structzd2appzd2nilzd2zzcfa_info2z00(void);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2structzd2appzd2stackablezd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t
		BGl_z62prezd2structzd2setz12zd2appzd2typezd2setz12zb0zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_z62prezd2structzd2refzd2appzd2argsz62zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2refzd2appzd2stackablezd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2setz12zd2appzd2sidezd2effectzd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t
		BGl_z62procedurezd2refzd2appzd2stackablezd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2procedurezd2appzd2keyzd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62prezd2conszd2refzd2appzd2stackablez62zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2arithmeticzd2appzd2keyzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	static BgL_appz00_bglt
		BGl_z62makezd2makezd2vectorzd2appzb0zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DEF obj_t BGl_structzd2refzd2appz00zzcfa_info2z00 = BUNSPEC;
	static obj_t BGl_z62structzd2setz12zd2appzd2locza2zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2setz12zd2appzd2funzd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt, BgL_varz00_bglt);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_prezd2structzd2refzd2appzd2typez00zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_appz00_bglt
		BGl_z62makezd2prezd2structzd2refzd2appz62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL long
		BGl_makezd2procedurezd2appzd2lostzd2stampz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL bool_t
		BGl_prezd2procedurezd2setz12zd2appzf3z33zzcfa_info2z00(obj_t);
	static BgL_approxz00_bglt
		BGl_z62conszd2setz12zd2appzd2approxza2zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_variablez00_bglt
		BGl_prezd2makezd2structzd2appzd2ownerz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62prezd2structzd2refzd2appzd2keyz62zzcfa_info2z00(obj_t,
		obj_t);
	static BgL_varz00_bglt
		BGl_z62prezd2makezd2structzd2appzd2funz62zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62arithmeticzd2appzd2nilz62zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2setz12zd2appzd2argszd2setz12z00zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	static obj_t BGl_z62makezd2structzd2appzd2keyzd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static BgL_typez00_bglt
		BGl_z62prezd2structzd2setz12zd2appzd2typez70zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62prezd2structzd2refzd2appzf3z43zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t
		BGl_z62makezd2structzd2appzd2argszd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static obj_t BGl_z62conszd2refzd2appzd2loczb0zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62conszd2appzd2seenzf3z91zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL bool_t
		BGl_makezd2vectorzd2appzd2tvectorzf3z21zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62conszd2appzd2argsz62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2procedurezd2appzd2Xzd2Tzf3zd2setz12z33zzcfa_info2z00
		(BgL_appz00_bglt, bool_t);
	static BgL_appz00_bglt BGl_z62lambda1989z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	static BgL_appz00_bglt
		BGl_z62makezd2prezd2makezd2structzd2appz62zzcfa_info2z00(obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_arithmeticzd2appzd2sidezd2effectzd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62structzd2setz12zd2appzd2argszd2setz12z62zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2refzd2appzd2loczd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2structzd2appzd2loczd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62zc3z04anonymousza32105ze3ze5zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32016ze3ze5zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2refzd2appzd2keyzd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2setz12zd2appzd2stackablezc0zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2keyzd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2makezd2vectorzd2appzd2zzcfa_info2z00(obj_t, BgL_typez00_bglt,
		obj_t, obj_t, BgL_varz00_bglt, obj_t, obj_t, BgL_approxz00_bglt,
		BgL_approxz00_bglt, long, BgL_variablez00_bglt, obj_t, bool_t, bool_t);
	static obj_t BGl_objectzd2initzd2zzcfa_info2z00(void);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2arithmeticzd2appzd2sidezd2effectz00zzcfa_info2z00
		(BgL_appz00_bglt);
	static obj_t BGl_z62zc3z04anonymousza32597ze3ze5zzcfa_info2z00(obj_t);
	static obj_t BGl_z62makezd2structzd2appzd2stackablezb0zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t
		BGl_z62prezd2procedurezd2setz12zd2appzd2keyzd2setz12zb0zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2vectorzd2appzd2stackzd2stampzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static BgL_appz00_bglt BGl_z62lambda1992z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62arithmeticzd2appzf3z43zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda1995z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62procedurezd2refzd2appzd2argszb0zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2prezd2makezd2procedurezd2appz00zzcfa_info2z00(obj_t,
		BgL_typez00_bglt, obj_t, obj_t, BgL_varz00_bglt, obj_t, obj_t,
		BgL_variablez00_bglt);
	BGL_EXPORTED_DECL BgL_approxz00_bglt
		BGl_conszd2setz12zd2appzd2approxzc0zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_structzd2setz12zd2appzd2funzc0zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_typez00_bglt
		BGl_z62prezd2conszd2setz12zd2appzd2typez70zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2refzd2appzd2argszd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62conszd2appzf3z43zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62arithmeticzd2appzd2locz62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62structzd2setz12zd2appzd2stackableza2zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62procedurezd2setz12zd2appzd2argsza2zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t
		BGl_z62prezd2structzd2setz12zd2appzd2keyzd2setz12zb0zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t
		BGl_z62makezd2procedurezd2appzd2stackzd2stampzd2setz12za2zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	static obj_t
		BGl_z62prezd2arithmeticzd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_procedurezd2setz12zd2appzd2typezc0zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_procedurezd2setz12zd2appzd2nilzc0zzcfa_info2z00(void);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2structzd2appzd2keyzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t BGl_z62procedurezd2refzd2appzf3z91zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2procedurezd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32301ze3ze5zzcfa_info2z00(obj_t, obj_t);
	static BgL_typez00_bglt
		BGl_z62structzd2refzd2appzd2typezb0zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62makezd2conszd2appz62zzcfa_info2z00(obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t,
		obj_t);
	static obj_t
		BGl_z62prezd2conszd2refzd2appzd2funzd2setz12za2zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static obj_t BGl_z62procedurezd2setz12zd2appzf3z83zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2appzd2keyz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62prezd2makezd2procedurezd2appzf3z43zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62structzd2refzd2appzf3z91zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2refzd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static BgL_appz00_bglt
		BGl_z62prezd2makezd2structzd2appzd2nilz62zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2refzd2appzd2argszd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2structzd2appzd2argsz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62prezd2procedurezd2refzd2appzd2argszd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2vectorzd2appzd2argszd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2appzd2argszd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt, obj_t);
	static obj_t
		BGl_z62makezd2structzd2appzd2stackzd2stampz62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2setz12zd2appzd2sidezd2effectzc0zzcfa_info2z00
		(BgL_appz00_bglt);
	static obj_t
		BGl_z62prezd2procedurezd2setz12zd2appzd2stackablezd2setz12zb0zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2setz12zd2appzd2loczc0zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2arithmeticzd2appzd2keyzd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2setz12zd2appzd2argszd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t
		BGl_z62structzd2setz12zd2appzd2stackablezd2setz12z62zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2refzd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32141ze3ze5zzcfa_info2z00(obj_t);
	static obj_t
		BGl_z62prezd2structzd2refzd2appzd2argszd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t
		BGl_z62prezd2makezd2structzd2appzd2argszd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2refzd2appzd2stackablez00zzcfa_info2z00
		(BgL_appz00_bglt);
	static obj_t
		BGl_z62prezd2structzd2setz12zd2appzd2sidezd2effectzd2setz12z62zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	static obj_t
		BGl_z62prezd2procedurezd2refzd2appzd2stackablez62zzcfa_info2z00(obj_t,
		obj_t);
	static BgL_appz00_bglt
		BGl_z62makezd2makezd2procedurezd2appzb0zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2vectorzd2appzd2stackablez00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2appzd2stackablez00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2structzd2appzd2lostzd2stampzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, long);
	static obj_t
		BGl_z62prezd2structzd2setz12zd2appzd2argszd2setz12zb0zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_structzd2setz12zd2appzd2nilzc0zzcfa_info2z00(void);
	BGL_EXPORTED_DECL obj_t
		BGl_arithmeticzd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t
		BGl_z62makezd2structzd2appzd2lostzd2stampzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL bool_t BGl_conszd2appzf3z21zzcfa_info2z00(obj_t);
	static obj_t BGl_z62makezd2vectorzd2appzd2keyzd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_methodzd2initzd2zzcfa_info2z00(void);
	static obj_t BGl_z62prezd2makezd2structzd2appzd2locz62zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t
		BGl_z62arithmeticzd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_z62conszd2appzd2approxesz62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2setz12zd2appzd2stackablez12zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62conszd2setz12zd2appzd2sidezd2effectzd2setz12zb0zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL bool_t
		BGl_prezd2arithmeticzd2appzf3zf3zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2vectorzd2appzd2sidezd2effectzd2zzcfa_info2z00
		(BgL_appz00_bglt);
	static obj_t
		BGl_z62prezd2makezd2procedurezd2appzd2stackablezd2setz12za2zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DEF obj_t BGl_structzd2setz12zd2appz12zzcfa_info2z00 = BUNSPEC;
	static obj_t
		BGl_z62prezd2structzd2refzd2appzd2stackablez62zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62prezd2makezd2structzd2appzd2stackablez62zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62prezd2makezd2vectorzd2appzd2sidezd2effectzb0zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_arithmeticzd2appzd2speczd2typeszd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_approxz00_bglt
		BGl_makezd2vectorzd2appzd2approxzd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62procedurezd2setz12zd2appzd2vapproxza2zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2setz12zd2appzd2argszc0zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62zc3z04anonymousza31994ze3ze5zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62prezd2conszd2appzf3z91zzcfa_info2z00(obj_t, obj_t);
	static BgL_varz00_bglt
		BGl_z62prezd2structzd2setz12zd2appzd2funz70zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62prezd2structzd2setz12zd2appzd2stackablez70zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2procedurezd2appzd2valueszd2approxzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t BGl_z62makezd2structzd2appzf3z91zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62prezd2conszd2appzd2sidezd2effectz62zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62zc3z04anonymousza32070ze3ze5zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62makezd2vectorzd2appzd2argszb0zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62conszd2setz12zd2appzd2getza2zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32127ze3ze5zzcfa_info2z00(obj_t);
	static obj_t BGl_z62conszd2refzd2appzf3z91zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2refzd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t
		BGl_z62procedurezd2refzd2appzd2sidezd2effectz62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_prezd2procedurezd2setz12zd2appzd2typez12zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_appz00_bglt
		BGl_z62makezd2prezd2procedurezd2setz12zd2appz70zzcfa_info2z00(obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2setz12zd2appzd2loczc0zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62structzd2refzd2appzd2keyzb0zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DEF obj_t BGl_prezd2makezd2vectorzd2appzd2zzcfa_info2z00 =
		BUNSPEC;
	static obj_t
		BGl_z62makezd2vectorzd2appzd2stackzd2stampzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32160ze3ze5zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL BgL_variablez00_bglt
		BGl_prezd2conszd2appzd2ownerzd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL bool_t
		BGl_prezd2conszd2setz12zd2appzf3z33zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_procedurezd2refzd2appzd2typezd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2vectorzd2appzd2keyzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL bool_t
		BGl_prezd2structzd2refzd2appzf3z21zzcfa_info2z00(obj_t);
	static obj_t
		BGl_z62structzd2refzd2appzd2stackablezd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t
		BGl_z62structzd2setz12zd2appzd2sidezd2effectz70zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2procedurezd2appzd2typezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, BgL_typez00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_arithmeticzd2appzd2typezd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt,
		BgL_typez00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2procedurezd2appzd2Xzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		bool_t);
	BGL_EXPORTED_DEF obj_t BGl_procedurezd2refzd2appz00zzcfa_info2z00 = BUNSPEC;
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2vectorzd2appzd2argszd2zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_varz00_bglt
		BGl_z62procedurezd2setz12zd2appzd2funza2zzcfa_info2z00(obj_t, obj_t);
	static BgL_typez00_bglt
		BGl_z62conszd2setz12zd2appzd2typeza2zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_conszd2setz12zd2appzd2funzc0zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2keyz12zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62makezd2procedurezd2appzd2keyzb0zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DEF obj_t BGl_prezd2conszd2refzd2appzd2zzcfa_info2z00 = BUNSPEC;
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2structzd2appzd2keyz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62conszd2setz12zd2appzd2typezd2setz12z62zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_arithmeticzd2appzd2funz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62makezd2structzd2appzd2sidezd2effectz62zzcfa_info2z00(obj_t, obj_t);
	static BgL_typez00_bglt
		BGl_z62makezd2structzd2appzd2typezb0zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62prezd2procedurezd2refzd2appzd2argsz62zzcfa_info2z00(obj_t,
		obj_t);
	static BgL_appz00_bglt
		BGl_z62prezd2structzd2setz12zd2appzd2nilz70zzcfa_info2z00(obj_t);
	static BgL_typez00_bglt
		BGl_z62makezd2procedurezd2appzd2typezb0zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2refzd2appzd2funzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		BgL_varz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2structzd2appzd2typezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, BgL_typez00_bglt);
	static BgL_appz00_bglt BGl_z62makezd2conszd2refzd2appzb0zzcfa_info2z00(obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2setz12zd2appzd2stackablezd2setz12z00zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2100z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2setz12zd2appzd2typezd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt, BgL_typez00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2refzd2appzd2keyz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62zc3z04anonymousza32430ze3ze5zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_structzd2refzd2appzd2typezd2zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_appz00_bglt BGl_z62lambda2103z62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2refzd2appzd2funzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		BgL_varz00_bglt);
	static obj_t BGl_z62arithmeticzd2appzd2keyzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32325ze3ze5zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2106z62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL bool_t
		BGl_procedurezd2setz12zd2appzf3ze1zzcfa_info2z00(obj_t);
	static BgL_appz00_bglt
		BGl_z62makezd2prezd2structzd2setz12zd2appz70zzcfa_info2z00(obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	static BgL_varz00_bglt
		BGl_z62prezd2conszd2refzd2appzd2funz62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2setz12zd2appzd2sidezd2effectzd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2setz12zd2appzd2stackablezd2setz12z00zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2structzd2appzd2stackzd2stampzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_makezd2structzd2appzd2typezd2zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_approxz00_bglt BGl_z62lambda2113z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2114z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32415ze3ze5zzcfa_info2z00(obj_t);
	static obj_t BGl_z62zc3z04anonymousza32148ze3ze5zzcfa_info2z00(obj_t);
	static obj_t BGl_z62prezd2structzd2setz12zd2appzd2locz70zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62lambda2118z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2119z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static obj_t BGl_z62conszd2refzd2appzd2getzb0zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt
		BGl_z62procedurezd2setz12zd2appzd2nilza2zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2vectorzd2appzd2lostzd2stampzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, long);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_conszd2setz12zd2appzd2nilzc0zzcfa_info2z00(void);
	static obj_t
		BGl_z62makezd2vectorzd2appzd2lostzd2stampzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_z62lambda2125z62zzcfa_info2z00(obj_t, obj_t);
	static BgL_varz00_bglt
		BGl_z62prezd2procedurezd2refzd2appzd2funz62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2appzd2funzd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt,
		BgL_varz00_bglt);
	static obj_t BGl_z62lambda2126z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_prezd2conszd2refzd2appzd2funz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62makezd2structzd2appzd2keyzb0zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_approxz00_bglt
		BGl_makezd2vectorzd2appzd2valuezd2approxz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62prezd2arithmeticzd2appzd2funzd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL bool_t
		BGl_makezd2vectorzd2appzd2seenzf3z21zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_arithmeticzd2appzd2nilz00zzcfa_info2z00(void);
	static BgL_appz00_bglt BGl_z62makezd2arithmeticzd2appz62zzcfa_info2z00(obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	static obj_t BGl_z62structzd2refzd2appzd2typezd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_z62lambda2132z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2133z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static obj_t
		BGl_z62makezd2procedurezd2appzd2typezd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2sidezd2effectzc0zzcfa_info2z00
		(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2procedurezd2appzd2funzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		BgL_varz00_bglt);
	static obj_t BGl_z62lambda2139z62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2refzd2appzd2argsz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62conszd2refzd2appzd2funzd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_z62procedurezd2setz12zd2appzd2locza2zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t
		BGl_z62makezd2structzd2appzd2approxzd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static obj_t
		BGl_z62prezd2makezd2procedurezd2appzd2typezd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2setz12zd2appzd2loczc0zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62prezd2makezd2procedurezd2appzd2sidezd2effectzb0zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62prezd2arithmeticzd2appzd2keyzb0zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2procedurezd2appzd2argszd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2setz12zd2appzd2funzd2setz12z00zzcfa_info2z00(BgL_appz00_bglt,
		BgL_varz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_arithmeticzd2appzd2argszd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	static obj_t BGl_z62structzd2setz12zd2appzd2argsza2zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62lambda2140z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2302z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2146z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2147z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static BgL_appz00_bglt
		BGl_z62prezd2conszd2refzd2appzd2nilz62zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_prezd2makezd2vectorzd2appzd2funz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62conszd2setz12zd2appzd2keyza2zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62prezd2arithmeticzd2appzd2typezd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static obj_t
		BGl_z62prezd2procedurezd2refzd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2refzd2appzd2sidezd2effectzd2zzcfa_info2z00
		(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2refzd2appzd2funzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, BgL_varz00_bglt);
	static obj_t
		BGl_z62conszd2refzd2appzd2stackablezd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static obj_t
		BGl_z62makezd2vectorzd2appzd2seenzf3zd2setz12z83zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_arithmeticzd2appzd2locz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2structzd2appzd2stackablezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static BgL_typez00_bglt
		BGl_z62prezd2structzd2refzd2appzd2typez62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62prezd2procedurezd2setz12zd2appzf3z51zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t
		BGl_z62prezd2conszd2refzd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	static obj_t
		BGl_z62prezd2procedurezd2refzd2appzd2stackablezd2setz12za2zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	static BgL_variablez00_bglt BGl_z62lambda2310z62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2procedurezd2appzd2stackablez00zzcfa_info2z00
		(BgL_appz00_bglt);
	static obj_t BGl_z62lambda2311z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2structzd2appzd2funzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		BgL_varz00_bglt);
	static obj_t BGl_z62zc3z04anonymousza32613ze3ze5zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_arithmeticzd2appzd2stackablez00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_approxz00_bglt
		BGl_makezd2structzd2appzd2valuezd2approxz00zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_variablez00_bglt BGl_z62lambda2152z62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DEF obj_t BGl_prezd2structzd2refzd2appzd2zzcfa_info2z00 =
		BUNSPEC;
	static obj_t BGl_z62lambda2153z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2318z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	static obj_t
		BGl_z62conszd2setz12zd2appzd2argszd2setz12z62zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static obj_t BGl_z62lambda2158z62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2setz12zd2appzd2keyz12zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62lambda2159z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static obj_t
		BGl_z62makezd2procedurezd2appzd2keyzd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static BgL_approxz00_bglt
		BGl_z62makezd2vectorzd2appzd2approxzb0zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2refzd2appzd2typezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, BgL_typez00_bglt);
	BGL_EXPORTED_DECL bool_t BGl_procedurezd2refzd2appzf3zf3zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2refzd2appzd2stackablezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t
		BGl_z62makezd2procedurezd2appzd2Tzd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2structzd2appzd2argszd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2setz12zd2appzd2argszc0zzcfa_info2z00(BgL_appz00_bglt);
	BGL_IMPORT obj_t BGl_registerzd2classz12zc0zz__objectz00(obj_t, obj_t, obj_t,
		long, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	static BgL_appz00_bglt
		BGl_z62prezd2procedurezd2refzd2appzd2nilz62zzcfa_info2z00(obj_t);
	static obj_t BGl_gczd2rootszd2initz00zzcfa_info2z00(void);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_prezd2conszd2refzd2appzd2nilz00zzcfa_info2z00(void);
	static obj_t BGl_z62prezd2conszd2refzd2appzd2locz62zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t
		BGl_z62procedurezd2refzd2appzd2typezd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static BgL_appz00_bglt BGl_z62lambda2323z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32274ze3ze5zzcfa_info2z00(obj_t);
	static obj_t BGl_z62zc3z04anonymousza32347ze3ze5zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2326z62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2vectorzd2appzd2typezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		BgL_typez00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2setz12zd2appzd2argszd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static BgL_typez00_bglt BGl_z62conszd2appzd2typez62zzcfa_info2z00(obj_t,
		obj_t);
	static BgL_appz00_bglt BGl_z62lambda2167z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	static obj_t BGl_z62conszd2setz12zd2appzd2stackableza2zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2vectorzd2appzd2argsz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62conszd2appzd2keyz62zzcfa_info2z00(obj_t, obj_t);
	static BgL_variablez00_bglt BGl_z62conszd2appzd2ownerz62zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62conszd2setz12zd2appzf3z83zzcfa_info2z00(obj_t, obj_t);
	static BgL_varz00_bglt
		BGl_z62prezd2procedurezd2setz12zd2appzd2funz70zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62structzd2setz12zd2appzd2keyzd2setz12z62zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static obj_t
		BGl_z62prezd2structzd2refzd2appzd2keyzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_z62makezd2vectorzd2appzd2seenzf3z43zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2structzd2appzd2stackablez00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2prezd2makezd2vectorzd2appz00zzcfa_info2z00(obj_t,
		BgL_typez00_bglt, obj_t, obj_t, BgL_varz00_bglt, obj_t, obj_t,
		BgL_variablez00_bglt);
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_prezd2conszd2appzd2funzd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DEF obj_t BGl_prezd2conszd2setz12zd2appzc0zzcfa_info2z00 =
		BUNSPEC;
	static BgL_appz00_bglt BGl_z62lambda2170z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62prezd2conszd2appzd2keyzb0zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2333z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62prezd2makezd2procedurezd2appzd2keyz62zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62lambda2334z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static obj_t
		BGl_z62makezd2structzd2appzd2stackzd2stampzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2173z62zzcfa_info2z00(obj_t, obj_t);
	static BgL_typez00_bglt
		BGl_z62procedurezd2refzd2appzd2typezb0zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2prezd2arithmeticzd2appzd2zzcfa_info2z00(obj_t, BgL_typez00_bglt,
		obj_t, obj_t, BgL_varz00_bglt, obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2setz12zd2appzd2stackablez12zzcfa_info2z00
		(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_conszd2refzd2appzd2typezd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2procedurezd2setz12zd2appzc0zzcfa_info2z00(obj_t,
		BgL_typez00_bglt, obj_t, obj_t, BgL_varz00_bglt, obj_t, obj_t,
		BgL_approxz00_bglt, obj_t);
	static obj_t BGl_z62prezd2conszd2refzd2appzd2argsz62zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2setz12zd2appzd2funzd2setz12z00zzcfa_info2z00
		(BgL_appz00_bglt, BgL_varz00_bglt);
	static obj_t
		BGl_z62makezd2vectorzd2appzd2stackablezd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static BgL_typez00_bglt
		BGl_z62procedurezd2setz12zd2appzd2typeza2zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62prezd2procedurezd2refzd2appzd2locz62zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2vectorzd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static BgL_varz00_bglt
		BGl_z62makezd2vectorzd2appzd2funzb0zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_approxz00_bglt
		BGl_makezd2procedurezd2appzd2approxzd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2refzd2appzd2locz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62prezd2procedurezd2refzd2appzd2funzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2refzd2appzd2sidezd2effectz00zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_variablez00_bglt BGl_z62lambda2500z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2501z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_prezd2makezd2vectorzd2appzd2nilz00zzcfa_info2z00(void);
	static BgL_appz00_bglt BGl_z62lambda2341z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	static BgL_approxz00_bglt BGl_z62lambda2180z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2181z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2345z62zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2509z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t);
	static obj_t BGl_z62conszd2appzd2keyzd2setz12za2zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static BgL_appz00_bglt BGl_z62lambda2348z62zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2188z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2setz12zd2appzd2stackablezd2setz12z00zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DEF obj_t BGl_prezd2procedurezd2setz12zd2appzc0zzcfa_info2z00 =
		BUNSPEC;
	static obj_t
		BGl_z62makezd2vectorzd2appzd2stackzd2stampz62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62structzd2setz12zd2appzd2keyza2zzcfa_info2z00(obj_t,
		obj_t);
	static BgL_approxz00_bglt BGl_z62conszd2appzd2approxz62zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2refzd2appzd2stackablezd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2setz12zd2appzd2keyzd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2191z62zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2515z62zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2194z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2356z62zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2518z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62structzd2refzd2appzd2argszd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t
		BGl_z62procedurezd2refzd2appzd2keyzd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_procedurezd2refzd2appzd2funzd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62lambda2357z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static obj_t
		BGl_z62makezd2procedurezd2appzd2argszd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static obj_t
		BGl_z62prezd2structzd2refzd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_conszd2refzd2appzd2funzd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_prezd2makezd2structzd2appzd2typez00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62prezd2structzd2refzd2appzd2sidezd2effectzb0zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62conszd2refzd2appzd2keyzb0zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62procedurezd2setz12zd2appzd2keyzd2setz12z62zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_z62conszd2appzd2lostzd2stampzb0zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2vectorzd2appzd2locz00zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_approxz00_bglt
		BGl_z62procedurezd2refzd2appzd2approxzb0zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32650ze3ze5zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62prezd2makezd2procedurezd2appzd2argszd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2procedurezd2appzd2stackablezd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2refzd2appzd2keyzd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2structzd2appzd2keyzd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62prezd2conszd2appzd2argszb0zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DEF obj_t BGl_prezd2procedurezd2refzd2appzd2zzcfa_info2z00 =
		BUNSPEC;
	static BgL_appz00_bglt BGl_z62lambda2365z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t,
		obj_t);
	static BgL_approxz00_bglt
		BGl_z62conszd2refzd2appzd2approxzb0zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2368z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62structzd2refzd2appzd2stackablezb0zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL BgL_variablez00_bglt
		BGl_makezd2procedurezd2appzd2ownerzd2zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_appz00_bglt
		BGl_z62prezd2procedurezd2setz12zd2appzd2nilz70zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DEF obj_t BGl_conszd2setz12zd2appz12zzcfa_info2z00 = BUNSPEC;
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2vectorzd2appzd2funzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		BgL_varz00_bglt);
	static obj_t BGl_z62makezd2procedurezd2appzd2stackablezb0zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2prezd2procedurezd2refzd2appz00zzcfa_info2z00(obj_t,
		BgL_typez00_bglt, obj_t, obj_t, BgL_varz00_bglt, obj_t, obj_t);
	BGL_EXPORTED_DEF obj_t BGl_makezd2procedurezd2appz00zzcfa_info2z00 = BUNSPEC;
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2arithmeticzd2appz00zzcfa_info2z00(obj_t, BgL_typez00_bglt, obj_t,
		obj_t, BgL_varz00_bglt, obj_t, obj_t, BgL_approxz00_bglt, obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_prezd2conszd2appzd2nilzd2zzcfa_info2z00(void);
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_prezd2conszd2setz12zd2appzd2funz12zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62prezd2arithmeticzd2appzd2argszd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	extern obj_t BGl_variablez00zzast_varz00;
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2refzd2appzd2typezd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt,
		BgL_typez00_bglt);
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_prezd2makezd2procedurezd2appzd2funz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62conszd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static obj_t
		BGl_z62prezd2makezd2procedurezd2appzd2stackablez62zzcfa_info2z00(obj_t,
		obj_t);
	static BgL_appz00_bglt BGl_z62lambda2371z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32546ze3ze5zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62arithmeticzd2appzd2keyz62zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62prezd2makezd2procedurezd2appzd2argsz62zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2539z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t);
	static BgL_appz00_bglt
		BGl_z62makezd2vectorzd2appzd2nilzb0zzcfa_info2z00(obj_t);
	static obj_t BGl_z62makezd2vectorzd2appzd2tvectorzf3z43zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2refzd2appzd2argszd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t
		BGl_z62prezd2makezd2structzd2appzd2funzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_z62prezd2arithmeticzd2appzd2stackablezb0zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_conszd2setz12zd2appzd2typezc0zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62procedurezd2refzd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2542z62zzcfa_info2z00(obj_t, obj_t);
	static BgL_approxz00_bglt BGl_z62lambda2381z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2382z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static obj_t
		BGl_z62prezd2procedurezd2setz12zd2appzd2locz70zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62prezd2makezd2structzd2appzf3z43zzcfa_info2z00(obj_t,
		obj_t);
	static BgL_appz00_bglt BGl_z62lambda2547z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2386z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2387z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static obj_t
		BGl_z62procedurezd2refzd2appzd2argszd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2appzd2lostzd2stampzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		long);
	static obj_t
		BGl_z62procedurezd2setz12zd2appzd2sidezd2effectzd2setz12zb0zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	static BgL_variablez00_bglt
		BGl_z62prezd2makezd2vectorzd2appzd2ownerz62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2vectorzd2appzd2argszd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2appzd2loczd2zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_typez00_bglt
		BGl_z62makezd2vectorzd2appzd2typezb0zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2refzd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2procedurezd2appzd2valueszd2approxz00zzcfa_info2z00
		(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2setz12zd2appzd2sidezd2effectz12zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2refzd2appzd2stackablez00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62structzd2refzd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static BgL_appz00_bglt
		BGl_z62makezd2makezd2structzd2appzb0zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_procedurezd2refzd2appzd2nilzd2zzcfa_info2z00(void);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2refzd2appzd2funzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		BgL_varz00_bglt);
	static obj_t BGl_z62lambda2394z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2395z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_conszd2refzd2appzd2nilzd2zzcfa_info2z00(void);
	static obj_t BGl_z62makezd2vectorzd2appzd2loczb0zzcfa_info2z00(obj_t, obj_t);
	static BgL_varz00_bglt
		BGl_z62procedurezd2refzd2appzd2funzb0zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2vectorzd2appzd2stackablezd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t BGl_z62procedurezd2refzd2appzd2stackablezb0zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2vectorzd2appzd2stackablezd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2refzd2appzd2funzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, BgL_varz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2arithmeticzd2appzd2argszd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2setz12zd2appzd2keyzc0zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62conszd2setz12zd2appzd2funzd2setz12z62zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL bool_t
		BGl_prezd2makezd2structzd2appzf3z21zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL BgL_approxz00_bglt
		BGl_procedurezd2setz12zd2appzd2approxzc0zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_makezd2vectorzd2appzd2typezd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2setz12zd2appzd2argsz12zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_appz00_bglt BGl_z62lambda2568z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	static obj_t
		BGl_z62makezd2vectorzd2appzd2sidezd2effectz62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_prezd2conszd2setz12zd2appzd2nilz12zzcfa_info2z00(void);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2setz12zd2appzd2keyzd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2appzd2approxesz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2appzd2funzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		BgL_varz00_bglt);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_prezd2makezd2procedurezd2appzd2nilz00zzcfa_info2z00(void);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2makezd2structzd2appzd2zzcfa_info2z00(obj_t, BgL_typez00_bglt,
		obj_t, obj_t, BgL_varz00_bglt, obj_t, obj_t, BgL_approxz00_bglt,
		BgL_approxz00_bglt, long, BgL_variablez00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2refzd2appzd2sidezd2effectz00zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_varz00_bglt
		BGl_z62prezd2conszd2setz12zd2appzd2funz70zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2refzd2appzd2loczd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62prezd2makezd2structzd2appzd2keyz62zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62prezd2makezd2structzd2appzd2argsz62zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2vectorzd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2refzd2appzd2loczd2zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_appz00_bglt BGl_z62lambda2572z62zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2575z62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2refzd2appzd2sidezd2effectzd2zzcfa_info2z00
		(BgL_appz00_bglt);
	static obj_t
		BGl_z62prezd2conszd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_makezd2vectorzd2appzd2funzd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2setz12zd2appzd2getzc0zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_typez00_bglt
		BGl_z62prezd2procedurezd2refzd2appzd2typez62zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62prezd2conszd2appzd2stackablezd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL long
		BGl_makezd2vectorzd2appzd2lostzd2stampz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62makezd2procedurezd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2setz12zd2appzd2stackablezd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t BGl_z62structzd2refzd2appzd2funzd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static BgL_approxz00_bglt BGl_z62lambda2583z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2584z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2setz12zd2appzd2locz12zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_approxz00_bglt BGl_z62lambda2588z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2589z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2procedurezd2appzd2locz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2setz12zd2appzd2keyzc0zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62prezd2conszd2refzd2appzf3z43zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62makezd2structzd2appzd2lostzd2stampz62zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t
		BGl_z62prezd2procedurezd2refzd2appzd2sidezd2effectzb0zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_prezd2structzd2refzd2appzd2funz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2typezd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt, BgL_typez00_bglt);
	static BgL_variablez00_bglt
		BGl_z62prezd2makezd2structzd2appzd2ownerz62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62makezd2vectorzd2appzf3z91zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_requirezd2initializa7ationz75zzcfa_info2z00 = BUNSPEC;
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2refzd2appzd2argszd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2structzd2appzd2stackzd2stampz00zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_variablez00_bglt
		BGl_z62prezd2makezd2procedurezd2appzd2ownerz62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2setz12zd2appzd2sidezd2effectzd2setz12z00zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t
		BGl_z62prezd2makezd2vectorzd2appzd2funzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static BgL_appz00_bglt
		BGl_z62procedurezd2refzd2appzd2nilzb0zzcfa_info2z00(obj_t);
	static obj_t BGl_z62arithmeticzd2appzd2argsz62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2595z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2596z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL long
		BGl_conszd2appzd2lostzd2stampzd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_approxz00_bglt
		BGl_makezd2structzd2appzd2approxzd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62prezd2structzd2refzd2appzd2stackablezd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2procedurezd2refzd2appzd2zzcfa_info2z00(obj_t, BgL_typez00_bglt,
		obj_t, obj_t, BgL_varz00_bglt, obj_t, obj_t, BgL_approxz00_bglt);
	static obj_t BGl_z62prezd2conszd2refzd2appzd2getz62zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL BgL_approxz00_bglt
		BGl_conszd2refzd2appzd2approxzd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62prezd2conszd2refzd2appzd2keyzd2setz12za2zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2refzd2appzd2stackablez00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2structzd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DEF obj_t BGl_conszd2appzd2zzcfa_info2z00 = BUNSPEC;
	BGL_IMPORT obj_t BGl_za2classesza2z00zz__objectz00;
	static BgL_appz00_bglt
		BGl_z62prezd2conszd2setz12zd2appzd2nilz70zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2structzd2appzd2typezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		BgL_typez00_bglt);
	static obj_t BGl_z62prezd2conszd2appzd2funzd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t
		BGl_z62makezd2procedurezd2appzd2valueszd2approxz62zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62procedurezd2refzd2appzd2loczb0zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t
		BGl_z62makezd2vectorzd2appzd2approxzd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2conszd2refzd2appzd2zzcfa_info2z00(obj_t, BgL_typez00_bglt, obj_t,
		obj_t, BgL_varz00_bglt, obj_t, obj_t, BgL_approxz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2setz12zd2appzd2typezd2setz12z00zzcfa_info2z00(BgL_appz00_bglt,
		BgL_typez00_bglt);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2vectorzd2appzd2nilzd2zzcfa_info2z00(void);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2appzd2typezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		BgL_typez00_bglt);
	BGL_EXPORTED_DECL BgL_variablez00_bglt
		BGl_makezd2vectorzd2appzd2ownerzd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62prezd2procedurezd2setz12zd2appzd2argsz70zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62arithmeticzd2appzd2typezd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_toplevelzd2initzd2zzcfa_info2z00(void);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2refzd2appzd2getz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_prezd2conszd2refzd2appzd2typez00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2prezd2procedurezd2setz12zd2appz12zzcfa_info2z00(obj_t,
		BgL_typez00_bglt, obj_t, obj_t, BgL_varz00_bglt, obj_t, obj_t);
	static BgL_varz00_bglt
		BGl_z62prezd2makezd2vectorzd2appzd2funz62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2procedurezd2appzd2lostzd2stampzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, long);
	static obj_t BGl_z62prezd2conszd2setz12zd2appzd2locz70zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_prezd2structzd2refzd2appzd2nilz00zzcfa_info2z00(void);
	static BgL_typez00_bglt
		BGl_z62structzd2setz12zd2appzd2typeza2zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62makezd2prezd2conszd2appzb0zzcfa_info2z00(obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	static obj_t
		BGl_z62procedurezd2setz12zd2appzd2stackablezd2setz12z62zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2procedurezd2appzd2typezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		BgL_typez00_bglt);
	static obj_t
		BGl_z62arithmeticzd2appzd2stackablezd2setz12za2zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static obj_t BGl_z62structzd2setz12zd2appzf3z83zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DEF obj_t BGl_prezd2makezd2structzd2appzd2zzcfa_info2z00 =
		BUNSPEC;
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2stackablezd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t
		BGl_z62prezd2procedurezd2setz12zd2appzd2sidezd2effectza2zzcfa_info2z00
		(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2vectorzd2appzd2loczd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62makezd2vectorzd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2setz12zd2appzd2sidezd2effectz12zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62conszd2appzd2stackzd2stampzb0zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62prezd2structzd2setz12zd2appzd2keyz70zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t
		BGl_z62makezd2procedurezd2appzd2stackzd2stampz62zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL bool_t BGl_makezd2structzd2appzf3zf3zzcfa_info2z00(obj_t);
	static obj_t BGl_genericzd2initzd2zzcfa_info2z00(void);
	static obj_t
		BGl_z62makezd2vectorzd2appzd2tvectorzf3zd2setz12z83zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_arithmeticzd2appzd2funzd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt,
		BgL_varz00_bglt);
	BGL_EXPORTED_DEF obj_t BGl_conszd2refzd2appz00zzcfa_info2z00 = BUNSPEC;
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2appzd2stackzd2stampzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	BGL_IMPORT obj_t BGl_makezd2classzd2fieldz00zz__objectz00(obj_t, obj_t, obj_t,
		bool_t, bool_t, obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2arithmeticzd2appzd2typezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		BgL_typez00_bglt);
	BGL_EXPORTED_DECL bool_t BGl_arithmeticzd2appzf3z21zzcfa_info2z00(obj_t);
	static obj_t
		BGl_z62makezd2procedurezd2appzd2stackablezd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2refzd2appzd2locz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_structzd2setz12zd2appzd2typezc0zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2setz12zd2appzd2funzd2setz12z00zzcfa_info2z00(BgL_appz00_bglt,
		BgL_varz00_bglt);
	static obj_t
		BGl_z62procedurezd2setz12zd2appzd2typezd2setz12z62zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t
		BGl_z62prezd2conszd2setz12zd2appzd2funzd2setz12zb0zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2procedurezd2appzd2stackablezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t
		BGl_z62prezd2makezd2structzd2appzd2stackablezd2setz12za2zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2structzd2appzd2sidezd2effectz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_prezd2makezd2vectorzd2appzd2typez00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_IMPORT obj_t BGl_za2inheritancesza2z00zz__objectz00;
	static obj_t
		BGl_z62prezd2procedurezd2setz12zd2appzd2typezd2setz12zb0zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2appzd2stackzd2stampzd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62arithmeticzd2appzd2speczd2typeszb0zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DEF obj_t BGl_arithmeticzd2appzd2zzcfa_info2z00 = BUNSPEC;
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2argszd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static BgL_appz00_bglt
		BGl_z62makezd2prezd2arithmeticzd2appzb0zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	static BgL_appz00_bglt
		BGl_z62makezd2structzd2setz12zd2appza2zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	static BgL_appz00_bglt
		BGl_z62makezd2procedurezd2setz12zd2appza2zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	extern obj_t BGl_typez00zztype_typez00;
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2procedurezd2appzd2funzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, BgL_varz00_bglt);
	static obj_t BGl_z62zc3z04anonymousza32220ze3ze5zzcfa_info2z00(obj_t, obj_t);
	static BgL_variablez00_bglt
		BGl_z62makezd2vectorzd2appzd2ownerzb0zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62arithmeticzd2appzd2sidezd2effectzb0zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t
		BGl_z62prezd2makezd2procedurezd2appzd2funzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DEF obj_t BGl_makezd2vectorzd2appz00zzcfa_info2z00 = BUNSPEC;
	static obj_t BGl_z62procedurezd2setz12zd2appzd2keyza2zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2setz12zd2appzd2keyzc0zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_typez00_bglt
		BGl_z62prezd2conszd2refzd2appzd2typez62zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt
		BGl_z62prezd2makezd2vectorzd2appzd2nilz62zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL BgL_variablez00_bglt
		BGl_makezd2structzd2appzd2ownerzd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2refzd2appzd2sidezd2effectz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2stackablez12zzcfa_info2z00
		(BgL_appz00_bglt);
	BGL_EXPORTED_DECL bool_t BGl_structzd2refzd2appzf3zf3zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_arithmeticzd2appzd2keyz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2setz12zd2appzd2vapproxzc0zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62prezd2procedurezd2setz12zd2appzd2sidezd2effectzd2setz12z62zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_arithmeticzd2appzd2argsz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2structzd2appzd2argszd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2structzd2setz12zd2appzc0zzcfa_info2z00(obj_t, BgL_typez00_bglt,
		obj_t, obj_t, BgL_varz00_bglt, obj_t, obj_t, BgL_approxz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2refzd2appzd2keyzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	BGL_IMPORT obj_t BGl_readz00zz__readerz00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2setz12zd2appzd2argszd2setz12z00zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2structzd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t
		BGl_z62makezd2procedurezd2appzd2Xzd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2appzd2argszd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2refzd2appzd2keyzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	static obj_t BGl_z62prezd2makezd2vectorzd2appzd2locz62zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62arithmeticzd2appzd2argszd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_IMPORT obj_t BGl_openzd2inputzd2stringz12z12zz__r4_ports_6_10_1z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2refzd2appzd2typezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		BgL_typez00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2structzd2appzd2stackablezd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_makezd2procedurezd2appzd2funzd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62prezd2conszd2refzd2appzd2keyz62zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2refzd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2arithmeticzd2appzd2funzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		BgL_varz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2setz12zd2appzd2stackablezc0zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_typez00_bglt BGl_z62prezd2conszd2appzd2typezb0zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2appzd2stackablezd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62zc3z04anonymousza32134ze3ze5zzcfa_info2z00(obj_t);
	static BgL_varz00_bglt
		BGl_z62prezd2structzd2refzd2appzd2funz62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62conszd2appzd2sidezd2effectzb0zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62makezd2structzd2appzd2funzd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t
		BGl_z62makezd2procedurezd2appzd2sidezd2effectz62zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62arithmeticzd2appzd2stackablez62zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2procedurezd2appzd2argszd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2procedurezd2appzd2stackzd2stampz00zzcfa_info2z00
		(BgL_appz00_bglt);
	BGL_EXPORTED_DECL bool_t
		BGl_conszd2appzd2seenzf3zf3zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2refzd2appzd2getzd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2prezd2conszd2setz12zd2appz12zzcfa_info2z00(obj_t,
		BgL_typez00_bglt, obj_t, obj_t, BgL_varz00_bglt, obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t
		BGl_z62prezd2conszd2setz12zd2appzd2typezd2setz12zb0zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2structzd2appzd2approxzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		BgL_approxz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2setz12zd2appzd2sidezd2effectzd2setz12z00zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2setz12zd2appzd2argsz12zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_approxz00_bglt
		BGl_z62makezd2structzd2appzd2approxzb0zzcfa_info2z00(obj_t, obj_t);
	static BgL_typez00_bglt
		BGl_z62prezd2makezd2procedurezd2appzd2typez62zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62prezd2arithmeticzd2appzd2speczd2typesz62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2refzd2appzd2funzd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt,
		BgL_varz00_bglt);
	static obj_t BGl_z62prezd2procedurezd2refzd2appzd2keyz62zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2appzd2keyzd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt, obj_t);
	static BgL_appz00_bglt
		BGl_z62makezd2procedurezd2refzd2appzb0zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2funzd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt, BgL_varz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2refzd2appzd2keyz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62conszd2appzd2seenzf3zd2setz12z51zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2procedurezd2appzd2stackablezd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62prezd2procedurezd2setz12zd2appzd2funzd2setz12zb0zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static BgL_variablez00_bglt
		BGl_z62makezd2structzd2appzd2ownerzb0zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2setz12zd2appzd2getz12zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2refzd2appzd2stackablezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	static obj_t BGl_z62prezd2makezd2vectorzd2appzd2argsz62zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2arithmeticzd2appzd2argszd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	static obj_t
		BGl_z62prezd2makezd2procedurezd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	static obj_t
		BGl_z62prezd2arithmeticzd2appzd2keyzd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static obj_t
		BGl_z62procedurezd2setz12zd2appzd2argszd2setz12z62zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32241ze3ze5zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2appzd2sidezd2effectzd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2refzd2appzd2argsz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62zc3z04anonymousza32047ze3ze5zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt
		BGl_z62makezd2prezd2makezd2vectorzd2appz62zzcfa_info2z00(obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2procedurezd2appzd2keyzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	static obj_t
		BGl_z62prezd2structzd2setz12zd2appzd2funzd2setz12zb0zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2arithmeticzd2appzd2stackablezd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t
		BGl_z62prezd2procedurezd2setz12zd2appzd2argszd2setz12zb0zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	static obj_t BGl_z62conszd2refzd2appzd2keyzd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2structzd2appzd2funzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, BgL_varz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2arithmeticzd2appzd2stackablezd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62prezd2conszd2appzd2typezd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	extern obj_t BGl_varz00zzast_nodez00;
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2refzd2appzd2typezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		BgL_typez00_bglt);
	static obj_t BGl_z62lambda2002z62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2setz12zd2appzd2keyzd2setz12z00zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	static obj_t BGl_z62lambda2003z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static obj_t BGl_z62prezd2arithmeticzd2appzd2argszb0zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t
		BGl_z62procedurezd2setz12zd2appzd2stackableza2zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2appzd2argszd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2vectorzd2appzd2stackablezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2procedurezd2appzd2nilzd2zzcfa_info2z00(void);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2vectorzd2appzd2keyz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_conszd2appzd2funz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_prezd2arithmeticzd2appzd2typezd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2procedurezd2appzd2argszd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2refzd2appzd2keyzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t
		BGl_z62prezd2procedurezd2setz12zd2appzd2stackablez70zzcfa_info2z00(obj_t,
		obj_t);
	static BgL_appz00_bglt
		BGl_z62prezd2structzd2refzd2appzd2nilz62zzcfa_info2z00(obj_t);
	static BgL_appz00_bglt
		BGl_z62makezd2prezd2makezd2procedurezd2appz62zzcfa_info2z00(obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2011z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2014z62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2structzd2appzd2keyzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_prezd2structzd2setz12zd2appzd2typez12zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_appz00_bglt BGl_z62lambda2017z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62prezd2conszd2refzd2appzd2sidezd2effectzb0zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2procedurezd2appzd2stackzd2stampzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2arithmeticzd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2prezd2makezd2structzd2appz00zzcfa_info2z00(obj_t,
		BgL_typez00_bglt, obj_t, obj_t, BgL_varz00_bglt, obj_t, obj_t,
		BgL_variablez00_bglt);
	BGL_EXPORTED_DEF obj_t BGl_prezd2structzd2setz12zd2appzc0zzcfa_info2z00 =
		BUNSPEC;
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_prezd2arithmeticzd2appzd2funzd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62makezd2procedurezd2appzd2valueszd2approxzd2setz12za2zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	static BgL_typez00_bglt
		BGl_z62prezd2makezd2structzd2appzd2typez62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62conszd2appzd2approxzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t
		BGl_z62makezd2procedurezd2appzd2approxzd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t
		BGl_z62makezd2structzd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2procedurezd2appzd2loczd2zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_appz00_bglt
		BGl_z62makezd2structzd2refzd2appzb0zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	static BgL_approxz00_bglt BGl_z62lambda2025z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2026z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2refzd2appzd2argszd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	static BgL_variablez00_bglt
		BGl_z62makezd2procedurezd2appzd2ownerzb0zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62prezd2procedurezd2setz12zd2appzd2keyz70zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2vectorzd2appzd2stackzd2stampz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62prezd2structzd2refzd2appzd2locz62zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62prezd2conszd2setz12zd2appzd2getz70zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62makezd2vectorzd2appzd2funzd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_arithmeticzd2appzd2stackablezd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2appzd2keyzd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62lambda2032z62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2procedurezd2appzd2sidezd2effectz00zzcfa_info2z00
		(BgL_appz00_bglt);
	static obj_t BGl_z62lambda2033z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32172ze3ze5zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2vectorzd2appzd2tvectorzf3zd2setz12ze1zzcfa_info2z00
		(BgL_appz00_bglt, bool_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2appzd2argsz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2setz12zd2appzd2keyzd2setz12z00zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2appzd2approxzd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt,
		BgL_approxz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2refzd2appzd2stackablezd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62prezd2makezd2vectorzd2appzf3z43zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL bool_t
		BGl_makezd2procedurezd2appzd2Xzd2Tzf3zf3zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62makezd2vectorzd2appzd2keyzb0zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62prezd2conszd2setz12zd2appzd2argszd2setz12zb0zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t
		BGl_z62prezd2procedurezd2refzd2appzd2keyzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static BgL_approxz00_bglt BGl_z62lambda2202z62zzcfa_info2z00(obj_t, obj_t);
	static BgL_typez00_bglt BGl_z62arithmeticzd2appzd2typez62zzcfa_info2z00(obj_t,
		obj_t);
	static BgL_appz00_bglt BGl_z62lambda2041z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	static obj_t BGl_z62lambda2203z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32262ze3ze5zzcfa_info2z00(obj_t);
	static BgL_appz00_bglt BGl_z62lambda2044z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32408ze3ze5zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt BGl_conszd2appzd2nilz00zzcfa_info2z00(void);
	static obj_t BGl_z62lambda2207z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2208z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2048z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62prezd2structzd2setz12zd2appzd2stackablezd2setz12zb0zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	static BgL_varz00_bglt BGl_z62structzd2refzd2appzd2funzb0zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t
		BGl_z62makezd2vectorzd2appzd2typezd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t BGl_modulezd2initializa7ationz75zzcfa_info2z00(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzcfa_infoz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzast_nodez00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzast_varz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zztype_cachez00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zztype_typez00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_ports_6_10_1z00(long,
		char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_vectors_6_8z00(long,
		char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_strings_6_7z00(long,
		char *);
	BGL_IMPORT obj_t
		BGl_modulezd2initializa7ationz75zz__r4_numbers_6_5_fixnumz00(long, char *);
	BGL_IMPORT obj_t
		BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(long, char *);
	BGL_IMPORT obj_t
		BGl_modulezd2initializa7ationz75zz__r4_equivalence_6_2z00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__readerz00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__objectz00(long, char *);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2vectorzd2appzd2seenzf3zd2setz12ze1zzcfa_info2z00(BgL_appz00_bglt,
		bool_t);
	extern obj_t BGl_appz00zzast_nodez00;
	static obj_t BGl_z62conszd2appzd2lostzd2stampzd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_z62conszd2refzd2appzd2argszb0zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62prezd2conszd2setz12zd2appzd2stackablez70zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_variablez00_bglt
		BGl_prezd2makezd2procedurezd2appzd2ownerz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2procedurezd2appzd2argsz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2vectorzd2appzd2funzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, BgL_varz00_bglt);
	static BgL_appz00_bglt BGl_z62lambda2215z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2appzd2stackablezd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2setz12zd2appzd2sidezd2effectzd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static BgL_variablez00_bglt BGl_z62lambda2056z62zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2218z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2057z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2refzd2appzd2keyzd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62prezd2conszd2setz12zd2appzd2sidezd2effectzd2setz12z62zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_prezd2arithmeticzd2appzd2nilzd2zzcfa_info2z00(void);
	BGL_EXPORTED_DECL bool_t
		BGl_prezd2makezd2vectorzd2appzf3z21zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2refzd2appzd2keyzd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62makezd2procedurezd2appzd2Xzd2Tzf3zd2setz12z51zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2refzd2appzd2argsz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2conszd2appz00zzcfa_info2z00(obj_t, BgL_typez00_bglt, obj_t,
		obj_t, BgL_varz00_bglt, obj_t, obj_t, BgL_approxz00_bglt, obj_t, long,
		BgL_variablez00_bglt, obj_t, bool_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2appzd2locz00zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_appz00_bglt BGl_z62lambda2221z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62prezd2conszd2appzd2argszd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static BgL_approxz00_bglt
		BGl_z62makezd2procedurezd2appzd2approxzb0zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2appzd2seenzf3zd2setz12z33zzcfa_info2z00(BgL_appz00_bglt, bool_t);
	static BgL_appz00_bglt BGl_z62lambda2064z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t);
	static BgL_variablez00_bglt BGl_z62lambda2228z62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2refzd2appzd2argszd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	static obj_t BGl_z62lambda2229z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2068z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62conszd2refzd2appzd2typezd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static BgL_typez00_bglt
		BGl_z62prezd2procedurezd2setz12zd2appzd2typez70zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_prezd2procedurezd2setz12zd2appzd2funz12zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2vectorzd2appzd2keyzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2prezd2structzd2refzd2appz00zzcfa_info2z00(obj_t,
		BgL_typez00_bglt, obj_t, obj_t, BgL_varz00_bglt, obj_t, obj_t);
	static BgL_varz00_bglt
		BGl_z62makezd2procedurezd2appzd2funzb0zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL bool_t
		BGl_prezd2conszd2refzd2appzf3z21zzcfa_info2z00(obj_t);
	static obj_t BGl_z62prezd2structzd2setz12zd2appzd2argsz70zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2setz12zd2appzd2keyz12zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_prezd2makezd2structzd2appzd2funz00zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_appz00_bglt
		BGl_z62makezd2conszd2setz12zd2appza2zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2procedurezd2appzd2keyz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62zc3z04anonymousza32370ze3ze5zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62conszd2appzd2typezd2setz12za2zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static BgL_appz00_bglt BGl_z62lambda2071z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62prezd2conszd2appzd2stackablezb0zzcfa_info2z00(obj_t,
		obj_t);
	static BgL_appz00_bglt BGl_z62lambda2236z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL BgL_approxz00_bglt
		BGl_structzd2setz12zd2appzd2approxzc0zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_appz00_bglt BGl_z62lambda2239z62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2arithmeticzd2appzd2loczd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2refzd2appzd2stackablezd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_cnstzd2initzd2zzcfa_info2z00(void);
	static obj_t BGl_libraryzd2moduleszd2initz00zzcfa_info2z00(void);
	static BgL_appz00_bglt
		BGl_z62makezd2prezd2conszd2setz12zd2appz70zzcfa_info2z00(obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2appzd2sidezd2effectz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2procedurezd2appzd2approxzd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt, BgL_approxz00_bglt);
	static obj_t BGl_z62prezd2structzd2setz12zd2appzf3z51zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t
		BGl_z62prezd2makezd2structzd2appzd2keyzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_importedzd2moduleszd2initz00zzcfa_info2z00(void);
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_prezd2procedurezd2refzd2appzd2funz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62prezd2makezd2vectorzd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	static BgL_variablez00_bglt BGl_z62lambda2400z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2401z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static obj_t BGl_z62arithmeticzd2appzd2funzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_z62prezd2conszd2setz12zd2appzd2argsz70zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62zc3z04anonymousza32282ze3ze5zzcfa_info2z00(obj_t);
	static BgL_appz00_bglt BGl_z62lambda2242z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32193ze3ze5zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32517ze3ze5zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2082z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t);
	static obj_t BGl_z62lambda2406z62zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt
		BGl_z62structzd2refzd2appzd2nilzb0zzcfa_info2z00(obj_t);
	static obj_t BGl_z62lambda2407z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL bool_t
		BGl_prezd2procedurezd2refzd2appzf3z21zzcfa_info2z00(obj_t);
	static obj_t BGl_z62zc3z04anonymousza32088ze3ze5zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2086z62zzcfa_info2z00(obj_t, obj_t);
	static BgL_approxz00_bglt BGl_z62lambda2249z62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2vectorzd2appzd2sidezd2effectz00zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_appz00_bglt BGl_z62lambda2089z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62makezd2procedurezd2appzd2lostzd2stampzd2setz12za2zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2refzd2appzd2stackablezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2setz12zd2appzd2argszc0zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62prezd2makezd2vectorzd2appzd2typezd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_z62lambda2250z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32461ze3ze5zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2413z62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2refzd2appzd2keyzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	static obj_t BGl_z62lambda2414z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static BgL_approxz00_bglt BGl_z62lambda2254z62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL bool_t BGl_prezd2conszd2appzf3zf3zzcfa_info2z00(obj_t);
	static obj_t BGl_z62lambda2255z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static obj_t BGl_z62structzd2refzd2appzd2argszb0zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62procedurezd2refzd2appzd2keyzb0zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL bool_t
		BGl_prezd2structzd2setz12zd2appzf3z33zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2refzd2appzd2keyzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2arithmeticzd2appzd2speczd2typesz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2appzd2stackablezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2structzd2refzd2appzd2zzcfa_info2z00(obj_t, BgL_typez00_bglt,
		obj_t, obj_t, BgL_varz00_bglt, obj_t, obj_t, BgL_approxz00_bglt);
	static obj_t BGl_z62makezd2procedurezd2appzd2Tzb0zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2prezd2conszd2refzd2appz00zzcfa_info2z00(obj_t, BgL_typez00_bglt,
		obj_t, obj_t, BgL_varz00_bglt, obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL bool_t BGl_conszd2refzd2appzf3zf3zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DEF obj_t BGl_prezd2arithmeticzd2appz00zzcfa_info2z00 = BUNSPEC;
	static obj_t BGl_z62makezd2procedurezd2appzd2Xzb0zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62structzd2refzd2appzd2loczb0zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2260z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62conszd2setz12zd2appzd2keyzd2setz12z62zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DEF obj_t BGl_procedurezd2setz12zd2appz12zzcfa_info2z00 =
		BUNSPEC;
	static obj_t BGl_z62lambda2261z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2423z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL bool_t
		BGl_prezd2makezd2procedurezd2appzf3z21zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_prezd2procedurezd2setz12zd2appzd2nilz12zzcfa_info2z00(void);
	static BgL_appz00_bglt BGl_z62lambda2427z62zzcfa_info2z00(obj_t, obj_t);
	static BgL_variablez00_bglt BGl_z62lambda2266z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2267z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static BgL_appz00_bglt
		BGl_z62makezd2procedurezd2appzd2nilzb0zzcfa_info2z00(obj_t);
	static BgL_varz00_bglt
		BGl_z62makezd2structzd2appzd2funzb0zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2setz12zd2appzd2typezd2setz12z00zzcfa_info2z00
		(BgL_appz00_bglt, BgL_typez00_bglt);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2prezd2conszd2appzd2zzcfa_info2z00(obj_t, BgL_typez00_bglt, obj_t,
		obj_t, BgL_varz00_bglt, obj_t, obj_t, BgL_variablez00_bglt);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_prezd2makezd2structzd2appzd2nilz00zzcfa_info2z00(void);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2appzd2keyzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	static obj_t
		BGl_z62makezd2vectorzd2appzd2argszd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL BgL_approxz00_bglt
		BGl_conszd2appzd2approxz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62makezd2procedurezd2appzd2lostzd2stampz62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62prezd2conszd2setz12zd2appzd2keyz70zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2sidezd2effectzd2setz12z00zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t
		BGl_z62conszd2setz12zd2appzd2sidezd2effectz70zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2431z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32625ze3ze5zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2272z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2273z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static BgL_approxz00_bglt BGl_z62lambda2439z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62structzd2setz12zd2appzd2sidezd2effectzd2setz12zb0zzcfa_info2z00
		(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2procedurezd2appzd2Tzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		bool_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2conszd2setz12zd2appzd2stackablezd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2vectorzd2appzd2keyzd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62prezd2arithmeticzd2appzd2stackablezd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL bool_t
		BGl_makezd2procedurezd2appzd2Tzd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_prezd2procedurezd2refzd2appzd2nilz00zzcfa_info2z00(void);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_arithmeticzd2appzd2typez00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL bool_t
		BGl_makezd2procedurezd2appzd2Xzd2zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_varz00_bglt
		BGl_z62prezd2arithmeticzd2appzd2funzb0zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62makezd2vectorzd2appzd2stackablezb0zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2prezd2structzd2setz12zd2appz12zzcfa_info2z00(obj_t,
		BgL_typez00_bglt, obj_t, obj_t, BgL_varz00_bglt, obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_makezd2makezd2procedurezd2appzd2zzcfa_info2z00(obj_t, BgL_typez00_bglt,
		obj_t, obj_t, BgL_varz00_bglt, obj_t, obj_t, BgL_approxz00_bglt, obj_t,
		long, bool_t, bool_t, bool_t, BgL_variablez00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2setz12zd2appzd2sidezd2effectzc0zzcfa_info2z00
		(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2locz12zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62lambda2440z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static obj_t BGl_z62lambda2280z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62structzd2refzd2appzd2keyzd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t
		BGl_z62prezd2structzd2setz12zd2appzd2sidezd2effectza2zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62makezd2procedurezd2appzd2loczb0zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62lambda2281z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static BgL_variablez00_bglt BGl_z62lambda2605z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2606z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static obj_t BGl_z62lambda2446z62zzcfa_info2z00(obj_t, obj_t);
	static BgL_varz00_bglt
		BGl_z62conszd2setz12zd2appzd2funza2zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2447z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static obj_t BGl_z62lambda2287z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2288z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2structzd2appzd2locz00zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_approxz00_bglt
		BGl_z62procedurezd2setz12zd2appzd2approxza2zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62conszd2refzd2appzd2argszd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2refzd2appzd2keyz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL bool_t BGl_makezd2vectorzd2appzf3zf3zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_makezd2vectorzd2appzd2approxzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		BgL_approxz00_bglt);
	static obj_t BGl_z62lambda2611z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2612z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	BGL_EXPORTED_DEF obj_t BGl_prezd2conszd2appz00zzcfa_info2z00 = BUNSPEC;
	static obj_t
		BGl_z62prezd2makezd2vectorzd2appzd2keyzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DEF obj_t BGl_prezd2makezd2procedurezd2appzd2zzcfa_info2z00 =
		BUNSPEC;
	BGL_EXPORTED_DECL BgL_varz00_bglt
		BGl_prezd2structzd2setz12zd2appzd2funz12zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_appz00_bglt BGl_z62lambda2456z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	static obj_t
		BGl_z62makezd2procedurezd2appzd2funzd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static BgL_appz00_bglt BGl_z62lambda2296z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2459z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62conszd2appzd2argszd2setz12za2zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static BgL_appz00_bglt BGl_z62lambda2299z62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2structzd2appzd2sidezd2effectzd2zzcfa_info2z00
		(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2argsz12zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2procedurezd2refzd2appzd2locz00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62prezd2makezd2structzd2appzd2sidezd2effectzb0zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62makezd2procedurezd2appzf3z91zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62conszd2refzd2appzd2stackablezb0zzcfa_info2z00(obj_t,
		obj_t);
	static BgL_appz00_bglt
		BGl_z62makezd2prezd2conszd2refzd2appz62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2620z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	BGL_IMPORT obj_t BGl_classzd2superzd2zz__objectz00(obj_t);
	static BgL_appz00_bglt BGl_z62lambda2623z62zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt
		BGl_z62makezd2structzd2appzd2nilzb0zzcfa_info2z00(obj_t);
	static BgL_appz00_bglt BGl_z62lambda2462z62zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2626z62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_variablez00_bglt
		BGl_conszd2appzd2ownerz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL bool_t BGl_conszd2setz12zd2appzf3ze1zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2refzd2appzd2argszd2zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_approxz00_bglt BGl_z62lambda2469z62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2makezd2procedurezd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static BgL_varz00_bglt BGl_z62conszd2appzd2funz62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62conszd2appzd2stackablez62zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_prezd2conszd2setz12zd2appzd2typez12zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t
		BGl_z62structzd2setz12zd2appzd2funzd2setz12z62zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static obj_t
		BGl_z62procedurezd2setz12zd2appzd2sidezd2effectz70zzcfa_info2z00(obj_t,
		obj_t);
	static BgL_appz00_bglt
		BGl_z62makezd2prezd2procedurezd2refzd2appz62zzcfa_info2z00(obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2refzd2appzd2typezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		BgL_typez00_bglt);
	static obj_t
		BGl_z62prezd2structzd2refzd2appzd2funzd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_z62prezd2conszd2appzd2keyzd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t
		BGl_z62prezd2conszd2refzd2appzd2typezd2setz12za2zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static BgL_varz00_bglt BGl_z62prezd2conszd2appzd2funzb0zzcfa_info2z00(obj_t,
		obj_t);
	static BgL_varz00_bglt
		BGl_z62prezd2makezd2procedurezd2appzd2funz62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2470z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static BgL_typez00_bglt
		BGl_z62prezd2makezd2vectorzd2appzd2typez62zzcfa_info2z00(obj_t, obj_t);
	static BgL_approxz00_bglt BGl_z62lambda2634z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2635z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32289ze3ze5zzcfa_info2z00(obj_t);
	static obj_t BGl_z62lambda2474z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62lambda2475z62zzcfa_info2z00(obj_t, obj_t, obj_t);
	static obj_t
		BGl_z62prezd2makezd2vectorzd2appzd2argszd2setz12za2zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_z62conszd2setz12zd2appzd2argsza2zzcfa_info2z00(obj_t, obj_t);
	static obj_t
		BGl_z62prezd2conszd2setz12zd2appzd2sidezd2effectza2zzcfa_info2z00(obj_t,
		obj_t);
	static BgL_appz00_bglt
		BGl_z62prezd2arithmeticzd2appzd2nilzb0zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_prezd2procedurezd2refzd2appzd2typez00zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t BGl_z62makezd2structzd2appzd2loczb0zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt
		BGl_z62conszd2setz12zd2appzd2nilza2zzcfa_info2z00(obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2refzd2appzd2stackablezd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	static obj_t
		BGl_z62makezd2structzd2appzd2stackablezd2setz12z70zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2644z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	static obj_t BGl_z62conszd2appzd2funzd2setz12za2zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	static BgL_appz00_bglt BGl_z62lambda2484z62zzcfa_info2z00(obj_t, obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2648z62zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2487z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62prezd2makezd2vectorzd2appzd2keyz62zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62conszd2refzd2appzd2sidezd2effectz62zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t
		BGl_z62prezd2makezd2vectorzd2appzd2stackablez62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62makezd2structzd2appzd2argszb0zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL BgL_approxz00_bglt
		BGl_arithmeticzd2appzd2approxz00zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL long
		BGl_makezd2structzd2appzd2lostzd2stampz00zzcfa_info2z00(BgL_appz00_bglt);
	static BgL_typez00_bglt
		BGl_z62prezd2arithmeticzd2appzd2typezb0zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62makezd2procedurezd2appzd2argszb0zzcfa_info2z00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_prezd2conszd2appzd2typezd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2setz12zd2appzd2typezd2setz12z00zzcfa_info2z00(BgL_appz00_bglt,
		BgL_typez00_bglt);
	BGL_EXPORTED_DECL BgL_approxz00_bglt
		BGl_structzd2refzd2appzd2approxzd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_procedurezd2setz12zd2appzd2argszd2setz12z00zzcfa_info2z00
		(BgL_appz00_bglt, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_conszd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt,
		obj_t);
	static BgL_varz00_bglt
		BGl_z62structzd2setz12zd2appzd2funza2zzcfa_info2z00(obj_t, obj_t);
	BGL_EXPORTED_DECL bool_t BGl_structzd2setz12zd2appzf3ze1zzcfa_info2z00(obj_t);
	static obj_t
		BGl_z62makezd2structzd2appzd2typezd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_makezd2procedurezd2appzd2typezd2zzcfa_info2z00(BgL_appz00_bglt);
	BGL_EXPORTED_DECL BgL_appz00_bglt
		BGl_prezd2structzd2setz12zd2appzd2nilz12zzcfa_info2z00(void);
	BGL_EXPORTED_DECL obj_t
		BGl_prezd2structzd2setz12zd2appzd2funzd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt, BgL_varz00_bglt);
	static obj_t
		BGl_z62conszd2setz12zd2appzd2stackablezd2setz12z62zzcfa_info2z00(obj_t,
		obj_t, obj_t);
	static BgL_variablez00_bglt
		BGl_z62prezd2conszd2appzd2ownerzb0zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62prezd2conszd2setz12zd2appzf3z51zzcfa_info2z00(obj_t,
		obj_t);
	static obj_t BGl_z62zc3z04anonymousza32574ze3ze5zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2651z62zzcfa_info2z00(obj_t, obj_t);
	static BgL_appz00_bglt BGl_z62lambda2490z62zzcfa_info2z00(obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32396ze3ze5zzcfa_info2z00(obj_t);
	static obj_t
		BGl_z62procedurezd2refzd2appzd2funzd2setz12z70zzcfa_info2z00(obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_structzd2refzd2appzd2argszd2zzcfa_info2z00(BgL_appz00_bglt);
	static obj_t __cnst[45];


	   
		 
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2appzd2sidezd2effectzd2envz00zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23050za7,
		BGl_z62conszd2appzd2sidezd2effectzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2setz12zd2appzd2vapproxzd2envz12zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2s3051z00,
		BGl_z62procedurezd2setz12zd2appzd2vapproxza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_arithmeticzd2appzd2keyzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762arithmeticza7d23052z00,
		BGl_z62arithmeticzd2appzd2keyz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2refzd2appzd2funzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2r3053z00,
		BGl_z62procedurezd2refzd2appzd2funzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2refzd2appzd2nilzd2envz00zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2r3054z00,
		BGl_z62procedurezd2refzd2appzd2nilzb0zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2arithmeticzd2appzd2stackablezd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2arithme3055z00,
		BGl_z62prezd2arithmeticzd2appzd2stackablezd2setz12z70zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2refzd2appzd2funzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3056z00,
		BGl_z62prezd2procedurezd2refzd2appzd2funz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2structzd2appzf3zd2envzf3zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23057za7,
		BGl_z62prezd2makezd2structzd2appzf3z43zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2makezd2vectorzd2appzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2makeza7d3058za7,
		BGl_z62makezd2makezd2vectorzd2appzb0zzcfa_info2z00, 0L, BUNSPEC, 14);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2setz12zd2appzd2stackablezd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23059za7,
		BGl_z62prezd2conszd2setz12zd2appzd2stackablez70zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2setz12zd2appzd2argszd2envz12zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2s3060z00,
		BGl_z62procedurezd2setz12zd2appzd2argsza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2vectorzd2appzd2typezd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23061za7,
		BGl_z62prezd2makezd2vectorzd2appzd2typez62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2setz12zd2appzd2typezd2setz12zd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23062za7,
		BGl_z62prezd2conszd2setz12zd2appzd2typezd2setz12zb0zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2arithmeticzd2appzd2nilzd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2arithme3063z00,
		BGl_z62prezd2arithmeticzd2appzd2nilzb0zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2prezd2makezd2structzd2appzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762makeza7d2preza7d23064za7,
		BGl_z62makezd2prezd2makezd2structzd2appz62zzcfa_info2z00, 0L, BUNSPEC, 8);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2refzd2appzd2approxzd2envz00zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2r3065z00,
		BGl_z62procedurezd2refzd2appzd2approxzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_conszd2appzd2loczd2envzd2zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23066za7,
		BGl_z62conszd2appzd2locz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE(BGl_makezd2conszd2appzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762makeza7d2consza7d3067za7,
		BGl_z62makezd2conszd2appz62zzcfa_info2z00, 0L, BUNSPEC, 13);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2loczd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3068z00,
		BGl_z62makezd2procedurezd2appzd2loczb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STRING(BGl_string3047z00zzcfa_info2z00,
		BgL_bgl_string3047za700za7za7c3069za7, "cfa_info2", 9);
	      DEFINE_STRING(BGl_string3048z00zzcfa_info2z00,
		BgL_bgl_string3048za700za7za7c3070za7,
		"#() struct-set!-app struct-ref-app make-struct-app pre-struct-set!-app pre-struct-ref-app pre-make-struct-app cons-set!-app cons-ref-app cons-app approxes pre-cons-set!-app pre-cons-ref-app procedure get pre-cons-app make-vector-app tvector? seen? value-approx pre-make-vector-app procedure-set!-app vapprox procedure-ref-app make-procedure-app obj stack-stamp T X bool X-T? long lost-stamp vector values-approx pre-procedure-set!-app pre-procedure-ref-app pre-make-procedure-app owner arithmetic-app approx cfa_info2 pre-arithmetic-app pair spec-types ",
		553);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2prezd2procedurezd2setz12zd2appzd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2preza7d23071za7,
		BGl_z62makezd2prezd2procedurezd2setz12zd2appz70zzcfa_info2z00, 0L, BUNSPEC,
		7);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_conszd2appzd2keyzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23072za7,
		BGl_z62conszd2appzd2keyz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2keyzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3073z00,
		BGl_z62makezd2procedurezd2appzd2keyzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2setz12zd2appzf3zd2envz33zzcfa_info2z00,
		BgL_bgl_za762consza7d2setza7123074za7,
		BGl_z62conszd2setz12zd2appzf3z83zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2prezd2structzd2refzd2appzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762makeza7d2preza7d23075za7,
		BGl_z62makezd2prezd2structzd2refzd2appz62zzcfa_info2z00, 0L, BUNSPEC, 7);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2keyzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3076z00,
		BGl_z62makezd2vectorzd2appzd2keyzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2procedurezd2appzd2loczd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23077za7,
		BGl_z62prezd2makezd2procedurezd2appzd2locz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2setz12zd2appzd2sidezd2effectzd2setz12zd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3078z00,
		BGl_z62prezd2procedurezd2setz12zd2appzd2sidezd2effectzd2setz12z62zzcfa_info2z00,
		0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2procedurezd2appzd2keyzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23079za7,
		BGl_z62prezd2makezd2procedurezd2appzd2keyz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2argszd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3080z00,
		BGl_z62makezd2vectorzd2appzd2argszb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2refzd2appzd2sidezd2effectzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2r3081z00,
		BGl_z62procedurezd2refzd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2refzd2appzd2loczd2envz00zzcfa_info2z00,
		BgL_bgl_za762structza7d2refza73082za7,
		BGl_z62structzd2refzd2appzd2loczb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2appzd2stackzd2stampzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23083za7,
		BGl_z62conszd2appzd2stackzd2stampzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2refzd2appzd2keyzd2envz00zzcfa_info2z00,
		BgL_bgl_za762structza7d2refza73084za7,
		BGl_z62structzd2refzd2appzd2keyzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2stackablezd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3085z00,
		BGl_z62makezd2procedurezd2appzd2stackablezd2setz12z70zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2refzd2appzd2funzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23086za7,
		BGl_z62prezd2conszd2refzd2appzd2funz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2vectorzd2appzd2stackablezd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23087za7,
		BGl_z62prezd2makezd2vectorzd2appzd2stackablez62zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2arithmeticzd2appzd2sidezd2effectzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2arithme3088z00,
		BGl_z62prezd2arithmeticzd2appzd2sidezd2effectz62zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2seenzf3zd2setz12zd2envz33zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3089z00,
		BGl_z62makezd2vectorzd2appzd2seenzf3zd2setz12z83zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2arithmeticzd2appzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762makeza7d2arithm3090z00,
		BGl_z62makezd2arithmeticzd2appz62zzcfa_info2z00, 0L, BUNSPEC, 9);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2vectorzd2appzd2typezd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23091za7,
		BGl_z62prezd2makezd2vectorzd2appzd2typezd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzf3zd2envz21zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3092z00,
		BGl_z62makezd2vectorzd2appzf3z91zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2keyzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3093z00,
		BGl_z62makezd2structzd2appzd2keyzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2sidezd2effectzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3094z00,
		BGl_z62makezd2vectorzd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2approxzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3095z00,
		BGl_z62makezd2structzd2appzd2approxzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2funzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3096z00,
		BGl_z62makezd2vectorzd2appzd2funzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2sidezd2effectzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3097z00,
		BGl_z62makezd2procedurezd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2refzd2appzd2funzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23098za7,
		BGl_z62prezd2conszd2refzd2appzd2funzd2setz12za2zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2setz12zd2appzd2stackablezd2setz12zd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73099za7,
		BGl_z62prezd2structzd2setz12zd2appzd2stackablezd2setz12zb0zzcfa_info2z00,
		0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2refzd2appzd2argszd2envz00zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2r3100z00,
		BGl_z62procedurezd2refzd2appzd2argszb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2refzd2appzd2nilzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73101za7,
		BGl_z62prezd2structzd2refzd2appzd2nilz62zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2refzd2appzd2sidezd2effectzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762structza7d2refza73102za7,
		BGl_z62structzd2refzd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2sidezd2effectzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3103z00,
		BGl_z62makezd2procedurezd2appzd2sidezd2effectz62zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2refzd2appzd2argszd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3104z00,
		BGl_z62prezd2procedurezd2refzd2appzd2argsz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2appzd2lostzd2stampzd2envz00zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23105za7,
		BGl_z62conszd2appzd2lostzd2stampzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2stackablezd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3106z00,
		BGl_z62makezd2vectorzd2appzd2stackablezb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2loczd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3107z00,
		BGl_z62makezd2structzd2appzd2loczb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2prezd2structzd2setz12zd2appzd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2preza7d23108za7,
		BGl_z62makezd2prezd2structzd2setz12zd2appz70zzcfa_info2z00, 0L, BUNSPEC, 7);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2appzd2argszd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23109za7,
		BGl_z62prezd2conszd2appzd2argszb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2refzd2appzd2approxzd2envz00zzcfa_info2z00,
		BgL_bgl_za762consza7d2refza7d23110za7,
		BGl_z62conszd2refzd2appzd2approxzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2keyzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3111z00,
		BGl_z62makezd2structzd2appzd2keyzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2setz12zd2appzd2argszd2setz12zd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73112za7,
		BGl_z62prezd2structzd2setz12zd2appzd2argszd2setz12zb0zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2typezd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3113z00,
		BGl_z62makezd2vectorzd2appzd2typezd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2appzd2stackablezd2envzd2zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23114za7,
		BGl_z62conszd2appzd2stackablez62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2appzd2typezd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23115za7,
		BGl_z62conszd2appzd2typezd2setz12za2zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2procedurezd2appzd2ownerzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23116za7,
		BGl_z62prezd2makezd2procedurezd2appzd2ownerz62zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2setz12zd2appzd2loczd2envz12zzcfa_info2z00,
		BgL_bgl_za762consza7d2setza7123117za7,
		BGl_z62conszd2setz12zd2appzd2locza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2setz12zd2appzd2keyzd2envz12zzcfa_info2z00,
		BgL_bgl_za762consza7d2setza7123118za7,
		BGl_z62conszd2setz12zd2appzd2keyza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2vectorzd2appzd2funzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23119za7,
		BGl_z62prezd2makezd2vectorzd2appzd2funz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2setz12zd2appzd2loczd2envz12zzcfa_info2z00,
		BgL_bgl_za762structza7d2setza73120za7,
		BGl_z62structzd2setz12zd2appzd2locza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2procedurezd2appzd2sidezd2effectzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23121za7,
		BGl_z62prezd2makezd2procedurezd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00,
		0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2refzd2appzf3zd2envzf3zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23122za7,
		BGl_z62prezd2conszd2refzd2appzf3z43zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2refzd2appzd2argszd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762consza7d2refza7d23123za7,
		BGl_z62conszd2refzd2appzd2argszd2setz12z70zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2arithmeticzd2appzd2argszd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2arithme3124z00,
		BGl_z62prezd2arithmeticzd2appzd2argszd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2setz12zd2appzd2keyzd2envz12zzcfa_info2z00,
		BgL_bgl_za762structza7d2setza73125za7,
		BGl_z62structzd2setz12zd2appzd2keyza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2refzd2appzd2argszd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3126z00,
		BGl_z62prezd2procedurezd2refzd2appzd2argszd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2structzd2appzd2ownerzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23127za7,
		BGl_z62prezd2makezd2structzd2appzd2ownerz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2refzd2appzd2sidezd2effectzd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23128za7,
		BGl_z62prezd2conszd2refzd2appzd2sidezd2effectzb0zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2stackzd2stampzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3129z00,
		BGl_z62makezd2structzd2appzd2stackzd2stampz62zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2refzd2appzd2argszd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23130za7,
		BGl_z62prezd2conszd2refzd2appzd2argszd2setz12za2zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2Tzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3131z00,
		BGl_z62makezd2procedurezd2appzd2Tzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2setz12zd2appzd2argszd2setz12zd2envzd2zzcfa_info2z00,
		BgL_bgl_za762structza7d2setza73132za7,
		BGl_z62structzd2setz12zd2appzd2argszd2setz12z62zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2structzd2appzd2argszd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23133za7,
		BGl_z62prezd2makezd2structzd2appzd2argszd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2lostzd2stampzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3134z00,
		BGl_z62makezd2vectorzd2appzd2lostzd2stampzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2setz12zd2appzd2sidezd2effectzd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73135za7,
		BGl_z62prezd2structzd2setz12zd2appzd2sidezd2effectza2zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2makezd2procedurezd2appzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2makeza7d3136za7,
		BGl_z62makezd2makezd2procedurezd2appzb0zzcfa_info2z00, 0L, BUNSPEC, 15);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2lostzd2stampzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3137z00,
		BGl_z62makezd2structzd2appzd2lostzd2stampzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2structzd2appzd2loczd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23138za7,
		BGl_z62prezd2makezd2structzd2appzd2locz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2setz12zd2appzd2funzd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23139za7,
		BGl_z62prezd2conszd2setz12zd2appzd2funz70zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2appzd2nilzd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23140za7,
		BGl_z62prezd2conszd2appzd2nilzb0zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2structzd2appzd2keyzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23141za7,
		BGl_z62prezd2makezd2structzd2appzd2keyz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2setz12zd2appzf3zd2envz33zzcfa_info2z00,
		BgL_bgl_za762structza7d2setza73142za7,
		BGl_z62structzd2setz12zd2appzf3z83zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2approxzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3143z00,
		BGl_z62makezd2vectorzd2appzd2approxzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2setz12zd2appzd2typezd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73144za7,
		BGl_z62prezd2structzd2setz12zd2appzd2typez70zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2vectorzd2appzf3zd2envzf3zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23145za7,
		BGl_z62prezd2makezd2vectorzd2appzf3z43zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2refzd2appzd2argszd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73146za7,
		BGl_z62prezd2structzd2refzd2appzd2argszd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2vectorzd2appzd2sidezd2effectzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23147za7,
		BGl_z62prezd2makezd2vectorzd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00,
		0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2appzd2keyzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23148za7,
		BGl_z62conszd2appzd2keyzd2setz12za2zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2setz12zd2appzd2loczd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73149za7,
		BGl_z62prezd2structzd2setz12zd2appzd2locz70zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2argszd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3150z00,
		BGl_z62makezd2structzd2appzd2argszd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_arithmeticzd2appzd2argszd2envzd2zzcfa_info2z00,
		BgL_bgl_za762arithmeticza7d23151z00,
		BGl_z62arithmeticzd2appzd2argsz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2setz12zd2appzd2keyzd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73152za7,
		BGl_z62prezd2structzd2setz12zd2appzd2keyz70zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2refzd2appzd2funzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3153z00,
		BGl_z62prezd2procedurezd2refzd2appzd2funzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2setz12zd2appzd2argszd2envz12zzcfa_info2z00,
		BgL_bgl_za762structza7d2setza73154za7,
		BGl_z62structzd2setz12zd2appzd2argsza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2vectorzd2appzd2stackablezd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23155za7,
		BGl_z62prezd2makezd2vectorzd2appzd2stackablezd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2stackzd2stampzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3156z00,
		BGl_z62makezd2vectorzd2appzd2stackzd2stampzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2refzd2appzd2keyzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73157za7,
		BGl_z62prezd2structzd2refzd2appzd2keyzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2appzd2funzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23158za7,
		BGl_z62prezd2conszd2appzd2funzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_arithmeticzd2appzd2nilzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762arithmeticza7d23159z00,
		BGl_z62arithmeticzd2appzd2nilz62zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2vectorzd2appzd2funzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23160za7,
		BGl_z62prezd2makezd2vectorzd2appzd2funzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2procedurezd2appzd2argszd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23161za7,
		BGl_z62prezd2makezd2procedurezd2appzd2argsz62zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2stackzd2stampzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3162z00,
		BGl_z62makezd2procedurezd2appzd2stackzd2stampzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2857z00zzcfa_info2z00,
		BgL_bgl_za762lambda2003za7623163z00, BGl_z62lambda2003z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2858z00zzcfa_info2z00,
		BgL_bgl_za762lambda2002za7623164z00, BGl_z62lambda2002z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2859z00zzcfa_info2z00,
		BgL_bgl_za762lambda1995za7623165z00, BGl_z62lambda1995z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2prezd2arithmeticzd2appzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2preza7d23166za7,
		BGl_z62makezd2prezd2arithmeticzd2appzb0zzcfa_info2z00, 0L, BUNSPEC, 8);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2structzd2appzd2sidezd2effectzd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23167za7,
		BGl_z62prezd2makezd2structzd2appzd2sidezd2effectzb0zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2ownerzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3168z00,
		BGl_z62makezd2vectorzd2appzd2ownerzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2860z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3169za7,
		BGl_z62zc3z04anonymousza31994ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2861z00zzcfa_info2z00,
		BgL_bgl_za762lambda1992za7623170z00, BGl_z62lambda1992z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2862z00zzcfa_info2z00,
		BgL_bgl_za762lambda1989za7623171z00, BGl_z62lambda1989z62zzcfa_info2z00, 0L,
		BUNSPEC, 8);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2863z00zzcfa_info2z00,
		BgL_bgl_za762lambda2026za7623172z00, BGl_z62lambda2026z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2864z00zzcfa_info2z00,
		BgL_bgl_za762lambda2025za7623173z00, BGl_z62lambda2025z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2865z00zzcfa_info2z00,
		BgL_bgl_za762lambda2033za7623174z00, BGl_z62lambda2033z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2866z00zzcfa_info2z00,
		BgL_bgl_za762lambda2032za7623175z00, BGl_z62lambda2032z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2867z00zzcfa_info2z00,
		BgL_bgl_za762lambda2017za7623176z00, BGl_z62lambda2017z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2868z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3177za7,
		BGl_z62zc3z04anonymousza32016ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2869z00zzcfa_info2z00,
		BgL_bgl_za762lambda2014za7623178z00, BGl_z62lambda2014z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2arithmeticzd2appzd2keyzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2arithme3179z00,
		BGl_z62prezd2arithmeticzd2appzd2keyzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2setz12zd2appzd2keyzd2setz12zd2envzd2zzcfa_info2z00,
		BgL_bgl_za762structza7d2setza73180za7,
		BGl_z62structzd2setz12zd2appzd2keyzd2setz12z62zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2setz12zd2appzd2typezd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23181za7,
		BGl_z62prezd2conszd2setz12zd2appzd2typez70zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2stackzd2stampzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3182z00,
		BGl_z62makezd2vectorzd2appzd2stackzd2stampz62zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2valueszd2approxzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3183z00,
		BGl_z62makezd2procedurezd2appzd2valueszd2approxz62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2870z00zzcfa_info2z00,
		BgL_bgl_za762lambda2011za7623184z00, BGl_z62lambda2011z62zzcfa_info2z00, 0L,
		BUNSPEC, 9);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2871z00zzcfa_info2z00,
		BgL_bgl_za762lambda2057za7623185z00, BGl_z62lambda2057z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2872z00zzcfa_info2z00,
		BgL_bgl_za762lambda2056za7623186z00, BGl_z62lambda2056z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2873z00zzcfa_info2z00,
		BgL_bgl_za762lambda2048za7623187z00, BGl_z62lambda2048z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2keyzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3188z00,
		BGl_z62makezd2procedurezd2appzd2keyzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2874z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3189za7,
		BGl_z62zc3z04anonymousza32047ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2875z00zzcfa_info2z00,
		BgL_bgl_za762lambda2044za7623190z00, BGl_z62lambda2044z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2876z00zzcfa_info2z00,
		BgL_bgl_za762lambda2041za7623191z00, BGl_z62lambda2041z62zzcfa_info2z00, 0L,
		BUNSPEC, 8);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2setz12zd2appzd2sidezd2effectzd2setz12zd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23192za7,
		BGl_z62prezd2conszd2setz12zd2appzd2sidezd2effectzd2setz12z62zzcfa_info2z00,
		0L, BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2877z00zzcfa_info2z00,
		BgL_bgl_za762lambda2071za7623193z00, BGl_z62lambda2071z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2878z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3194za7,
		BGl_z62zc3z04anonymousza32070ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2refzd2appzd2funzd2envz00zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2r3195z00,
		BGl_z62procedurezd2refzd2appzd2funzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2879z00zzcfa_info2z00,
		BgL_bgl_za762lambda2068za7623196z00, BGl_z62lambda2068z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2setz12zd2appzd2sidezd2effectzd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23197za7,
		BGl_z62prezd2conszd2setz12zd2appzd2sidezd2effectza2zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2setz12zd2appzd2keyzd2setz12zd2envzd2zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2s3198z00,
		BGl_z62procedurezd2setz12zd2appzd2keyzd2setz12z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2structzd2appzd2funzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23199za7,
		BGl_z62prezd2makezd2structzd2appzd2funzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2approxzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3200z00,
		BGl_z62makezd2structzd2appzd2approxzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2arithmeticzd2appzd2argszd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2arithme3201z00,
		BGl_z62prezd2arithmeticzd2appzd2argszb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2880z00zzcfa_info2z00,
		BgL_bgl_za762lambda2064za7623202z00, BGl_z62lambda2064z62zzcfa_info2z00, 0L,
		BUNSPEC, 7);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2881z00zzcfa_info2z00,
		BgL_bgl_za762lambda2089za7623203z00, BGl_z62lambda2089z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_conszd2appzd2nilzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23204za7,
		BGl_z62conszd2appzd2nilz62zzcfa_info2z00, 0L, BUNSPEC, 0);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2882z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3205za7,
		BGl_z62zc3z04anonymousza32088ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2nilzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3206z00,
		BGl_z62makezd2procedurezd2appzd2nilzb0zzcfa_info2z00, 0L, BUNSPEC, 0);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2883z00zzcfa_info2z00,
		BgL_bgl_za762lambda2086za7623207z00, BGl_z62lambda2086z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2884z00zzcfa_info2z00,
		BgL_bgl_za762lambda2082za7623208z00, BGl_z62lambda2082z62zzcfa_info2z00, 0L,
		BUNSPEC, 7);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2885z00zzcfa_info2z00,
		BgL_bgl_za762lambda2114za7623209z00, BGl_z62lambda2114z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2886z00zzcfa_info2z00,
		BgL_bgl_za762lambda2113za7623210z00, BGl_z62lambda2113z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2887z00zzcfa_info2z00,
		BgL_bgl_za762lambda2119za7623211z00, BGl_z62lambda2119z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2888z00zzcfa_info2z00,
		BgL_bgl_za762lambda2118za7623212z00, BGl_z62lambda2118z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2889z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3213za7,
		BGl_z62zc3z04anonymousza32127ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2setz12zd2appzd2sidezd2effectzd2envzc0zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2s3214z00,
		BGl_z62procedurezd2setz12zd2appzd2sidezd2effectz70zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2procedurezd2appzd2nilzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23215za7,
		BGl_z62prezd2makezd2procedurezd2appzd2nilz62zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2arithmeticzd2appzf3zd2envz21zzcfa_info2z00,
		BgL_bgl_za762preza7d2arithme3216z00,
		BGl_z62prezd2arithmeticzd2appzf3z91zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2890z00zzcfa_info2z00,
		BgL_bgl_za762lambda2126za7623217z00, BGl_z62lambda2126z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2891z00zzcfa_info2z00,
		BgL_bgl_za762lambda2125za7623218z00, BGl_z62lambda2125z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2arithmeticzd2appzd2sidezd2effectzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2arithme3219z00,
		BGl_z62prezd2arithmeticzd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2892z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3220za7,
		BGl_z62zc3z04anonymousza32134ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 0);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2893z00zzcfa_info2z00,
		BgL_bgl_za762lambda2133za7623221z00, BGl_z62lambda2133z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2894z00zzcfa_info2z00,
		BgL_bgl_za762lambda2132za7623222z00, BGl_z62lambda2132z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2895z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3223za7,
		BGl_z62zc3z04anonymousza32141ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2refzd2appzd2loczd2envz00zzcfa_info2z00,
		BgL_bgl_za762consza7d2refza7d23224za7,
		BGl_z62conszd2refzd2appzd2loczb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2896z00zzcfa_info2z00,
		BgL_bgl_za762lambda2140za7623225z00, BGl_z62lambda2140z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2897z00zzcfa_info2z00,
		BgL_bgl_za762lambda2139za7623226z00, BGl_z62lambda2139z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2setz12zd2appzd2stackablezd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73227za7,
		BGl_z62prezd2structzd2setz12zd2appzd2stackablez70zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2898z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3228za7,
		BGl_z62zc3z04anonymousza32148ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2refzd2appzd2argszd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23229za7,
		BGl_z62prezd2conszd2refzd2appzd2argsz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2899z00zzcfa_info2z00,
		BgL_bgl_za762lambda2147za7623230z00, BGl_z62lambda2147z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2setz12zd2appzd2argszd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3231z00,
		BGl_z62prezd2procedurezd2setz12zd2appzd2argsz70zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2setz12zd2appzf3zd2envze1zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73232za7,
		BGl_z62prezd2structzd2setz12zd2appzf3z51zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2refzd2appzd2keyzd2envz00zzcfa_info2z00,
		BgL_bgl_za762consza7d2refza7d23233za7,
		BGl_z62conszd2refzd2appzd2keyzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2arithmeticzd2appzd2funzd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2arithme3234z00,
		BGl_z62prezd2arithmeticzd2appzd2funzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2setz12zd2appzd2typezd2setz12zd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73235za7,
		BGl_z62prezd2structzd2setz12zd2appzd2typezd2setz12zb0zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2refzd2appzd2nilzd2envz00zzcfa_info2z00,
		BgL_bgl_za762structza7d2refza73236za7,
		BGl_z62structzd2refzd2appzd2nilzb0zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2prezd2conszd2appzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2preza7d23237za7,
		BGl_z62makezd2prezd2conszd2appzb0zzcfa_info2z00, 0L, BUNSPEC, 8);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2setz12zd2appzd2sidezd2effectzd2envzc0zzcfa_info2z00,
		BgL_bgl_za762consza7d2setza7123238za7,
		BGl_z62conszd2setz12zd2appzd2sidezd2effectz70zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2structzd2appzd2argszd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23239za7,
		BGl_z62prezd2makezd2structzd2appzd2argsz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2setz12zd2appzd2loczd2envz12zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2s3240z00,
		BGl_z62procedurezd2setz12zd2appzd2locza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2setz12zd2appzd2stackablezd2setz12zd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23241za7,
		BGl_z62prezd2conszd2setz12zd2appzd2stackablezd2setz12zb0zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2appzd2sidezd2effectzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23242za7,
		BGl_z62prezd2conszd2appzd2sidezd2effectz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2refzd2appzd2stackablezd2envz00zzcfa_info2z00,
		BgL_bgl_za762consza7d2refza7d23243za7,
		BGl_z62conszd2refzd2appzd2stackablezb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2appzd2approxzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23244za7,
		BGl_z62conszd2appzd2approxzd2setz12za2zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2arithmeticzd2appzd2stackablezd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2arithme3245z00,
		BGl_z62prezd2arithmeticzd2appzd2stackablezb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2sidezd2effectzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3246z00,
		BGl_z62makezd2structzd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2setz12zd2appzd2keyzd2envz12zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2s3247z00,
		BGl_z62procedurezd2setz12zd2appzd2keyza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2refzd2appzd2stackablezd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3248z00,
		BGl_z62prezd2procedurezd2refzd2appzd2stackablez62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2setz12zd2appzd2loczd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3249z00,
		BGl_z62prezd2procedurezd2setz12zd2appzd2locz70zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2refzd2appzd2typezd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762consza7d2refza7d23250za7,
		BGl_z62conszd2refzd2appzd2typezd2setz12z70zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2arithmeticzd2appzd2typezd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2arithme3251z00,
		BGl_z62prezd2arithmeticzd2appzd2typezd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2refzd2appzd2stackablezd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23252za7,
		BGl_z62prezd2conszd2refzd2appzd2stackablez62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2setz12zd2appzd2keyzd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3253z00,
		BGl_z62prezd2procedurezd2setz12zd2appzd2keyz70zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2refzd2appzd2typezd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3254z00,
		BGl_z62prezd2procedurezd2refzd2appzd2typezd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2lostzd2stampzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3255z00,
		BGl_z62makezd2structzd2appzd2lostzd2stampz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_arithmeticzd2appzd2approxzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762arithmeticza7d23256z00,
		BGl_z62arithmeticzd2appzd2approxz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2setz12zd2appzd2stackablezd2envz12zzcfa_info2z00,
		BgL_bgl_za762structza7d2setza73257za7,
		BGl_z62structzd2setz12zd2appzd2stackableza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2refzd2appzd2typezd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23258za7,
		BGl_z62prezd2conszd2refzd2appzd2typezd2setz12za2zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2structzd2appzd2stackablezd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23259za7,
		BGl_z62prezd2makezd2structzd2appzd2stackablez62zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2vectorzd2appzd2sidezd2effectzd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23260za7,
		BGl_z62prezd2makezd2vectorzd2appzd2sidezd2effectzb0zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2refzd2appzd2keyzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2r3261z00,
		BGl_z62procedurezd2refzd2appzd2keyzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2appzd2stackablezd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23262za7,
		BGl_z62conszd2appzd2stackablezd2setz12za2zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2setz12zd2appzd2typezd2setz12zd2envzd2zzcfa_info2z00,
		BgL_bgl_za762structza7d2setza73263za7,
		BGl_z62structzd2setz12zd2appzd2typezd2setz12z62zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2conszd2refzd2appzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2consza7d3264za7,
		BGl_z62makezd2conszd2refzd2appzb0zzcfa_info2z00, 0L, BUNSPEC, 9);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2structzd2appzd2typezd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23265za7,
		BGl_z62prezd2makezd2structzd2appzd2typezd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2refzd2appzd2funzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762consza7d2refza7d23266za7,
		BGl_z62conszd2refzd2appzd2funzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2refzd2appzd2loczd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3267z00,
		BGl_z62prezd2procedurezd2refzd2appzd2locz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2approxzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3268z00,
		BGl_z62makezd2procedurezd2appzd2approxzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2procedurezd2appzd2argszd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23269za7,
		BGl_z62prezd2makezd2procedurezd2appzd2argszd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2refzd2appzd2keyzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3270z00,
		BGl_z62prezd2procedurezd2refzd2appzd2keyz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2nilzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3271z00,
		BGl_z62makezd2structzd2appzd2nilzb0zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2appzd2seenzf3zd2setz12zd2envze1zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23272za7,
		BGl_z62conszd2appzd2seenzf3zd2setz12z51zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2refzd2appzd2funzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73273za7,
		BGl_z62prezd2structzd2refzd2appzd2funz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2refzd2appzd2stackablezd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73274za7,
		BGl_z62prezd2structzd2refzd2appzd2stackablez62zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2setz12zd2appzd2stackablezd2setz12zd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3275z00,
		BGl_z62prezd2procedurezd2setz12zd2appzd2stackablezd2setz12zb0zzcfa_info2z00,
		0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2refzd2appzd2typezd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73276za7,
		BGl_z62prezd2structzd2refzd2appzd2typezd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2setz12zd2appzd2nilzd2envz12zzcfa_info2z00,
		BgL_bgl_za762consza7d2setza7123277za7,
		BGl_z62conszd2setz12zd2appzd2nilza2zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2stackablezd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3278z00,
		BGl_z62makezd2structzd2appzd2stackablezb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2setz12zd2appzd2approxzd2envz12zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2s3279z00,
		BGl_z62procedurezd2setz12zd2appzd2approxza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2vectorzd2appzd2argszd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23280za7,
		BGl_z62prezd2makezd2vectorzd2appzd2argsz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2setz12zd2appzd2nilzd2envz12zzcfa_info2z00,
		BgL_bgl_za762structza7d2setza73281za7,
		BGl_z62structzd2setz12zd2appzd2nilza2zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2typezd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3282z00,
		BGl_z62makezd2structzd2appzd2typezd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2setz12zd2appzd2sidezd2effectzd2setz12zd2envz00zzcfa_info2z00,
		BgL_bgl_za762structza7d2setza73283za7,
		BGl_z62structzd2setz12zd2appzd2sidezd2effectzd2setz12zb0zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2appzd2stackzd2stampzd2envz00zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23284za7,
		BGl_z62conszd2appzd2stackzd2stampzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2refzd2appzd2typezd2envz00zzcfa_info2z00,
		BgL_bgl_za762consza7d2refza7d23285za7,
		BGl_z62conszd2refzd2appzd2typezb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2procedurezd2appzd2funzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23286za7,
		BGl_z62prezd2makezd2procedurezd2appzd2funzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2setz12zd2appzd2getzd2envz12zzcfa_info2z00,
		BgL_bgl_za762consza7d2setza7123287za7,
		BGl_z62conszd2setz12zd2appzd2getza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2refzd2appzd2loczd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23288za7,
		BGl_z62prezd2conszd2refzd2appzd2locz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2setz12zd2appzd2funzd2setz12zd2envzd2zzcfa_info2z00,
		BgL_bgl_za762consza7d2setza7123289za7,
		BGl_z62conszd2setz12zd2appzd2funzd2setz12z62zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2refzd2appzd2typezd2envz00zzcfa_info2z00,
		BgL_bgl_za762structza7d2refza73290za7,
		BGl_z62structzd2refzd2appzd2typezb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2stackablezd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3291z00,
		BGl_z62makezd2structzd2appzd2stackablezd2setz12z70zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2refzd2appzd2keyzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23292za7,
		BGl_z62prezd2conszd2refzd2appzd2keyz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2setz12zd2appzd2funzd2setz12zd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3293z00,
		BGl_z62prezd2procedurezd2setz12zd2appzd2funzd2setz12zb0zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2ownerzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3294z00,
		BGl_z62makezd2structzd2appzd2ownerzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2setz12zd2appzd2funzd2setz12zd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23295za7,
		BGl_z62prezd2conszd2setz12zd2appzd2funzd2setz12zb0zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3000z00zzcfa_info2z00,
		BgL_bgl_za762lambda2474za7623296z00, BGl_z62lambda2474z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3001z00zzcfa_info2z00,
		BgL_bgl_za762lambda2462za7623297z00, BGl_z62lambda2462z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2structzd2appzd2nilzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23298za7,
		BGl_z62prezd2makezd2structzd2appzd2nilz62zzcfa_info2z00, 0L, BUNSPEC, 0);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3002z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3299za7,
		BGl_z62zc3z04anonymousza32461ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3003z00zzcfa_info2z00,
		BgL_bgl_za762lambda2459za7623300z00, BGl_z62lambda2459z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3004z00zzcfa_info2z00,
		BgL_bgl_za762lambda2456za7623301z00, BGl_z62lambda2456z62zzcfa_info2z00, 0L,
		BUNSPEC, 9);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3005z00zzcfa_info2z00,
		BgL_bgl_za762lambda2501za7623302z00, BGl_z62lambda2501z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3006z00zzcfa_info2z00,
		BgL_bgl_za762lambda2500za7623303z00, BGl_z62lambda2500z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3007z00zzcfa_info2z00,
		BgL_bgl_za762lambda2490za7623304z00, BGl_z62lambda2490z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3008z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3305za7,
		BGl_z62zc3z04anonymousza32489ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3009z00zzcfa_info2z00,
		BgL_bgl_za762lambda2487za7623306z00, BGl_z62lambda2487z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2setz12zd2appzd2stackablezd2setz12zd2envzd2zzcfa_info2z00,
		BgL_bgl_za762consza7d2setza7123307za7,
		BGl_z62conszd2setz12zd2appzd2stackablezd2setz12z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2appzd2ownerzd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23308za7,
		BGl_z62prezd2conszd2appzd2ownerzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2setz12zd2appzd2argszd2setz12zd2envzd2zzcfa_info2z00,
		BgL_bgl_za762consza7d2setza7123309za7,
		BGl_z62conszd2setz12zd2appzd2argszd2setz12z62zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2refzd2appzd2stackablezd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23310za7,
		BGl_z62prezd2conszd2refzd2appzd2stackablezd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2loczd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3311z00,
		BGl_z62makezd2vectorzd2appzd2loczb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2tvectorzf3zd2envzf3zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3312z00,
		BGl_z62makezd2vectorzd2appzd2tvectorzf3z43zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3010z00zzcfa_info2z00,
		BgL_bgl_za762lambda2484za7623313z00, BGl_z62lambda2484z62zzcfa_info2z00, 0L,
		BUNSPEC, 8);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2keyzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3314z00,
		BGl_z62makezd2vectorzd2appzd2keyzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3011z00zzcfa_info2z00,
		BgL_bgl_za762lambda2518za7623315z00, BGl_z62lambda2518z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2approxzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3316z00,
		BGl_z62makezd2procedurezd2appzd2approxzd2setz12z70zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3012z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3317za7,
		BGl_z62zc3z04anonymousza32517ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3013z00zzcfa_info2z00,
		BgL_bgl_za762lambda2515za7623318z00, BGl_z62lambda2515z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3014z00zzcfa_info2z00,
		BgL_bgl_za762lambda2509za7623319z00, BGl_z62lambda2509z62zzcfa_info2z00, 0L,
		BUNSPEC, 7);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3015z00zzcfa_info2z00,
		BgL_bgl_za762lambda2547za7623320z00, BGl_z62lambda2547z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3016z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3321za7,
		BGl_z62zc3z04anonymousza32546ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3017z00zzcfa_info2z00,
		BgL_bgl_za762lambda2542za7623322z00, BGl_z62lambda2542z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3018z00zzcfa_info2z00,
		BgL_bgl_za762lambda2539za7623323z00, BGl_z62lambda2539z62zzcfa_info2z00, 0L,
		BUNSPEC, 7);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3019z00zzcfa_info2z00,
		BgL_bgl_za762lambda2584za7623324z00, BGl_z62lambda2584z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2refzd2appzd2keyzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23325za7,
		BGl_z62prezd2conszd2refzd2appzd2keyzd2setz12za2zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE(BGl_conszd2appzd2typezd2envzd2zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23326za7,
		BGl_z62conszd2appzd2typez62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE(BGl_arithmeticzd2appzf3zd2envzf3zzcfa_info2z00,
		BgL_bgl_za762arithmeticza7d23327z00,
		BGl_z62arithmeticzd2appzf3z43zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2structzd2appzd2sidezd2effectzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23328za7,
		BGl_z62prezd2makezd2structzd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00,
		0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2ownerzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3329z00,
		BGl_z62makezd2procedurezd2appzd2ownerzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_arithmeticzd2appzd2sidezd2effectzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762arithmeticza7d23330z00,
		BGl_z62arithmeticzd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3020z00zzcfa_info2z00,
		BgL_bgl_za762lambda2583za7623331z00, BGl_z62lambda2583z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3021z00zzcfa_info2z00,
		BgL_bgl_za762lambda2589za7623332z00, BGl_z62lambda2589z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3022z00zzcfa_info2z00,
		BgL_bgl_za762lambda2588za7623333z00, BGl_z62lambda2588z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3023z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3334za7,
		BGl_z62zc3z04anonymousza32597ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 0);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3024z00zzcfa_info2z00,
		BgL_bgl_za762lambda2596za7623335z00, BGl_z62lambda2596z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2procedurezd2appzd2stackablezd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23336za7,
		BGl_z62prezd2makezd2procedurezd2appzd2stackablezd2setz12za2zzcfa_info2z00,
		0L, BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3025z00zzcfa_info2z00,
		BgL_bgl_za762lambda2595za7623337z00, BGl_z62lambda2595z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3026z00zzcfa_info2z00,
		BgL_bgl_za762lambda2606za7623338z00, BGl_z62lambda2606z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2refzd2appzd2sidezd2effectzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762structza7d2refza73339za7,
		BGl_z62structzd2refzd2appzd2sidezd2effectz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2makezd2structzd2appzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2makeza7d3340za7,
		BGl_z62makezd2makezd2structzd2appzb0zzcfa_info2z00, 0L, BUNSPEC, 12);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3027z00zzcfa_info2z00,
		BgL_bgl_za762lambda2605za7623341z00, BGl_z62lambda2605z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3028z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3342za7,
		BGl_z62zc3z04anonymousza32613ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2appzd2funzd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23343za7,
		BGl_z62prezd2conszd2appzd2funzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2prezd2makezd2vectorzd2appzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762makeza7d2preza7d23344za7,
		BGl_z62makezd2prezd2makezd2vectorzd2appz62zzcfa_info2z00, 0L, BUNSPEC, 8);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3029z00zzcfa_info2z00,
		BgL_bgl_za762lambda2612za7623345z00, BGl_z62lambda2612z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2setz12zd2appzd2funzd2setz12zd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73346za7,
		BGl_z62prezd2structzd2setz12zd2appzd2funzd2setz12zb0zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2setz12zd2appzd2nilzd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73347za7,
		BGl_z62prezd2structzd2setz12zd2appzd2nilz70zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2typezd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3348z00,
		BGl_z62makezd2procedurezd2appzd2typezb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2argszd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3349z00,
		BGl_z62makezd2procedurezd2appzd2argszd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3030z00zzcfa_info2z00,
		BgL_bgl_za762lambda2611za7623350z00, BGl_z62lambda2611z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3031z00zzcfa_info2z00,
		BgL_bgl_za762lambda2575za7623351z00, BGl_z62lambda2575z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3032z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3352za7,
		BGl_z62zc3z04anonymousza32574ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3033z00zzcfa_info2z00,
		BgL_bgl_za762lambda2572za7623353z00, BGl_z62lambda2572z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3034z00zzcfa_info2z00,
		BgL_bgl_za762lambda2568za7623354z00, BGl_z62lambda2568z62zzcfa_info2z00, 0L,
		BUNSPEC, 12);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3035z00zzcfa_info2z00,
		BgL_bgl_za762lambda2635za7623355z00, BGl_z62lambda2635z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3036z00zzcfa_info2z00,
		BgL_bgl_za762lambda2634za7623356z00, BGl_z62lambda2634z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2setz12zd2appzd2typezd2envz12zzcfa_info2z00,
		BgL_bgl_za762consza7d2setza7123357za7,
		BGl_z62conszd2setz12zd2appzd2typeza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3037z00zzcfa_info2z00,
		BgL_bgl_za762lambda2626za7623358z00, BGl_z62lambda2626z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3038z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3359za7,
		BGl_z62zc3z04anonymousza32625ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_arithmeticzd2appzd2argszd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762arithmeticza7d23360z00,
		BGl_z62arithmeticzd2appzd2argszd2setz12za2zzcfa_info2z00, 0L, BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3039z00zzcfa_info2z00,
		BgL_bgl_za762lambda2623za7623361z00, BGl_z62lambda2623z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2refzd2appzd2funzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762structza7d2refza73362za7,
		BGl_z62structzd2refzd2appzd2funzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2refzd2appzd2sidezd2effectzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762consza7d2refza7d23363za7,
		BGl_z62conszd2refzd2appzd2sidezd2effectz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2refzd2appzd2typezd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73364za7,
		BGl_z62prezd2structzd2refzd2appzd2typez62zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3040z00zzcfa_info2z00,
		BgL_bgl_za762lambda2620za7623365z00, BGl_z62lambda2620z62zzcfa_info2z00, 0L,
		BUNSPEC, 8);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3041z00zzcfa_info2z00,
		BgL_bgl_za762lambda2660za7623366z00, BGl_z62lambda2660z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3042z00zzcfa_info2z00,
		BgL_bgl_za762lambda2659za7623367z00, BGl_z62lambda2659z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3043z00zzcfa_info2z00,
		BgL_bgl_za762lambda2651za7623368z00, BGl_z62lambda2651z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3044z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3369za7,
		BGl_z62zc3z04anonymousza32650ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3045z00zzcfa_info2z00,
		BgL_bgl_za762lambda2648za7623370z00, BGl_z62lambda2648z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3046z00zzcfa_info2z00,
		BgL_bgl_za762lambda2644za7623371z00, BGl_z62lambda2644z62zzcfa_info2z00, 0L,
		BUNSPEC, 8);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2typezd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3372z00,
		BGl_z62makezd2structzd2appzd2typezb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2stackzd2stampzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3373z00,
		BGl_z62makezd2structzd2appzd2stackzd2stampzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2setz12zd2appzf3zd2envze1zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23374za7,
		BGl_z62prezd2conszd2setz12zd2appzf3z51zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2setz12zd2appzd2approxzd2envz12zzcfa_info2z00,
		BgL_bgl_za762structza7d2setza73375za7,
		BGl_z62structzd2setz12zd2appzd2approxza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2Tzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3376z00,
		BGl_z62makezd2procedurezd2appzd2Tzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_arithmeticzd2appzd2funzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762arithmeticza7d23377z00,
		BGl_z62arithmeticzd2appzd2funzd2setz12za2zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2vectorzd2appzd2loczd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23378za7,
		BGl_z62prezd2makezd2vectorzd2appzd2locz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2refzd2appzd2stackablezd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2r3379z00,
		BGl_z62procedurezd2refzd2appzd2stackablezd2setz12z70zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2refzd2appzf3zd2envzf3zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3380z00,
		BGl_z62prezd2procedurezd2refzd2appzf3z43zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2vectorzd2appzd2keyzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23381za7,
		BGl_z62prezd2makezd2vectorzd2appzd2keyz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2valuezd2approxzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3382z00,
		BGl_z62makezd2vectorzd2appzd2valuezd2approxz62zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_arithmeticzd2appzd2funzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762arithmeticza7d23383z00,
		BGl_z62arithmeticzd2appzd2funz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2refzd2appzd2argszd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762structza7d2refza73384za7,
		BGl_z62structzd2refzd2appzd2argszd2setz12z70zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE(BGl_prezd2conszd2appzf3zd2envz21zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23385za7,
		BGl_z62prezd2conszd2appzf3z91zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2stackzd2stampzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3386z00,
		BGl_z62makezd2procedurezd2appzd2stackzd2stampz62zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2setz12zd2appzd2envz12zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3387z00,
		BGl_z62makezd2procedurezd2setz12zd2appza2zzcfa_info2z00, 0L, BUNSPEC, 9);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2setz12zd2appzd2stackablezd2setz12zd2envzd2zzcfa_info2z00,
		BgL_bgl_za762structza7d2setza73388za7,
		BGl_z62structzd2setz12zd2appzd2stackablezd2setz12z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2setz12zd2appzd2typezd2envz12zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2s3389z00,
		BGl_z62procedurezd2setz12zd2appzd2typeza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzf3zd2envz21zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3390z00,
		BGl_z62makezd2procedurezd2appzf3z91zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2setz12zd2appzd2sidezd2effectzd2setz12zd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73391za7,
		BGl_z62prezd2structzd2setz12zd2appzd2sidezd2effectzd2setz12z62zzcfa_info2z00,
		0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2refzd2appzd2argszd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2r3392z00,
		BGl_z62procedurezd2refzd2appzd2argszd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2setz12zd2appzd2loczd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23393za7,
		BGl_z62prezd2conszd2setz12zd2appzd2locz70zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2setz12zd2appzd2keyzd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23394za7,
		BGl_z62prezd2conszd2setz12zd2appzd2keyz70zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2procedurezd2appzd2stackablezd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23395za7,
		BGl_z62prezd2makezd2procedurezd2appzd2stackablez62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2setz12zd2appzd2envz12zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3396z00,
		BGl_z62makezd2structzd2setz12zd2appza2zzcfa_info2z00, 0L, BUNSPEC, 8);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2setz12zd2appzd2sidezd2effectzd2envzc0zzcfa_info2z00,
		BgL_bgl_za762structza7d2setza73397za7,
		BGl_z62structzd2setz12zd2appzd2sidezd2effectz70zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2refzd2appzd2nilzd2envz00zzcfa_info2z00,
		BgL_bgl_za762consza7d2refza7d23398za7,
		BGl_z62conszd2refzd2appzd2nilzb0zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2procedurezd2appzd2typezd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23399za7,
		BGl_z62prezd2makezd2procedurezd2appzd2typezd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2Xzd2Tzf3zd2setz12zd2envze1zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3400z00,
		BGl_z62makezd2procedurezd2appzd2Xzd2Tzf3zd2setz12z51zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2procedurezd2appzd2sidezd2effectzd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23401za7,
		BGl_z62prezd2makezd2procedurezd2appzd2sidezd2effectzb0zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	BGL_IMPORT obj_t BGl_conszd2envzd2zz__r4_pairs_and_lists_6_3z00;
	   
		 
		DEFINE_EXPORT_BGL_PROCEDURE(BGl_conszd2appzd2funzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23402za7,
		BGl_z62conszd2appzd2funz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2funzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3403z00,
		BGl_z62makezd2procedurezd2appzd2funzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2setz12zd2appzd2argszd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73404za7,
		BGl_z62prezd2structzd2setz12zd2appzd2argsz70zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2typezd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3405z00,
		BGl_z62makezd2vectorzd2appzd2typezb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2funzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3406z00,
		BGl_z62makezd2vectorzd2appzd2funzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC, 2);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_conszd2appzf3zd2envzf3zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7f33407za7,
		BGl_z62conszd2appzf3z43zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2prezd2makezd2procedurezd2appzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762makeza7d2preza7d23408za7,
		BGl_z62makezd2prezd2makezd2procedurezd2appz62zzcfa_info2z00, 0L, BUNSPEC,
		8);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2procedurezd2appzd2funzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23409za7,
		BGl_z62prezd2makezd2procedurezd2appzd2funz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2refzd2appzd2getzd2envz00zzcfa_info2z00,
		BgL_bgl_za762consza7d2refza7d23410za7,
		BGl_z62conszd2refzd2appzd2getzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE(BGl_conszd2appzd2seenzf3zd2envz21zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23411za7,
		BGl_z62conszd2appzd2seenzf3z91zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2setz12zd2appzd2argszd2setz12zd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3412z00,
		BGl_z62prezd2procedurezd2setz12zd2appzd2argszd2setz12zb0zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2valueszd2approxzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3413z00,
		BGl_z62makezd2procedurezd2appzd2valueszd2approxzd2setz12za2zzcfa_info2z00,
		0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2setz12zd2appzd2nilzd2envz12zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2s3414z00,
		BGl_z62procedurezd2setz12zd2appzd2nilza2zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2refzd2appzd2keyzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3415z00,
		BGl_z62prezd2procedurezd2refzd2appzd2keyzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2refzd2appzd2sidezd2effectzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2r3416z00,
		BGl_z62procedurezd2refzd2appzd2sidezd2effectz62zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2refzd2appzd2funzd2envz00zzcfa_info2z00,
		BgL_bgl_za762structza7d2refza73417za7,
		BGl_z62structzd2refzd2appzd2funzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2setz12zd2appzd2nilzd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3418z00,
		BGl_z62prezd2procedurezd2setz12zd2appzd2nilz70zzcfa_info2z00, 0L, BUNSPEC,
		0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2procedurezd2appzf3zd2envzf3zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23419za7,
		BGl_z62prezd2makezd2procedurezd2appzf3z43zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2appzd2lostzd2stampzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23420za7,
		BGl_z62conszd2appzd2lostzd2stampzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2appzd2keyzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23421za7,
		BGl_z62prezd2conszd2appzd2keyzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2funzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3422z00,
		BGl_z62makezd2structzd2appzd2funzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2refzd2appzf3zd2envzf3zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73423za7,
		BGl_z62prezd2structzd2refzd2appzf3z43zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2vectorzd2appzd2keyzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23424za7,
		BGl_z62prezd2makezd2vectorzd2appzd2keyzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2refzd2appzd2typezd2envz00zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2r3425z00,
		BGl_z62procedurezd2refzd2appzd2typezb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2refzd2appzd2typezd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3426z00,
		BGl_z62prezd2procedurezd2refzd2appzd2typez62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2refzd2appzd2nilzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3427z00,
		BGl_z62prezd2procedurezd2refzd2appzd2nilz62zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2Xzd2Tzf3zd2envz21zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3428z00,
		BGl_z62makezd2procedurezd2appzd2Xzd2Tzf3z91zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2appzd2argszd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23429za7,
		BGl_z62prezd2conszd2appzd2argszd2setz12z70zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2setz12zd2appzd2stackablezd2envz12zzcfa_info2z00,
		BgL_bgl_za762consza7d2setza7123430za7,
		BGl_z62conszd2setz12zd2appzd2stackableza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2setz12zd2appzd2approxzd2envz12zzcfa_info2z00,
		BgL_bgl_za762consza7d2setza7123431za7,
		BGl_z62conszd2setz12zd2appzd2approxza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2refzd2appzd2approxzd2envz00zzcfa_info2z00,
		BgL_bgl_za762structza7d2refza73432za7,
		BGl_z62structzd2refzd2appzd2approxzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2setz12zd2appzd2typezd2setz12zd2envzd2zzcfa_info2z00,
		BgL_bgl_za762consza7d2setza7123433za7,
		BGl_z62conszd2setz12zd2appzd2typezd2setz12z62zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2appzd2typezd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23434za7,
		BGl_z62prezd2conszd2appzd2typezb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2refzd2appzd2stackablezd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3435z00,
		BGl_z62prezd2procedurezd2refzd2appzd2stackablezd2setz12za2zzcfa_info2z00,
		0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2sidezd2effectzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3436z00,
		BGl_z62makezd2structzd2appzd2sidezd2effectz62zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2refzd2appzd2loczd2envz00zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2r3437z00,
		BGl_z62procedurezd2refzd2appzd2loczb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2refzd2appzd2keyzd2envz00zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2r3438z00,
		BGl_z62procedurezd2refzd2appzd2keyzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2structzd2appzd2keyzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23439za7,
		BGl_z62prezd2makezd2structzd2appzd2keyzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2appzd2stackablezd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23440za7,
		BGl_z62prezd2conszd2appzd2stackablezd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2arithmeticzd2appzd2speczd2typeszd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2arithme3441z00,
		BGl_z62prezd2arithmeticzd2appzd2speczd2typesz62zzcfa_info2z00, 0L, BUNSPEC,
		1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2900z00zzcfa_info2z00,
		BgL_bgl_za762lambda2146za7623442z00, BGl_z62lambda2146z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2setz12zd2appzd2argszd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23443za7,
		BGl_z62prezd2conszd2setz12zd2appzd2argsz70zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2901z00zzcfa_info2z00,
		BgL_bgl_za762lambda2153za7623444z00, BGl_z62lambda2153z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2902z00zzcfa_info2z00,
		BgL_bgl_za762lambda2152za7623445z00, BGl_z62lambda2152z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2903z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3446za7,
		BGl_z62zc3z04anonymousza32160ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 0);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2904z00zzcfa_info2z00,
		BgL_bgl_za762lambda2159za7623447z00, BGl_z62lambda2159z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2905z00zzcfa_info2z00,
		BgL_bgl_za762lambda2158za7623448z00, BGl_z62lambda2158z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2906z00zzcfa_info2z00,
		BgL_bgl_za762lambda2106za7623449z00, BGl_z62lambda2106z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2907z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3450za7,
		BGl_z62zc3z04anonymousza32105ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2setz12zd2appzf3zd2envz33zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2s3451z00,
		BGl_z62procedurezd2setz12zd2appzf3z83zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2908z00zzcfa_info2z00,
		BgL_bgl_za762lambda2103za7623452z00, BGl_z62lambda2103z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2refzd2appzd2sidezd2effectzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762consza7d2refza7d23453za7,
		BGl_z62conszd2refzd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2909z00zzcfa_info2z00,
		BgL_bgl_za762lambda2100za7623454z00, BGl_z62lambda2100z62zzcfa_info2z00, 0L,
		BUNSPEC, 15);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2funzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3455z00,
		BGl_z62makezd2structzd2appzd2funzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2stackablezd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3456z00,
		BGl_z62makezd2procedurezd2appzd2stackablezb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2lostzd2stampzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3457z00,
		BGl_z62makezd2procedurezd2appzd2lostzd2stampz62zzcfa_info2z00, 0L, BUNSPEC,
		1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2910z00zzcfa_info2z00,
		BgL_bgl_za762lambda2181za7623458z00, BGl_z62lambda2181z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2911z00zzcfa_info2z00,
		BgL_bgl_za762lambda2180za7623459z00, BGl_z62lambda2180z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2typezd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3460z00,
		BGl_z62makezd2procedurezd2appzd2typezd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2912z00zzcfa_info2z00,
		BgL_bgl_za762lambda2173za7623461z00, BGl_z62lambda2173z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2913z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3462za7,
		BGl_z62zc3z04anonymousza32172ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2914z00zzcfa_info2z00,
		BgL_bgl_za762lambda2170za7623463z00, BGl_z62lambda2170z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2refzd2appzd2stackablezd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762structza7d2refza73464za7,
		BGl_z62structzd2refzd2appzd2stackablezd2setz12z70zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2915z00zzcfa_info2z00,
		BgL_bgl_za762lambda2167za7623465z00, BGl_z62lambda2167z62zzcfa_info2z00, 0L,
		BUNSPEC, 8);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2valuezd2approxzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3466z00,
		BGl_z62makezd2structzd2appzd2valuezd2approxz62zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_arithmeticzd2appzd2stackablezd2envzd2zzcfa_info2z00,
		BgL_bgl_za762arithmeticza7d23467z00,
		BGl_z62arithmeticzd2appzd2stackablez62zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2916z00zzcfa_info2z00,
		BgL_bgl_za762lambda2203za7623468z00, BGl_z62lambda2203z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2917z00zzcfa_info2z00,
		BgL_bgl_za762lambda2202za7623469z00, BGl_z62lambda2202z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2918z00zzcfa_info2z00,
		BgL_bgl_za762lambda2208za7623470z00, BGl_z62lambda2208z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2919z00zzcfa_info2z00,
		BgL_bgl_za762lambda2207za7623471z00, BGl_z62lambda2207z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2arithmeticzd2appzd2loczd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2arithme3472z00,
		BGl_z62prezd2arithmeticzd2appzd2loczb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2stackablezd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3473z00,
		BGl_z62makezd2vectorzd2appzd2stackablezd2setz12z70zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2Xzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3474z00,
		BGl_z62makezd2procedurezd2appzd2Xzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_arithmeticzd2appzd2typezd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762arithmeticza7d23475z00,
		BGl_z62arithmeticzd2appzd2typezd2setz12za2zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2arithmeticzd2appzd2keyzd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2arithme3476z00,
		BGl_z62prezd2arithmeticzd2appzd2keyzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2920z00zzcfa_info2z00,
		BgL_bgl_za762lambda2194za7623477z00, BGl_z62lambda2194z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2921z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3478za7,
		BGl_z62zc3z04anonymousza32193ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2refzd2appzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3479z00,
		BGl_z62makezd2procedurezd2refzd2appzb0zzcfa_info2z00, 0L, BUNSPEC, 8);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2922z00zzcfa_info2z00,
		BgL_bgl_za762lambda2191za7623480z00, BGl_z62lambda2191z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2923z00zzcfa_info2z00,
		BgL_bgl_za762lambda2188za7623481z00, BGl_z62lambda2188z62zzcfa_info2z00, 0L,
		BUNSPEC, 9);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2924z00zzcfa_info2z00,
		BgL_bgl_za762lambda2229za7623482z00, BGl_z62lambda2229z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2refzd2appzd2nilzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23483za7,
		BGl_z62prezd2conszd2refzd2appzd2nilz62zzcfa_info2z00, 0L, BUNSPEC, 0);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2925z00zzcfa_info2z00,
		BgL_bgl_za762lambda2228za7623484z00, BGl_z62lambda2228z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2926z00zzcfa_info2z00,
		BgL_bgl_za762lambda2221za7623485z00, BGl_z62lambda2221z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2setz12zd2appzd2funzd2envz12zzcfa_info2z00,
		BgL_bgl_za762consza7d2setza7123486za7,
		BGl_z62conszd2setz12zd2appzd2funza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2927z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3487za7,
		BGl_z62zc3z04anonymousza32220ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2928z00zzcfa_info2z00,
		BgL_bgl_za762lambda2218za7623488z00, BGl_z62lambda2218z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2929z00zzcfa_info2z00,
		BgL_bgl_za762lambda2215za7623489z00, BGl_z62lambda2215z62zzcfa_info2z00, 0L,
		BUNSPEC, 8);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2setz12zd2appzd2funzd2envz12zzcfa_info2z00,
		BgL_bgl_za762structza7d2setza73490za7,
		BGl_z62structzd2setz12zd2appzd2funza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2setz12zd2appzd2argszd2setz12zd2envzd2zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2s3491z00,
		BGl_z62procedurezd2setz12zd2appzd2argszd2setz12z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2930z00zzcfa_info2z00,
		BgL_bgl_za762lambda2250za7623492z00, BGl_z62lambda2250z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2931z00zzcfa_info2z00,
		BgL_bgl_za762lambda2249za7623493z00, BGl_z62lambda2249z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2932z00zzcfa_info2z00,
		BgL_bgl_za762lambda2255za7623494z00, BGl_z62lambda2255z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2933z00zzcfa_info2z00,
		BgL_bgl_za762lambda2254za7623495z00, BGl_z62lambda2254z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2934z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3496za7,
		BGl_z62zc3z04anonymousza32262ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 0);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2935z00zzcfa_info2z00,
		BgL_bgl_za762lambda2261za7623497z00, BGl_z62lambda2261z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2936z00zzcfa_info2z00,
		BgL_bgl_za762lambda2260za7623498z00, BGl_z62lambda2260z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_arithmeticzd2appzd2speczd2typeszd2envz00zzcfa_info2z00,
		BgL_bgl_za762arithmeticza7d23499z00,
		BGl_z62arithmeticzd2appzd2speczd2typeszb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2937z00zzcfa_info2z00,
		BgL_bgl_za762lambda2267za7623500z00, BGl_z62lambda2267z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2938z00zzcfa_info2z00,
		BgL_bgl_za762lambda2266za7623501z00, BGl_z62lambda2266z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2939z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3502za7,
		BGl_z62zc3z04anonymousza32274ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2prezd2conszd2setz12zd2appzd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2preza7d23503za7,
		BGl_z62makezd2prezd2conszd2setz12zd2appz70zzcfa_info2z00, 0L, BUNSPEC, 8);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2nilzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3504z00,
		BGl_z62makezd2vectorzd2appzd2nilzb0zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2refzd2appzd2sidezd2effectzd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73505za7,
		BGl_z62prezd2structzd2refzd2appzd2sidezd2effectzb0zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2refzd2appzd2getzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23506za7,
		BGl_z62prezd2conszd2refzd2appzd2getz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2940z00zzcfa_info2z00,
		BgL_bgl_za762lambda2273za7623507z00, BGl_z62lambda2273z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2lostzd2stampzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3508z00,
		BGl_z62makezd2vectorzd2appzd2lostzd2stampz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2941z00zzcfa_info2z00,
		BgL_bgl_za762lambda2272za7623509z00, BGl_z62lambda2272z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2942z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3510za7,
		BGl_z62zc3z04anonymousza32282ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 0);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2943z00zzcfa_info2z00,
		BgL_bgl_za762lambda2281za7623511z00, BGl_z62lambda2281z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2944z00zzcfa_info2z00,
		BgL_bgl_za762lambda2280za7623512z00, BGl_z62lambda2280z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2945z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3513za7,
		BGl_z62zc3z04anonymousza32289ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 0);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2946z00zzcfa_info2z00,
		BgL_bgl_za762lambda2288za7623514z00, BGl_z62lambda2288z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2947z00zzcfa_info2z00,
		BgL_bgl_za762lambda2287za7623515z00, BGl_z62lambda2287z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2refzd2appzd2stackablezd2envz00zzcfa_info2z00,
		BgL_bgl_za762structza7d2refza73516za7,
		BGl_z62structzd2refzd2appzd2stackablezb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2948z00zzcfa_info2z00,
		BgL_bgl_za762lambda2242za7623517z00, BGl_z62lambda2242z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2949z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3518za7,
		BGl_z62zc3z04anonymousza32241ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2setz12zd2appzd2sidezd2effectzd2setz12zd2envz00zzcfa_info2z00,
		BgL_bgl_za762consza7d2setza7123519za7,
		BGl_z62conszd2setz12zd2appzd2sidezd2effectzd2setz12zb0zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2setz12zd2appzf3zd2envze1zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3520z00,
		BGl_z62prezd2procedurezd2setz12zd2appzf3z51zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2refzd2appzd2typezd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762structza7d2refza73521za7,
		BGl_z62structzd2refzd2appzd2typezd2setz12z70zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2structzd2appzd2funzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23522za7,
		BGl_z62prezd2makezd2structzd2appzd2funz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_arithmeticzd2appzd2stackablezd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762arithmeticza7d23523z00,
		BGl_z62arithmeticzd2appzd2stackablezd2setz12za2zzcfa_info2z00, 0L, BUNSPEC,
		2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2950z00zzcfa_info2z00,
		BgL_bgl_za762lambda2239za7623524z00, BGl_z62lambda2239z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2951z00zzcfa_info2z00,
		BgL_bgl_za762lambda2236za7623525z00, BGl_z62lambda2236z62zzcfa_info2z00, 0L,
		BUNSPEC, 14);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2952z00zzcfa_info2z00,
		BgL_bgl_za762lambda2311za7623526z00, BGl_z62lambda2311z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2953z00zzcfa_info2z00,
		BgL_bgl_za762lambda2310za7623527z00, BGl_z62lambda2310z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2954z00zzcfa_info2z00,
		BgL_bgl_za762lambda2302za7623528z00, BGl_z62lambda2302z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2955z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3529za7,
		BGl_z62zc3z04anonymousza32301ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2956z00zzcfa_info2z00,
		BgL_bgl_za762lambda2299za7623530z00, BGl_z62lambda2299z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2957z00zzcfa_info2z00,
		BgL_bgl_za762lambda2296za7623531z00, BGl_z62lambda2296z62zzcfa_info2z00, 0L,
		BUNSPEC, 8);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2958z00zzcfa_info2z00,
		BgL_bgl_za762lambda2334za7623532z00, BGl_z62lambda2334z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2959z00zzcfa_info2z00,
		BgL_bgl_za762lambda2333za7623533z00, BGl_z62lambda2333z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2refzd2appzd2stackablezd2envz00zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2r3534z00,
		BGl_z62procedurezd2refzd2appzd2stackablezb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2tvectorzf3zd2setz12zd2envz33zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3535z00,
		BGl_z62makezd2vectorzd2appzd2tvectorzf3zd2setz12z83zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2refzd2appzd2keyzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762consza7d2refza7d23536za7,
		BGl_z62conszd2refzd2appzd2keyzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2refzd2appzf3zd2envz21zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2r3537z00,
		BGl_z62procedurezd2refzd2appzf3z91zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2setz12zd2appzd2argszd2setz12zd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23538za7,
		BGl_z62prezd2conszd2setz12zd2appzd2argszd2setz12zb0zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_arithmeticzd2appzd2sidezd2effectzd2envz00zzcfa_info2z00,
		BgL_bgl_za762arithmeticza7d23539z00,
		BGl_z62arithmeticzd2appzd2sidezd2effectzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2Xzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3540z00,
		BGl_z62makezd2procedurezd2appzd2Xzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_arithmeticzd2appzd2typezd2envzd2zzcfa_info2z00,
		BgL_bgl_za762arithmeticza7d23541z00,
		BGl_z62arithmeticzd2appzd2typez62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2refzd2appzd2typezd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2r3542z00,
		BGl_z62procedurezd2refzd2appzd2typezd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2960z00zzcfa_info2z00,
		BgL_bgl_za762lambda2326za7623543z00, BGl_z62lambda2326z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2961z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3544za7,
		BGl_z62zc3z04anonymousza32325ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2962z00zzcfa_info2z00,
		BgL_bgl_za762lambda2323za7623545z00, BGl_z62lambda2323z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2appzd2funzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23546za7,
		BGl_z62conszd2appzd2funzd2setz12za2zzcfa_info2z00, 0L, BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2963z00zzcfa_info2z00,
		BgL_bgl_za762lambda2318za7623547z00, BGl_z62lambda2318z62zzcfa_info2z00, 0L,
		BUNSPEC, 8);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2964z00zzcfa_info2z00,
		BgL_bgl_za762lambda2357za7623548z00, BGl_z62lambda2357z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2965z00zzcfa_info2z00,
		BgL_bgl_za762lambda2356za7623549z00, BGl_z62lambda2356z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2966z00zzcfa_info2z00,
		BgL_bgl_za762lambda2348za7623550z00, BGl_z62lambda2348z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2967z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3551za7,
		BGl_z62zc3z04anonymousza32347ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2968z00zzcfa_info2z00,
		BgL_bgl_za762lambda2345za7623552z00, BGl_z62lambda2345z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2969z00zzcfa_info2z00,
		BgL_bgl_za762lambda2341za7623553z00, BGl_z62lambda2341z62zzcfa_info2z00, 0L,
		BUNSPEC, 8);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2sidezd2effectzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3554z00,
		BGl_z62makezd2vectorzd2appzd2sidezd2effectz62zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2refzd2appzd2sidezd2effectzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3555z00,
		BGl_z62prezd2procedurezd2refzd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00,
		0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2setz12zd2appzd2typezd2envz12zzcfa_info2z00,
		BgL_bgl_za762structza7d2setza73556za7,
		BGl_z62structzd2setz12zd2appzd2typeza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2refzd2appzd2loczd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73557za7,
		BGl_z62prezd2structzd2refzd2appzd2locz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2refzd2appzd2keyzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73558za7,
		BGl_z62prezd2structzd2refzd2appzd2keyz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2970z00zzcfa_info2z00,
		BgL_bgl_za762lambda2382za7623559z00, BGl_z62lambda2382z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2971z00zzcfa_info2z00,
		BgL_bgl_za762lambda2381za7623560z00, BGl_z62lambda2381z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2setz12zd2appzd2sidezd2effectzd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3561z00,
		BGl_z62prezd2procedurezd2setz12zd2appzd2sidezd2effectza2zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2972z00zzcfa_info2z00,
		BgL_bgl_za762lambda2387za7623562z00, BGl_z62lambda2387z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2973z00zzcfa_info2z00,
		BgL_bgl_za762lambda2386za7623563z00, BGl_z62lambda2386z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2approxzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3564z00,
		BGl_z62makezd2vectorzd2appzd2approxzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2974z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3565za7,
		BGl_z62zc3z04anonymousza32396ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 0);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2975z00zzcfa_info2z00,
		BgL_bgl_za762lambda2395za7623566z00, BGl_z62lambda2395z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2976z00zzcfa_info2z00,
		BgL_bgl_za762lambda2394za7623567z00, BGl_z62lambda2394z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2977z00zzcfa_info2z00,
		BgL_bgl_za762lambda2401za7623568z00, BGl_z62lambda2401z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2setz12zd2appzd2funzd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73569za7,
		BGl_z62prezd2structzd2setz12zd2appzd2funz70zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2978z00zzcfa_info2z00,
		BgL_bgl_za762lambda2400za7623570z00, BGl_z62lambda2400z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2979z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3571za7,
		BGl_z62zc3z04anonymousza32408ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2appzd2sidezd2effectzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23572za7,
		BGl_z62prezd2conszd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2procedurezd2appzd2typezd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23573za7,
		BGl_z62prezd2makezd2procedurezd2appzd2typez62zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2refzd2appzd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3574z00,
		BGl_z62makezd2structzd2refzd2appzb0zzcfa_info2z00, 0L, BUNSPEC, 8);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2vectorzd2appzd2nilzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23575za7,
		BGl_z62prezd2makezd2vectorzd2appzd2nilz62zzcfa_info2z00, 0L, BUNSPEC, 0);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2980z00zzcfa_info2z00,
		BgL_bgl_za762lambda2407za7623576z00, BGl_z62lambda2407z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2981z00zzcfa_info2z00,
		BgL_bgl_za762lambda2406za7623577z00, BGl_z62lambda2406z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2982z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3578za7,
		BGl_z62zc3z04anonymousza32415ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 0);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2983z00zzcfa_info2z00,
		BgL_bgl_za762lambda2414za7623579z00, BGl_z62lambda2414z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2984z00zzcfa_info2z00,
		BgL_bgl_za762lambda2413za7623580z00, BGl_z62lambda2413z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2985z00zzcfa_info2z00,
		BgL_bgl_za762lambda2371za7623581z00, BGl_z62lambda2371z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2986z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3582za7,
		BGl_z62zc3z04anonymousza32370ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2987z00zzcfa_info2z00,
		BgL_bgl_za762lambda2368za7623583z00, BGl_z62lambda2368z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2988z00zzcfa_info2z00,
		BgL_bgl_za762lambda2365za7623584z00, BGl_z62lambda2365z62zzcfa_info2z00, 0L,
		BUNSPEC, 13);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2989z00zzcfa_info2z00,
		BgL_bgl_za762lambda2440za7623585z00, BGl_z62lambda2440z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2refzd2appzf3zd2envz21zzcfa_info2z00,
		BgL_bgl_za762structza7d2refza73586za7,
		BGl_z62structzd2refzd2appzf3z91zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2setz12zd2appzd2stackablezd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3587z00,
		BGl_z62prezd2procedurezd2setz12zd2appzd2stackablez70zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2lostzd2stampzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3588z00,
		BGl_z62makezd2procedurezd2appzd2lostzd2stampzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2refzd2appzd2funzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73589za7,
		BGl_z62prezd2structzd2refzd2appzd2funzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2refzd2appzd2sidezd2effectzd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3590z00,
		BGl_z62prezd2procedurezd2refzd2appzd2sidezd2effectzb0zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE(BGl_conszd2appzd2approxzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23591za7,
		BGl_z62conszd2appzd2approxz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2setz12zd2appzd2typezd2setz12zd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3592z00,
		BGl_z62prezd2procedurezd2setz12zd2appzd2typezd2setz12zb0zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2990z00zzcfa_info2z00,
		BgL_bgl_za762lambda2439za7623593z00, BGl_z62lambda2439z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2991z00zzcfa_info2z00,
		BgL_bgl_za762lambda2447za7623594z00, BGl_z62lambda2447z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2992z00zzcfa_info2z00,
		BgL_bgl_za762lambda2446za7623595z00, BGl_z62lambda2446z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2vectorzd2appzd2argszd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23596za7,
		BGl_z62prezd2makezd2vectorzd2appzd2argszd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2993z00zzcfa_info2z00,
		BgL_bgl_za762lambda2431za7623597z00, BGl_z62lambda2431z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2994z00zzcfa_info2z00,
		BgL_bgl_za762za7c3za704anonymo3598za7,
		BGl_z62zc3z04anonymousza32430ze3ze5zzcfa_info2z00, 0L, BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2995z00zzcfa_info2z00,
		BgL_bgl_za762lambda2427za7623599z00, BGl_z62lambda2427z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2996z00zzcfa_info2z00,
		BgL_bgl_za762lambda2423za7623600z00, BGl_z62lambda2423z62zzcfa_info2z00, 0L,
		BUNSPEC, 9);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2997z00zzcfa_info2z00,
		BgL_bgl_za762lambda2470za7623601z00, BGl_z62lambda2470z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2998z00zzcfa_info2z00,
		BgL_bgl_za762lambda2469za7623602z00, BGl_z62lambda2469z62zzcfa_info2z00, 0L,
		BUNSPEC, 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2999z00zzcfa_info2z00,
		BgL_bgl_za762lambda2475za7623603z00, BGl_z62lambda2475z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzf3zd2envz21zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3604z00,
		BGl_z62makezd2structzd2appzf3z91zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2procedurezd2appzd2keyzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23605za7,
		BGl_z62prezd2makezd2procedurezd2appzd2keyzd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2setz12zd2appzd2keyzd2setz12zd2envzd2zzcfa_info2z00,
		BgL_bgl_za762consza7d2setza7123606za7,
		BGl_z62conszd2setz12zd2appzd2keyzd2setz12z62zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2setz12zd2appzd2keyzd2setz12zd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3607z00,
		BGl_z62prezd2procedurezd2setz12zd2appzd2keyzd2setz12zb0zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2arithmeticzd2appzd2typezd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2arithme3608z00,
		BGl_z62prezd2arithmeticzd2appzd2typezb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2arithmeticzd2appzd2funzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2arithme3609z00,
		BGl_z62prezd2arithmeticzd2appzd2funzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2setz12zd2appzd2funzd2setz12zd2envzd2zzcfa_info2z00,
		BgL_bgl_za762structza7d2setza73610za7,
		BGl_z62structzd2setz12zd2appzd2funzd2setz12z62zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2setz12zd2appzd2keyzd2setz12zd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23611za7,
		BGl_z62prezd2conszd2setz12zd2appzd2keyzd2setz12zb0zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2setz12zd2appzd2nilzd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23612za7,
		BGl_z62prezd2conszd2setz12zd2appzd2nilz70zzcfa_info2z00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2prezd2procedurezd2refzd2appzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762makeza7d2preza7d23613za7,
		BGl_z62makezd2prezd2procedurezd2refzd2appz62zzcfa_info2z00, 0L, BUNSPEC, 7);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2refzd2appzd2argszd2envz00zzcfa_info2z00,
		BgL_bgl_za762consza7d2refza7d23614za7,
		BGl_z62conszd2refzd2appzd2argszb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2conszd2setz12zd2appzd2envz12zzcfa_info2z00,
		BgL_bgl_za762makeza7d2consza7d3615za7,
		BGl_z62makezd2conszd2setz12zd2appza2zzcfa_info2z00, 0L, BUNSPEC, 9);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2appzd2sidezd2effectzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23616za7,
		BGl_z62conszd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2appzd2stackablezd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23617za7,
		BGl_z62prezd2conszd2appzd2stackablezb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2funzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3618z00,
		BGl_z62makezd2procedurezd2appzd2funzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2refzd2appzd2argszd2envz00zzcfa_info2z00,
		BgL_bgl_za762structza7d2refza73619za7,
		BGl_z62structzd2refzd2appzd2argszb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2appzd2typezd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23620za7,
		BGl_z62prezd2conszd2appzd2typezd2setz12z70zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2setz12zd2appzd2funzd2setz12zd2envzd2zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2s3621z00,
		BGl_z62procedurezd2setz12zd2appzd2funzd2setz12z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2refzd2appzd2typezd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23622za7,
		BGl_z62prezd2conszd2refzd2appzd2typez62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2setz12zd2appzd2typezd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3623z00,
		BGl_z62prezd2procedurezd2setz12zd2appzd2typez70zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2refzd2appzd2stackablezd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762consza7d2refza7d23624za7,
		BGl_z62conszd2refzd2appzd2stackablezd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2setz12zd2appzd2getzd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23625za7,
		BGl_z62prezd2conszd2setz12zd2appzd2getz70zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2appzd2loczd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23626za7,
		BGl_z62prezd2conszd2appzd2loczb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2argszd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3627z00,
		BGl_z62makezd2vectorzd2appzd2argszd2setz12z70zzcfa_info2z00, 0L, BUNSPEC,
		2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2refzd2appzd2sidezd2effectzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23628za7,
		BGl_z62prezd2conszd2refzd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2conszd2appzd2keyzd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2consza7d23629za7,
		BGl_z62prezd2conszd2appzd2keyzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2setz12zd2appzd2keyzd2setz12zd2envz00zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73630za7,
		BGl_z62prezd2structzd2setz12zd2appzd2keyzd2setz12zb0zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2appzd2argszd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23631za7,
		BGl_z62conszd2appzd2argszd2setz12za2zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2refzd2appzd2sidezd2effectzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73632za7,
		BGl_z62prezd2structzd2refzd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00,
		0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE(BGl_conszd2appzd2argszd2envzd2zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23633za7,
		BGl_z62conszd2appzd2argsz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2structzd2appzd2typezd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23634za7,
		BGl_z62prezd2makezd2structzd2appzd2typez62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2refzd2appzd2funzd2envz00zzcfa_info2z00,
		BgL_bgl_za762consza7d2refza7d23635za7,
		BGl_z62conszd2refzd2appzd2funzb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2refzd2appzd2stackablezd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73636za7,
		BGl_z62prezd2structzd2refzd2appzd2stackablezd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_structzd2refzd2appzd2keyzd2setz12zd2envzc0zzcfa_info2z00,
		BgL_bgl_za762structza7d2refza73637za7,
		BGl_z62structzd2refzd2appzd2keyzd2setz12z70zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2procedurezd2appzd2argszd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2proced3638z00,
		BGl_z62makezd2procedurezd2appzd2argszb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2appzd2approxeszd2envzd2zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23639za7,
		BGl_z62conszd2appzd2approxesz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2vectorzd2appzd2seenzf3zd2envzf3zzcfa_info2z00,
		BgL_bgl_za762makeza7d2vector3640z00,
		BGl_z62makezd2vectorzd2appzd2seenzf3z43zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_conszd2setz12zd2appzd2argszd2envz12zzcfa_info2z00,
		BgL_bgl_za762consza7d2setza7123641za7,
		BGl_z62conszd2setz12zd2appzd2argsza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2setz12zd2appzd2funzd2envz12zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2s3642z00,
		BGl_z62procedurezd2setz12zd2appzd2funza2zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2setz12zd2appzd2stackablezd2envz12zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2s3643z00,
		BGl_z62procedurezd2setz12zd2appzd2stackableza2zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2setz12zd2appzd2vapproxzd2setz12zd2envzd2zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2s3644z00,
		BGl_z62procedurezd2setz12zd2appzd2vapproxzd2setz12z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_arithmeticzd2appzd2keyzd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762arithmeticza7d23645z00,
		BGl_z62arithmeticzd2appzd2keyzd2setz12za2zzcfa_info2z00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE(BGl_conszd2refzd2appzf3zd2envz21zzcfa_info2z00,
		BgL_bgl_za762consza7d2refza7d23646za7,
		BGl_z62conszd2refzd2appzf3z91zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2prezd2conszd2refzd2appzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762makeza7d2preza7d23647za7,
		BGl_z62makezd2prezd2conszd2refzd2appz62zzcfa_info2z00, 0L, BUNSPEC, 8);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2structzd2refzd2appzd2argszd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2structza73648za7,
		BGl_z62prezd2structzd2refzd2appzd2argsz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2setz12zd2appzd2sidezd2effectzd2setz12zd2envz00zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2s3649z00,
		BGl_z62procedurezd2setz12zd2appzd2sidezd2effectzd2setz12zb0zzcfa_info2z00,
		0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_makezd2structzd2appzd2argszd2envz00zzcfa_info2z00,
		BgL_bgl_za762makeza7d2struct3650z00,
		BGl_z62makezd2structzd2appzd2argszb0zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2vectorzd2appzd2ownerzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23651za7,
		BGl_z62prezd2makezd2vectorzd2appzd2ownerz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE(BGl_conszd2appzd2ownerzd2envzd2zzcfa_info2z00,
		BgL_bgl_za762consza7d2appza7d23652za7,
		BGl_z62conszd2appzd2ownerz62zzcfa_info2z00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2setz12zd2appzd2typezd2setz12zd2envzd2zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2s3653z00,
		BGl_z62procedurezd2setz12zd2appzd2typezd2setz12z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2procedurezd2setz12zd2appzd2funzd2envzc0zzcfa_info2z00,
		BgL_bgl_za762preza7d2procedu3654z00,
		BGl_z62prezd2procedurezd2setz12zd2appzd2funz70zzcfa_info2z00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_procedurezd2setz12zd2appzd2stackablezd2setz12zd2envzd2zzcfa_info2z00,
		BgL_bgl_za762procedureza7d2s3655z00,
		BGl_z62procedurezd2setz12zd2appzd2stackablezd2setz12z62zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_prezd2makezd2structzd2appzd2stackablezd2setz12zd2envz12zzcfa_info2z00,
		BgL_bgl_za762preza7d2makeza7d23656za7,
		BGl_z62prezd2makezd2structzd2appzd2stackablezd2setz12za2zzcfa_info2z00, 0L,
		BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_arithmeticzd2appzd2loczd2envzd2zzcfa_info2z00,
		BgL_bgl_za762arithmeticza7d23657z00,
		BGl_z62arithmeticzd2appzd2locz62zzcfa_info2z00, 0L, BUNSPEC, 1);

/* GC roots registration */
	static obj_t bgl_gc_roots_register()
	{
#if defined( BGL_GC_ROOTS )
#define ADD_ROOT( addr ) (addr > roots_max ? roots_max = addr : (addr < roots_min ? roots_min = addr : 0))
		void *roots_min = (void *) ULONG_MAX, *roots_max = 0;
		     ADD_ROOT((void *) (&BGl_makezd2structzd2appz00zzcfa_info2z00));
		     ADD_ROOT((void *) (&BGl_structzd2refzd2appz00zzcfa_info2z00));
		     ADD_ROOT((void *) (&BGl_structzd2setz12zd2appz12zzcfa_info2z00));
		     ADD_ROOT((void *) (&BGl_prezd2makezd2vectorzd2appzd2zzcfa_info2z00));
		     ADD_ROOT((void *) (&BGl_procedurezd2refzd2appz00zzcfa_info2z00));
		     ADD_ROOT((void *) (&BGl_prezd2conszd2refzd2appzd2zzcfa_info2z00));
		     ADD_ROOT((void *) (&BGl_prezd2structzd2refzd2appzd2zzcfa_info2z00));
		     ADD_ROOT((void *) (&BGl_prezd2conszd2setz12zd2appzc0zzcfa_info2z00));
		   
			 ADD_ROOT((void
				*) (&BGl_prezd2procedurezd2setz12zd2appzc0zzcfa_info2z00));
		     ADD_ROOT((void *) (&BGl_prezd2procedurezd2refzd2appzd2zzcfa_info2z00));
		     ADD_ROOT((void *) (&BGl_conszd2setz12zd2appz12zzcfa_info2z00));
		     ADD_ROOT((void *) (&BGl_makezd2procedurezd2appz00zzcfa_info2z00));
		     ADD_ROOT((void *) (&BGl_requirezd2initializa7ationz75zzcfa_info2z00));
		     ADD_ROOT((void *) (&BGl_conszd2appzd2zzcfa_info2z00));
		     ADD_ROOT((void *) (&BGl_prezd2makezd2structzd2appzd2zzcfa_info2z00));
		     ADD_ROOT((void *) (&BGl_conszd2refzd2appz00zzcfa_info2z00));
		     ADD_ROOT((void *) (&BGl_arithmeticzd2appzd2zzcfa_info2z00));
		     ADD_ROOT((void *) (&BGl_makezd2vectorzd2appz00zzcfa_info2z00));
		     ADD_ROOT((void *) (&BGl_prezd2structzd2setz12zd2appzc0zzcfa_info2z00));
		     ADD_ROOT((void *) (&BGl_prezd2arithmeticzd2appz00zzcfa_info2z00));
		     ADD_ROOT((void *) (&BGl_procedurezd2setz12zd2appz12zzcfa_info2z00));
		     ADD_ROOT((void *) (&BGl_prezd2conszd2appz00zzcfa_info2z00));
		   
			 ADD_ROOT((void *) (&BGl_prezd2makezd2procedurezd2appzd2zzcfa_info2z00));
#undef ADD_ROOT
		if   (roots_max > 0)
			     GC_add_roots(roots_min, ((void **) roots_max) + 1);
#endif
		     return BUNSPEC;
	}



/* module-initialization */
	BGL_EXPORTED_DEF obj_t BGl_modulezd2initializa7ationz75zzcfa_info2z00(long
		BgL_checksumz00_9952, char *BgL_fromz00_9953)
	{
		{
			if (CBOOL(BGl_requirezd2initializa7ationz75zzcfa_info2z00))
				{
					BGl_requirezd2initializa7ationz75zzcfa_info2z00 = BBOOL(((bool_t) 0));
					BGl_gczd2rootszd2initz00zzcfa_info2z00();
					BGl_libraryzd2moduleszd2initz00zzcfa_info2z00();
					BGl_cnstzd2initzd2zzcfa_info2z00();
					BGl_importedzd2moduleszd2initz00zzcfa_info2z00();
					BGl_objectzd2initzd2zzcfa_info2z00();
					return BGl_toplevelzd2initzd2zzcfa_info2z00();
				}
			else
				{
					return BUNSPEC;
				}
		}

	}



/* library-modules-init */
	obj_t BGl_libraryzd2moduleszd2initz00zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.scm 16 */
			BGl_modulezd2initializa7ationz75zz__objectz00(0L, "cfa_info2");
			BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(0L,
				"cfa_info2");
			BGl_modulezd2initializa7ationz75zz__readerz00(0L, "cfa_info2");
			BGl_modulezd2initializa7ationz75zz__r4_ports_6_10_1z00(0L, "cfa_info2");
			BGl_modulezd2initializa7ationz75zz__r4_strings_6_7z00(0L, "cfa_info2");
			BGl_modulezd2initializa7ationz75zz__r4_equivalence_6_2z00(0L,
				"cfa_info2");
			BGl_modulezd2initializa7ationz75zz__r4_vectors_6_8z00(0L, "cfa_info2");
			BGl_modulezd2initializa7ationz75zz__r4_numbers_6_5_fixnumz00(0L,
				"cfa_info2");
			return BUNSPEC;
		}

	}



/* cnst-init */
	obj_t BGl_cnstzd2initzd2zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.scm 16 */
			{	/* Cfa/cinfo2.scm 16 */
				obj_t BgL_cportz00_8853;

				{	/* Cfa/cinfo2.scm 16 */
					obj_t BgL_stringz00_8860;

					BgL_stringz00_8860 = BGl_string3048z00zzcfa_info2z00;
					{	/* Cfa/cinfo2.scm 16 */
						obj_t BgL_startz00_8861;

						BgL_startz00_8861 = BINT(0L);
						{	/* Cfa/cinfo2.scm 16 */
							obj_t BgL_endz00_8862;

							BgL_endz00_8862 =
								BINT(STRING_LENGTH(((obj_t) BgL_stringz00_8860)));
							{	/* Cfa/cinfo2.scm 16 */

								BgL_cportz00_8853 =
									BGl_openzd2inputzd2stringz12z12zz__r4_ports_6_10_1z00
									(BgL_stringz00_8860, BgL_startz00_8861, BgL_endz00_8862);
				}}}}
				{
					long BgL_iz00_8854;

					BgL_iz00_8854 = 44L;
				BgL_loopz00_8855:
					if ((BgL_iz00_8854 == -1L))
						{	/* Cfa/cinfo2.scm 16 */
							return BUNSPEC;
						}
					else
						{	/* Cfa/cinfo2.scm 16 */
							{	/* Cfa/cinfo2.scm 16 */
								obj_t BgL_arg3049z00_8856;

								{	/* Cfa/cinfo2.scm 16 */

									{	/* Cfa/cinfo2.scm 16 */
										obj_t BgL_locationz00_8858;

										BgL_locationz00_8858 = BBOOL(((bool_t) 0));
										{	/* Cfa/cinfo2.scm 16 */

											BgL_arg3049z00_8856 =
												BGl_readz00zz__readerz00(BgL_cportz00_8853,
												BgL_locationz00_8858);
										}
									}
								}
								{	/* Cfa/cinfo2.scm 16 */
									int BgL_tmpz00_9980;

									BgL_tmpz00_9980 = (int) (BgL_iz00_8854);
									CNST_TABLE_SET(BgL_tmpz00_9980, BgL_arg3049z00_8856);
							}}
							{	/* Cfa/cinfo2.scm 16 */
								int BgL_auxz00_8859;

								BgL_auxz00_8859 = (int) ((BgL_iz00_8854 - 1L));
								{
									long BgL_iz00_9985;

									BgL_iz00_9985 = (long) (BgL_auxz00_8859);
									BgL_iz00_8854 = BgL_iz00_9985;
									goto BgL_loopz00_8855;
								}
							}
						}
				}
			}
		}

	}



/* gc-roots-init */
	obj_t BGl_gczd2rootszd2initz00zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.scm 16 */
			return bgl_gc_roots_register();
		}

	}



/* toplevel-init */
	obj_t BGl_toplevelzd2initzd2zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.scm 16 */
			return BUNSPEC;
		}

	}



/* make-pre-arithmetic-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2prezd2arithmeticzd2appzd2zzcfa_info2z00(obj_t BgL_loc1693z00_3,
		BgL_typez00_bglt BgL_type1694z00_4, obj_t BgL_sidezd2effect1695zd2_5,
		obj_t BgL_key1696z00_6, BgL_varz00_bglt BgL_fun1697z00_7,
		obj_t BgL_args1698z00_8, obj_t BgL_stackable1699z00_9,
		obj_t BgL_speczd2types1700zd2_10)
	{
		{	/* Cfa/cinfo2.sch 518 */
			{	/* Cfa/cinfo2.sch 518 */
				BgL_appz00_bglt BgL_new1469z00_8864;

				{	/* Cfa/cinfo2.sch 518 */
					BgL_appz00_bglt BgL_tmp1467z00_8865;
					BgL_prezd2arithmeticzd2appz00_bglt BgL_wide1468z00_8866;

					{
						BgL_appz00_bglt BgL_auxz00_9988;

						{	/* Cfa/cinfo2.sch 518 */
							BgL_appz00_bglt BgL_new1466z00_8867;

							BgL_new1466z00_8867 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 518 */
								long BgL_arg1940z00_8868;

								BgL_arg1940z00_8868 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1466z00_8867),
									BgL_arg1940z00_8868);
							}
							{	/* Cfa/cinfo2.sch 518 */
								BgL_objectz00_bglt BgL_tmpz00_9993;

								BgL_tmpz00_9993 = ((BgL_objectz00_bglt) BgL_new1466z00_8867);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_9993, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1466z00_8867);
							BgL_auxz00_9988 = BgL_new1466z00_8867;
						}
						BgL_tmp1467z00_8865 = ((BgL_appz00_bglt) BgL_auxz00_9988);
					}
					BgL_wide1468z00_8866 =
						((BgL_prezd2arithmeticzd2appz00_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2arithmeticzd2appz00_bgl))));
					{	/* Cfa/cinfo2.sch 518 */
						obj_t BgL_auxz00_10001;
						BgL_objectz00_bglt BgL_tmpz00_9999;

						BgL_auxz00_10001 = ((obj_t) BgL_wide1468z00_8866);
						BgL_tmpz00_9999 = ((BgL_objectz00_bglt) BgL_tmp1467z00_8865);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_9999, BgL_auxz00_10001);
					}
					((BgL_objectz00_bglt) BgL_tmp1467z00_8865);
					{	/* Cfa/cinfo2.sch 518 */
						long BgL_arg1939z00_8869;

						BgL_arg1939z00_8869 =
							BGL_CLASS_NUM(BGl_prezd2arithmeticzd2appz00zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1467z00_8865), BgL_arg1939z00_8869);
					}
					BgL_new1469z00_8864 = ((BgL_appz00_bglt) BgL_tmp1467z00_8865);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1469z00_8864)))->BgL_locz00) =
					((obj_t) BgL_loc1693z00_3), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1469z00_8864)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1694z00_4), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1469z00_8864)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1695zd2_5), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1469z00_8864)))->BgL_keyz00) =
					((obj_t) BgL_key1696z00_6), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1469z00_8864)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1697z00_7), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1469z00_8864)))->
						BgL_argsz00) = ((obj_t) BgL_args1698z00_8), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1469z00_8864)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1699z00_9), BUNSPEC);
				{
					BgL_prezd2arithmeticzd2appz00_bglt BgL_auxz00_10023;

					{
						obj_t BgL_auxz00_10024;

						{	/* Cfa/cinfo2.sch 518 */
							BgL_objectz00_bglt BgL_tmpz00_10025;

							BgL_tmpz00_10025 = ((BgL_objectz00_bglt) BgL_new1469z00_8864);
							BgL_auxz00_10024 = BGL_OBJECT_WIDENING(BgL_tmpz00_10025);
						}
						BgL_auxz00_10023 =
							((BgL_prezd2arithmeticzd2appz00_bglt) BgL_auxz00_10024);
					}
					((((BgL_prezd2arithmeticzd2appz00_bglt) COBJECT(BgL_auxz00_10023))->
							BgL_speczd2typeszd2) =
						((obj_t) BgL_speczd2types1700zd2_10), BUNSPEC);
				}
				return BgL_new1469z00_8864;
			}
		}

	}



/* &make-pre-arithmetic-app */
	BgL_appz00_bglt BGl_z62makezd2prezd2arithmeticzd2appzb0zzcfa_info2z00(obj_t
		BgL_envz00_6935, obj_t BgL_loc1693z00_6936, obj_t BgL_type1694z00_6937,
		obj_t BgL_sidezd2effect1695zd2_6938, obj_t BgL_key1696z00_6939,
		obj_t BgL_fun1697z00_6940, obj_t BgL_args1698z00_6941,
		obj_t BgL_stackable1699z00_6942, obj_t BgL_speczd2types1700zd2_6943)
	{
		{	/* Cfa/cinfo2.sch 518 */
			return
				BGl_makezd2prezd2arithmeticzd2appzd2zzcfa_info2z00(BgL_loc1693z00_6936,
				((BgL_typez00_bglt) BgL_type1694z00_6937),
				BgL_sidezd2effect1695zd2_6938, BgL_key1696z00_6939,
				((BgL_varz00_bglt) BgL_fun1697z00_6940), BgL_args1698z00_6941,
				BgL_stackable1699z00_6942, BgL_speczd2types1700zd2_6943);
		}

	}



/* pre-arithmetic-app? */
	BGL_EXPORTED_DEF bool_t BGl_prezd2arithmeticzd2appzf3zf3zzcfa_info2z00(obj_t
		BgL_objz00_11)
	{
		{	/* Cfa/cinfo2.sch 519 */
			{	/* Cfa/cinfo2.sch 519 */
				obj_t BgL_classz00_8870;

				BgL_classz00_8870 = BGl_prezd2arithmeticzd2appz00zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_11))
					{	/* Cfa/cinfo2.sch 519 */
						BgL_objectz00_bglt BgL_arg1801z00_8871;

						BgL_arg1801z00_8871 = (BgL_objectz00_bglt) (BgL_objz00_11);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 519 */
								long BgL_idxz00_8872;

								BgL_idxz00_8872 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_8871);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_8872 + 4L)) == BgL_classz00_8870);
							}
						else
							{	/* Cfa/cinfo2.sch 519 */
								bool_t BgL_res2834z00_8875;

								{	/* Cfa/cinfo2.sch 519 */
									obj_t BgL_oclassz00_8876;

									{	/* Cfa/cinfo2.sch 519 */
										long BgL_arg1808z00_8877;

										{	/* Cfa/cinfo2.sch 519 */
											long BgL_arg1809z00_8878;

											BgL_arg1809z00_8878 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_8871);
											BgL_arg1808z00_8877 = (BgL_arg1809z00_8878 - OBJECT_TYPE);
										}
										BgL_oclassz00_8876 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_8877);
									}
									{	/* Cfa/cinfo2.sch 519 */
										bool_t BgL__ortest_1115z00_8879;

										BgL__ortest_1115z00_8879 =
											(BgL_classz00_8870 == BgL_oclassz00_8876);
										if (BgL__ortest_1115z00_8879)
											{	/* Cfa/cinfo2.sch 519 */
												BgL_res2834z00_8875 = BgL__ortest_1115z00_8879;
											}
										else
											{	/* Cfa/cinfo2.sch 519 */
												long BgL_odepthz00_8880;

												BgL_odepthz00_8880 =
													BGL_CLASS_DEPTH(BgL_oclassz00_8876);
												if ((4L < BgL_odepthz00_8880))
													{	/* Cfa/cinfo2.sch 519 */
														obj_t BgL_arg1797z00_8881;

														BgL_arg1797z00_8881 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_8876, 4L);
														BgL_res2834z00_8875 =
															(BgL_arg1797z00_8881 == BgL_classz00_8870);
													}
												else
													{	/* Cfa/cinfo2.sch 519 */
														BgL_res2834z00_8875 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2834z00_8875;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 519 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &pre-arithmetic-app? */
	obj_t BGl_z62prezd2arithmeticzd2appzf3z91zzcfa_info2z00(obj_t BgL_envz00_6944,
		obj_t BgL_objz00_6945)
	{
		{	/* Cfa/cinfo2.sch 519 */
			return
				BBOOL(BGl_prezd2arithmeticzd2appzf3zf3zzcfa_info2z00(BgL_objz00_6945));
		}

	}



/* pre-arithmetic-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_prezd2arithmeticzd2appzd2nilzd2zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 520 */
			{	/* Cfa/cinfo2.sch 520 */
				obj_t BgL_classz00_4961;

				BgL_classz00_4961 = BGl_prezd2arithmeticzd2appz00zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 520 */
					obj_t BgL__ortest_1117z00_4962;

					BgL__ortest_1117z00_4962 = BGL_CLASS_NIL(BgL_classz00_4961);
					if (CBOOL(BgL__ortest_1117z00_4962))
						{	/* Cfa/cinfo2.sch 520 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_4962);
						}
					else
						{	/* Cfa/cinfo2.sch 520 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_4961));
						}
				}
			}
		}

	}



/* &pre-arithmetic-app-nil */
	BgL_appz00_bglt BGl_z62prezd2arithmeticzd2appzd2nilzb0zzcfa_info2z00(obj_t
		BgL_envz00_6946)
	{
		{	/* Cfa/cinfo2.sch 520 */
			return BGl_prezd2arithmeticzd2appzd2nilzd2zzcfa_info2z00();
		}

	}



/* pre-arithmetic-app-spec-types */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2arithmeticzd2appzd2speczd2typesz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_12)
	{
		{	/* Cfa/cinfo2.sch 521 */
			{
				BgL_prezd2arithmeticzd2appz00_bglt BgL_auxz00_10061;

				{
					obj_t BgL_auxz00_10062;

					{	/* Cfa/cinfo2.sch 521 */
						BgL_objectz00_bglt BgL_tmpz00_10063;

						BgL_tmpz00_10063 = ((BgL_objectz00_bglt) BgL_oz00_12);
						BgL_auxz00_10062 = BGL_OBJECT_WIDENING(BgL_tmpz00_10063);
					}
					BgL_auxz00_10061 =
						((BgL_prezd2arithmeticzd2appz00_bglt) BgL_auxz00_10062);
				}
				return
					(((BgL_prezd2arithmeticzd2appz00_bglt) COBJECT(BgL_auxz00_10061))->
					BgL_speczd2typeszd2);
			}
		}

	}



/* &pre-arithmetic-app-spec-types */
	obj_t BGl_z62prezd2arithmeticzd2appzd2speczd2typesz62zzcfa_info2z00(obj_t
		BgL_envz00_6947, obj_t BgL_oz00_6948)
	{
		{	/* Cfa/cinfo2.sch 521 */
			return
				BGl_prezd2arithmeticzd2appzd2speczd2typesz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_6948));
		}

	}



/* pre-arithmetic-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2arithmeticzd2appzd2stackablezd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_15)
	{
		{	/* Cfa/cinfo2.sch 523 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_15)))->BgL_stackablez00);
		}

	}



/* &pre-arithmetic-app-stackable */
	obj_t BGl_z62prezd2arithmeticzd2appzd2stackablezb0zzcfa_info2z00(obj_t
		BgL_envz00_6949, obj_t BgL_oz00_6950)
	{
		{	/* Cfa/cinfo2.sch 523 */
			return
				BGl_prezd2arithmeticzd2appzd2stackablezd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_6950));
		}

	}



/* pre-arithmetic-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2arithmeticzd2appzd2stackablezd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_16, obj_t BgL_vz00_17)
	{
		{	/* Cfa/cinfo2.sch 524 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_16)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_17), BUNSPEC);
		}

	}



/* &pre-arithmetic-app-stackable-set! */
	obj_t
		BGl_z62prezd2arithmeticzd2appzd2stackablezd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_6951, obj_t BgL_oz00_6952, obj_t BgL_vz00_6953)
	{
		{	/* Cfa/cinfo2.sch 524 */
			return
				BGl_prezd2arithmeticzd2appzd2stackablezd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_6952), BgL_vz00_6953);
		}

	}



/* pre-arithmetic-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2arithmeticzd2appzd2argszd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_18)
	{
		{	/* Cfa/cinfo2.sch 525 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_18)))->BgL_argsz00);
		}

	}



/* &pre-arithmetic-app-args */
	obj_t BGl_z62prezd2arithmeticzd2appzd2argszb0zzcfa_info2z00(obj_t
		BgL_envz00_6954, obj_t BgL_oz00_6955)
	{
		{	/* Cfa/cinfo2.sch 525 */
			return
				BGl_prezd2arithmeticzd2appzd2argszd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_6955));
		}

	}



/* pre-arithmetic-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2arithmeticzd2appzd2argszd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_19, obj_t BgL_vz00_20)
	{
		{	/* Cfa/cinfo2.sch 526 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_19)))->BgL_argsz00) =
				((obj_t) BgL_vz00_20), BUNSPEC);
		}

	}



/* &pre-arithmetic-app-args-set! */
	obj_t BGl_z62prezd2arithmeticzd2appzd2argszd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_6956, obj_t BgL_oz00_6957, obj_t BgL_vz00_6958)
	{
		{	/* Cfa/cinfo2.sch 526 */
			return
				BGl_prezd2arithmeticzd2appzd2argszd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_6957), BgL_vz00_6958);
		}

	}



/* pre-arithmetic-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_prezd2arithmeticzd2appzd2funzd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_21)
	{
		{	/* Cfa/cinfo2.sch 527 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_21)))->BgL_funz00);
		}

	}



/* &pre-arithmetic-app-fun */
	BgL_varz00_bglt BGl_z62prezd2arithmeticzd2appzd2funzb0zzcfa_info2z00(obj_t
		BgL_envz00_6959, obj_t BgL_oz00_6960)
	{
		{	/* Cfa/cinfo2.sch 527 */
			return
				BGl_prezd2arithmeticzd2appzd2funzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_6960));
		}

	}



/* pre-arithmetic-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2arithmeticzd2appzd2funzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_22, BgL_varz00_bglt BgL_vz00_23)
	{
		{	/* Cfa/cinfo2.sch 528 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_22)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_23), BUNSPEC);
		}

	}



/* &pre-arithmetic-app-fun-set! */
	obj_t BGl_z62prezd2arithmeticzd2appzd2funzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_6961, obj_t BgL_oz00_6962, obj_t BgL_vz00_6963)
	{
		{	/* Cfa/cinfo2.sch 528 */
			return
				BGl_prezd2arithmeticzd2appzd2funzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_6962), ((BgL_varz00_bglt) BgL_vz00_6963));
		}

	}



/* pre-arithmetic-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2arithmeticzd2appzd2keyzd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_24)
	{
		{	/* Cfa/cinfo2.sch 529 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_24)))->BgL_keyz00);
		}

	}



/* &pre-arithmetic-app-key */
	obj_t BGl_z62prezd2arithmeticzd2appzd2keyzb0zzcfa_info2z00(obj_t
		BgL_envz00_6964, obj_t BgL_oz00_6965)
	{
		{	/* Cfa/cinfo2.sch 529 */
			return
				BGl_prezd2arithmeticzd2appzd2keyzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_6965));
		}

	}



/* pre-arithmetic-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2arithmeticzd2appzd2keyzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_25, obj_t BgL_vz00_26)
	{
		{	/* Cfa/cinfo2.sch 530 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_25)))->BgL_keyz00) =
				((obj_t) BgL_vz00_26), BUNSPEC);
		}

	}



/* &pre-arithmetic-app-key-set! */
	obj_t BGl_z62prezd2arithmeticzd2appzd2keyzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_6966, obj_t BgL_oz00_6967, obj_t BgL_vz00_6968)
	{
		{	/* Cfa/cinfo2.sch 530 */
			return
				BGl_prezd2arithmeticzd2appzd2keyzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_6967), BgL_vz00_6968);
		}

	}



/* pre-arithmetic-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2arithmeticzd2appzd2sidezd2effectz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_27)
	{
		{	/* Cfa/cinfo2.sch 531 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_27)))->BgL_sidezd2effectzd2);
		}

	}



/* &pre-arithmetic-app-side-effect */
	obj_t BGl_z62prezd2arithmeticzd2appzd2sidezd2effectz62zzcfa_info2z00(obj_t
		BgL_envz00_6969, obj_t BgL_oz00_6970)
	{
		{	/* Cfa/cinfo2.sch 531 */
			return
				BGl_prezd2arithmeticzd2appzd2sidezd2effectz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_6970));
		}

	}



/* pre-arithmetic-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2arithmeticzd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_28, obj_t BgL_vz00_29)
	{
		{	/* Cfa/cinfo2.sch 532 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_28)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_29), BUNSPEC);
		}

	}



/* &pre-arithmetic-app-side-effect-set! */
	obj_t
		BGl_z62prezd2arithmeticzd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00
		(obj_t BgL_envz00_6971, obj_t BgL_oz00_6972, obj_t BgL_vz00_6973)
	{
		{	/* Cfa/cinfo2.sch 532 */
			return
				BGl_prezd2arithmeticzd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_6972), BgL_vz00_6973);
		}

	}



/* pre-arithmetic-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_prezd2arithmeticzd2appzd2typezd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_30)
	{
		{	/* Cfa/cinfo2.sch 533 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_30)))->BgL_typez00);
		}

	}



/* &pre-arithmetic-app-type */
	BgL_typez00_bglt BGl_z62prezd2arithmeticzd2appzd2typezb0zzcfa_info2z00(obj_t
		BgL_envz00_6974, obj_t BgL_oz00_6975)
	{
		{	/* Cfa/cinfo2.sch 533 */
			return
				BGl_prezd2arithmeticzd2appzd2typezd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_6975));
		}

	}



/* pre-arithmetic-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2arithmeticzd2appzd2typezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_31, BgL_typez00_bglt BgL_vz00_32)
	{
		{	/* Cfa/cinfo2.sch 534 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_31)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_32), BUNSPEC);
		}

	}



/* &pre-arithmetic-app-type-set! */
	obj_t BGl_z62prezd2arithmeticzd2appzd2typezd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_6976, obj_t BgL_oz00_6977, obj_t BgL_vz00_6978)
	{
		{	/* Cfa/cinfo2.sch 534 */
			return
				BGl_prezd2arithmeticzd2appzd2typezd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_6977), ((BgL_typez00_bglt) BgL_vz00_6978));
		}

	}



/* pre-arithmetic-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2arithmeticzd2appzd2loczd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_33)
	{
		{	/* Cfa/cinfo2.sch 535 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_33)))->BgL_locz00);
		}

	}



/* &pre-arithmetic-app-loc */
	obj_t BGl_z62prezd2arithmeticzd2appzd2loczb0zzcfa_info2z00(obj_t
		BgL_envz00_6979, obj_t BgL_oz00_6980)
	{
		{	/* Cfa/cinfo2.sch 535 */
			return
				BGl_prezd2arithmeticzd2appzd2loczd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_6980));
		}

	}



/* make-arithmetic-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2arithmeticzd2appz00zzcfa_info2z00(obj_t BgL_loc1683z00_36,
		BgL_typez00_bglt BgL_type1684z00_37, obj_t BgL_sidezd2effect1685zd2_38,
		obj_t BgL_key1686z00_39, BgL_varz00_bglt BgL_fun1687z00_40,
		obj_t BgL_args1688z00_41, obj_t BgL_stackable1689z00_42,
		BgL_approxz00_bglt BgL_approx1690z00_43, obj_t BgL_speczd2types1691zd2_44)
	{
		{	/* Cfa/cinfo2.sch 539 */
			{	/* Cfa/cinfo2.sch 539 */
				BgL_appz00_bglt BgL_new1473z00_8882;

				{	/* Cfa/cinfo2.sch 539 */
					BgL_appz00_bglt BgL_tmp1471z00_8883;
					BgL_arithmeticzd2appzd2_bglt BgL_wide1472z00_8884;

					{
						BgL_appz00_bglt BgL_auxz00_10124;

						{	/* Cfa/cinfo2.sch 539 */
							BgL_appz00_bglt BgL_new1470z00_8885;

							BgL_new1470z00_8885 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 539 */
								long BgL_arg1942z00_8886;

								BgL_arg1942z00_8886 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1470z00_8885),
									BgL_arg1942z00_8886);
							}
							{	/* Cfa/cinfo2.sch 539 */
								BgL_objectz00_bglt BgL_tmpz00_10129;

								BgL_tmpz00_10129 = ((BgL_objectz00_bglt) BgL_new1470z00_8885);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_10129, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1470z00_8885);
							BgL_auxz00_10124 = BgL_new1470z00_8885;
						}
						BgL_tmp1471z00_8883 = ((BgL_appz00_bglt) BgL_auxz00_10124);
					}
					BgL_wide1472z00_8884 =
						((BgL_arithmeticzd2appzd2_bglt) BOBJECT(GC_MALLOC(sizeof(struct
									BgL_arithmeticzd2appzd2_bgl))));
					{	/* Cfa/cinfo2.sch 539 */
						obj_t BgL_auxz00_10137;
						BgL_objectz00_bglt BgL_tmpz00_10135;

						BgL_auxz00_10137 = ((obj_t) BgL_wide1472z00_8884);
						BgL_tmpz00_10135 = ((BgL_objectz00_bglt) BgL_tmp1471z00_8883);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_10135, BgL_auxz00_10137);
					}
					((BgL_objectz00_bglt) BgL_tmp1471z00_8883);
					{	/* Cfa/cinfo2.sch 539 */
						long BgL_arg1941z00_8887;

						BgL_arg1941z00_8887 =
							BGL_CLASS_NUM(BGl_arithmeticzd2appzd2zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1471z00_8883), BgL_arg1941z00_8887);
					}
					BgL_new1473z00_8882 = ((BgL_appz00_bglt) BgL_tmp1471z00_8883);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1473z00_8882)))->BgL_locz00) =
					((obj_t) BgL_loc1683z00_36), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1473z00_8882)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1684z00_37), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1473z00_8882)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1685zd2_38), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1473z00_8882)))->BgL_keyz00) =
					((obj_t) BgL_key1686z00_39), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1473z00_8882)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1687z00_40), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1473z00_8882)))->
						BgL_argsz00) = ((obj_t) BgL_args1688z00_41), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1473z00_8882)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1689z00_42), BUNSPEC);
				{
					BgL_arithmeticzd2appzd2_bglt BgL_auxz00_10159;

					{
						obj_t BgL_auxz00_10160;

						{	/* Cfa/cinfo2.sch 539 */
							BgL_objectz00_bglt BgL_tmpz00_10161;

							BgL_tmpz00_10161 = ((BgL_objectz00_bglt) BgL_new1473z00_8882);
							BgL_auxz00_10160 = BGL_OBJECT_WIDENING(BgL_tmpz00_10161);
						}
						BgL_auxz00_10159 =
							((BgL_arithmeticzd2appzd2_bglt) BgL_auxz00_10160);
					}
					((((BgL_arithmeticzd2appzd2_bglt) COBJECT(BgL_auxz00_10159))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_approx1690z00_43), BUNSPEC);
				}
				{
					BgL_arithmeticzd2appzd2_bglt BgL_auxz00_10166;

					{
						obj_t BgL_auxz00_10167;

						{	/* Cfa/cinfo2.sch 539 */
							BgL_objectz00_bglt BgL_tmpz00_10168;

							BgL_tmpz00_10168 = ((BgL_objectz00_bglt) BgL_new1473z00_8882);
							BgL_auxz00_10167 = BGL_OBJECT_WIDENING(BgL_tmpz00_10168);
						}
						BgL_auxz00_10166 =
							((BgL_arithmeticzd2appzd2_bglt) BgL_auxz00_10167);
					}
					((((BgL_arithmeticzd2appzd2_bglt) COBJECT(BgL_auxz00_10166))->
							BgL_speczd2typeszd2) =
						((obj_t) BgL_speczd2types1691zd2_44), BUNSPEC);
				}
				return BgL_new1473z00_8882;
			}
		}

	}



/* &make-arithmetic-app */
	BgL_appz00_bglt BGl_z62makezd2arithmeticzd2appz62zzcfa_info2z00(obj_t
		BgL_envz00_6981, obj_t BgL_loc1683z00_6982, obj_t BgL_type1684z00_6983,
		obj_t BgL_sidezd2effect1685zd2_6984, obj_t BgL_key1686z00_6985,
		obj_t BgL_fun1687z00_6986, obj_t BgL_args1688z00_6987,
		obj_t BgL_stackable1689z00_6988, obj_t BgL_approx1690z00_6989,
		obj_t BgL_speczd2types1691zd2_6990)
	{
		{	/* Cfa/cinfo2.sch 539 */
			return
				BGl_makezd2arithmeticzd2appz00zzcfa_info2z00(BgL_loc1683z00_6982,
				((BgL_typez00_bglt) BgL_type1684z00_6983),
				BgL_sidezd2effect1685zd2_6984, BgL_key1686z00_6985,
				((BgL_varz00_bglt) BgL_fun1687z00_6986), BgL_args1688z00_6987,
				BgL_stackable1689z00_6988,
				((BgL_approxz00_bglt) BgL_approx1690z00_6989),
				BgL_speczd2types1691zd2_6990);
		}

	}



/* arithmetic-app? */
	BGL_EXPORTED_DEF bool_t BGl_arithmeticzd2appzf3z21zzcfa_info2z00(obj_t
		BgL_objz00_45)
	{
		{	/* Cfa/cinfo2.sch 540 */
			{	/* Cfa/cinfo2.sch 540 */
				obj_t BgL_classz00_8888;

				BgL_classz00_8888 = BGl_arithmeticzd2appzd2zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_45))
					{	/* Cfa/cinfo2.sch 540 */
						BgL_objectz00_bglt BgL_arg1801z00_8889;

						BgL_arg1801z00_8889 = (BgL_objectz00_bglt) (BgL_objz00_45);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 540 */
								long BgL_idxz00_8890;

								BgL_idxz00_8890 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_8889);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_8890 + 4L)) == BgL_classz00_8888);
							}
						else
							{	/* Cfa/cinfo2.sch 540 */
								bool_t BgL_res2835z00_8893;

								{	/* Cfa/cinfo2.sch 540 */
									obj_t BgL_oclassz00_8894;

									{	/* Cfa/cinfo2.sch 540 */
										long BgL_arg1808z00_8895;

										{	/* Cfa/cinfo2.sch 540 */
											long BgL_arg1809z00_8896;

											BgL_arg1809z00_8896 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_8889);
											BgL_arg1808z00_8895 = (BgL_arg1809z00_8896 - OBJECT_TYPE);
										}
										BgL_oclassz00_8894 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_8895);
									}
									{	/* Cfa/cinfo2.sch 540 */
										bool_t BgL__ortest_1115z00_8897;

										BgL__ortest_1115z00_8897 =
											(BgL_classz00_8888 == BgL_oclassz00_8894);
										if (BgL__ortest_1115z00_8897)
											{	/* Cfa/cinfo2.sch 540 */
												BgL_res2835z00_8893 = BgL__ortest_1115z00_8897;
											}
										else
											{	/* Cfa/cinfo2.sch 540 */
												long BgL_odepthz00_8898;

												BgL_odepthz00_8898 =
													BGL_CLASS_DEPTH(BgL_oclassz00_8894);
												if ((4L < BgL_odepthz00_8898))
													{	/* Cfa/cinfo2.sch 540 */
														obj_t BgL_arg1797z00_8899;

														BgL_arg1797z00_8899 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_8894, 4L);
														BgL_res2835z00_8893 =
															(BgL_arg1797z00_8899 == BgL_classz00_8888);
													}
												else
													{	/* Cfa/cinfo2.sch 540 */
														BgL_res2835z00_8893 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2835z00_8893;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 540 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &arithmetic-app? */
	obj_t BGl_z62arithmeticzd2appzf3z43zzcfa_info2z00(obj_t BgL_envz00_6991,
		obj_t BgL_objz00_6992)
	{
		{	/* Cfa/cinfo2.sch 540 */
			return BBOOL(BGl_arithmeticzd2appzf3z21zzcfa_info2z00(BgL_objz00_6992));
		}

	}



/* arithmetic-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_arithmeticzd2appzd2nilz00zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 541 */
			{	/* Cfa/cinfo2.sch 541 */
				obj_t BgL_classz00_5011;

				BgL_classz00_5011 = BGl_arithmeticzd2appzd2zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 541 */
					obj_t BgL__ortest_1117z00_5012;

					BgL__ortest_1117z00_5012 = BGL_CLASS_NIL(BgL_classz00_5011);
					if (CBOOL(BgL__ortest_1117z00_5012))
						{	/* Cfa/cinfo2.sch 541 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_5012);
						}
					else
						{	/* Cfa/cinfo2.sch 541 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_5011));
						}
				}
			}
		}

	}



/* &arithmetic-app-nil */
	BgL_appz00_bglt BGl_z62arithmeticzd2appzd2nilz62zzcfa_info2z00(obj_t
		BgL_envz00_6993)
	{
		{	/* Cfa/cinfo2.sch 541 */
			return BGl_arithmeticzd2appzd2nilz00zzcfa_info2z00();
		}

	}



/* arithmetic-app-spec-types */
	BGL_EXPORTED_DEF obj_t
		BGl_arithmeticzd2appzd2speczd2typeszd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_46)
	{
		{	/* Cfa/cinfo2.sch 542 */
			{
				BgL_arithmeticzd2appzd2_bglt BgL_auxz00_10205;

				{
					obj_t BgL_auxz00_10206;

					{	/* Cfa/cinfo2.sch 542 */
						BgL_objectz00_bglt BgL_tmpz00_10207;

						BgL_tmpz00_10207 = ((BgL_objectz00_bglt) BgL_oz00_46);
						BgL_auxz00_10206 = BGL_OBJECT_WIDENING(BgL_tmpz00_10207);
					}
					BgL_auxz00_10205 = ((BgL_arithmeticzd2appzd2_bglt) BgL_auxz00_10206);
				}
				return
					(((BgL_arithmeticzd2appzd2_bglt) COBJECT(BgL_auxz00_10205))->
					BgL_speczd2typeszd2);
			}
		}

	}



/* &arithmetic-app-spec-types */
	obj_t BGl_z62arithmeticzd2appzd2speczd2typeszb0zzcfa_info2z00(obj_t
		BgL_envz00_6994, obj_t BgL_oz00_6995)
	{
		{	/* Cfa/cinfo2.sch 542 */
			return
				BGl_arithmeticzd2appzd2speczd2typeszd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_6995));
		}

	}



/* arithmetic-app-approx */
	BGL_EXPORTED_DEF BgL_approxz00_bglt
		BGl_arithmeticzd2appzd2approxz00zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_49)
	{
		{	/* Cfa/cinfo2.sch 544 */
			{
				BgL_arithmeticzd2appzd2_bglt BgL_auxz00_10214;

				{
					obj_t BgL_auxz00_10215;

					{	/* Cfa/cinfo2.sch 544 */
						BgL_objectz00_bglt BgL_tmpz00_10216;

						BgL_tmpz00_10216 = ((BgL_objectz00_bglt) BgL_oz00_49);
						BgL_auxz00_10215 = BGL_OBJECT_WIDENING(BgL_tmpz00_10216);
					}
					BgL_auxz00_10214 = ((BgL_arithmeticzd2appzd2_bglt) BgL_auxz00_10215);
				}
				return
					(((BgL_arithmeticzd2appzd2_bglt) COBJECT(BgL_auxz00_10214))->
					BgL_approxz00);
			}
		}

	}



/* &arithmetic-app-approx */
	BgL_approxz00_bglt BGl_z62arithmeticzd2appzd2approxz62zzcfa_info2z00(obj_t
		BgL_envz00_6996, obj_t BgL_oz00_6997)
	{
		{	/* Cfa/cinfo2.sch 544 */
			return
				BGl_arithmeticzd2appzd2approxz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_6997));
		}

	}



/* arithmetic-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_arithmeticzd2appzd2stackablez00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_52)
	{
		{	/* Cfa/cinfo2.sch 546 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_52)))->BgL_stackablez00);
		}

	}



/* &arithmetic-app-stackable */
	obj_t BGl_z62arithmeticzd2appzd2stackablez62zzcfa_info2z00(obj_t
		BgL_envz00_6998, obj_t BgL_oz00_6999)
	{
		{	/* Cfa/cinfo2.sch 546 */
			return
				BGl_arithmeticzd2appzd2stackablez00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_6999));
		}

	}



/* arithmetic-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_arithmeticzd2appzd2stackablezd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_53, obj_t BgL_vz00_54)
	{
		{	/* Cfa/cinfo2.sch 547 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_53)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_54), BUNSPEC);
		}

	}



/* &arithmetic-app-stackable-set! */
	obj_t BGl_z62arithmeticzd2appzd2stackablezd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7000, obj_t BgL_oz00_7001, obj_t BgL_vz00_7002)
	{
		{	/* Cfa/cinfo2.sch 547 */
			return
				BGl_arithmeticzd2appzd2stackablezd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7001), BgL_vz00_7002);
		}

	}



/* arithmetic-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_arithmeticzd2appzd2argsz00zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_55)
	{
		{	/* Cfa/cinfo2.sch 548 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_55)))->BgL_argsz00);
		}

	}



/* &arithmetic-app-args */
	obj_t BGl_z62arithmeticzd2appzd2argsz62zzcfa_info2z00(obj_t BgL_envz00_7003,
		obj_t BgL_oz00_7004)
	{
		{	/* Cfa/cinfo2.sch 548 */
			return
				BGl_arithmeticzd2appzd2argsz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7004));
		}

	}



/* arithmetic-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_arithmeticzd2appzd2argszd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_56, obj_t BgL_vz00_57)
	{
		{	/* Cfa/cinfo2.sch 549 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_56)))->BgL_argsz00) =
				((obj_t) BgL_vz00_57), BUNSPEC);
		}

	}



/* &arithmetic-app-args-set! */
	obj_t BGl_z62arithmeticzd2appzd2argszd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7005, obj_t BgL_oz00_7006, obj_t BgL_vz00_7007)
	{
		{	/* Cfa/cinfo2.sch 549 */
			return
				BGl_arithmeticzd2appzd2argszd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7006), BgL_vz00_7007);
		}

	}



/* arithmetic-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_arithmeticzd2appzd2funz00zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_58)
	{
		{	/* Cfa/cinfo2.sch 550 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_58)))->BgL_funz00);
		}

	}



/* &arithmetic-app-fun */
	BgL_varz00_bglt BGl_z62arithmeticzd2appzd2funz62zzcfa_info2z00(obj_t
		BgL_envz00_7008, obj_t BgL_oz00_7009)
	{
		{	/* Cfa/cinfo2.sch 550 */
			return
				BGl_arithmeticzd2appzd2funz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7009));
		}

	}



/* arithmetic-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_arithmeticzd2appzd2funzd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_59, BgL_varz00_bglt BgL_vz00_60)
	{
		{	/* Cfa/cinfo2.sch 551 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_59)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_60), BUNSPEC);
		}

	}



/* &arithmetic-app-fun-set! */
	obj_t BGl_z62arithmeticzd2appzd2funzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7010, obj_t BgL_oz00_7011, obj_t BgL_vz00_7012)
	{
		{	/* Cfa/cinfo2.sch 551 */
			return
				BGl_arithmeticzd2appzd2funzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7011), ((BgL_varz00_bglt) BgL_vz00_7012));
		}

	}



/* arithmetic-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_arithmeticzd2appzd2keyz00zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_61)
	{
		{	/* Cfa/cinfo2.sch 552 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_61)))->BgL_keyz00);
		}

	}



/* &arithmetic-app-key */
	obj_t BGl_z62arithmeticzd2appzd2keyz62zzcfa_info2z00(obj_t BgL_envz00_7013,
		obj_t BgL_oz00_7014)
	{
		{	/* Cfa/cinfo2.sch 552 */
			return
				BGl_arithmeticzd2appzd2keyz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7014));
		}

	}



/* arithmetic-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_arithmeticzd2appzd2keyzd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_62, obj_t BgL_vz00_63)
	{
		{	/* Cfa/cinfo2.sch 553 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_62)))->BgL_keyz00) =
				((obj_t) BgL_vz00_63), BUNSPEC);
		}

	}



/* &arithmetic-app-key-set! */
	obj_t BGl_z62arithmeticzd2appzd2keyzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7015, obj_t BgL_oz00_7016, obj_t BgL_vz00_7017)
	{
		{	/* Cfa/cinfo2.sch 553 */
			return
				BGl_arithmeticzd2appzd2keyzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7016), BgL_vz00_7017);
		}

	}



/* arithmetic-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_arithmeticzd2appzd2sidezd2effectzd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_64)
	{
		{	/* Cfa/cinfo2.sch 554 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_64)))->BgL_sidezd2effectzd2);
		}

	}



/* &arithmetic-app-side-effect */
	obj_t BGl_z62arithmeticzd2appzd2sidezd2effectzb0zzcfa_info2z00(obj_t
		BgL_envz00_7018, obj_t BgL_oz00_7019)
	{
		{	/* Cfa/cinfo2.sch 554 */
			return
				BGl_arithmeticzd2appzd2sidezd2effectzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7019));
		}

	}



/* arithmetic-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_arithmeticzd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_65, obj_t BgL_vz00_66)
	{
		{	/* Cfa/cinfo2.sch 555 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_65)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_66), BUNSPEC);
		}

	}



/* &arithmetic-app-side-effect-set! */
	obj_t BGl_z62arithmeticzd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7020, obj_t BgL_oz00_7021, obj_t BgL_vz00_7022)
	{
		{	/* Cfa/cinfo2.sch 555 */
			return
				BGl_arithmeticzd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7021), BgL_vz00_7022);
		}

	}



/* arithmetic-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_arithmeticzd2appzd2typez00zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_67)
	{
		{	/* Cfa/cinfo2.sch 556 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_67)))->BgL_typez00);
		}

	}



/* &arithmetic-app-type */
	BgL_typez00_bglt BGl_z62arithmeticzd2appzd2typez62zzcfa_info2z00(obj_t
		BgL_envz00_7023, obj_t BgL_oz00_7024)
	{
		{	/* Cfa/cinfo2.sch 556 */
			return
				BGl_arithmeticzd2appzd2typez00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7024));
		}

	}



/* arithmetic-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_arithmeticzd2appzd2typezd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_68, BgL_typez00_bglt BgL_vz00_69)
	{
		{	/* Cfa/cinfo2.sch 557 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_68)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_69), BUNSPEC);
		}

	}



/* &arithmetic-app-type-set! */
	obj_t BGl_z62arithmeticzd2appzd2typezd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7025, obj_t BgL_oz00_7026, obj_t BgL_vz00_7027)
	{
		{	/* Cfa/cinfo2.sch 557 */
			return
				BGl_arithmeticzd2appzd2typezd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7026), ((BgL_typez00_bglt) BgL_vz00_7027));
		}

	}



/* arithmetic-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_arithmeticzd2appzd2locz00zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_70)
	{
		{	/* Cfa/cinfo2.sch 558 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_70)))->BgL_locz00);
		}

	}



/* &arithmetic-app-loc */
	obj_t BGl_z62arithmeticzd2appzd2locz62zzcfa_info2z00(obj_t BgL_envz00_7028,
		obj_t BgL_oz00_7029)
	{
		{	/* Cfa/cinfo2.sch 558 */
			return
				BGl_arithmeticzd2appzd2locz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7029));
		}

	}



/* make-pre-make-procedure-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2prezd2makezd2procedurezd2appz00zzcfa_info2z00(obj_t
		BgL_loc1674z00_73, BgL_typez00_bglt BgL_type1675z00_74,
		obj_t BgL_sidezd2effect1676zd2_75, obj_t BgL_key1677z00_76,
		BgL_varz00_bglt BgL_fun1678z00_77, obj_t BgL_args1679z00_78,
		obj_t BgL_stackable1680z00_79, BgL_variablez00_bglt BgL_owner1681z00_80)
	{
		{	/* Cfa/cinfo2.sch 562 */
			{	/* Cfa/cinfo2.sch 562 */
				BgL_appz00_bglt BgL_new1477z00_8900;

				{	/* Cfa/cinfo2.sch 562 */
					BgL_appz00_bglt BgL_tmp1475z00_8901;
					BgL_prezd2makezd2procedurezd2appzd2_bglt BgL_wide1476z00_8902;

					{
						BgL_appz00_bglt BgL_auxz00_10277;

						{	/* Cfa/cinfo2.sch 562 */
							BgL_appz00_bglt BgL_new1474z00_8903;

							BgL_new1474z00_8903 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 562 */
								long BgL_arg1944z00_8904;

								BgL_arg1944z00_8904 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1474z00_8903),
									BgL_arg1944z00_8904);
							}
							{	/* Cfa/cinfo2.sch 562 */
								BgL_objectz00_bglt BgL_tmpz00_10282;

								BgL_tmpz00_10282 = ((BgL_objectz00_bglt) BgL_new1474z00_8903);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_10282, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1474z00_8903);
							BgL_auxz00_10277 = BgL_new1474z00_8903;
						}
						BgL_tmp1475z00_8901 = ((BgL_appz00_bglt) BgL_auxz00_10277);
					}
					BgL_wide1476z00_8902 =
						((BgL_prezd2makezd2procedurezd2appzd2_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2makezd2procedurezd2appzd2_bgl))));
					{	/* Cfa/cinfo2.sch 562 */
						obj_t BgL_auxz00_10290;
						BgL_objectz00_bglt BgL_tmpz00_10288;

						BgL_auxz00_10290 = ((obj_t) BgL_wide1476z00_8902);
						BgL_tmpz00_10288 = ((BgL_objectz00_bglt) BgL_tmp1475z00_8901);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_10288, BgL_auxz00_10290);
					}
					((BgL_objectz00_bglt) BgL_tmp1475z00_8901);
					{	/* Cfa/cinfo2.sch 562 */
						long BgL_arg1943z00_8905;

						BgL_arg1943z00_8905 =
							BGL_CLASS_NUM(BGl_prezd2makezd2procedurezd2appzd2zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1475z00_8901), BgL_arg1943z00_8905);
					}
					BgL_new1477z00_8900 = ((BgL_appz00_bglt) BgL_tmp1475z00_8901);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1477z00_8900)))->BgL_locz00) =
					((obj_t) BgL_loc1674z00_73), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1477z00_8900)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1675z00_74), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1477z00_8900)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1676zd2_75), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1477z00_8900)))->BgL_keyz00) =
					((obj_t) BgL_key1677z00_76), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1477z00_8900)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1678z00_77), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1477z00_8900)))->
						BgL_argsz00) = ((obj_t) BgL_args1679z00_78), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1477z00_8900)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1680z00_79), BUNSPEC);
				{
					BgL_prezd2makezd2procedurezd2appzd2_bglt BgL_auxz00_10312;

					{
						obj_t BgL_auxz00_10313;

						{	/* Cfa/cinfo2.sch 562 */
							BgL_objectz00_bglt BgL_tmpz00_10314;

							BgL_tmpz00_10314 = ((BgL_objectz00_bglt) BgL_new1477z00_8900);
							BgL_auxz00_10313 = BGL_OBJECT_WIDENING(BgL_tmpz00_10314);
						}
						BgL_auxz00_10312 =
							((BgL_prezd2makezd2procedurezd2appzd2_bglt) BgL_auxz00_10313);
					}
					((((BgL_prezd2makezd2procedurezd2appzd2_bglt)
								COBJECT(BgL_auxz00_10312))->BgL_ownerz00) =
						((BgL_variablez00_bglt) BgL_owner1681z00_80), BUNSPEC);
				}
				return BgL_new1477z00_8900;
			}
		}

	}



/* &make-pre-make-procedure-app */
	BgL_appz00_bglt
		BGl_z62makezd2prezd2makezd2procedurezd2appz62zzcfa_info2z00(obj_t
		BgL_envz00_7030, obj_t BgL_loc1674z00_7031, obj_t BgL_type1675z00_7032,
		obj_t BgL_sidezd2effect1676zd2_7033, obj_t BgL_key1677z00_7034,
		obj_t BgL_fun1678z00_7035, obj_t BgL_args1679z00_7036,
		obj_t BgL_stackable1680z00_7037, obj_t BgL_owner1681z00_7038)
	{
		{	/* Cfa/cinfo2.sch 562 */
			return
				BGl_makezd2prezd2makezd2procedurezd2appz00zzcfa_info2z00
				(BgL_loc1674z00_7031, ((BgL_typez00_bglt) BgL_type1675z00_7032),
				BgL_sidezd2effect1676zd2_7033, BgL_key1677z00_7034,
				((BgL_varz00_bglt) BgL_fun1678z00_7035), BgL_args1679z00_7036,
				BgL_stackable1680z00_7037,
				((BgL_variablez00_bglt) BgL_owner1681z00_7038));
		}

	}



/* pre-make-procedure-app? */
	BGL_EXPORTED_DEF bool_t
		BGl_prezd2makezd2procedurezd2appzf3z21zzcfa_info2z00(obj_t BgL_objz00_81)
	{
		{	/* Cfa/cinfo2.sch 563 */
			{	/* Cfa/cinfo2.sch 563 */
				obj_t BgL_classz00_8906;

				BgL_classz00_8906 = BGl_prezd2makezd2procedurezd2appzd2zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_81))
					{	/* Cfa/cinfo2.sch 563 */
						BgL_objectz00_bglt BgL_arg1801z00_8907;

						BgL_arg1801z00_8907 = (BgL_objectz00_bglt) (BgL_objz00_81);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 563 */
								long BgL_idxz00_8908;

								BgL_idxz00_8908 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_8907);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_8908 + 4L)) == BgL_classz00_8906);
							}
						else
							{	/* Cfa/cinfo2.sch 563 */
								bool_t BgL_res2836z00_8911;

								{	/* Cfa/cinfo2.sch 563 */
									obj_t BgL_oclassz00_8912;

									{	/* Cfa/cinfo2.sch 563 */
										long BgL_arg1808z00_8913;

										{	/* Cfa/cinfo2.sch 563 */
											long BgL_arg1809z00_8914;

											BgL_arg1809z00_8914 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_8907);
											BgL_arg1808z00_8913 = (BgL_arg1809z00_8914 - OBJECT_TYPE);
										}
										BgL_oclassz00_8912 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_8913);
									}
									{	/* Cfa/cinfo2.sch 563 */
										bool_t BgL__ortest_1115z00_8915;

										BgL__ortest_1115z00_8915 =
											(BgL_classz00_8906 == BgL_oclassz00_8912);
										if (BgL__ortest_1115z00_8915)
											{	/* Cfa/cinfo2.sch 563 */
												BgL_res2836z00_8911 = BgL__ortest_1115z00_8915;
											}
										else
											{	/* Cfa/cinfo2.sch 563 */
												long BgL_odepthz00_8916;

												BgL_odepthz00_8916 =
													BGL_CLASS_DEPTH(BgL_oclassz00_8912);
												if ((4L < BgL_odepthz00_8916))
													{	/* Cfa/cinfo2.sch 563 */
														obj_t BgL_arg1797z00_8917;

														BgL_arg1797z00_8917 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_8912, 4L);
														BgL_res2836z00_8911 =
															(BgL_arg1797z00_8917 == BgL_classz00_8906);
													}
												else
													{	/* Cfa/cinfo2.sch 563 */
														BgL_res2836z00_8911 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2836z00_8911;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 563 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &pre-make-procedure-app? */
	obj_t BGl_z62prezd2makezd2procedurezd2appzf3z43zzcfa_info2z00(obj_t
		BgL_envz00_7039, obj_t BgL_objz00_7040)
	{
		{	/* Cfa/cinfo2.sch 563 */
			return
				BBOOL(BGl_prezd2makezd2procedurezd2appzf3z21zzcfa_info2z00
				(BgL_objz00_7040));
		}

	}



/* pre-make-procedure-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_prezd2makezd2procedurezd2appzd2nilz00zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 564 */
			{	/* Cfa/cinfo2.sch 564 */
				obj_t BgL_classz00_5061;

				BgL_classz00_5061 = BGl_prezd2makezd2procedurezd2appzd2zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 564 */
					obj_t BgL__ortest_1117z00_5062;

					BgL__ortest_1117z00_5062 = BGL_CLASS_NIL(BgL_classz00_5061);
					if (CBOOL(BgL__ortest_1117z00_5062))
						{	/* Cfa/cinfo2.sch 564 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_5062);
						}
					else
						{	/* Cfa/cinfo2.sch 564 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_5061));
						}
				}
			}
		}

	}



/* &pre-make-procedure-app-nil */
	BgL_appz00_bglt
		BGl_z62prezd2makezd2procedurezd2appzd2nilz62zzcfa_info2z00(obj_t
		BgL_envz00_7041)
	{
		{	/* Cfa/cinfo2.sch 564 */
			return BGl_prezd2makezd2procedurezd2appzd2nilz00zzcfa_info2z00();
		}

	}



/* pre-make-procedure-app-owner */
	BGL_EXPORTED_DEF BgL_variablez00_bglt
		BGl_prezd2makezd2procedurezd2appzd2ownerz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_82)
	{
		{	/* Cfa/cinfo2.sch 565 */
			{
				BgL_prezd2makezd2procedurezd2appzd2_bglt BgL_auxz00_10351;

				{
					obj_t BgL_auxz00_10352;

					{	/* Cfa/cinfo2.sch 565 */
						BgL_objectz00_bglt BgL_tmpz00_10353;

						BgL_tmpz00_10353 = ((BgL_objectz00_bglt) BgL_oz00_82);
						BgL_auxz00_10352 = BGL_OBJECT_WIDENING(BgL_tmpz00_10353);
					}
					BgL_auxz00_10351 =
						((BgL_prezd2makezd2procedurezd2appzd2_bglt) BgL_auxz00_10352);
				}
				return
					(((BgL_prezd2makezd2procedurezd2appzd2_bglt)
						COBJECT(BgL_auxz00_10351))->BgL_ownerz00);
			}
		}

	}



/* &pre-make-procedure-app-owner */
	BgL_variablez00_bglt
		BGl_z62prezd2makezd2procedurezd2appzd2ownerz62zzcfa_info2z00(obj_t
		BgL_envz00_7042, obj_t BgL_oz00_7043)
	{
		{	/* Cfa/cinfo2.sch 565 */
			return
				BGl_prezd2makezd2procedurezd2appzd2ownerz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7043));
		}

	}



/* pre-make-procedure-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2procedurezd2appzd2stackablez00zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_85)
	{
		{	/* Cfa/cinfo2.sch 567 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_85)))->BgL_stackablez00);
		}

	}



/* &pre-make-procedure-app-stackable */
	obj_t BGl_z62prezd2makezd2procedurezd2appzd2stackablez62zzcfa_info2z00(obj_t
		BgL_envz00_7044, obj_t BgL_oz00_7045)
	{
		{	/* Cfa/cinfo2.sch 567 */
			return
				BGl_prezd2makezd2procedurezd2appzd2stackablez00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7045));
		}

	}



/* pre-make-procedure-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2procedurezd2appzd2stackablezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_86, obj_t BgL_vz00_87)
	{
		{	/* Cfa/cinfo2.sch 568 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_86)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_87), BUNSPEC);
		}

	}



/* &pre-make-procedure-app-stackable-set! */
	obj_t
		BGl_z62prezd2makezd2procedurezd2appzd2stackablezd2setz12za2zzcfa_info2z00
		(obj_t BgL_envz00_7046, obj_t BgL_oz00_7047, obj_t BgL_vz00_7048)
	{
		{	/* Cfa/cinfo2.sch 568 */
			return
				BGl_prezd2makezd2procedurezd2appzd2stackablezd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7047), BgL_vz00_7048);
		}

	}



/* pre-make-procedure-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2procedurezd2appzd2argsz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_88)
	{
		{	/* Cfa/cinfo2.sch 569 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_88)))->BgL_argsz00);
		}

	}



/* &pre-make-procedure-app-args */
	obj_t BGl_z62prezd2makezd2procedurezd2appzd2argsz62zzcfa_info2z00(obj_t
		BgL_envz00_7049, obj_t BgL_oz00_7050)
	{
		{	/* Cfa/cinfo2.sch 569 */
			return
				BGl_prezd2makezd2procedurezd2appzd2argsz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7050));
		}

	}



/* pre-make-procedure-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2procedurezd2appzd2argszd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_89, obj_t BgL_vz00_90)
	{
		{	/* Cfa/cinfo2.sch 570 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_89)))->BgL_argsz00) =
				((obj_t) BgL_vz00_90), BUNSPEC);
		}

	}



/* &pre-make-procedure-app-args-set! */
	obj_t
		BGl_z62prezd2makezd2procedurezd2appzd2argszd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7051, obj_t BgL_oz00_7052, obj_t BgL_vz00_7053)
	{
		{	/* Cfa/cinfo2.sch 570 */
			return
				BGl_prezd2makezd2procedurezd2appzd2argszd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7052), BgL_vz00_7053);
		}

	}



/* pre-make-procedure-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_prezd2makezd2procedurezd2appzd2funz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_91)
	{
		{	/* Cfa/cinfo2.sch 571 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_91)))->BgL_funz00);
		}

	}



/* &pre-make-procedure-app-fun */
	BgL_varz00_bglt
		BGl_z62prezd2makezd2procedurezd2appzd2funz62zzcfa_info2z00(obj_t
		BgL_envz00_7054, obj_t BgL_oz00_7055)
	{
		{	/* Cfa/cinfo2.sch 571 */
			return
				BGl_prezd2makezd2procedurezd2appzd2funz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7055));
		}

	}



/* pre-make-procedure-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2procedurezd2appzd2funzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_92, BgL_varz00_bglt BgL_vz00_93)
	{
		{	/* Cfa/cinfo2.sch 572 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_92)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_93), BUNSPEC);
		}

	}



/* &pre-make-procedure-app-fun-set! */
	obj_t
		BGl_z62prezd2makezd2procedurezd2appzd2funzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7056, obj_t BgL_oz00_7057, obj_t BgL_vz00_7058)
	{
		{	/* Cfa/cinfo2.sch 572 */
			return
				BGl_prezd2makezd2procedurezd2appzd2funzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7057), ((BgL_varz00_bglt) BgL_vz00_7058));
		}

	}



/* pre-make-procedure-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2procedurezd2appzd2keyz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_94)
	{
		{	/* Cfa/cinfo2.sch 573 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_94)))->BgL_keyz00);
		}

	}



/* &pre-make-procedure-app-key */
	obj_t BGl_z62prezd2makezd2procedurezd2appzd2keyz62zzcfa_info2z00(obj_t
		BgL_envz00_7059, obj_t BgL_oz00_7060)
	{
		{	/* Cfa/cinfo2.sch 573 */
			return
				BGl_prezd2makezd2procedurezd2appzd2keyz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7060));
		}

	}



/* pre-make-procedure-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2procedurezd2appzd2keyzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_95, obj_t BgL_vz00_96)
	{
		{	/* Cfa/cinfo2.sch 574 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_95)))->BgL_keyz00) =
				((obj_t) BgL_vz00_96), BUNSPEC);
		}

	}



/* &pre-make-procedure-app-key-set! */
	obj_t
		BGl_z62prezd2makezd2procedurezd2appzd2keyzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7061, obj_t BgL_oz00_7062, obj_t BgL_vz00_7063)
	{
		{	/* Cfa/cinfo2.sch 574 */
			return
				BGl_prezd2makezd2procedurezd2appzd2keyzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7062), BgL_vz00_7063);
		}

	}



/* pre-make-procedure-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2procedurezd2appzd2sidezd2effectzd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_97)
	{
		{	/* Cfa/cinfo2.sch 575 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_97)))->BgL_sidezd2effectzd2);
		}

	}



/* &pre-make-procedure-app-side-effect */
	obj_t
		BGl_z62prezd2makezd2procedurezd2appzd2sidezd2effectzb0zzcfa_info2z00(obj_t
		BgL_envz00_7064, obj_t BgL_oz00_7065)
	{
		{	/* Cfa/cinfo2.sch 575 */
			return
				BGl_prezd2makezd2procedurezd2appzd2sidezd2effectzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7065));
		}

	}



/* pre-make-procedure-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2procedurezd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_98, obj_t BgL_vz00_99)
	{
		{	/* Cfa/cinfo2.sch 576 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_98)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_99), BUNSPEC);
		}

	}



/* &pre-make-procedure-app-side-effect-set! */
	obj_t
		BGl_z62prezd2makezd2procedurezd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00
		(obj_t BgL_envz00_7066, obj_t BgL_oz00_7067, obj_t BgL_vz00_7068)
	{
		{	/* Cfa/cinfo2.sch 576 */
			return
				BGl_prezd2makezd2procedurezd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00
				(((BgL_appz00_bglt) BgL_oz00_7067), BgL_vz00_7068);
		}

	}



/* pre-make-procedure-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_prezd2makezd2procedurezd2appzd2typez00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_100)
	{
		{	/* Cfa/cinfo2.sch 577 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_100)))->BgL_typez00);
		}

	}



/* &pre-make-procedure-app-type */
	BgL_typez00_bglt
		BGl_z62prezd2makezd2procedurezd2appzd2typez62zzcfa_info2z00(obj_t
		BgL_envz00_7069, obj_t BgL_oz00_7070)
	{
		{	/* Cfa/cinfo2.sch 577 */
			return
				BGl_prezd2makezd2procedurezd2appzd2typez00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7070));
		}

	}



/* pre-make-procedure-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2procedurezd2appzd2typezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_101, BgL_typez00_bglt BgL_vz00_102)
	{
		{	/* Cfa/cinfo2.sch 578 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_101)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_102), BUNSPEC);
		}

	}



/* &pre-make-procedure-app-type-set! */
	obj_t
		BGl_z62prezd2makezd2procedurezd2appzd2typezd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7071, obj_t BgL_oz00_7072, obj_t BgL_vz00_7073)
	{
		{	/* Cfa/cinfo2.sch 578 */
			return
				BGl_prezd2makezd2procedurezd2appzd2typezd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7072), ((BgL_typez00_bglt) BgL_vz00_7073));
		}

	}



/* pre-make-procedure-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2procedurezd2appzd2locz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_103)
	{
		{	/* Cfa/cinfo2.sch 579 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_103)))->BgL_locz00);
		}

	}



/* &pre-make-procedure-app-loc */
	obj_t BGl_z62prezd2makezd2procedurezd2appzd2locz62zzcfa_info2z00(obj_t
		BgL_envz00_7074, obj_t BgL_oz00_7075)
	{
		{	/* Cfa/cinfo2.sch 579 */
			return
				BGl_prezd2makezd2procedurezd2appzd2locz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7075));
		}

	}



/* make-pre-procedure-ref-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2prezd2procedurezd2refzd2appz00zzcfa_info2z00(obj_t
		BgL_loc1666z00_106, BgL_typez00_bglt BgL_type1667z00_107,
		obj_t BgL_sidezd2effect1668zd2_108, obj_t BgL_key1669z00_109,
		BgL_varz00_bglt BgL_fun1670z00_110, obj_t BgL_args1671z00_111,
		obj_t BgL_stackable1672z00_112)
	{
		{	/* Cfa/cinfo2.sch 583 */
			{	/* Cfa/cinfo2.sch 583 */
				BgL_appz00_bglt BgL_new1481z00_8918;

				{	/* Cfa/cinfo2.sch 583 */
					BgL_appz00_bglt BgL_tmp1479z00_8919;
					BgL_prezd2procedurezd2refzd2appzd2_bglt BgL_wide1480z00_8920;

					{
						BgL_appz00_bglt BgL_auxz00_10414;

						{	/* Cfa/cinfo2.sch 583 */
							BgL_appz00_bglt BgL_new1478z00_8921;

							BgL_new1478z00_8921 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 583 */
								long BgL_arg1946z00_8922;

								BgL_arg1946z00_8922 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1478z00_8921),
									BgL_arg1946z00_8922);
							}
							{	/* Cfa/cinfo2.sch 583 */
								BgL_objectz00_bglt BgL_tmpz00_10419;

								BgL_tmpz00_10419 = ((BgL_objectz00_bglt) BgL_new1478z00_8921);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_10419, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1478z00_8921);
							BgL_auxz00_10414 = BgL_new1478z00_8921;
						}
						BgL_tmp1479z00_8919 = ((BgL_appz00_bglt) BgL_auxz00_10414);
					}
					BgL_wide1480z00_8920 =
						((BgL_prezd2procedurezd2refzd2appzd2_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2procedurezd2refzd2appzd2_bgl))));
					{	/* Cfa/cinfo2.sch 583 */
						obj_t BgL_auxz00_10427;
						BgL_objectz00_bglt BgL_tmpz00_10425;

						BgL_auxz00_10427 = ((obj_t) BgL_wide1480z00_8920);
						BgL_tmpz00_10425 = ((BgL_objectz00_bglt) BgL_tmp1479z00_8919);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_10425, BgL_auxz00_10427);
					}
					((BgL_objectz00_bglt) BgL_tmp1479z00_8919);
					{	/* Cfa/cinfo2.sch 583 */
						long BgL_arg1945z00_8923;

						BgL_arg1945z00_8923 =
							BGL_CLASS_NUM(BGl_prezd2procedurezd2refzd2appzd2zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1479z00_8919), BgL_arg1945z00_8923);
					}
					BgL_new1481z00_8918 = ((BgL_appz00_bglt) BgL_tmp1479z00_8919);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1481z00_8918)))->BgL_locz00) =
					((obj_t) BgL_loc1666z00_106), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1481z00_8918)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1667z00_107), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1481z00_8918)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1668zd2_108), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1481z00_8918)))->BgL_keyz00) =
					((obj_t) BgL_key1669z00_109), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1481z00_8918)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1670z00_110), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1481z00_8918)))->
						BgL_argsz00) = ((obj_t) BgL_args1671z00_111), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1481z00_8918)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1672z00_112), BUNSPEC);
				return BgL_new1481z00_8918;
			}
		}

	}



/* &make-pre-procedure-ref-app */
	BgL_appz00_bglt
		BGl_z62makezd2prezd2procedurezd2refzd2appz62zzcfa_info2z00(obj_t
		BgL_envz00_7076, obj_t BgL_loc1666z00_7077, obj_t BgL_type1667z00_7078,
		obj_t BgL_sidezd2effect1668zd2_7079, obj_t BgL_key1669z00_7080,
		obj_t BgL_fun1670z00_7081, obj_t BgL_args1671z00_7082,
		obj_t BgL_stackable1672z00_7083)
	{
		{	/* Cfa/cinfo2.sch 583 */
			return
				BGl_makezd2prezd2procedurezd2refzd2appz00zzcfa_info2z00
				(BgL_loc1666z00_7077, ((BgL_typez00_bglt) BgL_type1667z00_7078),
				BgL_sidezd2effect1668zd2_7079, BgL_key1669z00_7080,
				((BgL_varz00_bglt) BgL_fun1670z00_7081), BgL_args1671z00_7082,
				BgL_stackable1672z00_7083);
		}

	}



/* pre-procedure-ref-app? */
	BGL_EXPORTED_DEF bool_t
		BGl_prezd2procedurezd2refzd2appzf3z21zzcfa_info2z00(obj_t BgL_objz00_113)
	{
		{	/* Cfa/cinfo2.sch 584 */
			{	/* Cfa/cinfo2.sch 584 */
				obj_t BgL_classz00_8924;

				BgL_classz00_8924 = BGl_prezd2procedurezd2refzd2appzd2zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_113))
					{	/* Cfa/cinfo2.sch 584 */
						BgL_objectz00_bglt BgL_arg1801z00_8925;

						BgL_arg1801z00_8925 = (BgL_objectz00_bglt) (BgL_objz00_113);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 584 */
								long BgL_idxz00_8926;

								BgL_idxz00_8926 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_8925);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_8926 + 4L)) == BgL_classz00_8924);
							}
						else
							{	/* Cfa/cinfo2.sch 584 */
								bool_t BgL_res2837z00_8929;

								{	/* Cfa/cinfo2.sch 584 */
									obj_t BgL_oclassz00_8930;

									{	/* Cfa/cinfo2.sch 584 */
										long BgL_arg1808z00_8931;

										{	/* Cfa/cinfo2.sch 584 */
											long BgL_arg1809z00_8932;

											BgL_arg1809z00_8932 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_8925);
											BgL_arg1808z00_8931 = (BgL_arg1809z00_8932 - OBJECT_TYPE);
										}
										BgL_oclassz00_8930 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_8931);
									}
									{	/* Cfa/cinfo2.sch 584 */
										bool_t BgL__ortest_1115z00_8933;

										BgL__ortest_1115z00_8933 =
											(BgL_classz00_8924 == BgL_oclassz00_8930);
										if (BgL__ortest_1115z00_8933)
											{	/* Cfa/cinfo2.sch 584 */
												BgL_res2837z00_8929 = BgL__ortest_1115z00_8933;
											}
										else
											{	/* Cfa/cinfo2.sch 584 */
												long BgL_odepthz00_8934;

												BgL_odepthz00_8934 =
													BGL_CLASS_DEPTH(BgL_oclassz00_8930);
												if ((4L < BgL_odepthz00_8934))
													{	/* Cfa/cinfo2.sch 584 */
														obj_t BgL_arg1797z00_8935;

														BgL_arg1797z00_8935 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_8930, 4L);
														BgL_res2837z00_8929 =
															(BgL_arg1797z00_8935 == BgL_classz00_8924);
													}
												else
													{	/* Cfa/cinfo2.sch 584 */
														BgL_res2837z00_8929 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2837z00_8929;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 584 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &pre-procedure-ref-app? */
	obj_t BGl_z62prezd2procedurezd2refzd2appzf3z43zzcfa_info2z00(obj_t
		BgL_envz00_7084, obj_t BgL_objz00_7085)
	{
		{	/* Cfa/cinfo2.sch 584 */
			return
				BBOOL(BGl_prezd2procedurezd2refzd2appzf3z21zzcfa_info2z00
				(BgL_objz00_7085));
		}

	}



/* pre-procedure-ref-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_prezd2procedurezd2refzd2appzd2nilz00zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 585 */
			{	/* Cfa/cinfo2.sch 585 */
				obj_t BgL_classz00_5109;

				BgL_classz00_5109 = BGl_prezd2procedurezd2refzd2appzd2zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 585 */
					obj_t BgL__ortest_1117z00_5110;

					BgL__ortest_1117z00_5110 = BGL_CLASS_NIL(BgL_classz00_5109);
					if (CBOOL(BgL__ortest_1117z00_5110))
						{	/* Cfa/cinfo2.sch 585 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_5110);
						}
					else
						{	/* Cfa/cinfo2.sch 585 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_5109));
						}
				}
			}
		}

	}



/* &pre-procedure-ref-app-nil */
	BgL_appz00_bglt
		BGl_z62prezd2procedurezd2refzd2appzd2nilz62zzcfa_info2z00(obj_t
		BgL_envz00_7086)
	{
		{	/* Cfa/cinfo2.sch 585 */
			return BGl_prezd2procedurezd2refzd2appzd2nilz00zzcfa_info2z00();
		}

	}



/* pre-procedure-ref-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2refzd2appzd2stackablez00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_114)
	{
		{	/* Cfa/cinfo2.sch 586 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_114)))->BgL_stackablez00);
		}

	}



/* &pre-procedure-ref-app-stackable */
	obj_t BGl_z62prezd2procedurezd2refzd2appzd2stackablez62zzcfa_info2z00(obj_t
		BgL_envz00_7087, obj_t BgL_oz00_7088)
	{
		{	/* Cfa/cinfo2.sch 586 */
			return
				BGl_prezd2procedurezd2refzd2appzd2stackablez00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7088));
		}

	}



/* pre-procedure-ref-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2refzd2appzd2stackablezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_115, obj_t BgL_vz00_116)
	{
		{	/* Cfa/cinfo2.sch 587 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_115)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_116), BUNSPEC);
		}

	}



/* &pre-procedure-ref-app-stackable-set! */
	obj_t
		BGl_z62prezd2procedurezd2refzd2appzd2stackablezd2setz12za2zzcfa_info2z00
		(obj_t BgL_envz00_7089, obj_t BgL_oz00_7090, obj_t BgL_vz00_7091)
	{
		{	/* Cfa/cinfo2.sch 587 */
			return
				BGl_prezd2procedurezd2refzd2appzd2stackablezd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7090), BgL_vz00_7091);
		}

	}



/* pre-procedure-ref-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2refzd2appzd2argsz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_117)
	{
		{	/* Cfa/cinfo2.sch 588 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_117)))->BgL_argsz00);
		}

	}



/* &pre-procedure-ref-app-args */
	obj_t BGl_z62prezd2procedurezd2refzd2appzd2argsz62zzcfa_info2z00(obj_t
		BgL_envz00_7092, obj_t BgL_oz00_7093)
	{
		{	/* Cfa/cinfo2.sch 588 */
			return
				BGl_prezd2procedurezd2refzd2appzd2argsz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7093));
		}

	}



/* pre-procedure-ref-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2refzd2appzd2argszd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_118, obj_t BgL_vz00_119)
	{
		{	/* Cfa/cinfo2.sch 589 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_118)))->BgL_argsz00) =
				((obj_t) BgL_vz00_119), BUNSPEC);
		}

	}



/* &pre-procedure-ref-app-args-set! */
	obj_t
		BGl_z62prezd2procedurezd2refzd2appzd2argszd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7094, obj_t BgL_oz00_7095, obj_t BgL_vz00_7096)
	{
		{	/* Cfa/cinfo2.sch 589 */
			return
				BGl_prezd2procedurezd2refzd2appzd2argszd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7095), BgL_vz00_7096);
		}

	}



/* pre-procedure-ref-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_prezd2procedurezd2refzd2appzd2funz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_120)
	{
		{	/* Cfa/cinfo2.sch 590 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_120)))->BgL_funz00);
		}

	}



/* &pre-procedure-ref-app-fun */
	BgL_varz00_bglt
		BGl_z62prezd2procedurezd2refzd2appzd2funz62zzcfa_info2z00(obj_t
		BgL_envz00_7097, obj_t BgL_oz00_7098)
	{
		{	/* Cfa/cinfo2.sch 590 */
			return
				BGl_prezd2procedurezd2refzd2appzd2funz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7098));
		}

	}



/* pre-procedure-ref-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2refzd2appzd2funzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_121, BgL_varz00_bglt BgL_vz00_122)
	{
		{	/* Cfa/cinfo2.sch 591 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_121)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_122), BUNSPEC);
		}

	}



/* &pre-procedure-ref-app-fun-set! */
	obj_t BGl_z62prezd2procedurezd2refzd2appzd2funzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7099, obj_t BgL_oz00_7100, obj_t BgL_vz00_7101)
	{
		{	/* Cfa/cinfo2.sch 591 */
			return
				BGl_prezd2procedurezd2refzd2appzd2funzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7100), ((BgL_varz00_bglt) BgL_vz00_7101));
		}

	}



/* pre-procedure-ref-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2refzd2appzd2keyz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_123)
	{
		{	/* Cfa/cinfo2.sch 592 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_123)))->BgL_keyz00);
		}

	}



/* &pre-procedure-ref-app-key */
	obj_t BGl_z62prezd2procedurezd2refzd2appzd2keyz62zzcfa_info2z00(obj_t
		BgL_envz00_7102, obj_t BgL_oz00_7103)
	{
		{	/* Cfa/cinfo2.sch 592 */
			return
				BGl_prezd2procedurezd2refzd2appzd2keyz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7103));
		}

	}



/* pre-procedure-ref-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2refzd2appzd2keyzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_124, obj_t BgL_vz00_125)
	{
		{	/* Cfa/cinfo2.sch 593 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_124)))->BgL_keyz00) =
				((obj_t) BgL_vz00_125), BUNSPEC);
		}

	}



/* &pre-procedure-ref-app-key-set! */
	obj_t BGl_z62prezd2procedurezd2refzd2appzd2keyzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7104, obj_t BgL_oz00_7105, obj_t BgL_vz00_7106)
	{
		{	/* Cfa/cinfo2.sch 593 */
			return
				BGl_prezd2procedurezd2refzd2appzd2keyzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7105), BgL_vz00_7106);
		}

	}



/* pre-procedure-ref-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2refzd2appzd2sidezd2effectzd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_126)
	{
		{	/* Cfa/cinfo2.sch 594 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_126)))->BgL_sidezd2effectzd2);
		}

	}



/* &pre-procedure-ref-app-side-effect */
	obj_t
		BGl_z62prezd2procedurezd2refzd2appzd2sidezd2effectzb0zzcfa_info2z00(obj_t
		BgL_envz00_7107, obj_t BgL_oz00_7108)
	{
		{	/* Cfa/cinfo2.sch 594 */
			return
				BGl_prezd2procedurezd2refzd2appzd2sidezd2effectzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7108));
		}

	}



/* pre-procedure-ref-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2refzd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_127, obj_t BgL_vz00_128)
	{
		{	/* Cfa/cinfo2.sch 595 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_127)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_128), BUNSPEC);
		}

	}



/* &pre-procedure-ref-app-side-effect-set! */
	obj_t
		BGl_z62prezd2procedurezd2refzd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00
		(obj_t BgL_envz00_7109, obj_t BgL_oz00_7110, obj_t BgL_vz00_7111)
	{
		{	/* Cfa/cinfo2.sch 595 */
			return
				BGl_prezd2procedurezd2refzd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00
				(((BgL_appz00_bglt) BgL_oz00_7110), BgL_vz00_7111);
		}

	}



/* pre-procedure-ref-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_prezd2procedurezd2refzd2appzd2typez00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_129)
	{
		{	/* Cfa/cinfo2.sch 596 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_129)))->BgL_typez00);
		}

	}



/* &pre-procedure-ref-app-type */
	BgL_typez00_bglt
		BGl_z62prezd2procedurezd2refzd2appzd2typez62zzcfa_info2z00(obj_t
		BgL_envz00_7112, obj_t BgL_oz00_7113)
	{
		{	/* Cfa/cinfo2.sch 596 */
			return
				BGl_prezd2procedurezd2refzd2appzd2typez00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7113));
		}

	}



/* pre-procedure-ref-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2refzd2appzd2typezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_130, BgL_typez00_bglt BgL_vz00_131)
	{
		{	/* Cfa/cinfo2.sch 597 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_130)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_131), BUNSPEC);
		}

	}



/* &pre-procedure-ref-app-type-set! */
	obj_t
		BGl_z62prezd2procedurezd2refzd2appzd2typezd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7114, obj_t BgL_oz00_7115, obj_t BgL_vz00_7116)
	{
		{	/* Cfa/cinfo2.sch 597 */
			return
				BGl_prezd2procedurezd2refzd2appzd2typezd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7115), ((BgL_typez00_bglt) BgL_vz00_7116));
		}

	}



/* pre-procedure-ref-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2refzd2appzd2locz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_132)
	{
		{	/* Cfa/cinfo2.sch 598 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_132)))->BgL_locz00);
		}

	}



/* &pre-procedure-ref-app-loc */
	obj_t BGl_z62prezd2procedurezd2refzd2appzd2locz62zzcfa_info2z00(obj_t
		BgL_envz00_7117, obj_t BgL_oz00_7118)
	{
		{	/* Cfa/cinfo2.sch 598 */
			return
				BGl_prezd2procedurezd2refzd2appzd2locz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7118));
		}

	}



/* make-pre-procedure-set!-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2prezd2procedurezd2setz12zd2appz12zzcfa_info2z00(obj_t
		BgL_loc1657z00_135, BgL_typez00_bglt BgL_type1658z00_136,
		obj_t BgL_sidezd2effect1659zd2_137, obj_t BgL_key1660z00_138,
		BgL_varz00_bglt BgL_fun1662z00_139, obj_t BgL_args1663z00_140,
		obj_t BgL_stackable1664z00_141)
	{
		{	/* Cfa/cinfo2.sch 602 */
			{	/* Cfa/cinfo2.sch 602 */
				BgL_appz00_bglt BgL_new1485z00_8936;

				{	/* Cfa/cinfo2.sch 602 */
					BgL_appz00_bglt BgL_tmp1483z00_8937;
					BgL_prezd2procedurezd2setz12zd2appzc0_bglt BgL_wide1484z00_8938;

					{
						BgL_appz00_bglt BgL_auxz00_10534;

						{	/* Cfa/cinfo2.sch 602 */
							BgL_appz00_bglt BgL_new1482z00_8939;

							BgL_new1482z00_8939 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 602 */
								long BgL_arg1948z00_8940;

								BgL_arg1948z00_8940 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1482z00_8939),
									BgL_arg1948z00_8940);
							}
							{	/* Cfa/cinfo2.sch 602 */
								BgL_objectz00_bglt BgL_tmpz00_10539;

								BgL_tmpz00_10539 = ((BgL_objectz00_bglt) BgL_new1482z00_8939);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_10539, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1482z00_8939);
							BgL_auxz00_10534 = BgL_new1482z00_8939;
						}
						BgL_tmp1483z00_8937 = ((BgL_appz00_bglt) BgL_auxz00_10534);
					}
					BgL_wide1484z00_8938 =
						((BgL_prezd2procedurezd2setz12zd2appzc0_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2procedurezd2setz12zd2appzc0_bgl))));
					{	/* Cfa/cinfo2.sch 602 */
						obj_t BgL_auxz00_10547;
						BgL_objectz00_bglt BgL_tmpz00_10545;

						BgL_auxz00_10547 = ((obj_t) BgL_wide1484z00_8938);
						BgL_tmpz00_10545 = ((BgL_objectz00_bglt) BgL_tmp1483z00_8937);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_10545, BgL_auxz00_10547);
					}
					((BgL_objectz00_bglt) BgL_tmp1483z00_8937);
					{	/* Cfa/cinfo2.sch 602 */
						long BgL_arg1947z00_8941;

						BgL_arg1947z00_8941 =
							BGL_CLASS_NUM
							(BGl_prezd2procedurezd2setz12zd2appzc0zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(((BgL_objectz00_bglt) BgL_tmp1483z00_8937),
							BgL_arg1947z00_8941);
					}
					BgL_new1485z00_8936 = ((BgL_appz00_bglt) BgL_tmp1483z00_8937);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1485z00_8936)))->BgL_locz00) =
					((obj_t) BgL_loc1657z00_135), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1485z00_8936)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1658z00_136), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1485z00_8936)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1659zd2_137), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1485z00_8936)))->BgL_keyz00) =
					((obj_t) BgL_key1660z00_138), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1485z00_8936)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1662z00_139), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1485z00_8936)))->
						BgL_argsz00) = ((obj_t) BgL_args1663z00_140), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1485z00_8936)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1664z00_141), BUNSPEC);
				return BgL_new1485z00_8936;
			}
		}

	}



/* &make-pre-procedure-set!-app */
	BgL_appz00_bglt
		BGl_z62makezd2prezd2procedurezd2setz12zd2appz70zzcfa_info2z00(obj_t
		BgL_envz00_7119, obj_t BgL_loc1657z00_7120, obj_t BgL_type1658z00_7121,
		obj_t BgL_sidezd2effect1659zd2_7122, obj_t BgL_key1660z00_7123,
		obj_t BgL_fun1662z00_7124, obj_t BgL_args1663z00_7125,
		obj_t BgL_stackable1664z00_7126)
	{
		{	/* Cfa/cinfo2.sch 602 */
			return
				BGl_makezd2prezd2procedurezd2setz12zd2appz12zzcfa_info2z00
				(BgL_loc1657z00_7120, ((BgL_typez00_bglt) BgL_type1658z00_7121),
				BgL_sidezd2effect1659zd2_7122, BgL_key1660z00_7123,
				((BgL_varz00_bglt) BgL_fun1662z00_7124), BgL_args1663z00_7125,
				BgL_stackable1664z00_7126);
		}

	}



/* pre-procedure-set!-app? */
	BGL_EXPORTED_DEF bool_t
		BGl_prezd2procedurezd2setz12zd2appzf3z33zzcfa_info2z00(obj_t BgL_objz00_142)
	{
		{	/* Cfa/cinfo2.sch 603 */
			{	/* Cfa/cinfo2.sch 603 */
				obj_t BgL_classz00_8942;

				BgL_classz00_8942 = BGl_prezd2procedurezd2setz12zd2appzc0zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_142))
					{	/* Cfa/cinfo2.sch 603 */
						BgL_objectz00_bglt BgL_arg1801z00_8943;

						BgL_arg1801z00_8943 = (BgL_objectz00_bglt) (BgL_objz00_142);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 603 */
								long BgL_idxz00_8944;

								BgL_idxz00_8944 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_8943);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_8944 + 4L)) == BgL_classz00_8942);
							}
						else
							{	/* Cfa/cinfo2.sch 603 */
								bool_t BgL_res2838z00_8947;

								{	/* Cfa/cinfo2.sch 603 */
									obj_t BgL_oclassz00_8948;

									{	/* Cfa/cinfo2.sch 603 */
										long BgL_arg1808z00_8949;

										{	/* Cfa/cinfo2.sch 603 */
											long BgL_arg1809z00_8950;

											BgL_arg1809z00_8950 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_8943);
											BgL_arg1808z00_8949 = (BgL_arg1809z00_8950 - OBJECT_TYPE);
										}
										BgL_oclassz00_8948 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_8949);
									}
									{	/* Cfa/cinfo2.sch 603 */
										bool_t BgL__ortest_1115z00_8951;

										BgL__ortest_1115z00_8951 =
											(BgL_classz00_8942 == BgL_oclassz00_8948);
										if (BgL__ortest_1115z00_8951)
											{	/* Cfa/cinfo2.sch 603 */
												BgL_res2838z00_8947 = BgL__ortest_1115z00_8951;
											}
										else
											{	/* Cfa/cinfo2.sch 603 */
												long BgL_odepthz00_8952;

												BgL_odepthz00_8952 =
													BGL_CLASS_DEPTH(BgL_oclassz00_8948);
												if ((4L < BgL_odepthz00_8952))
													{	/* Cfa/cinfo2.sch 603 */
														obj_t BgL_arg1797z00_8953;

														BgL_arg1797z00_8953 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_8948, 4L);
														BgL_res2838z00_8947 =
															(BgL_arg1797z00_8953 == BgL_classz00_8942);
													}
												else
													{	/* Cfa/cinfo2.sch 603 */
														BgL_res2838z00_8947 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2838z00_8947;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 603 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &pre-procedure-set!-app? */
	obj_t BGl_z62prezd2procedurezd2setz12zd2appzf3z51zzcfa_info2z00(obj_t
		BgL_envz00_7127, obj_t BgL_objz00_7128)
	{
		{	/* Cfa/cinfo2.sch 603 */
			return
				BBOOL(BGl_prezd2procedurezd2setz12zd2appzf3z33zzcfa_info2z00
				(BgL_objz00_7128));
		}

	}



/* pre-procedure-set!-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_prezd2procedurezd2setz12zd2appzd2nilz12zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 604 */
			{	/* Cfa/cinfo2.sch 604 */
				obj_t BgL_classz00_5156;

				BgL_classz00_5156 = BGl_prezd2procedurezd2setz12zd2appzc0zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 604 */
					obj_t BgL__ortest_1117z00_5157;

					BgL__ortest_1117z00_5157 = BGL_CLASS_NIL(BgL_classz00_5156);
					if (CBOOL(BgL__ortest_1117z00_5157))
						{	/* Cfa/cinfo2.sch 604 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_5157);
						}
					else
						{	/* Cfa/cinfo2.sch 604 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_5156));
						}
				}
			}
		}

	}



/* &pre-procedure-set!-app-nil */
	BgL_appz00_bglt
		BGl_z62prezd2procedurezd2setz12zd2appzd2nilz70zzcfa_info2z00(obj_t
		BgL_envz00_7129)
	{
		{	/* Cfa/cinfo2.sch 604 */
			return BGl_prezd2procedurezd2setz12zd2appzd2nilz12zzcfa_info2z00();
		}

	}



/* pre-procedure-set!-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2stackablez12zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_143)
	{
		{	/* Cfa/cinfo2.sch 605 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_143)))->BgL_stackablez00);
		}

	}



/* &pre-procedure-set!-app-stackable */
	obj_t BGl_z62prezd2procedurezd2setz12zd2appzd2stackablez70zzcfa_info2z00(obj_t
		BgL_envz00_7130, obj_t BgL_oz00_7131)
	{
		{	/* Cfa/cinfo2.sch 605 */
			return
				BGl_prezd2procedurezd2setz12zd2appzd2stackablez12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7131));
		}

	}



/* pre-procedure-set!-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2stackablezd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_144, obj_t BgL_vz00_145)
	{
		{	/* Cfa/cinfo2.sch 606 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_144)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_145), BUNSPEC);
		}

	}



/* &pre-procedure-set!-app-stackable-set! */
	obj_t
		BGl_z62prezd2procedurezd2setz12zd2appzd2stackablezd2setz12zb0zzcfa_info2z00
		(obj_t BgL_envz00_7132, obj_t BgL_oz00_7133, obj_t BgL_vz00_7134)
	{
		{	/* Cfa/cinfo2.sch 606 */
			return
				BGl_prezd2procedurezd2setz12zd2appzd2stackablezd2setz12zd2zzcfa_info2z00
				(((BgL_appz00_bglt) BgL_oz00_7133), BgL_vz00_7134);
		}

	}



/* pre-procedure-set!-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2argsz12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_146)
	{
		{	/* Cfa/cinfo2.sch 607 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_146)))->BgL_argsz00);
		}

	}



/* &pre-procedure-set!-app-args */
	obj_t BGl_z62prezd2procedurezd2setz12zd2appzd2argsz70zzcfa_info2z00(obj_t
		BgL_envz00_7135, obj_t BgL_oz00_7136)
	{
		{	/* Cfa/cinfo2.sch 607 */
			return
				BGl_prezd2procedurezd2setz12zd2appzd2argsz12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7136));
		}

	}



/* pre-procedure-set!-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2argszd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_147, obj_t BgL_vz00_148)
	{
		{	/* Cfa/cinfo2.sch 608 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_147)))->BgL_argsz00) =
				((obj_t) BgL_vz00_148), BUNSPEC);
		}

	}



/* &pre-procedure-set!-app-args-set! */
	obj_t
		BGl_z62prezd2procedurezd2setz12zd2appzd2argszd2setz12zb0zzcfa_info2z00(obj_t
		BgL_envz00_7137, obj_t BgL_oz00_7138, obj_t BgL_vz00_7139)
	{
		{	/* Cfa/cinfo2.sch 608 */
			return
				BGl_prezd2procedurezd2setz12zd2appzd2argszd2setz12zd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7138), BgL_vz00_7139);
		}

	}



/* pre-procedure-set!-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_prezd2procedurezd2setz12zd2appzd2funz12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_149)
	{
		{	/* Cfa/cinfo2.sch 609 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_149)))->BgL_funz00);
		}

	}



/* &pre-procedure-set!-app-fun */
	BgL_varz00_bglt
		BGl_z62prezd2procedurezd2setz12zd2appzd2funz70zzcfa_info2z00(obj_t
		BgL_envz00_7140, obj_t BgL_oz00_7141)
	{
		{	/* Cfa/cinfo2.sch 609 */
			return
				BGl_prezd2procedurezd2setz12zd2appzd2funz12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7141));
		}

	}



/* pre-procedure-set!-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2funzd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_150, BgL_varz00_bglt BgL_vz00_151)
	{
		{	/* Cfa/cinfo2.sch 610 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_150)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_151), BUNSPEC);
		}

	}



/* &pre-procedure-set!-app-fun-set! */
	obj_t
		BGl_z62prezd2procedurezd2setz12zd2appzd2funzd2setz12zb0zzcfa_info2z00(obj_t
		BgL_envz00_7142, obj_t BgL_oz00_7143, obj_t BgL_vz00_7144)
	{
		{	/* Cfa/cinfo2.sch 610 */
			return
				BGl_prezd2procedurezd2setz12zd2appzd2funzd2setz12zd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7143), ((BgL_varz00_bglt) BgL_vz00_7144));
		}

	}



/* pre-procedure-set!-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2keyz12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_152)
	{
		{	/* Cfa/cinfo2.sch 611 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_152)))->BgL_keyz00);
		}

	}



/* &pre-procedure-set!-app-key */
	obj_t BGl_z62prezd2procedurezd2setz12zd2appzd2keyz70zzcfa_info2z00(obj_t
		BgL_envz00_7145, obj_t BgL_oz00_7146)
	{
		{	/* Cfa/cinfo2.sch 611 */
			return
				BGl_prezd2procedurezd2setz12zd2appzd2keyz12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7146));
		}

	}



/* pre-procedure-set!-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2keyzd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_153, obj_t BgL_vz00_154)
	{
		{	/* Cfa/cinfo2.sch 612 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_153)))->BgL_keyz00) =
				((obj_t) BgL_vz00_154), BUNSPEC);
		}

	}



/* &pre-procedure-set!-app-key-set! */
	obj_t
		BGl_z62prezd2procedurezd2setz12zd2appzd2keyzd2setz12zb0zzcfa_info2z00(obj_t
		BgL_envz00_7147, obj_t BgL_oz00_7148, obj_t BgL_vz00_7149)
	{
		{	/* Cfa/cinfo2.sch 612 */
			return
				BGl_prezd2procedurezd2setz12zd2appzd2keyzd2setz12zd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7148), BgL_vz00_7149);
		}

	}



/* pre-procedure-set!-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2sidezd2effectzc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_155)
	{
		{	/* Cfa/cinfo2.sch 613 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_155)))->BgL_sidezd2effectzd2);
		}

	}



/* &pre-procedure-set!-app-side-effect */
	obj_t
		BGl_z62prezd2procedurezd2setz12zd2appzd2sidezd2effectza2zzcfa_info2z00(obj_t
		BgL_envz00_7150, obj_t BgL_oz00_7151)
	{
		{	/* Cfa/cinfo2.sch 613 */
			return
				BGl_prezd2procedurezd2setz12zd2appzd2sidezd2effectzc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7151));
		}

	}



/* pre-procedure-set!-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2sidezd2effectzd2setz12z00zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_156, obj_t BgL_vz00_157)
	{
		{	/* Cfa/cinfo2.sch 614 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_156)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_157), BUNSPEC);
		}

	}



/* &pre-procedure-set!-app-side-effect-set! */
	obj_t
		BGl_z62prezd2procedurezd2setz12zd2appzd2sidezd2effectzd2setz12z62zzcfa_info2z00
		(obj_t BgL_envz00_7152, obj_t BgL_oz00_7153, obj_t BgL_vz00_7154)
	{
		{	/* Cfa/cinfo2.sch 614 */
			return
				BGl_prezd2procedurezd2setz12zd2appzd2sidezd2effectzd2setz12z00zzcfa_info2z00
				(((BgL_appz00_bglt) BgL_oz00_7153), BgL_vz00_7154);
		}

	}



/* pre-procedure-set!-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_prezd2procedurezd2setz12zd2appzd2typez12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_158)
	{
		{	/* Cfa/cinfo2.sch 615 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_158)))->BgL_typez00);
		}

	}



/* &pre-procedure-set!-app-type */
	BgL_typez00_bglt
		BGl_z62prezd2procedurezd2setz12zd2appzd2typez70zzcfa_info2z00(obj_t
		BgL_envz00_7155, obj_t BgL_oz00_7156)
	{
		{	/* Cfa/cinfo2.sch 615 */
			return
				BGl_prezd2procedurezd2setz12zd2appzd2typez12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7156));
		}

	}



/* pre-procedure-set!-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2typezd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_159, BgL_typez00_bglt BgL_vz00_160)
	{
		{	/* Cfa/cinfo2.sch 616 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_159)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_160), BUNSPEC);
		}

	}



/* &pre-procedure-set!-app-type-set! */
	obj_t
		BGl_z62prezd2procedurezd2setz12zd2appzd2typezd2setz12zb0zzcfa_info2z00(obj_t
		BgL_envz00_7157, obj_t BgL_oz00_7158, obj_t BgL_vz00_7159)
	{
		{	/* Cfa/cinfo2.sch 616 */
			return
				BGl_prezd2procedurezd2setz12zd2appzd2typezd2setz12zd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7158), ((BgL_typez00_bglt) BgL_vz00_7159));
		}

	}



/* pre-procedure-set!-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2procedurezd2setz12zd2appzd2locz12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_161)
	{
		{	/* Cfa/cinfo2.sch 617 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_161)))->BgL_locz00);
		}

	}



/* &pre-procedure-set!-app-loc */
	obj_t BGl_z62prezd2procedurezd2setz12zd2appzd2locz70zzcfa_info2z00(obj_t
		BgL_envz00_7160, obj_t BgL_oz00_7161)
	{
		{	/* Cfa/cinfo2.sch 617 */
			return
				BGl_prezd2procedurezd2setz12zd2appzd2locz12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7161));
		}

	}



/* make-make-procedure-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2makezd2procedurezd2appzd2zzcfa_info2z00(obj_t BgL_loc1641z00_164,
		BgL_typez00_bglt BgL_type1642z00_165, obj_t BgL_sidezd2effect1643zd2_166,
		obj_t BgL_key1644z00_167, BgL_varz00_bglt BgL_fun1645z00_168,
		obj_t BgL_args1646z00_169, obj_t BgL_stackable1647z00_170,
		BgL_approxz00_bglt BgL_approx1648z00_171,
		obj_t BgL_valueszd2approx1649zd2_172, long BgL_lostzd2stamp1650zd2_173,
		bool_t BgL_xzd2tzf31651z21_174, bool_t BgL_x1652z00_175,
		bool_t BgL_t1653z00_176, BgL_variablez00_bglt BgL_owner1654z00_177,
		obj_t BgL_stackzd2stamp1655zd2_178)
	{
		{	/* Cfa/cinfo2.sch 621 */
			{	/* Cfa/cinfo2.sch 621 */
				BgL_appz00_bglt BgL_new1489z00_8954;

				{	/* Cfa/cinfo2.sch 621 */
					BgL_appz00_bglt BgL_tmp1487z00_8955;
					BgL_makezd2procedurezd2appz00_bglt BgL_wide1488z00_8956;

					{
						BgL_appz00_bglt BgL_auxz00_10654;

						{	/* Cfa/cinfo2.sch 621 */
							BgL_appz00_bglt BgL_new1486z00_8957;

							BgL_new1486z00_8957 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 621 */
								long BgL_arg1950z00_8958;

								BgL_arg1950z00_8958 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1486z00_8957),
									BgL_arg1950z00_8958);
							}
							{	/* Cfa/cinfo2.sch 621 */
								BgL_objectz00_bglt BgL_tmpz00_10659;

								BgL_tmpz00_10659 = ((BgL_objectz00_bglt) BgL_new1486z00_8957);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_10659, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1486z00_8957);
							BgL_auxz00_10654 = BgL_new1486z00_8957;
						}
						BgL_tmp1487z00_8955 = ((BgL_appz00_bglt) BgL_auxz00_10654);
					}
					BgL_wide1488z00_8956 =
						((BgL_makezd2procedurezd2appz00_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_makezd2procedurezd2appz00_bgl))));
					{	/* Cfa/cinfo2.sch 621 */
						obj_t BgL_auxz00_10667;
						BgL_objectz00_bglt BgL_tmpz00_10665;

						BgL_auxz00_10667 = ((obj_t) BgL_wide1488z00_8956);
						BgL_tmpz00_10665 = ((BgL_objectz00_bglt) BgL_tmp1487z00_8955);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_10665, BgL_auxz00_10667);
					}
					((BgL_objectz00_bglt) BgL_tmp1487z00_8955);
					{	/* Cfa/cinfo2.sch 621 */
						long BgL_arg1949z00_8959;

						BgL_arg1949z00_8959 =
							BGL_CLASS_NUM(BGl_makezd2procedurezd2appz00zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1487z00_8955), BgL_arg1949z00_8959);
					}
					BgL_new1489z00_8954 = ((BgL_appz00_bglt) BgL_tmp1487z00_8955);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1489z00_8954)))->BgL_locz00) =
					((obj_t) BgL_loc1641z00_164), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1489z00_8954)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1642z00_165), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1489z00_8954)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1643zd2_166), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1489z00_8954)))->BgL_keyz00) =
					((obj_t) BgL_key1644z00_167), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1489z00_8954)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1645z00_168), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1489z00_8954)))->
						BgL_argsz00) = ((obj_t) BgL_args1646z00_169), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1489z00_8954)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1647z00_170), BUNSPEC);
				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10689;

					{
						obj_t BgL_auxz00_10690;

						{	/* Cfa/cinfo2.sch 621 */
							BgL_objectz00_bglt BgL_tmpz00_10691;

							BgL_tmpz00_10691 = ((BgL_objectz00_bglt) BgL_new1489z00_8954);
							BgL_auxz00_10690 = BGL_OBJECT_WIDENING(BgL_tmpz00_10691);
						}
						BgL_auxz00_10689 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10690);
					}
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10689))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_approx1648z00_171), BUNSPEC);
				}
				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10696;

					{
						obj_t BgL_auxz00_10697;

						{	/* Cfa/cinfo2.sch 621 */
							BgL_objectz00_bglt BgL_tmpz00_10698;

							BgL_tmpz00_10698 = ((BgL_objectz00_bglt) BgL_new1489z00_8954);
							BgL_auxz00_10697 = BGL_OBJECT_WIDENING(BgL_tmpz00_10698);
						}
						BgL_auxz00_10696 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10697);
					}
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10696))->
							BgL_valueszd2approxzd2) =
						((obj_t) BgL_valueszd2approx1649zd2_172), BUNSPEC);
				}
				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10703;

					{
						obj_t BgL_auxz00_10704;

						{	/* Cfa/cinfo2.sch 621 */
							BgL_objectz00_bglt BgL_tmpz00_10705;

							BgL_tmpz00_10705 = ((BgL_objectz00_bglt) BgL_new1489z00_8954);
							BgL_auxz00_10704 = BGL_OBJECT_WIDENING(BgL_tmpz00_10705);
						}
						BgL_auxz00_10703 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10704);
					}
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10703))->
							BgL_lostzd2stampzd2) =
						((long) BgL_lostzd2stamp1650zd2_173), BUNSPEC);
				}
				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10710;

					{
						obj_t BgL_auxz00_10711;

						{	/* Cfa/cinfo2.sch 621 */
							BgL_objectz00_bglt BgL_tmpz00_10712;

							BgL_tmpz00_10712 = ((BgL_objectz00_bglt) BgL_new1489z00_8954);
							BgL_auxz00_10711 = BGL_OBJECT_WIDENING(BgL_tmpz00_10712);
						}
						BgL_auxz00_10710 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10711);
					}
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10710))->
							BgL_xzd2tzf3z21) = ((bool_t) BgL_xzd2tzf31651z21_174), BUNSPEC);
				}
				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10717;

					{
						obj_t BgL_auxz00_10718;

						{	/* Cfa/cinfo2.sch 621 */
							BgL_objectz00_bglt BgL_tmpz00_10719;

							BgL_tmpz00_10719 = ((BgL_objectz00_bglt) BgL_new1489z00_8954);
							BgL_auxz00_10718 = BGL_OBJECT_WIDENING(BgL_tmpz00_10719);
						}
						BgL_auxz00_10717 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10718);
					}
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10717))->
							BgL_xz00) = ((bool_t) BgL_x1652z00_175), BUNSPEC);
				}
				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10724;

					{
						obj_t BgL_auxz00_10725;

						{	/* Cfa/cinfo2.sch 621 */
							BgL_objectz00_bglt BgL_tmpz00_10726;

							BgL_tmpz00_10726 = ((BgL_objectz00_bglt) BgL_new1489z00_8954);
							BgL_auxz00_10725 = BGL_OBJECT_WIDENING(BgL_tmpz00_10726);
						}
						BgL_auxz00_10724 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10725);
					}
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10724))->
							BgL_tz00) = ((bool_t) BgL_t1653z00_176), BUNSPEC);
				}
				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10731;

					{
						obj_t BgL_auxz00_10732;

						{	/* Cfa/cinfo2.sch 621 */
							BgL_objectz00_bglt BgL_tmpz00_10733;

							BgL_tmpz00_10733 = ((BgL_objectz00_bglt) BgL_new1489z00_8954);
							BgL_auxz00_10732 = BGL_OBJECT_WIDENING(BgL_tmpz00_10733);
						}
						BgL_auxz00_10731 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10732);
					}
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10731))->
							BgL_ownerz00) =
						((BgL_variablez00_bglt) BgL_owner1654z00_177), BUNSPEC);
				}
				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10738;

					{
						obj_t BgL_auxz00_10739;

						{	/* Cfa/cinfo2.sch 621 */
							BgL_objectz00_bglt BgL_tmpz00_10740;

							BgL_tmpz00_10740 = ((BgL_objectz00_bglt) BgL_new1489z00_8954);
							BgL_auxz00_10739 = BGL_OBJECT_WIDENING(BgL_tmpz00_10740);
						}
						BgL_auxz00_10738 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10739);
					}
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10738))->
							BgL_stackzd2stampzd2) =
						((obj_t) BgL_stackzd2stamp1655zd2_178), BUNSPEC);
				}
				return BgL_new1489z00_8954;
			}
		}

	}



/* &make-make-procedure-app */
	BgL_appz00_bglt BGl_z62makezd2makezd2procedurezd2appzb0zzcfa_info2z00(obj_t
		BgL_envz00_7162, obj_t BgL_loc1641z00_7163, obj_t BgL_type1642z00_7164,
		obj_t BgL_sidezd2effect1643zd2_7165, obj_t BgL_key1644z00_7166,
		obj_t BgL_fun1645z00_7167, obj_t BgL_args1646z00_7168,
		obj_t BgL_stackable1647z00_7169, obj_t BgL_approx1648z00_7170,
		obj_t BgL_valueszd2approx1649zd2_7171, obj_t BgL_lostzd2stamp1650zd2_7172,
		obj_t BgL_xzd2tzf31651z21_7173, obj_t BgL_x1652z00_7174,
		obj_t BgL_t1653z00_7175, obj_t BgL_owner1654z00_7176,
		obj_t BgL_stackzd2stamp1655zd2_7177)
	{
		{	/* Cfa/cinfo2.sch 621 */
			return
				BGl_makezd2makezd2procedurezd2appzd2zzcfa_info2z00(BgL_loc1641z00_7163,
				((BgL_typez00_bglt) BgL_type1642z00_7164),
				BgL_sidezd2effect1643zd2_7165, BgL_key1644z00_7166,
				((BgL_varz00_bglt) BgL_fun1645z00_7167), BgL_args1646z00_7168,
				BgL_stackable1647z00_7169,
				((BgL_approxz00_bglt) BgL_approx1648z00_7170),
				BgL_valueszd2approx1649zd2_7171,
				(long) CINT(BgL_lostzd2stamp1650zd2_7172),
				CBOOL(BgL_xzd2tzf31651z21_7173), CBOOL(BgL_x1652z00_7174),
				CBOOL(BgL_t1653z00_7175),
				((BgL_variablez00_bglt) BgL_owner1654z00_7176),
				BgL_stackzd2stamp1655zd2_7177);
		}

	}



/* make-procedure-app? */
	BGL_EXPORTED_DEF bool_t BGl_makezd2procedurezd2appzf3zf3zzcfa_info2z00(obj_t
		BgL_objz00_179)
	{
		{	/* Cfa/cinfo2.sch 622 */
			{	/* Cfa/cinfo2.sch 622 */
				obj_t BgL_classz00_8960;

				BgL_classz00_8960 = BGl_makezd2procedurezd2appz00zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_179))
					{	/* Cfa/cinfo2.sch 622 */
						BgL_objectz00_bglt BgL_arg1801z00_8961;

						BgL_arg1801z00_8961 = (BgL_objectz00_bglt) (BgL_objz00_179);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 622 */
								long BgL_idxz00_8962;

								BgL_idxz00_8962 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_8961);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_8962 + 4L)) == BgL_classz00_8960);
							}
						else
							{	/* Cfa/cinfo2.sch 622 */
								bool_t BgL_res2839z00_8965;

								{	/* Cfa/cinfo2.sch 622 */
									obj_t BgL_oclassz00_8966;

									{	/* Cfa/cinfo2.sch 622 */
										long BgL_arg1808z00_8967;

										{	/* Cfa/cinfo2.sch 622 */
											long BgL_arg1809z00_8968;

											BgL_arg1809z00_8968 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_8961);
											BgL_arg1808z00_8967 = (BgL_arg1809z00_8968 - OBJECT_TYPE);
										}
										BgL_oclassz00_8966 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_8967);
									}
									{	/* Cfa/cinfo2.sch 622 */
										bool_t BgL__ortest_1115z00_8969;

										BgL__ortest_1115z00_8969 =
											(BgL_classz00_8960 == BgL_oclassz00_8966);
										if (BgL__ortest_1115z00_8969)
											{	/* Cfa/cinfo2.sch 622 */
												BgL_res2839z00_8965 = BgL__ortest_1115z00_8969;
											}
										else
											{	/* Cfa/cinfo2.sch 622 */
												long BgL_odepthz00_8970;

												BgL_odepthz00_8970 =
													BGL_CLASS_DEPTH(BgL_oclassz00_8966);
												if ((4L < BgL_odepthz00_8970))
													{	/* Cfa/cinfo2.sch 622 */
														obj_t BgL_arg1797z00_8971;

														BgL_arg1797z00_8971 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_8966, 4L);
														BgL_res2839z00_8965 =
															(BgL_arg1797z00_8971 == BgL_classz00_8960);
													}
												else
													{	/* Cfa/cinfo2.sch 622 */
														BgL_res2839z00_8965 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2839z00_8965;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 622 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &make-procedure-app? */
	obj_t BGl_z62makezd2procedurezd2appzf3z91zzcfa_info2z00(obj_t BgL_envz00_7178,
		obj_t BgL_objz00_7179)
	{
		{	/* Cfa/cinfo2.sch 622 */
			return
				BBOOL(BGl_makezd2procedurezd2appzf3zf3zzcfa_info2z00(BgL_objz00_7179));
		}

	}



/* make-procedure-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2procedurezd2appzd2nilzd2zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 623 */
			{	/* Cfa/cinfo2.sch 623 */
				obj_t BgL_classz00_5211;

				BgL_classz00_5211 = BGl_makezd2procedurezd2appz00zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 623 */
					obj_t BgL__ortest_1117z00_5212;

					BgL__ortest_1117z00_5212 = BGL_CLASS_NIL(BgL_classz00_5211);
					if (CBOOL(BgL__ortest_1117z00_5212))
						{	/* Cfa/cinfo2.sch 623 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_5212);
						}
					else
						{	/* Cfa/cinfo2.sch 623 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_5211));
						}
				}
			}
		}

	}



/* &make-procedure-app-nil */
	BgL_appz00_bglt BGl_z62makezd2procedurezd2appzd2nilzb0zzcfa_info2z00(obj_t
		BgL_envz00_7180)
	{
		{	/* Cfa/cinfo2.sch 623 */
			return BGl_makezd2procedurezd2appzd2nilzd2zzcfa_info2z00();
		}

	}



/* make-procedure-app-stack-stamp */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2procedurezd2appzd2stackzd2stampz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_180)
	{
		{	/* Cfa/cinfo2.sch 624 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10782;

				{
					obj_t BgL_auxz00_10783;

					{	/* Cfa/cinfo2.sch 624 */
						BgL_objectz00_bglt BgL_tmpz00_10784;

						BgL_tmpz00_10784 = ((BgL_objectz00_bglt) BgL_oz00_180);
						BgL_auxz00_10783 = BGL_OBJECT_WIDENING(BgL_tmpz00_10784);
					}
					BgL_auxz00_10782 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10783);
				}
				return
					(((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10782))->
					BgL_stackzd2stampzd2);
			}
		}

	}



/* &make-procedure-app-stack-stamp */
	obj_t BGl_z62makezd2procedurezd2appzd2stackzd2stampz62zzcfa_info2z00(obj_t
		BgL_envz00_7181, obj_t BgL_oz00_7182)
	{
		{	/* Cfa/cinfo2.sch 624 */
			return
				BGl_makezd2procedurezd2appzd2stackzd2stampz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7182));
		}

	}



/* make-procedure-app-stack-stamp-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2procedurezd2appzd2stackzd2stampzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_181, obj_t BgL_vz00_182)
	{
		{	/* Cfa/cinfo2.sch 625 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10791;

				{
					obj_t BgL_auxz00_10792;

					{	/* Cfa/cinfo2.sch 625 */
						BgL_objectz00_bglt BgL_tmpz00_10793;

						BgL_tmpz00_10793 = ((BgL_objectz00_bglt) BgL_oz00_181);
						BgL_auxz00_10792 = BGL_OBJECT_WIDENING(BgL_tmpz00_10793);
					}
					BgL_auxz00_10791 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10792);
				}
				return
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10791))->
						BgL_stackzd2stampzd2) = ((obj_t) BgL_vz00_182), BUNSPEC);
			}
		}

	}



/* &make-procedure-app-stack-stamp-set! */
	obj_t
		BGl_z62makezd2procedurezd2appzd2stackzd2stampzd2setz12za2zzcfa_info2z00
		(obj_t BgL_envz00_7183, obj_t BgL_oz00_7184, obj_t BgL_vz00_7185)
	{
		{	/* Cfa/cinfo2.sch 625 */
			return
				BGl_makezd2procedurezd2appzd2stackzd2stampzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7184), BgL_vz00_7185);
		}

	}



/* make-procedure-app-owner */
	BGL_EXPORTED_DEF BgL_variablez00_bglt
		BGl_makezd2procedurezd2appzd2ownerzd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_183)
	{
		{	/* Cfa/cinfo2.sch 626 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10800;

				{
					obj_t BgL_auxz00_10801;

					{	/* Cfa/cinfo2.sch 626 */
						BgL_objectz00_bglt BgL_tmpz00_10802;

						BgL_tmpz00_10802 = ((BgL_objectz00_bglt) BgL_oz00_183);
						BgL_auxz00_10801 = BGL_OBJECT_WIDENING(BgL_tmpz00_10802);
					}
					BgL_auxz00_10800 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10801);
				}
				return
					(((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10800))->
					BgL_ownerz00);
			}
		}

	}



/* &make-procedure-app-owner */
	BgL_variablez00_bglt
		BGl_z62makezd2procedurezd2appzd2ownerzb0zzcfa_info2z00(obj_t
		BgL_envz00_7186, obj_t BgL_oz00_7187)
	{
		{	/* Cfa/cinfo2.sch 626 */
			return
				BGl_makezd2procedurezd2appzd2ownerzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7187));
		}

	}



/* make-procedure-app-T */
	BGL_EXPORTED_DEF bool_t
		BGl_makezd2procedurezd2appzd2Tzd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_186)
	{
		{	/* Cfa/cinfo2.sch 628 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10809;

				{
					obj_t BgL_auxz00_10810;

					{	/* Cfa/cinfo2.sch 628 */
						BgL_objectz00_bglt BgL_tmpz00_10811;

						BgL_tmpz00_10811 = ((BgL_objectz00_bglt) BgL_oz00_186);
						BgL_auxz00_10810 = BGL_OBJECT_WIDENING(BgL_tmpz00_10811);
					}
					BgL_auxz00_10809 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10810);
				}
				return
					(((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10809))->
					BgL_tz00);
			}
		}

	}



/* &make-procedure-app-T */
	obj_t BGl_z62makezd2procedurezd2appzd2Tzb0zzcfa_info2z00(obj_t
		BgL_envz00_7188, obj_t BgL_oz00_7189)
	{
		{	/* Cfa/cinfo2.sch 628 */
			return
				BBOOL(BGl_makezd2procedurezd2appzd2Tzd2zzcfa_info2z00(
					((BgL_appz00_bglt) BgL_oz00_7189)));
		}

	}



/* make-procedure-app-T-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2procedurezd2appzd2Tzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_187, bool_t BgL_vz00_188)
	{
		{	/* Cfa/cinfo2.sch 629 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10819;

				{
					obj_t BgL_auxz00_10820;

					{	/* Cfa/cinfo2.sch 629 */
						BgL_objectz00_bglt BgL_tmpz00_10821;

						BgL_tmpz00_10821 = ((BgL_objectz00_bglt) BgL_oz00_187);
						BgL_auxz00_10820 = BGL_OBJECT_WIDENING(BgL_tmpz00_10821);
					}
					BgL_auxz00_10819 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10820);
				}
				return
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10819))->
						BgL_tz00) = ((bool_t) BgL_vz00_188), BUNSPEC);
			}
		}

	}



/* &make-procedure-app-T-set! */
	obj_t BGl_z62makezd2procedurezd2appzd2Tzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7190, obj_t BgL_oz00_7191, obj_t BgL_vz00_7192)
	{
		{	/* Cfa/cinfo2.sch 629 */
			return
				BGl_makezd2procedurezd2appzd2Tzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7191), CBOOL(BgL_vz00_7192));
		}

	}



/* make-procedure-app-X */
	BGL_EXPORTED_DEF bool_t
		BGl_makezd2procedurezd2appzd2Xzd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_189)
	{
		{	/* Cfa/cinfo2.sch 630 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10829;

				{
					obj_t BgL_auxz00_10830;

					{	/* Cfa/cinfo2.sch 630 */
						BgL_objectz00_bglt BgL_tmpz00_10831;

						BgL_tmpz00_10831 = ((BgL_objectz00_bglt) BgL_oz00_189);
						BgL_auxz00_10830 = BGL_OBJECT_WIDENING(BgL_tmpz00_10831);
					}
					BgL_auxz00_10829 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10830);
				}
				return
					(((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10829))->
					BgL_xz00);
			}
		}

	}



/* &make-procedure-app-X */
	obj_t BGl_z62makezd2procedurezd2appzd2Xzb0zzcfa_info2z00(obj_t
		BgL_envz00_7193, obj_t BgL_oz00_7194)
	{
		{	/* Cfa/cinfo2.sch 630 */
			return
				BBOOL(BGl_makezd2procedurezd2appzd2Xzd2zzcfa_info2z00(
					((BgL_appz00_bglt) BgL_oz00_7194)));
		}

	}



/* make-procedure-app-X-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2procedurezd2appzd2Xzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_190, bool_t BgL_vz00_191)
	{
		{	/* Cfa/cinfo2.sch 631 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10839;

				{
					obj_t BgL_auxz00_10840;

					{	/* Cfa/cinfo2.sch 631 */
						BgL_objectz00_bglt BgL_tmpz00_10841;

						BgL_tmpz00_10841 = ((BgL_objectz00_bglt) BgL_oz00_190);
						BgL_auxz00_10840 = BGL_OBJECT_WIDENING(BgL_tmpz00_10841);
					}
					BgL_auxz00_10839 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10840);
				}
				return
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10839))->
						BgL_xz00) = ((bool_t) BgL_vz00_191), BUNSPEC);
			}
		}

	}



/* &make-procedure-app-X-set! */
	obj_t BGl_z62makezd2procedurezd2appzd2Xzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7195, obj_t BgL_oz00_7196, obj_t BgL_vz00_7197)
	{
		{	/* Cfa/cinfo2.sch 631 */
			return
				BGl_makezd2procedurezd2appzd2Xzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7196), CBOOL(BgL_vz00_7197));
		}

	}



/* make-procedure-app-X-T? */
	BGL_EXPORTED_DEF bool_t
		BGl_makezd2procedurezd2appzd2Xzd2Tzf3zf3zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_192)
	{
		{	/* Cfa/cinfo2.sch 632 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10849;

				{
					obj_t BgL_auxz00_10850;

					{	/* Cfa/cinfo2.sch 632 */
						BgL_objectz00_bglt BgL_tmpz00_10851;

						BgL_tmpz00_10851 = ((BgL_objectz00_bglt) BgL_oz00_192);
						BgL_auxz00_10850 = BGL_OBJECT_WIDENING(BgL_tmpz00_10851);
					}
					BgL_auxz00_10849 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10850);
				}
				return
					(((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10849))->
					BgL_xzd2tzf3z21);
			}
		}

	}



/* &make-procedure-app-X-T? */
	obj_t BGl_z62makezd2procedurezd2appzd2Xzd2Tzf3z91zzcfa_info2z00(obj_t
		BgL_envz00_7198, obj_t BgL_oz00_7199)
	{
		{	/* Cfa/cinfo2.sch 632 */
			return
				BBOOL(BGl_makezd2procedurezd2appzd2Xzd2Tzf3zf3zzcfa_info2z00(
					((BgL_appz00_bglt) BgL_oz00_7199)));
		}

	}



/* make-procedure-app-X-T?-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2procedurezd2appzd2Xzd2Tzf3zd2setz12z33zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_193, bool_t BgL_vz00_194)
	{
		{	/* Cfa/cinfo2.sch 633 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10859;

				{
					obj_t BgL_auxz00_10860;

					{	/* Cfa/cinfo2.sch 633 */
						BgL_objectz00_bglt BgL_tmpz00_10861;

						BgL_tmpz00_10861 = ((BgL_objectz00_bglt) BgL_oz00_193);
						BgL_auxz00_10860 = BGL_OBJECT_WIDENING(BgL_tmpz00_10861);
					}
					BgL_auxz00_10859 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10860);
				}
				return
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10859))->
						BgL_xzd2tzf3z21) = ((bool_t) BgL_vz00_194), BUNSPEC);
			}
		}

	}



/* &make-procedure-app-X-T?-set! */
	obj_t BGl_z62makezd2procedurezd2appzd2Xzd2Tzf3zd2setz12z51zzcfa_info2z00(obj_t
		BgL_envz00_7200, obj_t BgL_oz00_7201, obj_t BgL_vz00_7202)
	{
		{	/* Cfa/cinfo2.sch 633 */
			return
				BGl_makezd2procedurezd2appzd2Xzd2Tzf3zd2setz12z33zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7201), CBOOL(BgL_vz00_7202));
		}

	}



/* make-procedure-app-lost-stamp */
	BGL_EXPORTED_DEF long
		BGl_makezd2procedurezd2appzd2lostzd2stampz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_195)
	{
		{	/* Cfa/cinfo2.sch 634 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10869;

				{
					obj_t BgL_auxz00_10870;

					{	/* Cfa/cinfo2.sch 634 */
						BgL_objectz00_bglt BgL_tmpz00_10871;

						BgL_tmpz00_10871 = ((BgL_objectz00_bglt) BgL_oz00_195);
						BgL_auxz00_10870 = BGL_OBJECT_WIDENING(BgL_tmpz00_10871);
					}
					BgL_auxz00_10869 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10870);
				}
				return
					(((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10869))->
					BgL_lostzd2stampzd2);
			}
		}

	}



/* &make-procedure-app-lost-stamp */
	obj_t BGl_z62makezd2procedurezd2appzd2lostzd2stampz62zzcfa_info2z00(obj_t
		BgL_envz00_7203, obj_t BgL_oz00_7204)
	{
		{	/* Cfa/cinfo2.sch 634 */
			return
				BINT(BGl_makezd2procedurezd2appzd2lostzd2stampz00zzcfa_info2z00(
					((BgL_appz00_bglt) BgL_oz00_7204)));
		}

	}



/* make-procedure-app-lost-stamp-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2procedurezd2appzd2lostzd2stampzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_196, long BgL_vz00_197)
	{
		{	/* Cfa/cinfo2.sch 635 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10879;

				{
					obj_t BgL_auxz00_10880;

					{	/* Cfa/cinfo2.sch 635 */
						BgL_objectz00_bglt BgL_tmpz00_10881;

						BgL_tmpz00_10881 = ((BgL_objectz00_bglt) BgL_oz00_196);
						BgL_auxz00_10880 = BGL_OBJECT_WIDENING(BgL_tmpz00_10881);
					}
					BgL_auxz00_10879 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10880);
				}
				return
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10879))->
						BgL_lostzd2stampzd2) = ((long) BgL_vz00_197), BUNSPEC);
		}}

	}



/* &make-procedure-app-lost-stamp-set! */
	obj_t
		BGl_z62makezd2procedurezd2appzd2lostzd2stampzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7205, obj_t BgL_oz00_7206, obj_t BgL_vz00_7207)
	{
		{	/* Cfa/cinfo2.sch 635 */
			return
				BGl_makezd2procedurezd2appzd2lostzd2stampzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7206), (long) CINT(BgL_vz00_7207));
		}

	}



/* make-procedure-app-values-approx */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2procedurezd2appzd2valueszd2approxz00zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_198)
	{
		{	/* Cfa/cinfo2.sch 636 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10889;

				{
					obj_t BgL_auxz00_10890;

					{	/* Cfa/cinfo2.sch 636 */
						BgL_objectz00_bglt BgL_tmpz00_10891;

						BgL_tmpz00_10891 = ((BgL_objectz00_bglt) BgL_oz00_198);
						BgL_auxz00_10890 = BGL_OBJECT_WIDENING(BgL_tmpz00_10891);
					}
					BgL_auxz00_10889 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10890);
				}
				return
					(((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10889))->
					BgL_valueszd2approxzd2);
			}
		}

	}



/* &make-procedure-app-values-approx */
	obj_t BGl_z62makezd2procedurezd2appzd2valueszd2approxz62zzcfa_info2z00(obj_t
		BgL_envz00_7208, obj_t BgL_oz00_7209)
	{
		{	/* Cfa/cinfo2.sch 636 */
			return
				BGl_makezd2procedurezd2appzd2valueszd2approxz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7209));
		}

	}



/* make-procedure-app-values-approx-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2procedurezd2appzd2valueszd2approxzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_199, obj_t BgL_vz00_200)
	{
		{	/* Cfa/cinfo2.sch 637 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10898;

				{
					obj_t BgL_auxz00_10899;

					{	/* Cfa/cinfo2.sch 637 */
						BgL_objectz00_bglt BgL_tmpz00_10900;

						BgL_tmpz00_10900 = ((BgL_objectz00_bglt) BgL_oz00_199);
						BgL_auxz00_10899 = BGL_OBJECT_WIDENING(BgL_tmpz00_10900);
					}
					BgL_auxz00_10898 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10899);
				}
				return
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10898))->
						BgL_valueszd2approxzd2) = ((obj_t) BgL_vz00_200), BUNSPEC);
			}
		}

	}



/* &make-procedure-app-values-approx-set! */
	obj_t
		BGl_z62makezd2procedurezd2appzd2valueszd2approxzd2setz12za2zzcfa_info2z00
		(obj_t BgL_envz00_7210, obj_t BgL_oz00_7211, obj_t BgL_vz00_7212)
	{
		{	/* Cfa/cinfo2.sch 637 */
			return
				BGl_makezd2procedurezd2appzd2valueszd2approxzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7211), BgL_vz00_7212);
		}

	}



/* make-procedure-app-approx */
	BGL_EXPORTED_DEF BgL_approxz00_bglt
		BGl_makezd2procedurezd2appzd2approxzd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_201)
	{
		{	/* Cfa/cinfo2.sch 638 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10907;

				{
					obj_t BgL_auxz00_10908;

					{	/* Cfa/cinfo2.sch 638 */
						BgL_objectz00_bglt BgL_tmpz00_10909;

						BgL_tmpz00_10909 = ((BgL_objectz00_bglt) BgL_oz00_201);
						BgL_auxz00_10908 = BGL_OBJECT_WIDENING(BgL_tmpz00_10909);
					}
					BgL_auxz00_10907 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10908);
				}
				return
					(((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10907))->
					BgL_approxz00);
			}
		}

	}



/* &make-procedure-app-approx */
	BgL_approxz00_bglt
		BGl_z62makezd2procedurezd2appzd2approxzb0zzcfa_info2z00(obj_t
		BgL_envz00_7213, obj_t BgL_oz00_7214)
	{
		{	/* Cfa/cinfo2.sch 638 */
			return
				BGl_makezd2procedurezd2appzd2approxzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7214));
		}

	}



/* make-procedure-app-approx-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2procedurezd2appzd2approxzd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_202, BgL_approxz00_bglt BgL_vz00_203)
	{
		{	/* Cfa/cinfo2.sch 639 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_10916;

				{
					obj_t BgL_auxz00_10917;

					{	/* Cfa/cinfo2.sch 639 */
						BgL_objectz00_bglt BgL_tmpz00_10918;

						BgL_tmpz00_10918 = ((BgL_objectz00_bglt) BgL_oz00_202);
						BgL_auxz00_10917 = BGL_OBJECT_WIDENING(BgL_tmpz00_10918);
					}
					BgL_auxz00_10916 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_10917);
				}
				return
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_10916))->
						BgL_approxz00) = ((BgL_approxz00_bglt) BgL_vz00_203), BUNSPEC);
			}
		}

	}



/* &make-procedure-app-approx-set! */
	obj_t BGl_z62makezd2procedurezd2appzd2approxzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7215, obj_t BgL_oz00_7216, obj_t BgL_vz00_7217)
	{
		{	/* Cfa/cinfo2.sch 639 */
			return
				BGl_makezd2procedurezd2appzd2approxzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7216),
				((BgL_approxz00_bglt) BgL_vz00_7217));
		}

	}



/* make-procedure-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2procedurezd2appzd2stackablezd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_204)
	{
		{	/* Cfa/cinfo2.sch 640 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_204)))->BgL_stackablez00);
		}

	}



/* &make-procedure-app-stackable */
	obj_t BGl_z62makezd2procedurezd2appzd2stackablezb0zzcfa_info2z00(obj_t
		BgL_envz00_7218, obj_t BgL_oz00_7219)
	{
		{	/* Cfa/cinfo2.sch 640 */
			return
				BGl_makezd2procedurezd2appzd2stackablezd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7219));
		}

	}



/* make-procedure-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2procedurezd2appzd2stackablezd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_205, obj_t BgL_vz00_206)
	{
		{	/* Cfa/cinfo2.sch 641 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_205)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_206), BUNSPEC);
		}

	}



/* &make-procedure-app-stackable-set! */
	obj_t
		BGl_z62makezd2procedurezd2appzd2stackablezd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7220, obj_t BgL_oz00_7221, obj_t BgL_vz00_7222)
	{
		{	/* Cfa/cinfo2.sch 641 */
			return
				BGl_makezd2procedurezd2appzd2stackablezd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7221), BgL_vz00_7222);
		}

	}



/* make-procedure-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2procedurezd2appzd2argszd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_207)
	{
		{	/* Cfa/cinfo2.sch 642 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_207)))->BgL_argsz00);
		}

	}



/* &make-procedure-app-args */
	obj_t BGl_z62makezd2procedurezd2appzd2argszb0zzcfa_info2z00(obj_t
		BgL_envz00_7223, obj_t BgL_oz00_7224)
	{
		{	/* Cfa/cinfo2.sch 642 */
			return
				BGl_makezd2procedurezd2appzd2argszd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7224));
		}

	}



/* make-procedure-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2procedurezd2appzd2argszd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_208, obj_t BgL_vz00_209)
	{
		{	/* Cfa/cinfo2.sch 643 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_208)))->BgL_argsz00) =
				((obj_t) BgL_vz00_209), BUNSPEC);
		}

	}



/* &make-procedure-app-args-set! */
	obj_t BGl_z62makezd2procedurezd2appzd2argszd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7225, obj_t BgL_oz00_7226, obj_t BgL_vz00_7227)
	{
		{	/* Cfa/cinfo2.sch 643 */
			return
				BGl_makezd2procedurezd2appzd2argszd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7226), BgL_vz00_7227);
		}

	}



/* make-procedure-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_makezd2procedurezd2appzd2funzd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_210)
	{
		{	/* Cfa/cinfo2.sch 644 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_210)))->BgL_funz00);
		}

	}



/* &make-procedure-app-fun */
	BgL_varz00_bglt BGl_z62makezd2procedurezd2appzd2funzb0zzcfa_info2z00(obj_t
		BgL_envz00_7228, obj_t BgL_oz00_7229)
	{
		{	/* Cfa/cinfo2.sch 644 */
			return
				BGl_makezd2procedurezd2appzd2funzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7229));
		}

	}



/* make-procedure-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2procedurezd2appzd2funzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_211, BgL_varz00_bglt BgL_vz00_212)
	{
		{	/* Cfa/cinfo2.sch 645 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_211)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_212), BUNSPEC);
		}

	}



/* &make-procedure-app-fun-set! */
	obj_t BGl_z62makezd2procedurezd2appzd2funzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7230, obj_t BgL_oz00_7231, obj_t BgL_vz00_7232)
	{
		{	/* Cfa/cinfo2.sch 645 */
			return
				BGl_makezd2procedurezd2appzd2funzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7231), ((BgL_varz00_bglt) BgL_vz00_7232));
		}

	}



/* make-procedure-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2procedurezd2appzd2keyzd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_213)
	{
		{	/* Cfa/cinfo2.sch 646 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_213)))->BgL_keyz00);
		}

	}



/* &make-procedure-app-key */
	obj_t BGl_z62makezd2procedurezd2appzd2keyzb0zzcfa_info2z00(obj_t
		BgL_envz00_7233, obj_t BgL_oz00_7234)
	{
		{	/* Cfa/cinfo2.sch 646 */
			return
				BGl_makezd2procedurezd2appzd2keyzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7234));
		}

	}



/* make-procedure-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2procedurezd2appzd2keyzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_214, obj_t BgL_vz00_215)
	{
		{	/* Cfa/cinfo2.sch 647 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_214)))->BgL_keyz00) =
				((obj_t) BgL_vz00_215), BUNSPEC);
		}

	}



/* &make-procedure-app-key-set! */
	obj_t BGl_z62makezd2procedurezd2appzd2keyzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7235, obj_t BgL_oz00_7236, obj_t BgL_vz00_7237)
	{
		{	/* Cfa/cinfo2.sch 647 */
			return
				BGl_makezd2procedurezd2appzd2keyzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7236), BgL_vz00_7237);
		}

	}



/* make-procedure-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2procedurezd2appzd2sidezd2effectz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_216)
	{
		{	/* Cfa/cinfo2.sch 648 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_216)))->BgL_sidezd2effectzd2);
		}

	}



/* &make-procedure-app-side-effect */
	obj_t BGl_z62makezd2procedurezd2appzd2sidezd2effectz62zzcfa_info2z00(obj_t
		BgL_envz00_7238, obj_t BgL_oz00_7239)
	{
		{	/* Cfa/cinfo2.sch 648 */
			return
				BGl_makezd2procedurezd2appzd2sidezd2effectz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7239));
		}

	}



/* make-procedure-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2procedurezd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_217, obj_t BgL_vz00_218)
	{
		{	/* Cfa/cinfo2.sch 649 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_217)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_218), BUNSPEC);
		}

	}



/* &make-procedure-app-side-effect-set! */
	obj_t
		BGl_z62makezd2procedurezd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00
		(obj_t BgL_envz00_7240, obj_t BgL_oz00_7241, obj_t BgL_vz00_7242)
	{
		{	/* Cfa/cinfo2.sch 649 */
			return
				BGl_makezd2procedurezd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7241), BgL_vz00_7242);
		}

	}



/* make-procedure-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_makezd2procedurezd2appzd2typezd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_219)
	{
		{	/* Cfa/cinfo2.sch 650 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_219)))->BgL_typez00);
		}

	}



/* &make-procedure-app-type */
	BgL_typez00_bglt BGl_z62makezd2procedurezd2appzd2typezb0zzcfa_info2z00(obj_t
		BgL_envz00_7243, obj_t BgL_oz00_7244)
	{
		{	/* Cfa/cinfo2.sch 650 */
			return
				BGl_makezd2procedurezd2appzd2typezd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7244));
		}

	}



/* make-procedure-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2procedurezd2appzd2typezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_220, BgL_typez00_bglt BgL_vz00_221)
	{
		{	/* Cfa/cinfo2.sch 651 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_220)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_221), BUNSPEC);
		}

	}



/* &make-procedure-app-type-set! */
	obj_t BGl_z62makezd2procedurezd2appzd2typezd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7245, obj_t BgL_oz00_7246, obj_t BgL_vz00_7247)
	{
		{	/* Cfa/cinfo2.sch 651 */
			return
				BGl_makezd2procedurezd2appzd2typezd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7246), ((BgL_typez00_bglt) BgL_vz00_7247));
		}

	}



/* make-procedure-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2procedurezd2appzd2loczd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_222)
	{
		{	/* Cfa/cinfo2.sch 652 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_222)))->BgL_locz00);
		}

	}



/* &make-procedure-app-loc */
	obj_t BGl_z62makezd2procedurezd2appzd2loczb0zzcfa_info2z00(obj_t
		BgL_envz00_7248, obj_t BgL_oz00_7249)
	{
		{	/* Cfa/cinfo2.sch 652 */
			return
				BGl_makezd2procedurezd2appzd2loczd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7249));
		}

	}



/* make-procedure-ref-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2procedurezd2refzd2appzd2zzcfa_info2z00(obj_t BgL_loc1630z00_225,
		BgL_typez00_bglt BgL_type1631z00_226, obj_t BgL_sidezd2effect1632zd2_227,
		obj_t BgL_key1633z00_228, BgL_varz00_bglt BgL_fun1634z00_229,
		obj_t BgL_args1635z00_230, obj_t BgL_stackable1636z00_231,
		BgL_approxz00_bglt BgL_approx1638z00_232)
	{
		{	/* Cfa/cinfo2.sch 656 */
			{	/* Cfa/cinfo2.sch 656 */
				BgL_appz00_bglt BgL_new1493z00_8972;

				{	/* Cfa/cinfo2.sch 656 */
					BgL_appz00_bglt BgL_tmp1491z00_8973;
					BgL_procedurezd2refzd2appz00_bglt BgL_wide1492z00_8974;

					{
						BgL_appz00_bglt BgL_auxz00_10980;

						{	/* Cfa/cinfo2.sch 656 */
							BgL_appz00_bglt BgL_new1490z00_8975;

							BgL_new1490z00_8975 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 656 */
								long BgL_arg1952z00_8976;

								BgL_arg1952z00_8976 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1490z00_8975),
									BgL_arg1952z00_8976);
							}
							{	/* Cfa/cinfo2.sch 656 */
								BgL_objectz00_bglt BgL_tmpz00_10985;

								BgL_tmpz00_10985 = ((BgL_objectz00_bglt) BgL_new1490z00_8975);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_10985, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1490z00_8975);
							BgL_auxz00_10980 = BgL_new1490z00_8975;
						}
						BgL_tmp1491z00_8973 = ((BgL_appz00_bglt) BgL_auxz00_10980);
					}
					BgL_wide1492z00_8974 =
						((BgL_procedurezd2refzd2appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
									BgL_procedurezd2refzd2appz00_bgl))));
					{	/* Cfa/cinfo2.sch 656 */
						obj_t BgL_auxz00_10993;
						BgL_objectz00_bglt BgL_tmpz00_10991;

						BgL_auxz00_10993 = ((obj_t) BgL_wide1492z00_8974);
						BgL_tmpz00_10991 = ((BgL_objectz00_bglt) BgL_tmp1491z00_8973);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_10991, BgL_auxz00_10993);
					}
					((BgL_objectz00_bglt) BgL_tmp1491z00_8973);
					{	/* Cfa/cinfo2.sch 656 */
						long BgL_arg1951z00_8977;

						BgL_arg1951z00_8977 =
							BGL_CLASS_NUM(BGl_procedurezd2refzd2appz00zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1491z00_8973), BgL_arg1951z00_8977);
					}
					BgL_new1493z00_8972 = ((BgL_appz00_bglt) BgL_tmp1491z00_8973);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1493z00_8972)))->BgL_locz00) =
					((obj_t) BgL_loc1630z00_225), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1493z00_8972)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1631z00_226), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1493z00_8972)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1632zd2_227), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1493z00_8972)))->BgL_keyz00) =
					((obj_t) BgL_key1633z00_228), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1493z00_8972)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1634z00_229), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1493z00_8972)))->
						BgL_argsz00) = ((obj_t) BgL_args1635z00_230), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1493z00_8972)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1636z00_231), BUNSPEC);
				{
					BgL_procedurezd2refzd2appz00_bglt BgL_auxz00_11015;

					{
						obj_t BgL_auxz00_11016;

						{	/* Cfa/cinfo2.sch 656 */
							BgL_objectz00_bglt BgL_tmpz00_11017;

							BgL_tmpz00_11017 = ((BgL_objectz00_bglt) BgL_new1493z00_8972);
							BgL_auxz00_11016 = BGL_OBJECT_WIDENING(BgL_tmpz00_11017);
						}
						BgL_auxz00_11015 =
							((BgL_procedurezd2refzd2appz00_bglt) BgL_auxz00_11016);
					}
					((((BgL_procedurezd2refzd2appz00_bglt) COBJECT(BgL_auxz00_11015))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_approx1638z00_232), BUNSPEC);
				}
				return BgL_new1493z00_8972;
			}
		}

	}



/* &make-procedure-ref-app */
	BgL_appz00_bglt BGl_z62makezd2procedurezd2refzd2appzb0zzcfa_info2z00(obj_t
		BgL_envz00_7250, obj_t BgL_loc1630z00_7251, obj_t BgL_type1631z00_7252,
		obj_t BgL_sidezd2effect1632zd2_7253, obj_t BgL_key1633z00_7254,
		obj_t BgL_fun1634z00_7255, obj_t BgL_args1635z00_7256,
		obj_t BgL_stackable1636z00_7257, obj_t BgL_approx1638z00_7258)
	{
		{	/* Cfa/cinfo2.sch 656 */
			return
				BGl_makezd2procedurezd2refzd2appzd2zzcfa_info2z00(BgL_loc1630z00_7251,
				((BgL_typez00_bglt) BgL_type1631z00_7252),
				BgL_sidezd2effect1632zd2_7253, BgL_key1633z00_7254,
				((BgL_varz00_bglt) BgL_fun1634z00_7255), BgL_args1635z00_7256,
				BgL_stackable1636z00_7257,
				((BgL_approxz00_bglt) BgL_approx1638z00_7258));
		}

	}



/* procedure-ref-app? */
	BGL_EXPORTED_DEF bool_t BGl_procedurezd2refzd2appzf3zf3zzcfa_info2z00(obj_t
		BgL_objz00_233)
	{
		{	/* Cfa/cinfo2.sch 657 */
			{	/* Cfa/cinfo2.sch 657 */
				obj_t BgL_classz00_8978;

				BgL_classz00_8978 = BGl_procedurezd2refzd2appz00zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_233))
					{	/* Cfa/cinfo2.sch 657 */
						BgL_objectz00_bglt BgL_arg1801z00_8979;

						BgL_arg1801z00_8979 = (BgL_objectz00_bglt) (BgL_objz00_233);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 657 */
								long BgL_idxz00_8980;

								BgL_idxz00_8980 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_8979);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_8980 + 4L)) == BgL_classz00_8978);
							}
						else
							{	/* Cfa/cinfo2.sch 657 */
								bool_t BgL_res2840z00_8983;

								{	/* Cfa/cinfo2.sch 657 */
									obj_t BgL_oclassz00_8984;

									{	/* Cfa/cinfo2.sch 657 */
										long BgL_arg1808z00_8985;

										{	/* Cfa/cinfo2.sch 657 */
											long BgL_arg1809z00_8986;

											BgL_arg1809z00_8986 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_8979);
											BgL_arg1808z00_8985 = (BgL_arg1809z00_8986 - OBJECT_TYPE);
										}
										BgL_oclassz00_8984 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_8985);
									}
									{	/* Cfa/cinfo2.sch 657 */
										bool_t BgL__ortest_1115z00_8987;

										BgL__ortest_1115z00_8987 =
											(BgL_classz00_8978 == BgL_oclassz00_8984);
										if (BgL__ortest_1115z00_8987)
											{	/* Cfa/cinfo2.sch 657 */
												BgL_res2840z00_8983 = BgL__ortest_1115z00_8987;
											}
										else
											{	/* Cfa/cinfo2.sch 657 */
												long BgL_odepthz00_8988;

												BgL_odepthz00_8988 =
													BGL_CLASS_DEPTH(BgL_oclassz00_8984);
												if ((4L < BgL_odepthz00_8988))
													{	/* Cfa/cinfo2.sch 657 */
														obj_t BgL_arg1797z00_8989;

														BgL_arg1797z00_8989 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_8984, 4L);
														BgL_res2840z00_8983 =
															(BgL_arg1797z00_8989 == BgL_classz00_8978);
													}
												else
													{	/* Cfa/cinfo2.sch 657 */
														BgL_res2840z00_8983 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2840z00_8983;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 657 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &procedure-ref-app? */
	obj_t BGl_z62procedurezd2refzd2appzf3z91zzcfa_info2z00(obj_t BgL_envz00_7259,
		obj_t BgL_objz00_7260)
	{
		{	/* Cfa/cinfo2.sch 657 */
			return
				BBOOL(BGl_procedurezd2refzd2appzf3zf3zzcfa_info2z00(BgL_objz00_7260));
		}

	}



/* procedure-ref-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_procedurezd2refzd2appzd2nilzd2zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 658 */
			{	/* Cfa/cinfo2.sch 658 */
				obj_t BgL_classz00_5274;

				BgL_classz00_5274 = BGl_procedurezd2refzd2appz00zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 658 */
					obj_t BgL__ortest_1117z00_5275;

					BgL__ortest_1117z00_5275 = BGL_CLASS_NIL(BgL_classz00_5274);
					if (CBOOL(BgL__ortest_1117z00_5275))
						{	/* Cfa/cinfo2.sch 658 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_5275);
						}
					else
						{	/* Cfa/cinfo2.sch 658 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_5274));
						}
				}
			}
		}

	}



/* &procedure-ref-app-nil */
	BgL_appz00_bglt BGl_z62procedurezd2refzd2appzd2nilzb0zzcfa_info2z00(obj_t
		BgL_envz00_7261)
	{
		{	/* Cfa/cinfo2.sch 658 */
			return BGl_procedurezd2refzd2appzd2nilzd2zzcfa_info2z00();
		}

	}



/* procedure-ref-app-approx */
	BGL_EXPORTED_DEF BgL_approxz00_bglt
		BGl_procedurezd2refzd2appzd2approxzd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_234)
	{
		{	/* Cfa/cinfo2.sch 659 */
			{
				BgL_procedurezd2refzd2appz00_bglt BgL_auxz00_11054;

				{
					obj_t BgL_auxz00_11055;

					{	/* Cfa/cinfo2.sch 659 */
						BgL_objectz00_bglt BgL_tmpz00_11056;

						BgL_tmpz00_11056 = ((BgL_objectz00_bglt) BgL_oz00_234);
						BgL_auxz00_11055 = BGL_OBJECT_WIDENING(BgL_tmpz00_11056);
					}
					BgL_auxz00_11054 =
						((BgL_procedurezd2refzd2appz00_bglt) BgL_auxz00_11055);
				}
				return
					(((BgL_procedurezd2refzd2appz00_bglt) COBJECT(BgL_auxz00_11054))->
					BgL_approxz00);
			}
		}

	}



/* &procedure-ref-app-approx */
	BgL_approxz00_bglt
		BGl_z62procedurezd2refzd2appzd2approxzb0zzcfa_info2z00(obj_t
		BgL_envz00_7262, obj_t BgL_oz00_7263)
	{
		{	/* Cfa/cinfo2.sch 659 */
			return
				BGl_procedurezd2refzd2appzd2approxzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7263));
		}

	}



/* procedure-ref-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2refzd2appzd2stackablezd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_237)
	{
		{	/* Cfa/cinfo2.sch 661 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_237)))->BgL_stackablez00);
		}

	}



/* &procedure-ref-app-stackable */
	obj_t BGl_z62procedurezd2refzd2appzd2stackablezb0zzcfa_info2z00(obj_t
		BgL_envz00_7264, obj_t BgL_oz00_7265)
	{
		{	/* Cfa/cinfo2.sch 661 */
			return
				BGl_procedurezd2refzd2appzd2stackablezd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7265));
		}

	}



/* procedure-ref-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2refzd2appzd2stackablezd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_238, obj_t BgL_vz00_239)
	{
		{	/* Cfa/cinfo2.sch 662 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_238)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_239), BUNSPEC);
		}

	}



/* &procedure-ref-app-stackable-set! */
	obj_t BGl_z62procedurezd2refzd2appzd2stackablezd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7266, obj_t BgL_oz00_7267, obj_t BgL_vz00_7268)
	{
		{	/* Cfa/cinfo2.sch 662 */
			return
				BGl_procedurezd2refzd2appzd2stackablezd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7267), BgL_vz00_7268);
		}

	}



/* procedure-ref-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2refzd2appzd2argszd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_240)
	{
		{	/* Cfa/cinfo2.sch 663 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_240)))->BgL_argsz00);
		}

	}



/* &procedure-ref-app-args */
	obj_t BGl_z62procedurezd2refzd2appzd2argszb0zzcfa_info2z00(obj_t
		BgL_envz00_7269, obj_t BgL_oz00_7270)
	{
		{	/* Cfa/cinfo2.sch 663 */
			return
				BGl_procedurezd2refzd2appzd2argszd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7270));
		}

	}



/* procedure-ref-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2refzd2appzd2argszd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_241, obj_t BgL_vz00_242)
	{
		{	/* Cfa/cinfo2.sch 664 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_241)))->BgL_argsz00) =
				((obj_t) BgL_vz00_242), BUNSPEC);
		}

	}



/* &procedure-ref-app-args-set! */
	obj_t BGl_z62procedurezd2refzd2appzd2argszd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7271, obj_t BgL_oz00_7272, obj_t BgL_vz00_7273)
	{
		{	/* Cfa/cinfo2.sch 664 */
			return
				BGl_procedurezd2refzd2appzd2argszd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7272), BgL_vz00_7273);
		}

	}



/* procedure-ref-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_procedurezd2refzd2appzd2funzd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_243)
	{
		{	/* Cfa/cinfo2.sch 665 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_243)))->BgL_funz00);
		}

	}



/* &procedure-ref-app-fun */
	BgL_varz00_bglt BGl_z62procedurezd2refzd2appzd2funzb0zzcfa_info2z00(obj_t
		BgL_envz00_7274, obj_t BgL_oz00_7275)
	{
		{	/* Cfa/cinfo2.sch 665 */
			return
				BGl_procedurezd2refzd2appzd2funzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7275));
		}

	}



/* procedure-ref-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2refzd2appzd2funzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_244, BgL_varz00_bglt BgL_vz00_245)
	{
		{	/* Cfa/cinfo2.sch 666 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_244)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_245), BUNSPEC);
		}

	}



/* &procedure-ref-app-fun-set! */
	obj_t BGl_z62procedurezd2refzd2appzd2funzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7276, obj_t BgL_oz00_7277, obj_t BgL_vz00_7278)
	{
		{	/* Cfa/cinfo2.sch 666 */
			return
				BGl_procedurezd2refzd2appzd2funzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7277), ((BgL_varz00_bglt) BgL_vz00_7278));
		}

	}



/* procedure-ref-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2refzd2appzd2keyzd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_246)
	{
		{	/* Cfa/cinfo2.sch 667 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_246)))->BgL_keyz00);
		}

	}



/* &procedure-ref-app-key */
	obj_t BGl_z62procedurezd2refzd2appzd2keyzb0zzcfa_info2z00(obj_t
		BgL_envz00_7279, obj_t BgL_oz00_7280)
	{
		{	/* Cfa/cinfo2.sch 667 */
			return
				BGl_procedurezd2refzd2appzd2keyzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7280));
		}

	}



/* procedure-ref-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2refzd2appzd2keyzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_247, obj_t BgL_vz00_248)
	{
		{	/* Cfa/cinfo2.sch 668 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_247)))->BgL_keyz00) =
				((obj_t) BgL_vz00_248), BUNSPEC);
		}

	}



/* &procedure-ref-app-key-set! */
	obj_t BGl_z62procedurezd2refzd2appzd2keyzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7281, obj_t BgL_oz00_7282, obj_t BgL_vz00_7283)
	{
		{	/* Cfa/cinfo2.sch 668 */
			return
				BGl_procedurezd2refzd2appzd2keyzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7282), BgL_vz00_7283);
		}

	}



/* procedure-ref-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2refzd2appzd2sidezd2effectz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_249)
	{
		{	/* Cfa/cinfo2.sch 669 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_249)))->BgL_sidezd2effectzd2);
		}

	}



/* &procedure-ref-app-side-effect */
	obj_t BGl_z62procedurezd2refzd2appzd2sidezd2effectz62zzcfa_info2z00(obj_t
		BgL_envz00_7284, obj_t BgL_oz00_7285)
	{
		{	/* Cfa/cinfo2.sch 669 */
			return
				BGl_procedurezd2refzd2appzd2sidezd2effectz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7285));
		}

	}



/* procedure-ref-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2refzd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_250, obj_t BgL_vz00_251)
	{
		{	/* Cfa/cinfo2.sch 670 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_250)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_251), BUNSPEC);
		}

	}



/* &procedure-ref-app-side-effect-set! */
	obj_t
		BGl_z62procedurezd2refzd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7286, obj_t BgL_oz00_7287, obj_t BgL_vz00_7288)
	{
		{	/* Cfa/cinfo2.sch 670 */
			return
				BGl_procedurezd2refzd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7287), BgL_vz00_7288);
		}

	}



/* procedure-ref-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_procedurezd2refzd2appzd2typezd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_252)
	{
		{	/* Cfa/cinfo2.sch 671 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_252)))->BgL_typez00);
		}

	}



/* &procedure-ref-app-type */
	BgL_typez00_bglt BGl_z62procedurezd2refzd2appzd2typezb0zzcfa_info2z00(obj_t
		BgL_envz00_7289, obj_t BgL_oz00_7290)
	{
		{	/* Cfa/cinfo2.sch 671 */
			return
				BGl_procedurezd2refzd2appzd2typezd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7290));
		}

	}



/* procedure-ref-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2refzd2appzd2typezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_253, BgL_typez00_bglt BgL_vz00_254)
	{
		{	/* Cfa/cinfo2.sch 672 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_253)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_254), BUNSPEC);
		}

	}



/* &procedure-ref-app-type-set! */
	obj_t BGl_z62procedurezd2refzd2appzd2typezd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7291, obj_t BgL_oz00_7292, obj_t BgL_vz00_7293)
	{
		{	/* Cfa/cinfo2.sch 672 */
			return
				BGl_procedurezd2refzd2appzd2typezd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7292), ((BgL_typez00_bglt) BgL_vz00_7293));
		}

	}



/* procedure-ref-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2refzd2appzd2loczd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_255)
	{
		{	/* Cfa/cinfo2.sch 673 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_255)))->BgL_locz00);
		}

	}



/* &procedure-ref-app-loc */
	obj_t BGl_z62procedurezd2refzd2appzd2loczb0zzcfa_info2z00(obj_t
		BgL_envz00_7294, obj_t BgL_oz00_7295)
	{
		{	/* Cfa/cinfo2.sch 673 */
			return
				BGl_procedurezd2refzd2appzd2loczd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7295));
		}

	}



/* make-procedure-set!-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2procedurezd2setz12zd2appzc0zzcfa_info2z00(obj_t
		BgL_loc1620z00_258, BgL_typez00_bglt BgL_type1621z00_259,
		obj_t BgL_sidezd2effect1622zd2_260, obj_t BgL_key1623z00_261,
		BgL_varz00_bglt BgL_fun1624z00_262, obj_t BgL_args1625z00_263,
		obj_t BgL_stackable1626z00_264, BgL_approxz00_bglt BgL_approx1627z00_265,
		obj_t BgL_vapprox1628z00_266)
	{
		{	/* Cfa/cinfo2.sch 677 */
			{	/* Cfa/cinfo2.sch 677 */
				BgL_appz00_bglt BgL_new1497z00_8990;

				{	/* Cfa/cinfo2.sch 677 */
					BgL_appz00_bglt BgL_tmp1495z00_8991;
					BgL_procedurezd2setz12zd2appz12_bglt BgL_wide1496z00_8992;

					{
						BgL_appz00_bglt BgL_auxz00_11117;

						{	/* Cfa/cinfo2.sch 677 */
							BgL_appz00_bglt BgL_new1494z00_8993;

							BgL_new1494z00_8993 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 677 */
								long BgL_arg1954z00_8994;

								BgL_arg1954z00_8994 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1494z00_8993),
									BgL_arg1954z00_8994);
							}
							{	/* Cfa/cinfo2.sch 677 */
								BgL_objectz00_bglt BgL_tmpz00_11122;

								BgL_tmpz00_11122 = ((BgL_objectz00_bglt) BgL_new1494z00_8993);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_11122, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1494z00_8993);
							BgL_auxz00_11117 = BgL_new1494z00_8993;
						}
						BgL_tmp1495z00_8991 = ((BgL_appz00_bglt) BgL_auxz00_11117);
					}
					BgL_wide1496z00_8992 =
						((BgL_procedurezd2setz12zd2appz12_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_procedurezd2setz12zd2appz12_bgl))));
					{	/* Cfa/cinfo2.sch 677 */
						obj_t BgL_auxz00_11130;
						BgL_objectz00_bglt BgL_tmpz00_11128;

						BgL_auxz00_11130 = ((obj_t) BgL_wide1496z00_8992);
						BgL_tmpz00_11128 = ((BgL_objectz00_bglt) BgL_tmp1495z00_8991);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_11128, BgL_auxz00_11130);
					}
					((BgL_objectz00_bglt) BgL_tmp1495z00_8991);
					{	/* Cfa/cinfo2.sch 677 */
						long BgL_arg1953z00_8995;

						BgL_arg1953z00_8995 =
							BGL_CLASS_NUM(BGl_procedurezd2setz12zd2appz12zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1495z00_8991), BgL_arg1953z00_8995);
					}
					BgL_new1497z00_8990 = ((BgL_appz00_bglt) BgL_tmp1495z00_8991);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1497z00_8990)))->BgL_locz00) =
					((obj_t) BgL_loc1620z00_258), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1497z00_8990)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1621z00_259), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1497z00_8990)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1622zd2_260), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1497z00_8990)))->BgL_keyz00) =
					((obj_t) BgL_key1623z00_261), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1497z00_8990)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1624z00_262), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1497z00_8990)))->
						BgL_argsz00) = ((obj_t) BgL_args1625z00_263), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1497z00_8990)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1626z00_264), BUNSPEC);
				{
					BgL_procedurezd2setz12zd2appz12_bglt BgL_auxz00_11152;

					{
						obj_t BgL_auxz00_11153;

						{	/* Cfa/cinfo2.sch 677 */
							BgL_objectz00_bglt BgL_tmpz00_11154;

							BgL_tmpz00_11154 = ((BgL_objectz00_bglt) BgL_new1497z00_8990);
							BgL_auxz00_11153 = BGL_OBJECT_WIDENING(BgL_tmpz00_11154);
						}
						BgL_auxz00_11152 =
							((BgL_procedurezd2setz12zd2appz12_bglt) BgL_auxz00_11153);
					}
					((((BgL_procedurezd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_11152))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_approx1627z00_265), BUNSPEC);
				}
				{
					BgL_procedurezd2setz12zd2appz12_bglt BgL_auxz00_11159;

					{
						obj_t BgL_auxz00_11160;

						{	/* Cfa/cinfo2.sch 677 */
							BgL_objectz00_bglt BgL_tmpz00_11161;

							BgL_tmpz00_11161 = ((BgL_objectz00_bglt) BgL_new1497z00_8990);
							BgL_auxz00_11160 = BGL_OBJECT_WIDENING(BgL_tmpz00_11161);
						}
						BgL_auxz00_11159 =
							((BgL_procedurezd2setz12zd2appz12_bglt) BgL_auxz00_11160);
					}
					((((BgL_procedurezd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_11159))->
							BgL_vapproxz00) = ((obj_t) BgL_vapprox1628z00_266), BUNSPEC);
				}
				return BgL_new1497z00_8990;
			}
		}

	}



/* &make-procedure-set!-app */
	BgL_appz00_bglt BGl_z62makezd2procedurezd2setz12zd2appza2zzcfa_info2z00(obj_t
		BgL_envz00_7296, obj_t BgL_loc1620z00_7297, obj_t BgL_type1621z00_7298,
		obj_t BgL_sidezd2effect1622zd2_7299, obj_t BgL_key1623z00_7300,
		obj_t BgL_fun1624z00_7301, obj_t BgL_args1625z00_7302,
		obj_t BgL_stackable1626z00_7303, obj_t BgL_approx1627z00_7304,
		obj_t BgL_vapprox1628z00_7305)
	{
		{	/* Cfa/cinfo2.sch 677 */
			return
				BGl_makezd2procedurezd2setz12zd2appzc0zzcfa_info2z00
				(BgL_loc1620z00_7297, ((BgL_typez00_bglt) BgL_type1621z00_7298),
				BgL_sidezd2effect1622zd2_7299, BgL_key1623z00_7300,
				((BgL_varz00_bglt) BgL_fun1624z00_7301), BgL_args1625z00_7302,
				BgL_stackable1626z00_7303,
				((BgL_approxz00_bglt) BgL_approx1627z00_7304), BgL_vapprox1628z00_7305);
		}

	}



/* procedure-set!-app? */
	BGL_EXPORTED_DEF bool_t BGl_procedurezd2setz12zd2appzf3ze1zzcfa_info2z00(obj_t
		BgL_objz00_267)
	{
		{	/* Cfa/cinfo2.sch 678 */
			{	/* Cfa/cinfo2.sch 678 */
				obj_t BgL_classz00_8996;

				BgL_classz00_8996 = BGl_procedurezd2setz12zd2appz12zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_267))
					{	/* Cfa/cinfo2.sch 678 */
						BgL_objectz00_bglt BgL_arg1801z00_8997;

						BgL_arg1801z00_8997 = (BgL_objectz00_bglt) (BgL_objz00_267);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 678 */
								long BgL_idxz00_8998;

								BgL_idxz00_8998 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_8997);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_8998 + 4L)) == BgL_classz00_8996);
							}
						else
							{	/* Cfa/cinfo2.sch 678 */
								bool_t BgL_res2841z00_9001;

								{	/* Cfa/cinfo2.sch 678 */
									obj_t BgL_oclassz00_9002;

									{	/* Cfa/cinfo2.sch 678 */
										long BgL_arg1808z00_9003;

										{	/* Cfa/cinfo2.sch 678 */
											long BgL_arg1809z00_9004;

											BgL_arg1809z00_9004 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_8997);
											BgL_arg1808z00_9003 = (BgL_arg1809z00_9004 - OBJECT_TYPE);
										}
										BgL_oclassz00_9002 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_9003);
									}
									{	/* Cfa/cinfo2.sch 678 */
										bool_t BgL__ortest_1115z00_9005;

										BgL__ortest_1115z00_9005 =
											(BgL_classz00_8996 == BgL_oclassz00_9002);
										if (BgL__ortest_1115z00_9005)
											{	/* Cfa/cinfo2.sch 678 */
												BgL_res2841z00_9001 = BgL__ortest_1115z00_9005;
											}
										else
											{	/* Cfa/cinfo2.sch 678 */
												long BgL_odepthz00_9006;

												BgL_odepthz00_9006 =
													BGL_CLASS_DEPTH(BgL_oclassz00_9002);
												if ((4L < BgL_odepthz00_9006))
													{	/* Cfa/cinfo2.sch 678 */
														obj_t BgL_arg1797z00_9007;

														BgL_arg1797z00_9007 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_9002, 4L);
														BgL_res2841z00_9001 =
															(BgL_arg1797z00_9007 == BgL_classz00_8996);
													}
												else
													{	/* Cfa/cinfo2.sch 678 */
														BgL_res2841z00_9001 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2841z00_9001;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 678 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &procedure-set!-app? */
	obj_t BGl_z62procedurezd2setz12zd2appzf3z83zzcfa_info2z00(obj_t
		BgL_envz00_7306, obj_t BgL_objz00_7307)
	{
		{	/* Cfa/cinfo2.sch 678 */
			return
				BBOOL(BGl_procedurezd2setz12zd2appzf3ze1zzcfa_info2z00
				(BgL_objz00_7307));
		}

	}



/* procedure-set!-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_procedurezd2setz12zd2appzd2nilzc0zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 679 */
			{	/* Cfa/cinfo2.sch 679 */
				obj_t BgL_classz00_5324;

				BgL_classz00_5324 = BGl_procedurezd2setz12zd2appz12zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 679 */
					obj_t BgL__ortest_1117z00_5325;

					BgL__ortest_1117z00_5325 = BGL_CLASS_NIL(BgL_classz00_5324);
					if (CBOOL(BgL__ortest_1117z00_5325))
						{	/* Cfa/cinfo2.sch 679 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_5325);
						}
					else
						{	/* Cfa/cinfo2.sch 679 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_5324));
						}
				}
			}
		}

	}



/* &procedure-set!-app-nil */
	BgL_appz00_bglt BGl_z62procedurezd2setz12zd2appzd2nilza2zzcfa_info2z00(obj_t
		BgL_envz00_7308)
	{
		{	/* Cfa/cinfo2.sch 679 */
			return BGl_procedurezd2setz12zd2appzd2nilzc0zzcfa_info2z00();
		}

	}



/* procedure-set!-app-vapprox */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2setz12zd2appzd2vapproxzc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_268)
	{
		{	/* Cfa/cinfo2.sch 680 */
			{
				BgL_procedurezd2setz12zd2appz12_bglt BgL_auxz00_11198;

				{
					obj_t BgL_auxz00_11199;

					{	/* Cfa/cinfo2.sch 680 */
						BgL_objectz00_bglt BgL_tmpz00_11200;

						BgL_tmpz00_11200 = ((BgL_objectz00_bglt) BgL_oz00_268);
						BgL_auxz00_11199 = BGL_OBJECT_WIDENING(BgL_tmpz00_11200);
					}
					BgL_auxz00_11198 =
						((BgL_procedurezd2setz12zd2appz12_bglt) BgL_auxz00_11199);
				}
				return
					(((BgL_procedurezd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_11198))->
					BgL_vapproxz00);
			}
		}

	}



/* &procedure-set!-app-vapprox */
	obj_t BGl_z62procedurezd2setz12zd2appzd2vapproxza2zzcfa_info2z00(obj_t
		BgL_envz00_7309, obj_t BgL_oz00_7310)
	{
		{	/* Cfa/cinfo2.sch 680 */
			return
				BGl_procedurezd2setz12zd2appzd2vapproxzc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7310));
		}

	}



/* procedure-set!-app-vapprox-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2setz12zd2appzd2vapproxzd2setz12z00zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_269, obj_t BgL_vz00_270)
	{
		{	/* Cfa/cinfo2.sch 681 */
			{
				BgL_procedurezd2setz12zd2appz12_bglt BgL_auxz00_11207;

				{
					obj_t BgL_auxz00_11208;

					{	/* Cfa/cinfo2.sch 681 */
						BgL_objectz00_bglt BgL_tmpz00_11209;

						BgL_tmpz00_11209 = ((BgL_objectz00_bglt) BgL_oz00_269);
						BgL_auxz00_11208 = BGL_OBJECT_WIDENING(BgL_tmpz00_11209);
					}
					BgL_auxz00_11207 =
						((BgL_procedurezd2setz12zd2appz12_bglt) BgL_auxz00_11208);
				}
				return
					((((BgL_procedurezd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_11207))->
						BgL_vapproxz00) = ((obj_t) BgL_vz00_270), BUNSPEC);
			}
		}

	}



/* &procedure-set!-app-vapprox-set! */
	obj_t
		BGl_z62procedurezd2setz12zd2appzd2vapproxzd2setz12z62zzcfa_info2z00(obj_t
		BgL_envz00_7311, obj_t BgL_oz00_7312, obj_t BgL_vz00_7313)
	{
		{	/* Cfa/cinfo2.sch 681 */
			return
				BGl_procedurezd2setz12zd2appzd2vapproxzd2setz12z00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7312), BgL_vz00_7313);
		}

	}



/* procedure-set!-app-approx */
	BGL_EXPORTED_DEF BgL_approxz00_bglt
		BGl_procedurezd2setz12zd2appzd2approxzc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_271)
	{
		{	/* Cfa/cinfo2.sch 682 */
			{
				BgL_procedurezd2setz12zd2appz12_bglt BgL_auxz00_11216;

				{
					obj_t BgL_auxz00_11217;

					{	/* Cfa/cinfo2.sch 682 */
						BgL_objectz00_bglt BgL_tmpz00_11218;

						BgL_tmpz00_11218 = ((BgL_objectz00_bglt) BgL_oz00_271);
						BgL_auxz00_11217 = BGL_OBJECT_WIDENING(BgL_tmpz00_11218);
					}
					BgL_auxz00_11216 =
						((BgL_procedurezd2setz12zd2appz12_bglt) BgL_auxz00_11217);
				}
				return
					(((BgL_procedurezd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_11216))->
					BgL_approxz00);
			}
		}

	}



/* &procedure-set!-app-approx */
	BgL_approxz00_bglt
		BGl_z62procedurezd2setz12zd2appzd2approxza2zzcfa_info2z00(obj_t
		BgL_envz00_7314, obj_t BgL_oz00_7315)
	{
		{	/* Cfa/cinfo2.sch 682 */
			return
				BGl_procedurezd2setz12zd2appzd2approxzc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7315));
		}

	}



/* procedure-set!-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2setz12zd2appzd2stackablezc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_274)
	{
		{	/* Cfa/cinfo2.sch 684 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_274)))->BgL_stackablez00);
		}

	}



/* &procedure-set!-app-stackable */
	obj_t BGl_z62procedurezd2setz12zd2appzd2stackableza2zzcfa_info2z00(obj_t
		BgL_envz00_7316, obj_t BgL_oz00_7317)
	{
		{	/* Cfa/cinfo2.sch 684 */
			return
				BGl_procedurezd2setz12zd2appzd2stackablezc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7317));
		}

	}



/* procedure-set!-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2setz12zd2appzd2stackablezd2setz12z00zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_275, obj_t BgL_vz00_276)
	{
		{	/* Cfa/cinfo2.sch 685 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_275)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_276), BUNSPEC);
		}

	}



/* &procedure-set!-app-stackable-set! */
	obj_t
		BGl_z62procedurezd2setz12zd2appzd2stackablezd2setz12z62zzcfa_info2z00(obj_t
		BgL_envz00_7318, obj_t BgL_oz00_7319, obj_t BgL_vz00_7320)
	{
		{	/* Cfa/cinfo2.sch 685 */
			return
				BGl_procedurezd2setz12zd2appzd2stackablezd2setz12z00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7319), BgL_vz00_7320);
		}

	}



/* procedure-set!-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2setz12zd2appzd2argszc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_277)
	{
		{	/* Cfa/cinfo2.sch 686 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_277)))->BgL_argsz00);
		}

	}



/* &procedure-set!-app-args */
	obj_t BGl_z62procedurezd2setz12zd2appzd2argsza2zzcfa_info2z00(obj_t
		BgL_envz00_7321, obj_t BgL_oz00_7322)
	{
		{	/* Cfa/cinfo2.sch 686 */
			return
				BGl_procedurezd2setz12zd2appzd2argszc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7322));
		}

	}



/* procedure-set!-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2setz12zd2appzd2argszd2setz12z00zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_278, obj_t BgL_vz00_279)
	{
		{	/* Cfa/cinfo2.sch 687 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_278)))->BgL_argsz00) =
				((obj_t) BgL_vz00_279), BUNSPEC);
		}

	}



/* &procedure-set!-app-args-set! */
	obj_t BGl_z62procedurezd2setz12zd2appzd2argszd2setz12z62zzcfa_info2z00(obj_t
		BgL_envz00_7323, obj_t BgL_oz00_7324, obj_t BgL_vz00_7325)
	{
		{	/* Cfa/cinfo2.sch 687 */
			return
				BGl_procedurezd2setz12zd2appzd2argszd2setz12z00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7324), BgL_vz00_7325);
		}

	}



/* procedure-set!-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_procedurezd2setz12zd2appzd2funzc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_280)
	{
		{	/* Cfa/cinfo2.sch 688 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_280)))->BgL_funz00);
		}

	}



/* &procedure-set!-app-fun */
	BgL_varz00_bglt BGl_z62procedurezd2setz12zd2appzd2funza2zzcfa_info2z00(obj_t
		BgL_envz00_7326, obj_t BgL_oz00_7327)
	{
		{	/* Cfa/cinfo2.sch 688 */
			return
				BGl_procedurezd2setz12zd2appzd2funzc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7327));
		}

	}



/* procedure-set!-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2setz12zd2appzd2funzd2setz12z00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_281, BgL_varz00_bglt BgL_vz00_282)
	{
		{	/* Cfa/cinfo2.sch 689 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_281)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_282), BUNSPEC);
		}

	}



/* &procedure-set!-app-fun-set! */
	obj_t BGl_z62procedurezd2setz12zd2appzd2funzd2setz12z62zzcfa_info2z00(obj_t
		BgL_envz00_7328, obj_t BgL_oz00_7329, obj_t BgL_vz00_7330)
	{
		{	/* Cfa/cinfo2.sch 689 */
			return
				BGl_procedurezd2setz12zd2appzd2funzd2setz12z00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7329), ((BgL_varz00_bglt) BgL_vz00_7330));
		}

	}



/* procedure-set!-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2setz12zd2appzd2keyzc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_283)
	{
		{	/* Cfa/cinfo2.sch 690 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_283)))->BgL_keyz00);
		}

	}



/* &procedure-set!-app-key */
	obj_t BGl_z62procedurezd2setz12zd2appzd2keyza2zzcfa_info2z00(obj_t
		BgL_envz00_7331, obj_t BgL_oz00_7332)
	{
		{	/* Cfa/cinfo2.sch 690 */
			return
				BGl_procedurezd2setz12zd2appzd2keyzc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7332));
		}

	}



/* procedure-set!-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2setz12zd2appzd2keyzd2setz12z00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_284, obj_t BgL_vz00_285)
	{
		{	/* Cfa/cinfo2.sch 691 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_284)))->BgL_keyz00) =
				((obj_t) BgL_vz00_285), BUNSPEC);
		}

	}



/* &procedure-set!-app-key-set! */
	obj_t BGl_z62procedurezd2setz12zd2appzd2keyzd2setz12z62zzcfa_info2z00(obj_t
		BgL_envz00_7333, obj_t BgL_oz00_7334, obj_t BgL_vz00_7335)
	{
		{	/* Cfa/cinfo2.sch 691 */
			return
				BGl_procedurezd2setz12zd2appzd2keyzd2setz12z00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7334), BgL_vz00_7335);
		}

	}



/* procedure-set!-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2setz12zd2appzd2sidezd2effectz12zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_286)
	{
		{	/* Cfa/cinfo2.sch 692 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_286)))->BgL_sidezd2effectzd2);
		}

	}



/* &procedure-set!-app-side-effect */
	obj_t BGl_z62procedurezd2setz12zd2appzd2sidezd2effectz70zzcfa_info2z00(obj_t
		BgL_envz00_7336, obj_t BgL_oz00_7337)
	{
		{	/* Cfa/cinfo2.sch 692 */
			return
				BGl_procedurezd2setz12zd2appzd2sidezd2effectz12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7337));
		}

	}



/* procedure-set!-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2setz12zd2appzd2sidezd2effectzd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_287, obj_t BgL_vz00_288)
	{
		{	/* Cfa/cinfo2.sch 693 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_287)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_288), BUNSPEC);
		}

	}



/* &procedure-set!-app-side-effect-set! */
	obj_t
		BGl_z62procedurezd2setz12zd2appzd2sidezd2effectzd2setz12zb0zzcfa_info2z00
		(obj_t BgL_envz00_7338, obj_t BgL_oz00_7339, obj_t BgL_vz00_7340)
	{
		{	/* Cfa/cinfo2.sch 693 */
			return
				BGl_procedurezd2setz12zd2appzd2sidezd2effectzd2setz12zd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7339), BgL_vz00_7340);
		}

	}



/* procedure-set!-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_procedurezd2setz12zd2appzd2typezc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_289)
	{
		{	/* Cfa/cinfo2.sch 694 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_289)))->BgL_typez00);
		}

	}



/* &procedure-set!-app-type */
	BgL_typez00_bglt BGl_z62procedurezd2setz12zd2appzd2typeza2zzcfa_info2z00(obj_t
		BgL_envz00_7341, obj_t BgL_oz00_7342)
	{
		{	/* Cfa/cinfo2.sch 694 */
			return
				BGl_procedurezd2setz12zd2appzd2typezc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7342));
		}

	}



/* procedure-set!-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2setz12zd2appzd2typezd2setz12z00zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_290, BgL_typez00_bglt BgL_vz00_291)
	{
		{	/* Cfa/cinfo2.sch 695 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_290)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_291), BUNSPEC);
		}

	}



/* &procedure-set!-app-type-set! */
	obj_t BGl_z62procedurezd2setz12zd2appzd2typezd2setz12z62zzcfa_info2z00(obj_t
		BgL_envz00_7343, obj_t BgL_oz00_7344, obj_t BgL_vz00_7345)
	{
		{	/* Cfa/cinfo2.sch 695 */
			return
				BGl_procedurezd2setz12zd2appzd2typezd2setz12z00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7344), ((BgL_typez00_bglt) BgL_vz00_7345));
		}

	}



/* procedure-set!-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_procedurezd2setz12zd2appzd2loczc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_292)
	{
		{	/* Cfa/cinfo2.sch 696 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_292)))->BgL_locz00);
		}

	}



/* &procedure-set!-app-loc */
	obj_t BGl_z62procedurezd2setz12zd2appzd2locza2zzcfa_info2z00(obj_t
		BgL_envz00_7346, obj_t BgL_oz00_7347)
	{
		{	/* Cfa/cinfo2.sch 696 */
			return
				BGl_procedurezd2setz12zd2appzd2loczc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7347));
		}

	}



/* make-pre-make-vector-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2prezd2makezd2vectorzd2appz00zzcfa_info2z00(obj_t
		BgL_loc1611z00_295, BgL_typez00_bglt BgL_type1612z00_296,
		obj_t BgL_sidezd2effect1613zd2_297, obj_t BgL_key1614z00_298,
		BgL_varz00_bglt BgL_fun1615z00_299, obj_t BgL_args1616z00_300,
		obj_t BgL_stackable1617z00_301, BgL_variablez00_bglt BgL_owner1618z00_302)
	{
		{	/* Cfa/cinfo2.sch 700 */
			{	/* Cfa/cinfo2.sch 700 */
				BgL_appz00_bglt BgL_new1501z00_9008;

				{	/* Cfa/cinfo2.sch 700 */
					BgL_appz00_bglt BgL_tmp1499z00_9009;
					BgL_prezd2makezd2vectorzd2appzd2_bglt BgL_wide1500z00_9010;

					{
						BgL_appz00_bglt BgL_auxz00_11279;

						{	/* Cfa/cinfo2.sch 700 */
							BgL_appz00_bglt BgL_new1498z00_9011;

							BgL_new1498z00_9011 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 700 */
								long BgL_arg1956z00_9012;

								BgL_arg1956z00_9012 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1498z00_9011),
									BgL_arg1956z00_9012);
							}
							{	/* Cfa/cinfo2.sch 700 */
								BgL_objectz00_bglt BgL_tmpz00_11284;

								BgL_tmpz00_11284 = ((BgL_objectz00_bglt) BgL_new1498z00_9011);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_11284, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1498z00_9011);
							BgL_auxz00_11279 = BgL_new1498z00_9011;
						}
						BgL_tmp1499z00_9009 = ((BgL_appz00_bglt) BgL_auxz00_11279);
					}
					BgL_wide1500z00_9010 =
						((BgL_prezd2makezd2vectorzd2appzd2_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2makezd2vectorzd2appzd2_bgl))));
					{	/* Cfa/cinfo2.sch 700 */
						obj_t BgL_auxz00_11292;
						BgL_objectz00_bglt BgL_tmpz00_11290;

						BgL_auxz00_11292 = ((obj_t) BgL_wide1500z00_9010);
						BgL_tmpz00_11290 = ((BgL_objectz00_bglt) BgL_tmp1499z00_9009);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_11290, BgL_auxz00_11292);
					}
					((BgL_objectz00_bglt) BgL_tmp1499z00_9009);
					{	/* Cfa/cinfo2.sch 700 */
						long BgL_arg1955z00_9013;

						BgL_arg1955z00_9013 =
							BGL_CLASS_NUM(BGl_prezd2makezd2vectorzd2appzd2zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1499z00_9009), BgL_arg1955z00_9013);
					}
					BgL_new1501z00_9008 = ((BgL_appz00_bglt) BgL_tmp1499z00_9009);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1501z00_9008)))->BgL_locz00) =
					((obj_t) BgL_loc1611z00_295), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1501z00_9008)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1612z00_296), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1501z00_9008)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1613zd2_297), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1501z00_9008)))->BgL_keyz00) =
					((obj_t) BgL_key1614z00_298), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1501z00_9008)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1615z00_299), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1501z00_9008)))->
						BgL_argsz00) = ((obj_t) BgL_args1616z00_300), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1501z00_9008)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1617z00_301), BUNSPEC);
				{
					BgL_prezd2makezd2vectorzd2appzd2_bglt BgL_auxz00_11314;

					{
						obj_t BgL_auxz00_11315;

						{	/* Cfa/cinfo2.sch 700 */
							BgL_objectz00_bglt BgL_tmpz00_11316;

							BgL_tmpz00_11316 = ((BgL_objectz00_bglt) BgL_new1501z00_9008);
							BgL_auxz00_11315 = BGL_OBJECT_WIDENING(BgL_tmpz00_11316);
						}
						BgL_auxz00_11314 =
							((BgL_prezd2makezd2vectorzd2appzd2_bglt) BgL_auxz00_11315);
					}
					((((BgL_prezd2makezd2vectorzd2appzd2_bglt)
								COBJECT(BgL_auxz00_11314))->BgL_ownerz00) =
						((BgL_variablez00_bglt) BgL_owner1618z00_302), BUNSPEC);
				}
				return BgL_new1501z00_9008;
			}
		}

	}



/* &make-pre-make-vector-app */
	BgL_appz00_bglt BGl_z62makezd2prezd2makezd2vectorzd2appz62zzcfa_info2z00(obj_t
		BgL_envz00_7348, obj_t BgL_loc1611z00_7349, obj_t BgL_type1612z00_7350,
		obj_t BgL_sidezd2effect1613zd2_7351, obj_t BgL_key1614z00_7352,
		obj_t BgL_fun1615z00_7353, obj_t BgL_args1616z00_7354,
		obj_t BgL_stackable1617z00_7355, obj_t BgL_owner1618z00_7356)
	{
		{	/* Cfa/cinfo2.sch 700 */
			return
				BGl_makezd2prezd2makezd2vectorzd2appz00zzcfa_info2z00
				(BgL_loc1611z00_7349, ((BgL_typez00_bglt) BgL_type1612z00_7350),
				BgL_sidezd2effect1613zd2_7351, BgL_key1614z00_7352,
				((BgL_varz00_bglt) BgL_fun1615z00_7353), BgL_args1616z00_7354,
				BgL_stackable1617z00_7355,
				((BgL_variablez00_bglt) BgL_owner1618z00_7356));
		}

	}



/* pre-make-vector-app? */
	BGL_EXPORTED_DEF bool_t
		BGl_prezd2makezd2vectorzd2appzf3z21zzcfa_info2z00(obj_t BgL_objz00_303)
	{
		{	/* Cfa/cinfo2.sch 701 */
			{	/* Cfa/cinfo2.sch 701 */
				obj_t BgL_classz00_9014;

				BgL_classz00_9014 = BGl_prezd2makezd2vectorzd2appzd2zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_303))
					{	/* Cfa/cinfo2.sch 701 */
						BgL_objectz00_bglt BgL_arg1801z00_9015;

						BgL_arg1801z00_9015 = (BgL_objectz00_bglt) (BgL_objz00_303);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 701 */
								long BgL_idxz00_9016;

								BgL_idxz00_9016 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_9015);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_9016 + 4L)) == BgL_classz00_9014);
							}
						else
							{	/* Cfa/cinfo2.sch 701 */
								bool_t BgL_res2842z00_9019;

								{	/* Cfa/cinfo2.sch 701 */
									obj_t BgL_oclassz00_9020;

									{	/* Cfa/cinfo2.sch 701 */
										long BgL_arg1808z00_9021;

										{	/* Cfa/cinfo2.sch 701 */
											long BgL_arg1809z00_9022;

											BgL_arg1809z00_9022 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_9015);
											BgL_arg1808z00_9021 = (BgL_arg1809z00_9022 - OBJECT_TYPE);
										}
										BgL_oclassz00_9020 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_9021);
									}
									{	/* Cfa/cinfo2.sch 701 */
										bool_t BgL__ortest_1115z00_9023;

										BgL__ortest_1115z00_9023 =
											(BgL_classz00_9014 == BgL_oclassz00_9020);
										if (BgL__ortest_1115z00_9023)
											{	/* Cfa/cinfo2.sch 701 */
												BgL_res2842z00_9019 = BgL__ortest_1115z00_9023;
											}
										else
											{	/* Cfa/cinfo2.sch 701 */
												long BgL_odepthz00_9024;

												BgL_odepthz00_9024 =
													BGL_CLASS_DEPTH(BgL_oclassz00_9020);
												if ((4L < BgL_odepthz00_9024))
													{	/* Cfa/cinfo2.sch 701 */
														obj_t BgL_arg1797z00_9025;

														BgL_arg1797z00_9025 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_9020, 4L);
														BgL_res2842z00_9019 =
															(BgL_arg1797z00_9025 == BgL_classz00_9014);
													}
												else
													{	/* Cfa/cinfo2.sch 701 */
														BgL_res2842z00_9019 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2842z00_9019;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 701 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &pre-make-vector-app? */
	obj_t BGl_z62prezd2makezd2vectorzd2appzf3z43zzcfa_info2z00(obj_t
		BgL_envz00_7357, obj_t BgL_objz00_7358)
	{
		{	/* Cfa/cinfo2.sch 701 */
			return
				BBOOL(BGl_prezd2makezd2vectorzd2appzf3z21zzcfa_info2z00
				(BgL_objz00_7358));
		}

	}



/* pre-make-vector-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_prezd2makezd2vectorzd2appzd2nilz00zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 702 */
			{	/* Cfa/cinfo2.sch 702 */
				obj_t BgL_classz00_5375;

				BgL_classz00_5375 = BGl_prezd2makezd2vectorzd2appzd2zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 702 */
					obj_t BgL__ortest_1117z00_5376;

					BgL__ortest_1117z00_5376 = BGL_CLASS_NIL(BgL_classz00_5375);
					if (CBOOL(BgL__ortest_1117z00_5376))
						{	/* Cfa/cinfo2.sch 702 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_5376);
						}
					else
						{	/* Cfa/cinfo2.sch 702 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_5375));
						}
				}
			}
		}

	}



/* &pre-make-vector-app-nil */
	BgL_appz00_bglt BGl_z62prezd2makezd2vectorzd2appzd2nilz62zzcfa_info2z00(obj_t
		BgL_envz00_7359)
	{
		{	/* Cfa/cinfo2.sch 702 */
			return BGl_prezd2makezd2vectorzd2appzd2nilz00zzcfa_info2z00();
		}

	}



/* pre-make-vector-app-owner */
	BGL_EXPORTED_DEF BgL_variablez00_bglt
		BGl_prezd2makezd2vectorzd2appzd2ownerz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_304)
	{
		{	/* Cfa/cinfo2.sch 703 */
			{
				BgL_prezd2makezd2vectorzd2appzd2_bglt BgL_auxz00_11353;

				{
					obj_t BgL_auxz00_11354;

					{	/* Cfa/cinfo2.sch 703 */
						BgL_objectz00_bglt BgL_tmpz00_11355;

						BgL_tmpz00_11355 = ((BgL_objectz00_bglt) BgL_oz00_304);
						BgL_auxz00_11354 = BGL_OBJECT_WIDENING(BgL_tmpz00_11355);
					}
					BgL_auxz00_11353 =
						((BgL_prezd2makezd2vectorzd2appzd2_bglt) BgL_auxz00_11354);
				}
				return
					(((BgL_prezd2makezd2vectorzd2appzd2_bglt) COBJECT(BgL_auxz00_11353))->
					BgL_ownerz00);
			}
		}

	}



/* &pre-make-vector-app-owner */
	BgL_variablez00_bglt
		BGl_z62prezd2makezd2vectorzd2appzd2ownerz62zzcfa_info2z00(obj_t
		BgL_envz00_7360, obj_t BgL_oz00_7361)
	{
		{	/* Cfa/cinfo2.sch 703 */
			return
				BGl_prezd2makezd2vectorzd2appzd2ownerz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7361));
		}

	}



/* pre-make-vector-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2vectorzd2appzd2stackablez00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_307)
	{
		{	/* Cfa/cinfo2.sch 705 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_307)))->BgL_stackablez00);
		}

	}



/* &pre-make-vector-app-stackable */
	obj_t BGl_z62prezd2makezd2vectorzd2appzd2stackablez62zzcfa_info2z00(obj_t
		BgL_envz00_7362, obj_t BgL_oz00_7363)
	{
		{	/* Cfa/cinfo2.sch 705 */
			return
				BGl_prezd2makezd2vectorzd2appzd2stackablez00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7363));
		}

	}



/* pre-make-vector-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2vectorzd2appzd2stackablezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_308, obj_t BgL_vz00_309)
	{
		{	/* Cfa/cinfo2.sch 706 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_308)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_309), BUNSPEC);
		}

	}



/* &pre-make-vector-app-stackable-set! */
	obj_t
		BGl_z62prezd2makezd2vectorzd2appzd2stackablezd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7364, obj_t BgL_oz00_7365, obj_t BgL_vz00_7366)
	{
		{	/* Cfa/cinfo2.sch 706 */
			return
				BGl_prezd2makezd2vectorzd2appzd2stackablezd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7365), BgL_vz00_7366);
		}

	}



/* pre-make-vector-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2vectorzd2appzd2argsz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_310)
	{
		{	/* Cfa/cinfo2.sch 707 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_310)))->BgL_argsz00);
		}

	}



/* &pre-make-vector-app-args */
	obj_t BGl_z62prezd2makezd2vectorzd2appzd2argsz62zzcfa_info2z00(obj_t
		BgL_envz00_7367, obj_t BgL_oz00_7368)
	{
		{	/* Cfa/cinfo2.sch 707 */
			return
				BGl_prezd2makezd2vectorzd2appzd2argsz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7368));
		}

	}



/* pre-make-vector-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2vectorzd2appzd2argszd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_311, obj_t BgL_vz00_312)
	{
		{	/* Cfa/cinfo2.sch 708 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_311)))->BgL_argsz00) =
				((obj_t) BgL_vz00_312), BUNSPEC);
		}

	}



/* &pre-make-vector-app-args-set! */
	obj_t BGl_z62prezd2makezd2vectorzd2appzd2argszd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7369, obj_t BgL_oz00_7370, obj_t BgL_vz00_7371)
	{
		{	/* Cfa/cinfo2.sch 708 */
			return
				BGl_prezd2makezd2vectorzd2appzd2argszd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7370), BgL_vz00_7371);
		}

	}



/* pre-make-vector-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_prezd2makezd2vectorzd2appzd2funz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_313)
	{
		{	/* Cfa/cinfo2.sch 709 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_313)))->BgL_funz00);
		}

	}



/* &pre-make-vector-app-fun */
	BgL_varz00_bglt BGl_z62prezd2makezd2vectorzd2appzd2funz62zzcfa_info2z00(obj_t
		BgL_envz00_7372, obj_t BgL_oz00_7373)
	{
		{	/* Cfa/cinfo2.sch 709 */
			return
				BGl_prezd2makezd2vectorzd2appzd2funz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7373));
		}

	}



/* pre-make-vector-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2vectorzd2appzd2funzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_314, BgL_varz00_bglt BgL_vz00_315)
	{
		{	/* Cfa/cinfo2.sch 710 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_314)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_315), BUNSPEC);
		}

	}



/* &pre-make-vector-app-fun-set! */
	obj_t BGl_z62prezd2makezd2vectorzd2appzd2funzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7374, obj_t BgL_oz00_7375, obj_t BgL_vz00_7376)
	{
		{	/* Cfa/cinfo2.sch 710 */
			return
				BGl_prezd2makezd2vectorzd2appzd2funzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7375), ((BgL_varz00_bglt) BgL_vz00_7376));
		}

	}



/* pre-make-vector-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2vectorzd2appzd2keyz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_316)
	{
		{	/* Cfa/cinfo2.sch 711 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_316)))->BgL_keyz00);
		}

	}



/* &pre-make-vector-app-key */
	obj_t BGl_z62prezd2makezd2vectorzd2appzd2keyz62zzcfa_info2z00(obj_t
		BgL_envz00_7377, obj_t BgL_oz00_7378)
	{
		{	/* Cfa/cinfo2.sch 711 */
			return
				BGl_prezd2makezd2vectorzd2appzd2keyz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7378));
		}

	}



/* pre-make-vector-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2vectorzd2appzd2keyzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_317, obj_t BgL_vz00_318)
	{
		{	/* Cfa/cinfo2.sch 712 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_317)))->BgL_keyz00) =
				((obj_t) BgL_vz00_318), BUNSPEC);
		}

	}



/* &pre-make-vector-app-key-set! */
	obj_t BGl_z62prezd2makezd2vectorzd2appzd2keyzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7379, obj_t BgL_oz00_7380, obj_t BgL_vz00_7381)
	{
		{	/* Cfa/cinfo2.sch 712 */
			return
				BGl_prezd2makezd2vectorzd2appzd2keyzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7380), BgL_vz00_7381);
		}

	}



/* pre-make-vector-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2vectorzd2appzd2sidezd2effectzd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_319)
	{
		{	/* Cfa/cinfo2.sch 713 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_319)))->BgL_sidezd2effectzd2);
		}

	}



/* &pre-make-vector-app-side-effect */
	obj_t BGl_z62prezd2makezd2vectorzd2appzd2sidezd2effectzb0zzcfa_info2z00(obj_t
		BgL_envz00_7382, obj_t BgL_oz00_7383)
	{
		{	/* Cfa/cinfo2.sch 713 */
			return
				BGl_prezd2makezd2vectorzd2appzd2sidezd2effectzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7383));
		}

	}



/* pre-make-vector-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2vectorzd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_320, obj_t BgL_vz00_321)
	{
		{	/* Cfa/cinfo2.sch 714 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_320)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_321), BUNSPEC);
		}

	}



/* &pre-make-vector-app-side-effect-set! */
	obj_t
		BGl_z62prezd2makezd2vectorzd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00
		(obj_t BgL_envz00_7384, obj_t BgL_oz00_7385, obj_t BgL_vz00_7386)
	{
		{	/* Cfa/cinfo2.sch 714 */
			return
				BGl_prezd2makezd2vectorzd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7385), BgL_vz00_7386);
		}

	}



/* pre-make-vector-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_prezd2makezd2vectorzd2appzd2typez00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_322)
	{
		{	/* Cfa/cinfo2.sch 715 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_322)))->BgL_typez00);
		}

	}



/* &pre-make-vector-app-type */
	BgL_typez00_bglt
		BGl_z62prezd2makezd2vectorzd2appzd2typez62zzcfa_info2z00(obj_t
		BgL_envz00_7387, obj_t BgL_oz00_7388)
	{
		{	/* Cfa/cinfo2.sch 715 */
			return
				BGl_prezd2makezd2vectorzd2appzd2typez00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7388));
		}

	}



/* pre-make-vector-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2vectorzd2appzd2typezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_323, BgL_typez00_bglt BgL_vz00_324)
	{
		{	/* Cfa/cinfo2.sch 716 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_323)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_324), BUNSPEC);
		}

	}



/* &pre-make-vector-app-type-set! */
	obj_t BGl_z62prezd2makezd2vectorzd2appzd2typezd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7389, obj_t BgL_oz00_7390, obj_t BgL_vz00_7391)
	{
		{	/* Cfa/cinfo2.sch 716 */
			return
				BGl_prezd2makezd2vectorzd2appzd2typezd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7390), ((BgL_typez00_bglt) BgL_vz00_7391));
		}

	}



/* pre-make-vector-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2vectorzd2appzd2locz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_325)
	{
		{	/* Cfa/cinfo2.sch 717 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_325)))->BgL_locz00);
		}

	}



/* &pre-make-vector-app-loc */
	obj_t BGl_z62prezd2makezd2vectorzd2appzd2locz62zzcfa_info2z00(obj_t
		BgL_envz00_7392, obj_t BgL_oz00_7393)
	{
		{	/* Cfa/cinfo2.sch 717 */
			return
				BGl_prezd2makezd2vectorzd2appzd2locz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7393));
		}

	}



/* make-make-vector-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2makezd2vectorzd2appzd2zzcfa_info2z00(obj_t BgL_loc1595z00_328,
		BgL_typez00_bglt BgL_type1596z00_329, obj_t BgL_sidezd2effect1597zd2_330,
		obj_t BgL_key1598z00_331, BgL_varz00_bglt BgL_fun1599z00_332,
		obj_t BgL_args1600z00_333, obj_t BgL_stackable1602z00_334,
		BgL_approxz00_bglt BgL_approx1603z00_335,
		BgL_approxz00_bglt BgL_valuezd2approx1604zd2_336,
		long BgL_lostzd2stamp1605zd2_337, BgL_variablez00_bglt BgL_owner1606z00_338,
		obj_t BgL_stackzd2stamp1607zd2_339, bool_t BgL_seenzf31608zf3_340,
		bool_t BgL_tvectorzf31609zf3_341)
	{
		{	/* Cfa/cinfo2.sch 721 */
			{	/* Cfa/cinfo2.sch 721 */
				BgL_appz00_bglt BgL_new1505z00_9026;

				{	/* Cfa/cinfo2.sch 721 */
					BgL_appz00_bglt BgL_tmp1503z00_9027;
					BgL_makezd2vectorzd2appz00_bglt BgL_wide1504z00_9028;

					{
						BgL_appz00_bglt BgL_auxz00_11416;

						{	/* Cfa/cinfo2.sch 721 */
							BgL_appz00_bglt BgL_new1502z00_9029;

							BgL_new1502z00_9029 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 721 */
								long BgL_arg1958z00_9030;

								BgL_arg1958z00_9030 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1502z00_9029),
									BgL_arg1958z00_9030);
							}
							{	/* Cfa/cinfo2.sch 721 */
								BgL_objectz00_bglt BgL_tmpz00_11421;

								BgL_tmpz00_11421 = ((BgL_objectz00_bglt) BgL_new1502z00_9029);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_11421, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1502z00_9029);
							BgL_auxz00_11416 = BgL_new1502z00_9029;
						}
						BgL_tmp1503z00_9027 = ((BgL_appz00_bglt) BgL_auxz00_11416);
					}
					BgL_wide1504z00_9028 =
						((BgL_makezd2vectorzd2appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
									BgL_makezd2vectorzd2appz00_bgl))));
					{	/* Cfa/cinfo2.sch 721 */
						obj_t BgL_auxz00_11429;
						BgL_objectz00_bglt BgL_tmpz00_11427;

						BgL_auxz00_11429 = ((obj_t) BgL_wide1504z00_9028);
						BgL_tmpz00_11427 = ((BgL_objectz00_bglt) BgL_tmp1503z00_9027);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_11427, BgL_auxz00_11429);
					}
					((BgL_objectz00_bglt) BgL_tmp1503z00_9027);
					{	/* Cfa/cinfo2.sch 721 */
						long BgL_arg1957z00_9031;

						BgL_arg1957z00_9031 =
							BGL_CLASS_NUM(BGl_makezd2vectorzd2appz00zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1503z00_9027), BgL_arg1957z00_9031);
					}
					BgL_new1505z00_9026 = ((BgL_appz00_bglt) BgL_tmp1503z00_9027);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1505z00_9026)))->BgL_locz00) =
					((obj_t) BgL_loc1595z00_328), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1505z00_9026)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1596z00_329), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1505z00_9026)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1597zd2_330), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1505z00_9026)))->BgL_keyz00) =
					((obj_t) BgL_key1598z00_331), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1505z00_9026)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1599z00_332), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1505z00_9026)))->
						BgL_argsz00) = ((obj_t) BgL_args1600z00_333), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1505z00_9026)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1602z00_334), BUNSPEC);
				{
					BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_11451;

					{
						obj_t BgL_auxz00_11452;

						{	/* Cfa/cinfo2.sch 721 */
							BgL_objectz00_bglt BgL_tmpz00_11453;

							BgL_tmpz00_11453 = ((BgL_objectz00_bglt) BgL_new1505z00_9026);
							BgL_auxz00_11452 = BGL_OBJECT_WIDENING(BgL_tmpz00_11453);
						}
						BgL_auxz00_11451 =
							((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_11452);
					}
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_11451))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_approx1603z00_335), BUNSPEC);
				}
				{
					BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_11458;

					{
						obj_t BgL_auxz00_11459;

						{	/* Cfa/cinfo2.sch 721 */
							BgL_objectz00_bglt BgL_tmpz00_11460;

							BgL_tmpz00_11460 = ((BgL_objectz00_bglt) BgL_new1505z00_9026);
							BgL_auxz00_11459 = BGL_OBJECT_WIDENING(BgL_tmpz00_11460);
						}
						BgL_auxz00_11458 =
							((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_11459);
					}
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_11458))->
							BgL_valuezd2approxzd2) =
						((BgL_approxz00_bglt) BgL_valuezd2approx1604zd2_336), BUNSPEC);
				}
				{
					BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_11465;

					{
						obj_t BgL_auxz00_11466;

						{	/* Cfa/cinfo2.sch 721 */
							BgL_objectz00_bglt BgL_tmpz00_11467;

							BgL_tmpz00_11467 = ((BgL_objectz00_bglt) BgL_new1505z00_9026);
							BgL_auxz00_11466 = BGL_OBJECT_WIDENING(BgL_tmpz00_11467);
						}
						BgL_auxz00_11465 =
							((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_11466);
					}
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_11465))->
							BgL_lostzd2stampzd2) =
						((long) BgL_lostzd2stamp1605zd2_337), BUNSPEC);
				}
				{
					BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_11472;

					{
						obj_t BgL_auxz00_11473;

						{	/* Cfa/cinfo2.sch 721 */
							BgL_objectz00_bglt BgL_tmpz00_11474;

							BgL_tmpz00_11474 = ((BgL_objectz00_bglt) BgL_new1505z00_9026);
							BgL_auxz00_11473 = BGL_OBJECT_WIDENING(BgL_tmpz00_11474);
						}
						BgL_auxz00_11472 =
							((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_11473);
					}
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_11472))->
							BgL_ownerz00) =
						((BgL_variablez00_bglt) BgL_owner1606z00_338), BUNSPEC);
				}
				{
					BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_11479;

					{
						obj_t BgL_auxz00_11480;

						{	/* Cfa/cinfo2.sch 721 */
							BgL_objectz00_bglt BgL_tmpz00_11481;

							BgL_tmpz00_11481 = ((BgL_objectz00_bglt) BgL_new1505z00_9026);
							BgL_auxz00_11480 = BGL_OBJECT_WIDENING(BgL_tmpz00_11481);
						}
						BgL_auxz00_11479 =
							((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_11480);
					}
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_11479))->
							BgL_stackzd2stampzd2) =
						((obj_t) BgL_stackzd2stamp1607zd2_339), BUNSPEC);
				}
				{
					BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_11486;

					{
						obj_t BgL_auxz00_11487;

						{	/* Cfa/cinfo2.sch 721 */
							BgL_objectz00_bglt BgL_tmpz00_11488;

							BgL_tmpz00_11488 = ((BgL_objectz00_bglt) BgL_new1505z00_9026);
							BgL_auxz00_11487 = BGL_OBJECT_WIDENING(BgL_tmpz00_11488);
						}
						BgL_auxz00_11486 =
							((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_11487);
					}
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_11486))->
							BgL_seenzf3zf3) = ((bool_t) BgL_seenzf31608zf3_340), BUNSPEC);
				}
				{
					BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_11493;

					{
						obj_t BgL_auxz00_11494;

						{	/* Cfa/cinfo2.sch 721 */
							BgL_objectz00_bglt BgL_tmpz00_11495;

							BgL_tmpz00_11495 = ((BgL_objectz00_bglt) BgL_new1505z00_9026);
							BgL_auxz00_11494 = BGL_OBJECT_WIDENING(BgL_tmpz00_11495);
						}
						BgL_auxz00_11493 =
							((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_11494);
					}
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_11493))->
							BgL_tvectorzf3zf3) =
						((bool_t) BgL_tvectorzf31609zf3_341), BUNSPEC);
				}
				return BgL_new1505z00_9026;
			}
		}

	}



/* &make-make-vector-app */
	BgL_appz00_bglt BGl_z62makezd2makezd2vectorzd2appzb0zzcfa_info2z00(obj_t
		BgL_envz00_7394, obj_t BgL_loc1595z00_7395, obj_t BgL_type1596z00_7396,
		obj_t BgL_sidezd2effect1597zd2_7397, obj_t BgL_key1598z00_7398,
		obj_t BgL_fun1599z00_7399, obj_t BgL_args1600z00_7400,
		obj_t BgL_stackable1602z00_7401, obj_t BgL_approx1603z00_7402,
		obj_t BgL_valuezd2approx1604zd2_7403, obj_t BgL_lostzd2stamp1605zd2_7404,
		obj_t BgL_owner1606z00_7405, obj_t BgL_stackzd2stamp1607zd2_7406,
		obj_t BgL_seenzf31608zf3_7407, obj_t BgL_tvectorzf31609zf3_7408)
	{
		{	/* Cfa/cinfo2.sch 721 */
			return
				BGl_makezd2makezd2vectorzd2appzd2zzcfa_info2z00(BgL_loc1595z00_7395,
				((BgL_typez00_bglt) BgL_type1596z00_7396),
				BgL_sidezd2effect1597zd2_7397, BgL_key1598z00_7398,
				((BgL_varz00_bglt) BgL_fun1599z00_7399), BgL_args1600z00_7400,
				BgL_stackable1602z00_7401,
				((BgL_approxz00_bglt) BgL_approx1603z00_7402),
				((BgL_approxz00_bglt) BgL_valuezd2approx1604zd2_7403),
				(long) CINT(BgL_lostzd2stamp1605zd2_7404),
				((BgL_variablez00_bglt) BgL_owner1606z00_7405),
				BgL_stackzd2stamp1607zd2_7406, CBOOL(BgL_seenzf31608zf3_7407),
				CBOOL(BgL_tvectorzf31609zf3_7408));
		}

	}



/* make-vector-app? */
	BGL_EXPORTED_DEF bool_t BGl_makezd2vectorzd2appzf3zf3zzcfa_info2z00(obj_t
		BgL_objz00_342)
	{
		{	/* Cfa/cinfo2.sch 722 */
			{	/* Cfa/cinfo2.sch 722 */
				obj_t BgL_classz00_9032;

				BgL_classz00_9032 = BGl_makezd2vectorzd2appz00zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_342))
					{	/* Cfa/cinfo2.sch 722 */
						BgL_objectz00_bglt BgL_arg1801z00_9033;

						BgL_arg1801z00_9033 = (BgL_objectz00_bglt) (BgL_objz00_342);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 722 */
								long BgL_idxz00_9034;

								BgL_idxz00_9034 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_9033);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_9034 + 4L)) == BgL_classz00_9032);
							}
						else
							{	/* Cfa/cinfo2.sch 722 */
								bool_t BgL_res2843z00_9037;

								{	/* Cfa/cinfo2.sch 722 */
									obj_t BgL_oclassz00_9038;

									{	/* Cfa/cinfo2.sch 722 */
										long BgL_arg1808z00_9039;

										{	/* Cfa/cinfo2.sch 722 */
											long BgL_arg1809z00_9040;

											BgL_arg1809z00_9040 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_9033);
											BgL_arg1808z00_9039 = (BgL_arg1809z00_9040 - OBJECT_TYPE);
										}
										BgL_oclassz00_9038 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_9039);
									}
									{	/* Cfa/cinfo2.sch 722 */
										bool_t BgL__ortest_1115z00_9041;

										BgL__ortest_1115z00_9041 =
											(BgL_classz00_9032 == BgL_oclassz00_9038);
										if (BgL__ortest_1115z00_9041)
											{	/* Cfa/cinfo2.sch 722 */
												BgL_res2843z00_9037 = BgL__ortest_1115z00_9041;
											}
										else
											{	/* Cfa/cinfo2.sch 722 */
												long BgL_odepthz00_9042;

												BgL_odepthz00_9042 =
													BGL_CLASS_DEPTH(BgL_oclassz00_9038);
												if ((4L < BgL_odepthz00_9042))
													{	/* Cfa/cinfo2.sch 722 */
														obj_t BgL_arg1797z00_9043;

														BgL_arg1797z00_9043 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_9038, 4L);
														BgL_res2843z00_9037 =
															(BgL_arg1797z00_9043 == BgL_classz00_9032);
													}
												else
													{	/* Cfa/cinfo2.sch 722 */
														BgL_res2843z00_9037 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2843z00_9037;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 722 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &make-vector-app? */
	obj_t BGl_z62makezd2vectorzd2appzf3z91zzcfa_info2z00(obj_t BgL_envz00_7409,
		obj_t BgL_objz00_7410)
	{
		{	/* Cfa/cinfo2.sch 722 */
			return
				BBOOL(BGl_makezd2vectorzd2appzf3zf3zzcfa_info2z00(BgL_objz00_7410));
		}

	}



/* make-vector-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2vectorzd2appzd2nilzd2zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 723 */
			{	/* Cfa/cinfo2.sch 723 */
				obj_t BgL_classz00_5430;

				BgL_classz00_5430 = BGl_makezd2vectorzd2appz00zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 723 */
					obj_t BgL__ortest_1117z00_5431;

					BgL__ortest_1117z00_5431 = BGL_CLASS_NIL(BgL_classz00_5430);
					if (CBOOL(BgL__ortest_1117z00_5431))
						{	/* Cfa/cinfo2.sch 723 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_5431);
						}
					else
						{	/* Cfa/cinfo2.sch 723 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_5430));
						}
				}
			}
		}

	}



/* &make-vector-app-nil */
	BgL_appz00_bglt BGl_z62makezd2vectorzd2appzd2nilzb0zzcfa_info2z00(obj_t
		BgL_envz00_7411)
	{
		{	/* Cfa/cinfo2.sch 723 */
			return BGl_makezd2vectorzd2appzd2nilzd2zzcfa_info2z00();
		}

	}



/* make-vector-app-tvector? */
	BGL_EXPORTED_DEF bool_t
		BGl_makezd2vectorzd2appzd2tvectorzf3z21zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_343)
	{
		{	/* Cfa/cinfo2.sch 724 */
			{
				BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_11537;

				{
					obj_t BgL_auxz00_11538;

					{	/* Cfa/cinfo2.sch 724 */
						BgL_objectz00_bglt BgL_tmpz00_11539;

						BgL_tmpz00_11539 = ((BgL_objectz00_bglt) BgL_oz00_343);
						BgL_auxz00_11538 = BGL_OBJECT_WIDENING(BgL_tmpz00_11539);
					}
					BgL_auxz00_11537 =
						((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_11538);
				}
				return
					(((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_11537))->
					BgL_tvectorzf3zf3);
			}
		}

	}



/* &make-vector-app-tvector? */
	obj_t BGl_z62makezd2vectorzd2appzd2tvectorzf3z43zzcfa_info2z00(obj_t
		BgL_envz00_7412, obj_t BgL_oz00_7413)
	{
		{	/* Cfa/cinfo2.sch 724 */
			return
				BBOOL(BGl_makezd2vectorzd2appzd2tvectorzf3z21zzcfa_info2z00(
					((BgL_appz00_bglt) BgL_oz00_7413)));
		}

	}



/* make-vector-app-tvector?-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2vectorzd2appzd2tvectorzf3zd2setz12ze1zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_344, bool_t BgL_vz00_345)
	{
		{	/* Cfa/cinfo2.sch 725 */
			{
				BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_11547;

				{
					obj_t BgL_auxz00_11548;

					{	/* Cfa/cinfo2.sch 725 */
						BgL_objectz00_bglt BgL_tmpz00_11549;

						BgL_tmpz00_11549 = ((BgL_objectz00_bglt) BgL_oz00_344);
						BgL_auxz00_11548 = BGL_OBJECT_WIDENING(BgL_tmpz00_11549);
					}
					BgL_auxz00_11547 =
						((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_11548);
				}
				return
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_11547))->
						BgL_tvectorzf3zf3) = ((bool_t) BgL_vz00_345), BUNSPEC);
			}
		}

	}



/* &make-vector-app-tvector?-set! */
	obj_t BGl_z62makezd2vectorzd2appzd2tvectorzf3zd2setz12z83zzcfa_info2z00(obj_t
		BgL_envz00_7414, obj_t BgL_oz00_7415, obj_t BgL_vz00_7416)
	{
		{	/* Cfa/cinfo2.sch 725 */
			return
				BGl_makezd2vectorzd2appzd2tvectorzf3zd2setz12ze1zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7415), CBOOL(BgL_vz00_7416));
		}

	}



/* make-vector-app-seen? */
	BGL_EXPORTED_DEF bool_t
		BGl_makezd2vectorzd2appzd2seenzf3z21zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_346)
	{
		{	/* Cfa/cinfo2.sch 726 */
			{
				BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_11557;

				{
					obj_t BgL_auxz00_11558;

					{	/* Cfa/cinfo2.sch 726 */
						BgL_objectz00_bglt BgL_tmpz00_11559;

						BgL_tmpz00_11559 = ((BgL_objectz00_bglt) BgL_oz00_346);
						BgL_auxz00_11558 = BGL_OBJECT_WIDENING(BgL_tmpz00_11559);
					}
					BgL_auxz00_11557 =
						((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_11558);
				}
				return
					(((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_11557))->
					BgL_seenzf3zf3);
			}
		}

	}



/* &make-vector-app-seen? */
	obj_t BGl_z62makezd2vectorzd2appzd2seenzf3z43zzcfa_info2z00(obj_t
		BgL_envz00_7417, obj_t BgL_oz00_7418)
	{
		{	/* Cfa/cinfo2.sch 726 */
			return
				BBOOL(BGl_makezd2vectorzd2appzd2seenzf3z21zzcfa_info2z00(
					((BgL_appz00_bglt) BgL_oz00_7418)));
		}

	}



/* make-vector-app-seen?-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2vectorzd2appzd2seenzf3zd2setz12ze1zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_347, bool_t BgL_vz00_348)
	{
		{	/* Cfa/cinfo2.sch 727 */
			{
				BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_11567;

				{
					obj_t BgL_auxz00_11568;

					{	/* Cfa/cinfo2.sch 727 */
						BgL_objectz00_bglt BgL_tmpz00_11569;

						BgL_tmpz00_11569 = ((BgL_objectz00_bglt) BgL_oz00_347);
						BgL_auxz00_11568 = BGL_OBJECT_WIDENING(BgL_tmpz00_11569);
					}
					BgL_auxz00_11567 =
						((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_11568);
				}
				return
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_11567))->
						BgL_seenzf3zf3) = ((bool_t) BgL_vz00_348), BUNSPEC);
			}
		}

	}



/* &make-vector-app-seen?-set! */
	obj_t BGl_z62makezd2vectorzd2appzd2seenzf3zd2setz12z83zzcfa_info2z00(obj_t
		BgL_envz00_7419, obj_t BgL_oz00_7420, obj_t BgL_vz00_7421)
	{
		{	/* Cfa/cinfo2.sch 727 */
			return
				BGl_makezd2vectorzd2appzd2seenzf3zd2setz12ze1zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7420), CBOOL(BgL_vz00_7421));
		}

	}



/* make-vector-app-stack-stamp */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2vectorzd2appzd2stackzd2stampz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_349)
	{
		{	/* Cfa/cinfo2.sch 728 */
			{
				BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_11577;

				{
					obj_t BgL_auxz00_11578;

					{	/* Cfa/cinfo2.sch 728 */
						BgL_objectz00_bglt BgL_tmpz00_11579;

						BgL_tmpz00_11579 = ((BgL_objectz00_bglt) BgL_oz00_349);
						BgL_auxz00_11578 = BGL_OBJECT_WIDENING(BgL_tmpz00_11579);
					}
					BgL_auxz00_11577 =
						((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_11578);
				}
				return
					(((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_11577))->
					BgL_stackzd2stampzd2);
			}
		}

	}



/* &make-vector-app-stack-stamp */
	obj_t BGl_z62makezd2vectorzd2appzd2stackzd2stampz62zzcfa_info2z00(obj_t
		BgL_envz00_7422, obj_t BgL_oz00_7423)
	{
		{	/* Cfa/cinfo2.sch 728 */
			return
				BGl_makezd2vectorzd2appzd2stackzd2stampz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7423));
		}

	}



/* make-vector-app-stack-stamp-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2vectorzd2appzd2stackzd2stampzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_350, obj_t BgL_vz00_351)
	{
		{	/* Cfa/cinfo2.sch 729 */
			{
				BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_11586;

				{
					obj_t BgL_auxz00_11587;

					{	/* Cfa/cinfo2.sch 729 */
						BgL_objectz00_bglt BgL_tmpz00_11588;

						BgL_tmpz00_11588 = ((BgL_objectz00_bglt) BgL_oz00_350);
						BgL_auxz00_11587 = BGL_OBJECT_WIDENING(BgL_tmpz00_11588);
					}
					BgL_auxz00_11586 =
						((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_11587);
				}
				return
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_11586))->
						BgL_stackzd2stampzd2) = ((obj_t) BgL_vz00_351), BUNSPEC);
			}
		}

	}



/* &make-vector-app-stack-stamp-set! */
	obj_t
		BGl_z62makezd2vectorzd2appzd2stackzd2stampzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7424, obj_t BgL_oz00_7425, obj_t BgL_vz00_7426)
	{
		{	/* Cfa/cinfo2.sch 729 */
			return
				BGl_makezd2vectorzd2appzd2stackzd2stampzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7425), BgL_vz00_7426);
		}

	}



/* make-vector-app-owner */
	BGL_EXPORTED_DEF BgL_variablez00_bglt
		BGl_makezd2vectorzd2appzd2ownerzd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_352)
	{
		{	/* Cfa/cinfo2.sch 730 */
			{
				BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_11595;

				{
					obj_t BgL_auxz00_11596;

					{	/* Cfa/cinfo2.sch 730 */
						BgL_objectz00_bglt BgL_tmpz00_11597;

						BgL_tmpz00_11597 = ((BgL_objectz00_bglt) BgL_oz00_352);
						BgL_auxz00_11596 = BGL_OBJECT_WIDENING(BgL_tmpz00_11597);
					}
					BgL_auxz00_11595 =
						((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_11596);
				}
				return
					(((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_11595))->
					BgL_ownerz00);
			}
		}

	}



/* &make-vector-app-owner */
	BgL_variablez00_bglt BGl_z62makezd2vectorzd2appzd2ownerzb0zzcfa_info2z00(obj_t
		BgL_envz00_7427, obj_t BgL_oz00_7428)
	{
		{	/* Cfa/cinfo2.sch 730 */
			return
				BGl_makezd2vectorzd2appzd2ownerzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7428));
		}

	}



/* make-vector-app-lost-stamp */
	BGL_EXPORTED_DEF long
		BGl_makezd2vectorzd2appzd2lostzd2stampz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_355)
	{
		{	/* Cfa/cinfo2.sch 732 */
			{
				BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_11604;

				{
					obj_t BgL_auxz00_11605;

					{	/* Cfa/cinfo2.sch 732 */
						BgL_objectz00_bglt BgL_tmpz00_11606;

						BgL_tmpz00_11606 = ((BgL_objectz00_bglt) BgL_oz00_355);
						BgL_auxz00_11605 = BGL_OBJECT_WIDENING(BgL_tmpz00_11606);
					}
					BgL_auxz00_11604 =
						((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_11605);
				}
				return
					(((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_11604))->
					BgL_lostzd2stampzd2);
			}
		}

	}



/* &make-vector-app-lost-stamp */
	obj_t BGl_z62makezd2vectorzd2appzd2lostzd2stampz62zzcfa_info2z00(obj_t
		BgL_envz00_7429, obj_t BgL_oz00_7430)
	{
		{	/* Cfa/cinfo2.sch 732 */
			return
				BINT(BGl_makezd2vectorzd2appzd2lostzd2stampz00zzcfa_info2z00(
					((BgL_appz00_bglt) BgL_oz00_7430)));
		}

	}



/* make-vector-app-lost-stamp-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2vectorzd2appzd2lostzd2stampzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_356, long BgL_vz00_357)
	{
		{	/* Cfa/cinfo2.sch 733 */
			{
				BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_11614;

				{
					obj_t BgL_auxz00_11615;

					{	/* Cfa/cinfo2.sch 733 */
						BgL_objectz00_bglt BgL_tmpz00_11616;

						BgL_tmpz00_11616 = ((BgL_objectz00_bglt) BgL_oz00_356);
						BgL_auxz00_11615 = BGL_OBJECT_WIDENING(BgL_tmpz00_11616);
					}
					BgL_auxz00_11614 =
						((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_11615);
				}
				return
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_11614))->
						BgL_lostzd2stampzd2) = ((long) BgL_vz00_357), BUNSPEC);
		}}

	}



/* &make-vector-app-lost-stamp-set! */
	obj_t
		BGl_z62makezd2vectorzd2appzd2lostzd2stampzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7431, obj_t BgL_oz00_7432, obj_t BgL_vz00_7433)
	{
		{	/* Cfa/cinfo2.sch 733 */
			return
				BGl_makezd2vectorzd2appzd2lostzd2stampzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7432), (long) CINT(BgL_vz00_7433));
		}

	}



/* make-vector-app-value-approx */
	BGL_EXPORTED_DEF BgL_approxz00_bglt
		BGl_makezd2vectorzd2appzd2valuezd2approxz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_358)
	{
		{	/* Cfa/cinfo2.sch 734 */
			{
				BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_11624;

				{
					obj_t BgL_auxz00_11625;

					{	/* Cfa/cinfo2.sch 734 */
						BgL_objectz00_bglt BgL_tmpz00_11626;

						BgL_tmpz00_11626 = ((BgL_objectz00_bglt) BgL_oz00_358);
						BgL_auxz00_11625 = BGL_OBJECT_WIDENING(BgL_tmpz00_11626);
					}
					BgL_auxz00_11624 =
						((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_11625);
				}
				return
					(((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_11624))->
					BgL_valuezd2approxzd2);
			}
		}

	}



/* &make-vector-app-value-approx */
	BgL_approxz00_bglt
		BGl_z62makezd2vectorzd2appzd2valuezd2approxz62zzcfa_info2z00(obj_t
		BgL_envz00_7434, obj_t BgL_oz00_7435)
	{
		{	/* Cfa/cinfo2.sch 734 */
			return
				BGl_makezd2vectorzd2appzd2valuezd2approxz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7435));
		}

	}



/* make-vector-app-approx */
	BGL_EXPORTED_DEF BgL_approxz00_bglt
		BGl_makezd2vectorzd2appzd2approxzd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_361)
	{
		{	/* Cfa/cinfo2.sch 736 */
			{
				BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_11633;

				{
					obj_t BgL_auxz00_11634;

					{	/* Cfa/cinfo2.sch 736 */
						BgL_objectz00_bglt BgL_tmpz00_11635;

						BgL_tmpz00_11635 = ((BgL_objectz00_bglt) BgL_oz00_361);
						BgL_auxz00_11634 = BGL_OBJECT_WIDENING(BgL_tmpz00_11635);
					}
					BgL_auxz00_11633 =
						((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_11634);
				}
				return
					(((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_11633))->
					BgL_approxz00);
			}
		}

	}



/* &make-vector-app-approx */
	BgL_approxz00_bglt BGl_z62makezd2vectorzd2appzd2approxzb0zzcfa_info2z00(obj_t
		BgL_envz00_7436, obj_t BgL_oz00_7437)
	{
		{	/* Cfa/cinfo2.sch 736 */
			return
				BGl_makezd2vectorzd2appzd2approxzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7437));
		}

	}



/* make-vector-app-approx-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2vectorzd2appzd2approxzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_362, BgL_approxz00_bglt BgL_vz00_363)
	{
		{	/* Cfa/cinfo2.sch 737 */
			{
				BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_11642;

				{
					obj_t BgL_auxz00_11643;

					{	/* Cfa/cinfo2.sch 737 */
						BgL_objectz00_bglt BgL_tmpz00_11644;

						BgL_tmpz00_11644 = ((BgL_objectz00_bglt) BgL_oz00_362);
						BgL_auxz00_11643 = BGL_OBJECT_WIDENING(BgL_tmpz00_11644);
					}
					BgL_auxz00_11642 =
						((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_11643);
				}
				return
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_11642))->
						BgL_approxz00) = ((BgL_approxz00_bglt) BgL_vz00_363), BUNSPEC);
			}
		}

	}



/* &make-vector-app-approx-set! */
	obj_t BGl_z62makezd2vectorzd2appzd2approxzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7438, obj_t BgL_oz00_7439, obj_t BgL_vz00_7440)
	{
		{	/* Cfa/cinfo2.sch 737 */
			return
				BGl_makezd2vectorzd2appzd2approxzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7439),
				((BgL_approxz00_bglt) BgL_vz00_7440));
		}

	}



/* make-vector-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2vectorzd2appzd2stackablezd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_364)
	{
		{	/* Cfa/cinfo2.sch 738 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_364)))->BgL_stackablez00);
		}

	}



/* &make-vector-app-stackable */
	obj_t BGl_z62makezd2vectorzd2appzd2stackablezb0zzcfa_info2z00(obj_t
		BgL_envz00_7441, obj_t BgL_oz00_7442)
	{
		{	/* Cfa/cinfo2.sch 738 */
			return
				BGl_makezd2vectorzd2appzd2stackablezd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7442));
		}

	}



/* make-vector-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2vectorzd2appzd2stackablezd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_365, obj_t BgL_vz00_366)
	{
		{	/* Cfa/cinfo2.sch 739 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_365)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_366), BUNSPEC);
		}

	}



/* &make-vector-app-stackable-set! */
	obj_t BGl_z62makezd2vectorzd2appzd2stackablezd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7443, obj_t BgL_oz00_7444, obj_t BgL_vz00_7445)
	{
		{	/* Cfa/cinfo2.sch 739 */
			return
				BGl_makezd2vectorzd2appzd2stackablezd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7444), BgL_vz00_7445);
		}

	}



/* make-vector-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2vectorzd2appzd2argszd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_367)
	{
		{	/* Cfa/cinfo2.sch 740 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_367)))->BgL_argsz00);
		}

	}



/* &make-vector-app-args */
	obj_t BGl_z62makezd2vectorzd2appzd2argszb0zzcfa_info2z00(obj_t
		BgL_envz00_7446, obj_t BgL_oz00_7447)
	{
		{	/* Cfa/cinfo2.sch 740 */
			return
				BGl_makezd2vectorzd2appzd2argszd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7447));
		}

	}



/* make-vector-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2vectorzd2appzd2argszd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_368, obj_t BgL_vz00_369)
	{
		{	/* Cfa/cinfo2.sch 741 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_368)))->BgL_argsz00) =
				((obj_t) BgL_vz00_369), BUNSPEC);
		}

	}



/* &make-vector-app-args-set! */
	obj_t BGl_z62makezd2vectorzd2appzd2argszd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7448, obj_t BgL_oz00_7449, obj_t BgL_vz00_7450)
	{
		{	/* Cfa/cinfo2.sch 741 */
			return
				BGl_makezd2vectorzd2appzd2argszd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7449), BgL_vz00_7450);
		}

	}



/* make-vector-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_makezd2vectorzd2appzd2funzd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_370)
	{
		{	/* Cfa/cinfo2.sch 742 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_370)))->BgL_funz00);
		}

	}



/* &make-vector-app-fun */
	BgL_varz00_bglt BGl_z62makezd2vectorzd2appzd2funzb0zzcfa_info2z00(obj_t
		BgL_envz00_7451, obj_t BgL_oz00_7452)
	{
		{	/* Cfa/cinfo2.sch 742 */
			return
				BGl_makezd2vectorzd2appzd2funzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7452));
		}

	}



/* make-vector-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2vectorzd2appzd2funzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_371, BgL_varz00_bglt BgL_vz00_372)
	{
		{	/* Cfa/cinfo2.sch 743 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_371)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_372), BUNSPEC);
		}

	}



/* &make-vector-app-fun-set! */
	obj_t BGl_z62makezd2vectorzd2appzd2funzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7453, obj_t BgL_oz00_7454, obj_t BgL_vz00_7455)
	{
		{	/* Cfa/cinfo2.sch 743 */
			return
				BGl_makezd2vectorzd2appzd2funzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7454), ((BgL_varz00_bglt) BgL_vz00_7455));
		}

	}



/* make-vector-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2vectorzd2appzd2keyzd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_373)
	{
		{	/* Cfa/cinfo2.sch 744 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_373)))->BgL_keyz00);
		}

	}



/* &make-vector-app-key */
	obj_t BGl_z62makezd2vectorzd2appzd2keyzb0zzcfa_info2z00(obj_t BgL_envz00_7456,
		obj_t BgL_oz00_7457)
	{
		{	/* Cfa/cinfo2.sch 744 */
			return
				BGl_makezd2vectorzd2appzd2keyzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7457));
		}

	}



/* make-vector-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2vectorzd2appzd2keyzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_374, obj_t BgL_vz00_375)
	{
		{	/* Cfa/cinfo2.sch 745 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_374)))->BgL_keyz00) =
				((obj_t) BgL_vz00_375), BUNSPEC);
		}

	}



/* &make-vector-app-key-set! */
	obj_t BGl_z62makezd2vectorzd2appzd2keyzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7458, obj_t BgL_oz00_7459, obj_t BgL_vz00_7460)
	{
		{	/* Cfa/cinfo2.sch 745 */
			return
				BGl_makezd2vectorzd2appzd2keyzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7459), BgL_vz00_7460);
		}

	}



/* make-vector-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2vectorzd2appzd2sidezd2effectz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_376)
	{
		{	/* Cfa/cinfo2.sch 746 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_376)))->BgL_sidezd2effectzd2);
		}

	}



/* &make-vector-app-side-effect */
	obj_t BGl_z62makezd2vectorzd2appzd2sidezd2effectz62zzcfa_info2z00(obj_t
		BgL_envz00_7461, obj_t BgL_oz00_7462)
	{
		{	/* Cfa/cinfo2.sch 746 */
			return
				BGl_makezd2vectorzd2appzd2sidezd2effectz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7462));
		}

	}



/* make-vector-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2vectorzd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_377, obj_t BgL_vz00_378)
	{
		{	/* Cfa/cinfo2.sch 747 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_377)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_378), BUNSPEC);
		}

	}



/* &make-vector-app-side-effect-set! */
	obj_t
		BGl_z62makezd2vectorzd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7463, obj_t BgL_oz00_7464, obj_t BgL_vz00_7465)
	{
		{	/* Cfa/cinfo2.sch 747 */
			return
				BGl_makezd2vectorzd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7464), BgL_vz00_7465);
		}

	}



/* make-vector-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_makezd2vectorzd2appzd2typezd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_379)
	{
		{	/* Cfa/cinfo2.sch 748 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_379)))->BgL_typez00);
		}

	}



/* &make-vector-app-type */
	BgL_typez00_bglt BGl_z62makezd2vectorzd2appzd2typezb0zzcfa_info2z00(obj_t
		BgL_envz00_7466, obj_t BgL_oz00_7467)
	{
		{	/* Cfa/cinfo2.sch 748 */
			return
				BGl_makezd2vectorzd2appzd2typezd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7467));
		}

	}



/* make-vector-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2vectorzd2appzd2typezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_380, BgL_typez00_bglt BgL_vz00_381)
	{
		{	/* Cfa/cinfo2.sch 749 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_380)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_381), BUNSPEC);
		}

	}



/* &make-vector-app-type-set! */
	obj_t BGl_z62makezd2vectorzd2appzd2typezd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7468, obj_t BgL_oz00_7469, obj_t BgL_vz00_7470)
	{
		{	/* Cfa/cinfo2.sch 749 */
			return
				BGl_makezd2vectorzd2appzd2typezd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7469), ((BgL_typez00_bglt) BgL_vz00_7470));
		}

	}



/* make-vector-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2vectorzd2appzd2loczd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_382)
	{
		{	/* Cfa/cinfo2.sch 750 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_382)))->BgL_locz00);
		}

	}



/* &make-vector-app-loc */
	obj_t BGl_z62makezd2vectorzd2appzd2loczb0zzcfa_info2z00(obj_t BgL_envz00_7471,
		obj_t BgL_oz00_7472)
	{
		{	/* Cfa/cinfo2.sch 750 */
			return
				BGl_makezd2vectorzd2appzd2loczd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7472));
		}

	}



/* make-pre-cons-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2prezd2conszd2appzd2zzcfa_info2z00(obj_t BgL_loc1585z00_385,
		BgL_typez00_bglt BgL_type1586z00_386, obj_t BgL_sidezd2effect1587zd2_387,
		obj_t BgL_key1588z00_388, BgL_varz00_bglt BgL_fun1589z00_389,
		obj_t BgL_args1590z00_390, obj_t BgL_stackable1591z00_391,
		BgL_variablez00_bglt BgL_owner1592z00_392)
	{
		{	/* Cfa/cinfo2.sch 754 */
			{	/* Cfa/cinfo2.sch 754 */
				BgL_appz00_bglt BgL_new1509z00_9044;

				{	/* Cfa/cinfo2.sch 754 */
					BgL_appz00_bglt BgL_tmp1507z00_9045;
					BgL_prezd2conszd2appz00_bglt BgL_wide1508z00_9046;

					{
						BgL_appz00_bglt BgL_auxz00_11706;

						{	/* Cfa/cinfo2.sch 754 */
							BgL_appz00_bglt BgL_new1506z00_9047;

							BgL_new1506z00_9047 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 754 */
								long BgL_arg1960z00_9048;

								BgL_arg1960z00_9048 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1506z00_9047),
									BgL_arg1960z00_9048);
							}
							{	/* Cfa/cinfo2.sch 754 */
								BgL_objectz00_bglt BgL_tmpz00_11711;

								BgL_tmpz00_11711 = ((BgL_objectz00_bglt) BgL_new1506z00_9047);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_11711, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1506z00_9047);
							BgL_auxz00_11706 = BgL_new1506z00_9047;
						}
						BgL_tmp1507z00_9045 = ((BgL_appz00_bglt) BgL_auxz00_11706);
					}
					BgL_wide1508z00_9046 =
						((BgL_prezd2conszd2appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2conszd2appz00_bgl))));
					{	/* Cfa/cinfo2.sch 754 */
						obj_t BgL_auxz00_11719;
						BgL_objectz00_bglt BgL_tmpz00_11717;

						BgL_auxz00_11719 = ((obj_t) BgL_wide1508z00_9046);
						BgL_tmpz00_11717 = ((BgL_objectz00_bglt) BgL_tmp1507z00_9045);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_11717, BgL_auxz00_11719);
					}
					((BgL_objectz00_bglt) BgL_tmp1507z00_9045);
					{	/* Cfa/cinfo2.sch 754 */
						long BgL_arg1959z00_9049;

						BgL_arg1959z00_9049 =
							BGL_CLASS_NUM(BGl_prezd2conszd2appz00zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1507z00_9045), BgL_arg1959z00_9049);
					}
					BgL_new1509z00_9044 = ((BgL_appz00_bglt) BgL_tmp1507z00_9045);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1509z00_9044)))->BgL_locz00) =
					((obj_t) BgL_loc1585z00_385), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1509z00_9044)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1586z00_386), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1509z00_9044)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1587zd2_387), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1509z00_9044)))->BgL_keyz00) =
					((obj_t) BgL_key1588z00_388), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1509z00_9044)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1589z00_389), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1509z00_9044)))->
						BgL_argsz00) = ((obj_t) BgL_args1590z00_390), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1509z00_9044)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1591z00_391), BUNSPEC);
				{
					BgL_prezd2conszd2appz00_bglt BgL_auxz00_11741;

					{
						obj_t BgL_auxz00_11742;

						{	/* Cfa/cinfo2.sch 754 */
							BgL_objectz00_bglt BgL_tmpz00_11743;

							BgL_tmpz00_11743 = ((BgL_objectz00_bglt) BgL_new1509z00_9044);
							BgL_auxz00_11742 = BGL_OBJECT_WIDENING(BgL_tmpz00_11743);
						}
						BgL_auxz00_11741 =
							((BgL_prezd2conszd2appz00_bglt) BgL_auxz00_11742);
					}
					((((BgL_prezd2conszd2appz00_bglt) COBJECT(BgL_auxz00_11741))->
							BgL_ownerz00) =
						((BgL_variablez00_bglt) BgL_owner1592z00_392), BUNSPEC);
				}
				return BgL_new1509z00_9044;
			}
		}

	}



/* &make-pre-cons-app */
	BgL_appz00_bglt BGl_z62makezd2prezd2conszd2appzb0zzcfa_info2z00(obj_t
		BgL_envz00_7473, obj_t BgL_loc1585z00_7474, obj_t BgL_type1586z00_7475,
		obj_t BgL_sidezd2effect1587zd2_7476, obj_t BgL_key1588z00_7477,
		obj_t BgL_fun1589z00_7478, obj_t BgL_args1590z00_7479,
		obj_t BgL_stackable1591z00_7480, obj_t BgL_owner1592z00_7481)
	{
		{	/* Cfa/cinfo2.sch 754 */
			return
				BGl_makezd2prezd2conszd2appzd2zzcfa_info2z00(BgL_loc1585z00_7474,
				((BgL_typez00_bglt) BgL_type1586z00_7475),
				BgL_sidezd2effect1587zd2_7476, BgL_key1588z00_7477,
				((BgL_varz00_bglt) BgL_fun1589z00_7478), BgL_args1590z00_7479,
				BgL_stackable1591z00_7480,
				((BgL_variablez00_bglt) BgL_owner1592z00_7481));
		}

	}



/* pre-cons-app? */
	BGL_EXPORTED_DEF bool_t BGl_prezd2conszd2appzf3zf3zzcfa_info2z00(obj_t
		BgL_objz00_393)
	{
		{	/* Cfa/cinfo2.sch 755 */
			{	/* Cfa/cinfo2.sch 755 */
				obj_t BgL_classz00_9050;

				BgL_classz00_9050 = BGl_prezd2conszd2appz00zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_393))
					{	/* Cfa/cinfo2.sch 755 */
						BgL_objectz00_bglt BgL_arg1801z00_9051;

						BgL_arg1801z00_9051 = (BgL_objectz00_bglt) (BgL_objz00_393);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 755 */
								long BgL_idxz00_9052;

								BgL_idxz00_9052 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_9051);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_9052 + 4L)) == BgL_classz00_9050);
							}
						else
							{	/* Cfa/cinfo2.sch 755 */
								bool_t BgL_res2844z00_9055;

								{	/* Cfa/cinfo2.sch 755 */
									obj_t BgL_oclassz00_9056;

									{	/* Cfa/cinfo2.sch 755 */
										long BgL_arg1808z00_9057;

										{	/* Cfa/cinfo2.sch 755 */
											long BgL_arg1809z00_9058;

											BgL_arg1809z00_9058 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_9051);
											BgL_arg1808z00_9057 = (BgL_arg1809z00_9058 - OBJECT_TYPE);
										}
										BgL_oclassz00_9056 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_9057);
									}
									{	/* Cfa/cinfo2.sch 755 */
										bool_t BgL__ortest_1115z00_9059;

										BgL__ortest_1115z00_9059 =
											(BgL_classz00_9050 == BgL_oclassz00_9056);
										if (BgL__ortest_1115z00_9059)
											{	/* Cfa/cinfo2.sch 755 */
												BgL_res2844z00_9055 = BgL__ortest_1115z00_9059;
											}
										else
											{	/* Cfa/cinfo2.sch 755 */
												long BgL_odepthz00_9060;

												BgL_odepthz00_9060 =
													BGL_CLASS_DEPTH(BgL_oclassz00_9056);
												if ((4L < BgL_odepthz00_9060))
													{	/* Cfa/cinfo2.sch 755 */
														obj_t BgL_arg1797z00_9061;

														BgL_arg1797z00_9061 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_9056, 4L);
														BgL_res2844z00_9055 =
															(BgL_arg1797z00_9061 == BgL_classz00_9050);
													}
												else
													{	/* Cfa/cinfo2.sch 755 */
														BgL_res2844z00_9055 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2844z00_9055;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 755 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &pre-cons-app? */
	obj_t BGl_z62prezd2conszd2appzf3z91zzcfa_info2z00(obj_t BgL_envz00_7482,
		obj_t BgL_objz00_7483)
	{
		{	/* Cfa/cinfo2.sch 755 */
			return BBOOL(BGl_prezd2conszd2appzf3zf3zzcfa_info2z00(BgL_objz00_7483));
		}

	}



/* pre-cons-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_prezd2conszd2appzd2nilzd2zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 756 */
			{	/* Cfa/cinfo2.sch 756 */
				obj_t BgL_classz00_5490;

				BgL_classz00_5490 = BGl_prezd2conszd2appz00zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 756 */
					obj_t BgL__ortest_1117z00_5491;

					BgL__ortest_1117z00_5491 = BGL_CLASS_NIL(BgL_classz00_5490);
					if (CBOOL(BgL__ortest_1117z00_5491))
						{	/* Cfa/cinfo2.sch 756 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_5491);
						}
					else
						{	/* Cfa/cinfo2.sch 756 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_5490));
						}
				}
			}
		}

	}



/* &pre-cons-app-nil */
	BgL_appz00_bglt BGl_z62prezd2conszd2appzd2nilzb0zzcfa_info2z00(obj_t
		BgL_envz00_7484)
	{
		{	/* Cfa/cinfo2.sch 756 */
			return BGl_prezd2conszd2appzd2nilzd2zzcfa_info2z00();
		}

	}



/* pre-cons-app-owner */
	BGL_EXPORTED_DEF BgL_variablez00_bglt
		BGl_prezd2conszd2appzd2ownerzd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_394)
	{
		{	/* Cfa/cinfo2.sch 757 */
			{
				BgL_prezd2conszd2appz00_bglt BgL_auxz00_11780;

				{
					obj_t BgL_auxz00_11781;

					{	/* Cfa/cinfo2.sch 757 */
						BgL_objectz00_bglt BgL_tmpz00_11782;

						BgL_tmpz00_11782 = ((BgL_objectz00_bglt) BgL_oz00_394);
						BgL_auxz00_11781 = BGL_OBJECT_WIDENING(BgL_tmpz00_11782);
					}
					BgL_auxz00_11780 = ((BgL_prezd2conszd2appz00_bglt) BgL_auxz00_11781);
				}
				return
					(((BgL_prezd2conszd2appz00_bglt) COBJECT(BgL_auxz00_11780))->
					BgL_ownerz00);
			}
		}

	}



/* &pre-cons-app-owner */
	BgL_variablez00_bglt BGl_z62prezd2conszd2appzd2ownerzb0zzcfa_info2z00(obj_t
		BgL_envz00_7485, obj_t BgL_oz00_7486)
	{
		{	/* Cfa/cinfo2.sch 757 */
			return
				BGl_prezd2conszd2appzd2ownerzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7486));
		}

	}



/* pre-cons-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2appzd2stackablezd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_397)
	{
		{	/* Cfa/cinfo2.sch 759 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_397)))->BgL_stackablez00);
		}

	}



/* &pre-cons-app-stackable */
	obj_t BGl_z62prezd2conszd2appzd2stackablezb0zzcfa_info2z00(obj_t
		BgL_envz00_7487, obj_t BgL_oz00_7488)
	{
		{	/* Cfa/cinfo2.sch 759 */
			return
				BGl_prezd2conszd2appzd2stackablezd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7488));
		}

	}



/* pre-cons-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2appzd2stackablezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_398, obj_t BgL_vz00_399)
	{
		{	/* Cfa/cinfo2.sch 760 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_398)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_399), BUNSPEC);
		}

	}



/* &pre-cons-app-stackable-set! */
	obj_t BGl_z62prezd2conszd2appzd2stackablezd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7489, obj_t BgL_oz00_7490, obj_t BgL_vz00_7491)
	{
		{	/* Cfa/cinfo2.sch 760 */
			return
				BGl_prezd2conszd2appzd2stackablezd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7490), BgL_vz00_7491);
		}

	}



/* pre-cons-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2appzd2argszd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_400)
	{
		{	/* Cfa/cinfo2.sch 761 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_400)))->BgL_argsz00);
		}

	}



/* &pre-cons-app-args */
	obj_t BGl_z62prezd2conszd2appzd2argszb0zzcfa_info2z00(obj_t BgL_envz00_7492,
		obj_t BgL_oz00_7493)
	{
		{	/* Cfa/cinfo2.sch 761 */
			return
				BGl_prezd2conszd2appzd2argszd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7493));
		}

	}



/* pre-cons-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2appzd2argszd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_401, obj_t BgL_vz00_402)
	{
		{	/* Cfa/cinfo2.sch 762 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_401)))->BgL_argsz00) =
				((obj_t) BgL_vz00_402), BUNSPEC);
		}

	}



/* &pre-cons-app-args-set! */
	obj_t BGl_z62prezd2conszd2appzd2argszd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7494, obj_t BgL_oz00_7495, obj_t BgL_vz00_7496)
	{
		{	/* Cfa/cinfo2.sch 762 */
			return
				BGl_prezd2conszd2appzd2argszd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7495), BgL_vz00_7496);
		}

	}



/* pre-cons-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_prezd2conszd2appzd2funzd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_403)
	{
		{	/* Cfa/cinfo2.sch 763 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_403)))->BgL_funz00);
		}

	}



/* &pre-cons-app-fun */
	BgL_varz00_bglt BGl_z62prezd2conszd2appzd2funzb0zzcfa_info2z00(obj_t
		BgL_envz00_7497, obj_t BgL_oz00_7498)
	{
		{	/* Cfa/cinfo2.sch 763 */
			return
				BGl_prezd2conszd2appzd2funzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7498));
		}

	}



/* pre-cons-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2appzd2funzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_404, BgL_varz00_bglt BgL_vz00_405)
	{
		{	/* Cfa/cinfo2.sch 764 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_404)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_405), BUNSPEC);
		}

	}



/* &pre-cons-app-fun-set! */
	obj_t BGl_z62prezd2conszd2appzd2funzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7499, obj_t BgL_oz00_7500, obj_t BgL_vz00_7501)
	{
		{	/* Cfa/cinfo2.sch 764 */
			return
				BGl_prezd2conszd2appzd2funzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7500), ((BgL_varz00_bglt) BgL_vz00_7501));
		}

	}



/* pre-cons-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2appzd2keyzd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_406)
	{
		{	/* Cfa/cinfo2.sch 765 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_406)))->BgL_keyz00);
		}

	}



/* &pre-cons-app-key */
	obj_t BGl_z62prezd2conszd2appzd2keyzb0zzcfa_info2z00(obj_t BgL_envz00_7502,
		obj_t BgL_oz00_7503)
	{
		{	/* Cfa/cinfo2.sch 765 */
			return
				BGl_prezd2conszd2appzd2keyzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7503));
		}

	}



/* pre-cons-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2appzd2keyzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_407, obj_t BgL_vz00_408)
	{
		{	/* Cfa/cinfo2.sch 766 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_407)))->BgL_keyz00) =
				((obj_t) BgL_vz00_408), BUNSPEC);
		}

	}



/* &pre-cons-app-key-set! */
	obj_t BGl_z62prezd2conszd2appzd2keyzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7504, obj_t BgL_oz00_7505, obj_t BgL_vz00_7506)
	{
		{	/* Cfa/cinfo2.sch 766 */
			return
				BGl_prezd2conszd2appzd2keyzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7505), BgL_vz00_7506);
		}

	}



/* pre-cons-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2appzd2sidezd2effectz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_409)
	{
		{	/* Cfa/cinfo2.sch 767 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_409)))->BgL_sidezd2effectzd2);
		}

	}



/* &pre-cons-app-side-effect */
	obj_t BGl_z62prezd2conszd2appzd2sidezd2effectz62zzcfa_info2z00(obj_t
		BgL_envz00_7507, obj_t BgL_oz00_7508)
	{
		{	/* Cfa/cinfo2.sch 767 */
			return
				BGl_prezd2conszd2appzd2sidezd2effectz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7508));
		}

	}



/* pre-cons-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_410, obj_t BgL_vz00_411)
	{
		{	/* Cfa/cinfo2.sch 768 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_410)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_411), BUNSPEC);
		}

	}



/* &pre-cons-app-side-effect-set! */
	obj_t BGl_z62prezd2conszd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7509, obj_t BgL_oz00_7510, obj_t BgL_vz00_7511)
	{
		{	/* Cfa/cinfo2.sch 768 */
			return
				BGl_prezd2conszd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7510), BgL_vz00_7511);
		}

	}



/* pre-cons-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_prezd2conszd2appzd2typezd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_412)
	{
		{	/* Cfa/cinfo2.sch 769 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_412)))->BgL_typez00);
		}

	}



/* &pre-cons-app-type */
	BgL_typez00_bglt BGl_z62prezd2conszd2appzd2typezb0zzcfa_info2z00(obj_t
		BgL_envz00_7512, obj_t BgL_oz00_7513)
	{
		{	/* Cfa/cinfo2.sch 769 */
			return
				BGl_prezd2conszd2appzd2typezd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7513));
		}

	}



/* pre-cons-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2appzd2typezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_413, BgL_typez00_bglt BgL_vz00_414)
	{
		{	/* Cfa/cinfo2.sch 770 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_413)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_414), BUNSPEC);
		}

	}



/* &pre-cons-app-type-set! */
	obj_t BGl_z62prezd2conszd2appzd2typezd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7514, obj_t BgL_oz00_7515, obj_t BgL_vz00_7516)
	{
		{	/* Cfa/cinfo2.sch 770 */
			return
				BGl_prezd2conszd2appzd2typezd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7515), ((BgL_typez00_bglt) BgL_vz00_7516));
		}

	}



/* pre-cons-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2appzd2loczd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_415)
	{
		{	/* Cfa/cinfo2.sch 771 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_415)))->BgL_locz00);
		}

	}



/* &pre-cons-app-loc */
	obj_t BGl_z62prezd2conszd2appzd2loczb0zzcfa_info2z00(obj_t BgL_envz00_7517,
		obj_t BgL_oz00_7518)
	{
		{	/* Cfa/cinfo2.sch 771 */
			return
				BGl_prezd2conszd2appzd2loczd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7518));
		}

	}



/* make-pre-cons-ref-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2prezd2conszd2refzd2appz00zzcfa_info2z00(obj_t BgL_loc1575z00_418,
		BgL_typez00_bglt BgL_type1576z00_419, obj_t BgL_sidezd2effect1577zd2_420,
		obj_t BgL_key1578z00_421, BgL_varz00_bglt BgL_fun1579z00_422,
		obj_t BgL_args1580z00_423, obj_t BgL_stackable1582z00_424,
		obj_t BgL_get1583z00_425)
	{
		{	/* Cfa/cinfo2.sch 775 */
			{	/* Cfa/cinfo2.sch 775 */
				BgL_appz00_bglt BgL_new1513z00_9062;

				{	/* Cfa/cinfo2.sch 775 */
					BgL_appz00_bglt BgL_tmp1511z00_9063;
					BgL_prezd2conszd2refzd2appzd2_bglt BgL_wide1512z00_9064;

					{
						BgL_appz00_bglt BgL_auxz00_11843;

						{	/* Cfa/cinfo2.sch 775 */
							BgL_appz00_bglt BgL_new1510z00_9065;

							BgL_new1510z00_9065 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 775 */
								long BgL_arg1962z00_9066;

								BgL_arg1962z00_9066 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1510z00_9065),
									BgL_arg1962z00_9066);
							}
							{	/* Cfa/cinfo2.sch 775 */
								BgL_objectz00_bglt BgL_tmpz00_11848;

								BgL_tmpz00_11848 = ((BgL_objectz00_bglt) BgL_new1510z00_9065);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_11848, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1510z00_9065);
							BgL_auxz00_11843 = BgL_new1510z00_9065;
						}
						BgL_tmp1511z00_9063 = ((BgL_appz00_bglt) BgL_auxz00_11843);
					}
					BgL_wide1512z00_9064 =
						((BgL_prezd2conszd2refzd2appzd2_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2conszd2refzd2appzd2_bgl))));
					{	/* Cfa/cinfo2.sch 775 */
						obj_t BgL_auxz00_11856;
						BgL_objectz00_bglt BgL_tmpz00_11854;

						BgL_auxz00_11856 = ((obj_t) BgL_wide1512z00_9064);
						BgL_tmpz00_11854 = ((BgL_objectz00_bglt) BgL_tmp1511z00_9063);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_11854, BgL_auxz00_11856);
					}
					((BgL_objectz00_bglt) BgL_tmp1511z00_9063);
					{	/* Cfa/cinfo2.sch 775 */
						long BgL_arg1961z00_9067;

						BgL_arg1961z00_9067 =
							BGL_CLASS_NUM(BGl_prezd2conszd2refzd2appzd2zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1511z00_9063), BgL_arg1961z00_9067);
					}
					BgL_new1513z00_9062 = ((BgL_appz00_bglt) BgL_tmp1511z00_9063);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1513z00_9062)))->BgL_locz00) =
					((obj_t) BgL_loc1575z00_418), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1513z00_9062)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1576z00_419), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1513z00_9062)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1577zd2_420), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1513z00_9062)))->BgL_keyz00) =
					((obj_t) BgL_key1578z00_421), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1513z00_9062)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1579z00_422), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1513z00_9062)))->
						BgL_argsz00) = ((obj_t) BgL_args1580z00_423), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1513z00_9062)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1582z00_424), BUNSPEC);
				{
					BgL_prezd2conszd2refzd2appzd2_bglt BgL_auxz00_11878;

					{
						obj_t BgL_auxz00_11879;

						{	/* Cfa/cinfo2.sch 775 */
							BgL_objectz00_bglt BgL_tmpz00_11880;

							BgL_tmpz00_11880 = ((BgL_objectz00_bglt) BgL_new1513z00_9062);
							BgL_auxz00_11879 = BGL_OBJECT_WIDENING(BgL_tmpz00_11880);
						}
						BgL_auxz00_11878 =
							((BgL_prezd2conszd2refzd2appzd2_bglt) BgL_auxz00_11879);
					}
					((((BgL_prezd2conszd2refzd2appzd2_bglt) COBJECT(BgL_auxz00_11878))->
							BgL_getz00) = ((obj_t) BgL_get1583z00_425), BUNSPEC);
				}
				return BgL_new1513z00_9062;
			}
		}

	}



/* &make-pre-cons-ref-app */
	BgL_appz00_bglt BGl_z62makezd2prezd2conszd2refzd2appz62zzcfa_info2z00(obj_t
		BgL_envz00_7519, obj_t BgL_loc1575z00_7520, obj_t BgL_type1576z00_7521,
		obj_t BgL_sidezd2effect1577zd2_7522, obj_t BgL_key1578z00_7523,
		obj_t BgL_fun1579z00_7524, obj_t BgL_args1580z00_7525,
		obj_t BgL_stackable1582z00_7526, obj_t BgL_get1583z00_7527)
	{
		{	/* Cfa/cinfo2.sch 775 */
			return
				BGl_makezd2prezd2conszd2refzd2appz00zzcfa_info2z00(BgL_loc1575z00_7520,
				((BgL_typez00_bglt) BgL_type1576z00_7521),
				BgL_sidezd2effect1577zd2_7522, BgL_key1578z00_7523,
				((BgL_varz00_bglt) BgL_fun1579z00_7524), BgL_args1580z00_7525,
				BgL_stackable1582z00_7526, BgL_get1583z00_7527);
		}

	}



/* pre-cons-ref-app? */
	BGL_EXPORTED_DEF bool_t BGl_prezd2conszd2refzd2appzf3z21zzcfa_info2z00(obj_t
		BgL_objz00_426)
	{
		{	/* Cfa/cinfo2.sch 776 */
			{	/* Cfa/cinfo2.sch 776 */
				obj_t BgL_classz00_9068;

				BgL_classz00_9068 = BGl_prezd2conszd2refzd2appzd2zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_426))
					{	/* Cfa/cinfo2.sch 776 */
						BgL_objectz00_bglt BgL_arg1801z00_9069;

						BgL_arg1801z00_9069 = (BgL_objectz00_bglt) (BgL_objz00_426);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 776 */
								long BgL_idxz00_9070;

								BgL_idxz00_9070 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_9069);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_9070 + 4L)) == BgL_classz00_9068);
							}
						else
							{	/* Cfa/cinfo2.sch 776 */
								bool_t BgL_res2845z00_9073;

								{	/* Cfa/cinfo2.sch 776 */
									obj_t BgL_oclassz00_9074;

									{	/* Cfa/cinfo2.sch 776 */
										long BgL_arg1808z00_9075;

										{	/* Cfa/cinfo2.sch 776 */
											long BgL_arg1809z00_9076;

											BgL_arg1809z00_9076 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_9069);
											BgL_arg1808z00_9075 = (BgL_arg1809z00_9076 - OBJECT_TYPE);
										}
										BgL_oclassz00_9074 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_9075);
									}
									{	/* Cfa/cinfo2.sch 776 */
										bool_t BgL__ortest_1115z00_9077;

										BgL__ortest_1115z00_9077 =
											(BgL_classz00_9068 == BgL_oclassz00_9074);
										if (BgL__ortest_1115z00_9077)
											{	/* Cfa/cinfo2.sch 776 */
												BgL_res2845z00_9073 = BgL__ortest_1115z00_9077;
											}
										else
											{	/* Cfa/cinfo2.sch 776 */
												long BgL_odepthz00_9078;

												BgL_odepthz00_9078 =
													BGL_CLASS_DEPTH(BgL_oclassz00_9074);
												if ((4L < BgL_odepthz00_9078))
													{	/* Cfa/cinfo2.sch 776 */
														obj_t BgL_arg1797z00_9079;

														BgL_arg1797z00_9079 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_9074, 4L);
														BgL_res2845z00_9073 =
															(BgL_arg1797z00_9079 == BgL_classz00_9068);
													}
												else
													{	/* Cfa/cinfo2.sch 776 */
														BgL_res2845z00_9073 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2845z00_9073;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 776 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &pre-cons-ref-app? */
	obj_t BGl_z62prezd2conszd2refzd2appzf3z43zzcfa_info2z00(obj_t BgL_envz00_7528,
		obj_t BgL_objz00_7529)
	{
		{	/* Cfa/cinfo2.sch 776 */
			return
				BBOOL(BGl_prezd2conszd2refzd2appzf3z21zzcfa_info2z00(BgL_objz00_7529));
		}

	}



/* pre-cons-ref-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_prezd2conszd2refzd2appzd2nilz00zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 777 */
			{	/* Cfa/cinfo2.sch 777 */
				obj_t BgL_classz00_5539;

				BgL_classz00_5539 = BGl_prezd2conszd2refzd2appzd2zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 777 */
					obj_t BgL__ortest_1117z00_5540;

					BgL__ortest_1117z00_5540 = BGL_CLASS_NIL(BgL_classz00_5539);
					if (CBOOL(BgL__ortest_1117z00_5540))
						{	/* Cfa/cinfo2.sch 777 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_5540);
						}
					else
						{	/* Cfa/cinfo2.sch 777 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_5539));
						}
				}
			}
		}

	}



/* &pre-cons-ref-app-nil */
	BgL_appz00_bglt BGl_z62prezd2conszd2refzd2appzd2nilz62zzcfa_info2z00(obj_t
		BgL_envz00_7530)
	{
		{	/* Cfa/cinfo2.sch 777 */
			return BGl_prezd2conszd2refzd2appzd2nilz00zzcfa_info2z00();
		}

	}



/* pre-cons-ref-app-get */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2refzd2appzd2getz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_427)
	{
		{	/* Cfa/cinfo2.sch 778 */
			{
				BgL_prezd2conszd2refzd2appzd2_bglt BgL_auxz00_11916;

				{
					obj_t BgL_auxz00_11917;

					{	/* Cfa/cinfo2.sch 778 */
						BgL_objectz00_bglt BgL_tmpz00_11918;

						BgL_tmpz00_11918 = ((BgL_objectz00_bglt) BgL_oz00_427);
						BgL_auxz00_11917 = BGL_OBJECT_WIDENING(BgL_tmpz00_11918);
					}
					BgL_auxz00_11916 =
						((BgL_prezd2conszd2refzd2appzd2_bglt) BgL_auxz00_11917);
				}
				return
					(((BgL_prezd2conszd2refzd2appzd2_bglt) COBJECT(BgL_auxz00_11916))->
					BgL_getz00);
			}
		}

	}



/* &pre-cons-ref-app-get */
	obj_t BGl_z62prezd2conszd2refzd2appzd2getz62zzcfa_info2z00(obj_t
		BgL_envz00_7531, obj_t BgL_oz00_7532)
	{
		{	/* Cfa/cinfo2.sch 778 */
			return
				BGl_prezd2conszd2refzd2appzd2getz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7532));
		}

	}



/* pre-cons-ref-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2refzd2appzd2stackablez00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_430)
	{
		{	/* Cfa/cinfo2.sch 780 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_430)))->BgL_stackablez00);
		}

	}



/* &pre-cons-ref-app-stackable */
	obj_t BGl_z62prezd2conszd2refzd2appzd2stackablez62zzcfa_info2z00(obj_t
		BgL_envz00_7533, obj_t BgL_oz00_7534)
	{
		{	/* Cfa/cinfo2.sch 780 */
			return
				BGl_prezd2conszd2refzd2appzd2stackablez00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7534));
		}

	}



/* pre-cons-ref-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2refzd2appzd2stackablezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_431, obj_t BgL_vz00_432)
	{
		{	/* Cfa/cinfo2.sch 781 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_431)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_432), BUNSPEC);
		}

	}



/* &pre-cons-ref-app-stackable-set! */
	obj_t
		BGl_z62prezd2conszd2refzd2appzd2stackablezd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7535, obj_t BgL_oz00_7536, obj_t BgL_vz00_7537)
	{
		{	/* Cfa/cinfo2.sch 781 */
			return
				BGl_prezd2conszd2refzd2appzd2stackablezd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7536), BgL_vz00_7537);
		}

	}



/* pre-cons-ref-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2refzd2appzd2argsz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_433)
	{
		{	/* Cfa/cinfo2.sch 782 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_433)))->BgL_argsz00);
		}

	}



/* &pre-cons-ref-app-args */
	obj_t BGl_z62prezd2conszd2refzd2appzd2argsz62zzcfa_info2z00(obj_t
		BgL_envz00_7538, obj_t BgL_oz00_7539)
	{
		{	/* Cfa/cinfo2.sch 782 */
			return
				BGl_prezd2conszd2refzd2appzd2argsz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7539));
		}

	}



/* pre-cons-ref-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2refzd2appzd2argszd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_434, obj_t BgL_vz00_435)
	{
		{	/* Cfa/cinfo2.sch 783 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_434)))->BgL_argsz00) =
				((obj_t) BgL_vz00_435), BUNSPEC);
		}

	}



/* &pre-cons-ref-app-args-set! */
	obj_t BGl_z62prezd2conszd2refzd2appzd2argszd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7540, obj_t BgL_oz00_7541, obj_t BgL_vz00_7542)
	{
		{	/* Cfa/cinfo2.sch 783 */
			return
				BGl_prezd2conszd2refzd2appzd2argszd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7541), BgL_vz00_7542);
		}

	}



/* pre-cons-ref-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_prezd2conszd2refzd2appzd2funz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_436)
	{
		{	/* Cfa/cinfo2.sch 784 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_436)))->BgL_funz00);
		}

	}



/* &pre-cons-ref-app-fun */
	BgL_varz00_bglt BGl_z62prezd2conszd2refzd2appzd2funz62zzcfa_info2z00(obj_t
		BgL_envz00_7543, obj_t BgL_oz00_7544)
	{
		{	/* Cfa/cinfo2.sch 784 */
			return
				BGl_prezd2conszd2refzd2appzd2funz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7544));
		}

	}



/* pre-cons-ref-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2refzd2appzd2funzd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_437, BgL_varz00_bglt BgL_vz00_438)
	{
		{	/* Cfa/cinfo2.sch 785 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_437)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_438), BUNSPEC);
		}

	}



/* &pre-cons-ref-app-fun-set! */
	obj_t BGl_z62prezd2conszd2refzd2appzd2funzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7545, obj_t BgL_oz00_7546, obj_t BgL_vz00_7547)
	{
		{	/* Cfa/cinfo2.sch 785 */
			return
				BGl_prezd2conszd2refzd2appzd2funzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7546), ((BgL_varz00_bglt) BgL_vz00_7547));
		}

	}



/* pre-cons-ref-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2refzd2appzd2keyz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_439)
	{
		{	/* Cfa/cinfo2.sch 786 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_439)))->BgL_keyz00);
		}

	}



/* &pre-cons-ref-app-key */
	obj_t BGl_z62prezd2conszd2refzd2appzd2keyz62zzcfa_info2z00(obj_t
		BgL_envz00_7548, obj_t BgL_oz00_7549)
	{
		{	/* Cfa/cinfo2.sch 786 */
			return
				BGl_prezd2conszd2refzd2appzd2keyz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7549));
		}

	}



/* pre-cons-ref-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2refzd2appzd2keyzd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_440, obj_t BgL_vz00_441)
	{
		{	/* Cfa/cinfo2.sch 787 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_440)))->BgL_keyz00) =
				((obj_t) BgL_vz00_441), BUNSPEC);
		}

	}



/* &pre-cons-ref-app-key-set! */
	obj_t BGl_z62prezd2conszd2refzd2appzd2keyzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7550, obj_t BgL_oz00_7551, obj_t BgL_vz00_7552)
	{
		{	/* Cfa/cinfo2.sch 787 */
			return
				BGl_prezd2conszd2refzd2appzd2keyzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7551), BgL_vz00_7552);
		}

	}



/* pre-cons-ref-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2refzd2appzd2sidezd2effectzd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_442)
	{
		{	/* Cfa/cinfo2.sch 788 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_442)))->BgL_sidezd2effectzd2);
		}

	}



/* &pre-cons-ref-app-side-effect */
	obj_t BGl_z62prezd2conszd2refzd2appzd2sidezd2effectzb0zzcfa_info2z00(obj_t
		BgL_envz00_7553, obj_t BgL_oz00_7554)
	{
		{	/* Cfa/cinfo2.sch 788 */
			return
				BGl_prezd2conszd2refzd2appzd2sidezd2effectzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7554));
		}

	}



/* pre-cons-ref-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2refzd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_443, obj_t BgL_vz00_444)
	{
		{	/* Cfa/cinfo2.sch 789 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_443)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_444), BUNSPEC);
		}

	}



/* &pre-cons-ref-app-side-effect-set! */
	obj_t
		BGl_z62prezd2conszd2refzd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00
		(obj_t BgL_envz00_7555, obj_t BgL_oz00_7556, obj_t BgL_vz00_7557)
	{
		{	/* Cfa/cinfo2.sch 789 */
			return
				BGl_prezd2conszd2refzd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7556), BgL_vz00_7557);
		}

	}



/* pre-cons-ref-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_prezd2conszd2refzd2appzd2typez00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_445)
	{
		{	/* Cfa/cinfo2.sch 790 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_445)))->BgL_typez00);
		}

	}



/* &pre-cons-ref-app-type */
	BgL_typez00_bglt BGl_z62prezd2conszd2refzd2appzd2typez62zzcfa_info2z00(obj_t
		BgL_envz00_7558, obj_t BgL_oz00_7559)
	{
		{	/* Cfa/cinfo2.sch 790 */
			return
				BGl_prezd2conszd2refzd2appzd2typez00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7559));
		}

	}



/* pre-cons-ref-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2refzd2appzd2typezd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_446, BgL_typez00_bglt BgL_vz00_447)
	{
		{	/* Cfa/cinfo2.sch 791 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_446)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_447), BUNSPEC);
		}

	}



/* &pre-cons-ref-app-type-set! */
	obj_t BGl_z62prezd2conszd2refzd2appzd2typezd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7560, obj_t BgL_oz00_7561, obj_t BgL_vz00_7562)
	{
		{	/* Cfa/cinfo2.sch 791 */
			return
				BGl_prezd2conszd2refzd2appzd2typezd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7561), ((BgL_typez00_bglt) BgL_vz00_7562));
		}

	}



/* pre-cons-ref-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2refzd2appzd2locz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_448)
	{
		{	/* Cfa/cinfo2.sch 792 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_448)))->BgL_locz00);
		}

	}



/* &pre-cons-ref-app-loc */
	obj_t BGl_z62prezd2conszd2refzd2appzd2locz62zzcfa_info2z00(obj_t
		BgL_envz00_7563, obj_t BgL_oz00_7564)
	{
		{	/* Cfa/cinfo2.sch 792 */
			return
				BGl_prezd2conszd2refzd2appzd2locz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7564));
		}

	}



/* make-pre-cons-set!-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2prezd2conszd2setz12zd2appz12zzcfa_info2z00(obj_t
		BgL_loc1566z00_451, BgL_typez00_bglt BgL_type1567z00_452,
		obj_t BgL_sidezd2effect1568zd2_453, obj_t BgL_key1569z00_454,
		BgL_varz00_bglt BgL_fun1570z00_455, obj_t BgL_args1571z00_456,
		obj_t BgL_stackable1572z00_457, obj_t BgL_get1573z00_458)
	{
		{	/* Cfa/cinfo2.sch 796 */
			{	/* Cfa/cinfo2.sch 796 */
				BgL_appz00_bglt BgL_new1517z00_9080;

				{	/* Cfa/cinfo2.sch 796 */
					BgL_appz00_bglt BgL_tmp1515z00_9081;
					BgL_prezd2conszd2setz12zd2appzc0_bglt BgL_wide1516z00_9082;

					{
						BgL_appz00_bglt BgL_auxz00_11979;

						{	/* Cfa/cinfo2.sch 796 */
							BgL_appz00_bglt BgL_new1514z00_9083;

							BgL_new1514z00_9083 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 796 */
								long BgL_arg1964z00_9084;

								BgL_arg1964z00_9084 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1514z00_9083),
									BgL_arg1964z00_9084);
							}
							{	/* Cfa/cinfo2.sch 796 */
								BgL_objectz00_bglt BgL_tmpz00_11984;

								BgL_tmpz00_11984 = ((BgL_objectz00_bglt) BgL_new1514z00_9083);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_11984, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1514z00_9083);
							BgL_auxz00_11979 = BgL_new1514z00_9083;
						}
						BgL_tmp1515z00_9081 = ((BgL_appz00_bglt) BgL_auxz00_11979);
					}
					BgL_wide1516z00_9082 =
						((BgL_prezd2conszd2setz12zd2appzc0_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2conszd2setz12zd2appzc0_bgl))));
					{	/* Cfa/cinfo2.sch 796 */
						obj_t BgL_auxz00_11992;
						BgL_objectz00_bglt BgL_tmpz00_11990;

						BgL_auxz00_11992 = ((obj_t) BgL_wide1516z00_9082);
						BgL_tmpz00_11990 = ((BgL_objectz00_bglt) BgL_tmp1515z00_9081);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_11990, BgL_auxz00_11992);
					}
					((BgL_objectz00_bglt) BgL_tmp1515z00_9081);
					{	/* Cfa/cinfo2.sch 796 */
						long BgL_arg1963z00_9085;

						BgL_arg1963z00_9085 =
							BGL_CLASS_NUM(BGl_prezd2conszd2setz12zd2appzc0zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1515z00_9081), BgL_arg1963z00_9085);
					}
					BgL_new1517z00_9080 = ((BgL_appz00_bglt) BgL_tmp1515z00_9081);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1517z00_9080)))->BgL_locz00) =
					((obj_t) BgL_loc1566z00_451), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1517z00_9080)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1567z00_452), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1517z00_9080)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1568zd2_453), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1517z00_9080)))->BgL_keyz00) =
					((obj_t) BgL_key1569z00_454), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1517z00_9080)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1570z00_455), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1517z00_9080)))->
						BgL_argsz00) = ((obj_t) BgL_args1571z00_456), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1517z00_9080)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1572z00_457), BUNSPEC);
				{
					BgL_prezd2conszd2setz12zd2appzc0_bglt BgL_auxz00_12014;

					{
						obj_t BgL_auxz00_12015;

						{	/* Cfa/cinfo2.sch 796 */
							BgL_objectz00_bglt BgL_tmpz00_12016;

							BgL_tmpz00_12016 = ((BgL_objectz00_bglt) BgL_new1517z00_9080);
							BgL_auxz00_12015 = BGL_OBJECT_WIDENING(BgL_tmpz00_12016);
						}
						BgL_auxz00_12014 =
							((BgL_prezd2conszd2setz12zd2appzc0_bglt) BgL_auxz00_12015);
					}
					((((BgL_prezd2conszd2setz12zd2appzc0_bglt)
								COBJECT(BgL_auxz00_12014))->BgL_getz00) =
						((obj_t) BgL_get1573z00_458), BUNSPEC);
				}
				return BgL_new1517z00_9080;
			}
		}

	}



/* &make-pre-cons-set!-app */
	BgL_appz00_bglt BGl_z62makezd2prezd2conszd2setz12zd2appz70zzcfa_info2z00(obj_t
		BgL_envz00_7565, obj_t BgL_loc1566z00_7566, obj_t BgL_type1567z00_7567,
		obj_t BgL_sidezd2effect1568zd2_7568, obj_t BgL_key1569z00_7569,
		obj_t BgL_fun1570z00_7570, obj_t BgL_args1571z00_7571,
		obj_t BgL_stackable1572z00_7572, obj_t BgL_get1573z00_7573)
	{
		{	/* Cfa/cinfo2.sch 796 */
			return
				BGl_makezd2prezd2conszd2setz12zd2appz12zzcfa_info2z00
				(BgL_loc1566z00_7566, ((BgL_typez00_bglt) BgL_type1567z00_7567),
				BgL_sidezd2effect1568zd2_7568, BgL_key1569z00_7569,
				((BgL_varz00_bglt) BgL_fun1570z00_7570), BgL_args1571z00_7571,
				BgL_stackable1572z00_7572, BgL_get1573z00_7573);
		}

	}



/* pre-cons-set!-app? */
	BGL_EXPORTED_DEF bool_t
		BGl_prezd2conszd2setz12zd2appzf3z33zzcfa_info2z00(obj_t BgL_objz00_459)
	{
		{	/* Cfa/cinfo2.sch 797 */
			{	/* Cfa/cinfo2.sch 797 */
				obj_t BgL_classz00_9086;

				BgL_classz00_9086 = BGl_prezd2conszd2setz12zd2appzc0zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_459))
					{	/* Cfa/cinfo2.sch 797 */
						BgL_objectz00_bglt BgL_arg1801z00_9087;

						BgL_arg1801z00_9087 = (BgL_objectz00_bglt) (BgL_objz00_459);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 797 */
								long BgL_idxz00_9088;

								BgL_idxz00_9088 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_9087);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_9088 + 4L)) == BgL_classz00_9086);
							}
						else
							{	/* Cfa/cinfo2.sch 797 */
								bool_t BgL_res2846z00_9091;

								{	/* Cfa/cinfo2.sch 797 */
									obj_t BgL_oclassz00_9092;

									{	/* Cfa/cinfo2.sch 797 */
										long BgL_arg1808z00_9093;

										{	/* Cfa/cinfo2.sch 797 */
											long BgL_arg1809z00_9094;

											BgL_arg1809z00_9094 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_9087);
											BgL_arg1808z00_9093 = (BgL_arg1809z00_9094 - OBJECT_TYPE);
										}
										BgL_oclassz00_9092 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_9093);
									}
									{	/* Cfa/cinfo2.sch 797 */
										bool_t BgL__ortest_1115z00_9095;

										BgL__ortest_1115z00_9095 =
											(BgL_classz00_9086 == BgL_oclassz00_9092);
										if (BgL__ortest_1115z00_9095)
											{	/* Cfa/cinfo2.sch 797 */
												BgL_res2846z00_9091 = BgL__ortest_1115z00_9095;
											}
										else
											{	/* Cfa/cinfo2.sch 797 */
												long BgL_odepthz00_9096;

												BgL_odepthz00_9096 =
													BGL_CLASS_DEPTH(BgL_oclassz00_9092);
												if ((4L < BgL_odepthz00_9096))
													{	/* Cfa/cinfo2.sch 797 */
														obj_t BgL_arg1797z00_9097;

														BgL_arg1797z00_9097 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_9092, 4L);
														BgL_res2846z00_9091 =
															(BgL_arg1797z00_9097 == BgL_classz00_9086);
													}
												else
													{	/* Cfa/cinfo2.sch 797 */
														BgL_res2846z00_9091 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2846z00_9091;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 797 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &pre-cons-set!-app? */
	obj_t BGl_z62prezd2conszd2setz12zd2appzf3z51zzcfa_info2z00(obj_t
		BgL_envz00_7574, obj_t BgL_objz00_7575)
	{
		{	/* Cfa/cinfo2.sch 797 */
			return
				BBOOL(BGl_prezd2conszd2setz12zd2appzf3z33zzcfa_info2z00
				(BgL_objz00_7575));
		}

	}



/* pre-cons-set!-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_prezd2conszd2setz12zd2appzd2nilz12zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 798 */
			{	/* Cfa/cinfo2.sch 798 */
				obj_t BgL_classz00_5588;

				BgL_classz00_5588 = BGl_prezd2conszd2setz12zd2appzc0zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 798 */
					obj_t BgL__ortest_1117z00_5589;

					BgL__ortest_1117z00_5589 = BGL_CLASS_NIL(BgL_classz00_5588);
					if (CBOOL(BgL__ortest_1117z00_5589))
						{	/* Cfa/cinfo2.sch 798 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_5589);
						}
					else
						{	/* Cfa/cinfo2.sch 798 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_5588));
						}
				}
			}
		}

	}



/* &pre-cons-set!-app-nil */
	BgL_appz00_bglt BGl_z62prezd2conszd2setz12zd2appzd2nilz70zzcfa_info2z00(obj_t
		BgL_envz00_7576)
	{
		{	/* Cfa/cinfo2.sch 798 */
			return BGl_prezd2conszd2setz12zd2appzd2nilz12zzcfa_info2z00();
		}

	}



/* pre-cons-set!-app-get */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2setz12zd2appzd2getz12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_460)
	{
		{	/* Cfa/cinfo2.sch 799 */
			{
				BgL_prezd2conszd2setz12zd2appzc0_bglt BgL_auxz00_12052;

				{
					obj_t BgL_auxz00_12053;

					{	/* Cfa/cinfo2.sch 799 */
						BgL_objectz00_bglt BgL_tmpz00_12054;

						BgL_tmpz00_12054 = ((BgL_objectz00_bglt) BgL_oz00_460);
						BgL_auxz00_12053 = BGL_OBJECT_WIDENING(BgL_tmpz00_12054);
					}
					BgL_auxz00_12052 =
						((BgL_prezd2conszd2setz12zd2appzc0_bglt) BgL_auxz00_12053);
				}
				return
					(((BgL_prezd2conszd2setz12zd2appzc0_bglt) COBJECT(BgL_auxz00_12052))->
					BgL_getz00);
			}
		}

	}



/* &pre-cons-set!-app-get */
	obj_t BGl_z62prezd2conszd2setz12zd2appzd2getz70zzcfa_info2z00(obj_t
		BgL_envz00_7577, obj_t BgL_oz00_7578)
	{
		{	/* Cfa/cinfo2.sch 799 */
			return
				BGl_prezd2conszd2setz12zd2appzd2getz12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7578));
		}

	}



/* pre-cons-set!-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2setz12zd2appzd2stackablez12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_463)
	{
		{	/* Cfa/cinfo2.sch 801 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_463)))->BgL_stackablez00);
		}

	}



/* &pre-cons-set!-app-stackable */
	obj_t BGl_z62prezd2conszd2setz12zd2appzd2stackablez70zzcfa_info2z00(obj_t
		BgL_envz00_7579, obj_t BgL_oz00_7580)
	{
		{	/* Cfa/cinfo2.sch 801 */
			return
				BGl_prezd2conszd2setz12zd2appzd2stackablez12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7580));
		}

	}



/* pre-cons-set!-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2setz12zd2appzd2stackablezd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_464, obj_t BgL_vz00_465)
	{
		{	/* Cfa/cinfo2.sch 802 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_464)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_465), BUNSPEC);
		}

	}



/* &pre-cons-set!-app-stackable-set! */
	obj_t
		BGl_z62prezd2conszd2setz12zd2appzd2stackablezd2setz12zb0zzcfa_info2z00(obj_t
		BgL_envz00_7581, obj_t BgL_oz00_7582, obj_t BgL_vz00_7583)
	{
		{	/* Cfa/cinfo2.sch 802 */
			return
				BGl_prezd2conszd2setz12zd2appzd2stackablezd2setz12zd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7582), BgL_vz00_7583);
		}

	}



/* pre-cons-set!-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2setz12zd2appzd2argsz12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_466)
	{
		{	/* Cfa/cinfo2.sch 803 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_466)))->BgL_argsz00);
		}

	}



/* &pre-cons-set!-app-args */
	obj_t BGl_z62prezd2conszd2setz12zd2appzd2argsz70zzcfa_info2z00(obj_t
		BgL_envz00_7584, obj_t BgL_oz00_7585)
	{
		{	/* Cfa/cinfo2.sch 803 */
			return
				BGl_prezd2conszd2setz12zd2appzd2argsz12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7585));
		}

	}



/* pre-cons-set!-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2setz12zd2appzd2argszd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_467, obj_t BgL_vz00_468)
	{
		{	/* Cfa/cinfo2.sch 804 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_467)))->BgL_argsz00) =
				((obj_t) BgL_vz00_468), BUNSPEC);
		}

	}



/* &pre-cons-set!-app-args-set! */
	obj_t BGl_z62prezd2conszd2setz12zd2appzd2argszd2setz12zb0zzcfa_info2z00(obj_t
		BgL_envz00_7586, obj_t BgL_oz00_7587, obj_t BgL_vz00_7588)
	{
		{	/* Cfa/cinfo2.sch 804 */
			return
				BGl_prezd2conszd2setz12zd2appzd2argszd2setz12zd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7587), BgL_vz00_7588);
		}

	}



/* pre-cons-set!-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_prezd2conszd2setz12zd2appzd2funz12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_469)
	{
		{	/* Cfa/cinfo2.sch 805 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_469)))->BgL_funz00);
		}

	}



/* &pre-cons-set!-app-fun */
	BgL_varz00_bglt BGl_z62prezd2conszd2setz12zd2appzd2funz70zzcfa_info2z00(obj_t
		BgL_envz00_7589, obj_t BgL_oz00_7590)
	{
		{	/* Cfa/cinfo2.sch 805 */
			return
				BGl_prezd2conszd2setz12zd2appzd2funz12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7590));
		}

	}



/* pre-cons-set!-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2setz12zd2appzd2funzd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_470, BgL_varz00_bglt BgL_vz00_471)
	{
		{	/* Cfa/cinfo2.sch 806 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_470)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_471), BUNSPEC);
		}

	}



/* &pre-cons-set!-app-fun-set! */
	obj_t BGl_z62prezd2conszd2setz12zd2appzd2funzd2setz12zb0zzcfa_info2z00(obj_t
		BgL_envz00_7591, obj_t BgL_oz00_7592, obj_t BgL_vz00_7593)
	{
		{	/* Cfa/cinfo2.sch 806 */
			return
				BGl_prezd2conszd2setz12zd2appzd2funzd2setz12zd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7592), ((BgL_varz00_bglt) BgL_vz00_7593));
		}

	}



/* pre-cons-set!-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2setz12zd2appzd2keyz12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_472)
	{
		{	/* Cfa/cinfo2.sch 807 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_472)))->BgL_keyz00);
		}

	}



/* &pre-cons-set!-app-key */
	obj_t BGl_z62prezd2conszd2setz12zd2appzd2keyz70zzcfa_info2z00(obj_t
		BgL_envz00_7594, obj_t BgL_oz00_7595)
	{
		{	/* Cfa/cinfo2.sch 807 */
			return
				BGl_prezd2conszd2setz12zd2appzd2keyz12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7595));
		}

	}



/* pre-cons-set!-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2setz12zd2appzd2keyzd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_473, obj_t BgL_vz00_474)
	{
		{	/* Cfa/cinfo2.sch 808 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_473)))->BgL_keyz00) =
				((obj_t) BgL_vz00_474), BUNSPEC);
		}

	}



/* &pre-cons-set!-app-key-set! */
	obj_t BGl_z62prezd2conszd2setz12zd2appzd2keyzd2setz12zb0zzcfa_info2z00(obj_t
		BgL_envz00_7596, obj_t BgL_oz00_7597, obj_t BgL_vz00_7598)
	{
		{	/* Cfa/cinfo2.sch 808 */
			return
				BGl_prezd2conszd2setz12zd2appzd2keyzd2setz12zd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7597), BgL_vz00_7598);
		}

	}



/* pre-cons-set!-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2setz12zd2appzd2sidezd2effectzc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_475)
	{
		{	/* Cfa/cinfo2.sch 809 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_475)))->BgL_sidezd2effectzd2);
		}

	}



/* &pre-cons-set!-app-side-effect */
	obj_t BGl_z62prezd2conszd2setz12zd2appzd2sidezd2effectza2zzcfa_info2z00(obj_t
		BgL_envz00_7599, obj_t BgL_oz00_7600)
	{
		{	/* Cfa/cinfo2.sch 809 */
			return
				BGl_prezd2conszd2setz12zd2appzd2sidezd2effectzc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7600));
		}

	}



/* pre-cons-set!-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2setz12zd2appzd2sidezd2effectzd2setz12z00zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_476, obj_t BgL_vz00_477)
	{
		{	/* Cfa/cinfo2.sch 810 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_476)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_477), BUNSPEC);
		}

	}



/* &pre-cons-set!-app-side-effect-set! */
	obj_t
		BGl_z62prezd2conszd2setz12zd2appzd2sidezd2effectzd2setz12z62zzcfa_info2z00
		(obj_t BgL_envz00_7601, obj_t BgL_oz00_7602, obj_t BgL_vz00_7603)
	{
		{	/* Cfa/cinfo2.sch 810 */
			return
				BGl_prezd2conszd2setz12zd2appzd2sidezd2effectzd2setz12z00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7602), BgL_vz00_7603);
		}

	}



/* pre-cons-set!-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_prezd2conszd2setz12zd2appzd2typez12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_478)
	{
		{	/* Cfa/cinfo2.sch 811 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_478)))->BgL_typez00);
		}

	}



/* &pre-cons-set!-app-type */
	BgL_typez00_bglt
		BGl_z62prezd2conszd2setz12zd2appzd2typez70zzcfa_info2z00(obj_t
		BgL_envz00_7604, obj_t BgL_oz00_7605)
	{
		{	/* Cfa/cinfo2.sch 811 */
			return
				BGl_prezd2conszd2setz12zd2appzd2typez12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7605));
		}

	}



/* pre-cons-set!-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2setz12zd2appzd2typezd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_479, BgL_typez00_bglt BgL_vz00_480)
	{
		{	/* Cfa/cinfo2.sch 812 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_479)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_480), BUNSPEC);
		}

	}



/* &pre-cons-set!-app-type-set! */
	obj_t BGl_z62prezd2conszd2setz12zd2appzd2typezd2setz12zb0zzcfa_info2z00(obj_t
		BgL_envz00_7606, obj_t BgL_oz00_7607, obj_t BgL_vz00_7608)
	{
		{	/* Cfa/cinfo2.sch 812 */
			return
				BGl_prezd2conszd2setz12zd2appzd2typezd2setz12zd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7607), ((BgL_typez00_bglt) BgL_vz00_7608));
		}

	}



/* pre-cons-set!-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2conszd2setz12zd2appzd2locz12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_481)
	{
		{	/* Cfa/cinfo2.sch 813 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_481)))->BgL_locz00);
		}

	}



/* &pre-cons-set!-app-loc */
	obj_t BGl_z62prezd2conszd2setz12zd2appzd2locz70zzcfa_info2z00(obj_t
		BgL_envz00_7609, obj_t BgL_oz00_7610)
	{
		{	/* Cfa/cinfo2.sch 813 */
			return
				BGl_prezd2conszd2setz12zd2appzd2locz12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7610));
		}

	}



/* make-cons-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt BGl_makezd2conszd2appz00zzcfa_info2z00(obj_t
		BgL_loc1550z00_484, BgL_typez00_bglt BgL_type1551z00_485,
		obj_t BgL_sidezd2effect1552zd2_486, obj_t BgL_key1553z00_487,
		BgL_varz00_bglt BgL_fun1554z00_488, obj_t BgL_args1555z00_489,
		obj_t BgL_stackable1556z00_490, BgL_approxz00_bglt BgL_approx1557z00_491,
		obj_t BgL_approxes1558z00_492, long BgL_lostzd2stamp1559zd2_493,
		BgL_variablez00_bglt BgL_owner1560z00_494,
		obj_t BgL_stackzd2stamp1561zd2_495, bool_t BgL_seenzf31562zf3_496)
	{
		{	/* Cfa/cinfo2.sch 817 */
			{	/* Cfa/cinfo2.sch 817 */
				BgL_appz00_bglt BgL_new1521z00_9098;

				{	/* Cfa/cinfo2.sch 817 */
					BgL_appz00_bglt BgL_tmp1519z00_9099;
					BgL_conszd2appzd2_bglt BgL_wide1520z00_9100;

					{
						BgL_appz00_bglt BgL_auxz00_12115;

						{	/* Cfa/cinfo2.sch 817 */
							BgL_appz00_bglt BgL_new1518z00_9101;

							BgL_new1518z00_9101 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 817 */
								long BgL_arg1966z00_9102;

								BgL_arg1966z00_9102 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1518z00_9101),
									BgL_arg1966z00_9102);
							}
							{	/* Cfa/cinfo2.sch 817 */
								BgL_objectz00_bglt BgL_tmpz00_12120;

								BgL_tmpz00_12120 = ((BgL_objectz00_bglt) BgL_new1518z00_9101);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_12120, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1518z00_9101);
							BgL_auxz00_12115 = BgL_new1518z00_9101;
						}
						BgL_tmp1519z00_9099 = ((BgL_appz00_bglt) BgL_auxz00_12115);
					}
					BgL_wide1520z00_9100 =
						((BgL_conszd2appzd2_bglt) BOBJECT(GC_MALLOC(sizeof(struct
									BgL_conszd2appzd2_bgl))));
					{	/* Cfa/cinfo2.sch 817 */
						obj_t BgL_auxz00_12128;
						BgL_objectz00_bglt BgL_tmpz00_12126;

						BgL_auxz00_12128 = ((obj_t) BgL_wide1520z00_9100);
						BgL_tmpz00_12126 = ((BgL_objectz00_bglt) BgL_tmp1519z00_9099);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_12126, BgL_auxz00_12128);
					}
					((BgL_objectz00_bglt) BgL_tmp1519z00_9099);
					{	/* Cfa/cinfo2.sch 817 */
						long BgL_arg1965z00_9103;

						BgL_arg1965z00_9103 =
							BGL_CLASS_NUM(BGl_conszd2appzd2zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1519z00_9099), BgL_arg1965z00_9103);
					}
					BgL_new1521z00_9098 = ((BgL_appz00_bglt) BgL_tmp1519z00_9099);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1521z00_9098)))->BgL_locz00) =
					((obj_t) BgL_loc1550z00_484), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1521z00_9098)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1551z00_485), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1521z00_9098)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1552zd2_486), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1521z00_9098)))->BgL_keyz00) =
					((obj_t) BgL_key1553z00_487), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1521z00_9098)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1554z00_488), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1521z00_9098)))->
						BgL_argsz00) = ((obj_t) BgL_args1555z00_489), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1521z00_9098)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1556z00_490), BUNSPEC);
				{
					BgL_conszd2appzd2_bglt BgL_auxz00_12150;

					{
						obj_t BgL_auxz00_12151;

						{	/* Cfa/cinfo2.sch 817 */
							BgL_objectz00_bglt BgL_tmpz00_12152;

							BgL_tmpz00_12152 = ((BgL_objectz00_bglt) BgL_new1521z00_9098);
							BgL_auxz00_12151 = BGL_OBJECT_WIDENING(BgL_tmpz00_12152);
						}
						BgL_auxz00_12150 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_12151);
					}
					((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_12150))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_approx1557z00_491), BUNSPEC);
				}
				{
					BgL_conszd2appzd2_bglt BgL_auxz00_12157;

					{
						obj_t BgL_auxz00_12158;

						{	/* Cfa/cinfo2.sch 817 */
							BgL_objectz00_bglt BgL_tmpz00_12159;

							BgL_tmpz00_12159 = ((BgL_objectz00_bglt) BgL_new1521z00_9098);
							BgL_auxz00_12158 = BGL_OBJECT_WIDENING(BgL_tmpz00_12159);
						}
						BgL_auxz00_12157 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_12158);
					}
					((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_12157))->
							BgL_approxesz00) = ((obj_t) BgL_approxes1558z00_492), BUNSPEC);
				}
				{
					BgL_conszd2appzd2_bglt BgL_auxz00_12164;

					{
						obj_t BgL_auxz00_12165;

						{	/* Cfa/cinfo2.sch 817 */
							BgL_objectz00_bglt BgL_tmpz00_12166;

							BgL_tmpz00_12166 = ((BgL_objectz00_bglt) BgL_new1521z00_9098);
							BgL_auxz00_12165 = BGL_OBJECT_WIDENING(BgL_tmpz00_12166);
						}
						BgL_auxz00_12164 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_12165);
					}
					((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_12164))->
							BgL_lostzd2stampzd2) =
						((long) BgL_lostzd2stamp1559zd2_493), BUNSPEC);
				}
				{
					BgL_conszd2appzd2_bglt BgL_auxz00_12171;

					{
						obj_t BgL_auxz00_12172;

						{	/* Cfa/cinfo2.sch 817 */
							BgL_objectz00_bglt BgL_tmpz00_12173;

							BgL_tmpz00_12173 = ((BgL_objectz00_bglt) BgL_new1521z00_9098);
							BgL_auxz00_12172 = BGL_OBJECT_WIDENING(BgL_tmpz00_12173);
						}
						BgL_auxz00_12171 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_12172);
					}
					((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_12171))->
							BgL_ownerz00) =
						((BgL_variablez00_bglt) BgL_owner1560z00_494), BUNSPEC);
				}
				{
					BgL_conszd2appzd2_bglt BgL_auxz00_12178;

					{
						obj_t BgL_auxz00_12179;

						{	/* Cfa/cinfo2.sch 817 */
							BgL_objectz00_bglt BgL_tmpz00_12180;

							BgL_tmpz00_12180 = ((BgL_objectz00_bglt) BgL_new1521z00_9098);
							BgL_auxz00_12179 = BGL_OBJECT_WIDENING(BgL_tmpz00_12180);
						}
						BgL_auxz00_12178 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_12179);
					}
					((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_12178))->
							BgL_stackzd2stampzd2) =
						((obj_t) BgL_stackzd2stamp1561zd2_495), BUNSPEC);
				}
				{
					BgL_conszd2appzd2_bglt BgL_auxz00_12185;

					{
						obj_t BgL_auxz00_12186;

						{	/* Cfa/cinfo2.sch 817 */
							BgL_objectz00_bglt BgL_tmpz00_12187;

							BgL_tmpz00_12187 = ((BgL_objectz00_bglt) BgL_new1521z00_9098);
							BgL_auxz00_12186 = BGL_OBJECT_WIDENING(BgL_tmpz00_12187);
						}
						BgL_auxz00_12185 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_12186);
					}
					((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_12185))->
							BgL_seenzf3zf3) = ((bool_t) BgL_seenzf31562zf3_496), BUNSPEC);
				}
				return BgL_new1521z00_9098;
			}
		}

	}



/* &make-cons-app */
	BgL_appz00_bglt BGl_z62makezd2conszd2appz62zzcfa_info2z00(obj_t
		BgL_envz00_7611, obj_t BgL_loc1550z00_7612, obj_t BgL_type1551z00_7613,
		obj_t BgL_sidezd2effect1552zd2_7614, obj_t BgL_key1553z00_7615,
		obj_t BgL_fun1554z00_7616, obj_t BgL_args1555z00_7617,
		obj_t BgL_stackable1556z00_7618, obj_t BgL_approx1557z00_7619,
		obj_t BgL_approxes1558z00_7620, obj_t BgL_lostzd2stamp1559zd2_7621,
		obj_t BgL_owner1560z00_7622, obj_t BgL_stackzd2stamp1561zd2_7623,
		obj_t BgL_seenzf31562zf3_7624)
	{
		{	/* Cfa/cinfo2.sch 817 */
			return
				BGl_makezd2conszd2appz00zzcfa_info2z00(BgL_loc1550z00_7612,
				((BgL_typez00_bglt) BgL_type1551z00_7613),
				BgL_sidezd2effect1552zd2_7614, BgL_key1553z00_7615,
				((BgL_varz00_bglt) BgL_fun1554z00_7616), BgL_args1555z00_7617,
				BgL_stackable1556z00_7618,
				((BgL_approxz00_bglt) BgL_approx1557z00_7619), BgL_approxes1558z00_7620,
				(long) CINT(BgL_lostzd2stamp1559zd2_7621),
				((BgL_variablez00_bglt) BgL_owner1560z00_7622),
				BgL_stackzd2stamp1561zd2_7623, CBOOL(BgL_seenzf31562zf3_7624));
		}

	}



/* cons-app? */
	BGL_EXPORTED_DEF bool_t BGl_conszd2appzf3z21zzcfa_info2z00(obj_t
		BgL_objz00_497)
	{
		{	/* Cfa/cinfo2.sch 818 */
			{	/* Cfa/cinfo2.sch 818 */
				obj_t BgL_classz00_9104;

				BgL_classz00_9104 = BGl_conszd2appzd2zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_497))
					{	/* Cfa/cinfo2.sch 818 */
						BgL_objectz00_bglt BgL_arg1801z00_9105;

						BgL_arg1801z00_9105 = (BgL_objectz00_bglt) (BgL_objz00_497);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 818 */
								long BgL_idxz00_9106;

								BgL_idxz00_9106 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_9105);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_9106 + 4L)) == BgL_classz00_9104);
							}
						else
							{	/* Cfa/cinfo2.sch 818 */
								bool_t BgL_res2847z00_9109;

								{	/* Cfa/cinfo2.sch 818 */
									obj_t BgL_oclassz00_9110;

									{	/* Cfa/cinfo2.sch 818 */
										long BgL_arg1808z00_9111;

										{	/* Cfa/cinfo2.sch 818 */
											long BgL_arg1809z00_9112;

											BgL_arg1809z00_9112 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_9105);
											BgL_arg1808z00_9111 = (BgL_arg1809z00_9112 - OBJECT_TYPE);
										}
										BgL_oclassz00_9110 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_9111);
									}
									{	/* Cfa/cinfo2.sch 818 */
										bool_t BgL__ortest_1115z00_9113;

										BgL__ortest_1115z00_9113 =
											(BgL_classz00_9104 == BgL_oclassz00_9110);
										if (BgL__ortest_1115z00_9113)
											{	/* Cfa/cinfo2.sch 818 */
												BgL_res2847z00_9109 = BgL__ortest_1115z00_9113;
											}
										else
											{	/* Cfa/cinfo2.sch 818 */
												long BgL_odepthz00_9114;

												BgL_odepthz00_9114 =
													BGL_CLASS_DEPTH(BgL_oclassz00_9110);
												if ((4L < BgL_odepthz00_9114))
													{	/* Cfa/cinfo2.sch 818 */
														obj_t BgL_arg1797z00_9115;

														BgL_arg1797z00_9115 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_9110, 4L);
														BgL_res2847z00_9109 =
															(BgL_arg1797z00_9115 == BgL_classz00_9104);
													}
												else
													{	/* Cfa/cinfo2.sch 818 */
														BgL_res2847z00_9109 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2847z00_9109;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 818 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &cons-app? */
	obj_t BGl_z62conszd2appzf3z43zzcfa_info2z00(obj_t BgL_envz00_7625,
		obj_t BgL_objz00_7626)
	{
		{	/* Cfa/cinfo2.sch 818 */
			return BBOOL(BGl_conszd2appzf3z21zzcfa_info2z00(BgL_objz00_7626));
		}

	}



/* cons-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt BGl_conszd2appzd2nilz00zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 819 */
			{	/* Cfa/cinfo2.sch 819 */
				obj_t BgL_classz00_5642;

				BgL_classz00_5642 = BGl_conszd2appzd2zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 819 */
					obj_t BgL__ortest_1117z00_5643;

					BgL__ortest_1117z00_5643 = BGL_CLASS_NIL(BgL_classz00_5642);
					if (CBOOL(BgL__ortest_1117z00_5643))
						{	/* Cfa/cinfo2.sch 819 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_5643);
						}
					else
						{	/* Cfa/cinfo2.sch 819 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_5642));
						}
				}
			}
		}

	}



/* &cons-app-nil */
	BgL_appz00_bglt BGl_z62conszd2appzd2nilz62zzcfa_info2z00(obj_t
		BgL_envz00_7627)
	{
		{	/* Cfa/cinfo2.sch 819 */
			return BGl_conszd2appzd2nilz00zzcfa_info2z00();
		}

	}



/* cons-app-seen? */
	BGL_EXPORTED_DEF bool_t
		BGl_conszd2appzd2seenzf3zf3zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_498)
	{
		{	/* Cfa/cinfo2.sch 820 */
			{
				BgL_conszd2appzd2_bglt BgL_auxz00_12227;

				{
					obj_t BgL_auxz00_12228;

					{	/* Cfa/cinfo2.sch 820 */
						BgL_objectz00_bglt BgL_tmpz00_12229;

						BgL_tmpz00_12229 = ((BgL_objectz00_bglt) BgL_oz00_498);
						BgL_auxz00_12228 = BGL_OBJECT_WIDENING(BgL_tmpz00_12229);
					}
					BgL_auxz00_12227 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_12228);
				}
				return
					(((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_12227))->
					BgL_seenzf3zf3);
			}
		}

	}



/* &cons-app-seen? */
	obj_t BGl_z62conszd2appzd2seenzf3z91zzcfa_info2z00(obj_t BgL_envz00_7628,
		obj_t BgL_oz00_7629)
	{
		{	/* Cfa/cinfo2.sch 820 */
			return
				BBOOL(BGl_conszd2appzd2seenzf3zf3zzcfa_info2z00(
					((BgL_appz00_bglt) BgL_oz00_7629)));
		}

	}



/* cons-app-seen?-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2appzd2seenzf3zd2setz12z33zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_499, bool_t BgL_vz00_500)
	{
		{	/* Cfa/cinfo2.sch 821 */
			{
				BgL_conszd2appzd2_bglt BgL_auxz00_12237;

				{
					obj_t BgL_auxz00_12238;

					{	/* Cfa/cinfo2.sch 821 */
						BgL_objectz00_bglt BgL_tmpz00_12239;

						BgL_tmpz00_12239 = ((BgL_objectz00_bglt) BgL_oz00_499);
						BgL_auxz00_12238 = BGL_OBJECT_WIDENING(BgL_tmpz00_12239);
					}
					BgL_auxz00_12237 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_12238);
				}
				return
					((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_12237))->
						BgL_seenzf3zf3) = ((bool_t) BgL_vz00_500), BUNSPEC);
			}
		}

	}



/* &cons-app-seen?-set! */
	obj_t BGl_z62conszd2appzd2seenzf3zd2setz12z51zzcfa_info2z00(obj_t
		BgL_envz00_7630, obj_t BgL_oz00_7631, obj_t BgL_vz00_7632)
	{
		{	/* Cfa/cinfo2.sch 821 */
			return
				BGl_conszd2appzd2seenzf3zd2setz12z33zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7631), CBOOL(BgL_vz00_7632));
		}

	}



/* cons-app-stack-stamp */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2appzd2stackzd2stampzd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_501)
	{
		{	/* Cfa/cinfo2.sch 822 */
			{
				BgL_conszd2appzd2_bglt BgL_auxz00_12247;

				{
					obj_t BgL_auxz00_12248;

					{	/* Cfa/cinfo2.sch 822 */
						BgL_objectz00_bglt BgL_tmpz00_12249;

						BgL_tmpz00_12249 = ((BgL_objectz00_bglt) BgL_oz00_501);
						BgL_auxz00_12248 = BGL_OBJECT_WIDENING(BgL_tmpz00_12249);
					}
					BgL_auxz00_12247 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_12248);
				}
				return
					(((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_12247))->
					BgL_stackzd2stampzd2);
			}
		}

	}



/* &cons-app-stack-stamp */
	obj_t BGl_z62conszd2appzd2stackzd2stampzb0zzcfa_info2z00(obj_t
		BgL_envz00_7633, obj_t BgL_oz00_7634)
	{
		{	/* Cfa/cinfo2.sch 822 */
			return
				BGl_conszd2appzd2stackzd2stampzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7634));
		}

	}



/* cons-app-stack-stamp-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2appzd2stackzd2stampzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_502, obj_t BgL_vz00_503)
	{
		{	/* Cfa/cinfo2.sch 823 */
			{
				BgL_conszd2appzd2_bglt BgL_auxz00_12256;

				{
					obj_t BgL_auxz00_12257;

					{	/* Cfa/cinfo2.sch 823 */
						BgL_objectz00_bglt BgL_tmpz00_12258;

						BgL_tmpz00_12258 = ((BgL_objectz00_bglt) BgL_oz00_502);
						BgL_auxz00_12257 = BGL_OBJECT_WIDENING(BgL_tmpz00_12258);
					}
					BgL_auxz00_12256 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_12257);
				}
				return
					((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_12256))->
						BgL_stackzd2stampzd2) = ((obj_t) BgL_vz00_503), BUNSPEC);
			}
		}

	}



/* &cons-app-stack-stamp-set! */
	obj_t BGl_z62conszd2appzd2stackzd2stampzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7635, obj_t BgL_oz00_7636, obj_t BgL_vz00_7637)
	{
		{	/* Cfa/cinfo2.sch 823 */
			return
				BGl_conszd2appzd2stackzd2stampzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7636), BgL_vz00_7637);
		}

	}



/* cons-app-owner */
	BGL_EXPORTED_DEF BgL_variablez00_bglt
		BGl_conszd2appzd2ownerz00zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_504)
	{
		{	/* Cfa/cinfo2.sch 824 */
			{
				BgL_conszd2appzd2_bglt BgL_auxz00_12265;

				{
					obj_t BgL_auxz00_12266;

					{	/* Cfa/cinfo2.sch 824 */
						BgL_objectz00_bglt BgL_tmpz00_12267;

						BgL_tmpz00_12267 = ((BgL_objectz00_bglt) BgL_oz00_504);
						BgL_auxz00_12266 = BGL_OBJECT_WIDENING(BgL_tmpz00_12267);
					}
					BgL_auxz00_12265 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_12266);
				}
				return
					(((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_12265))->BgL_ownerz00);
			}
		}

	}



/* &cons-app-owner */
	BgL_variablez00_bglt BGl_z62conszd2appzd2ownerz62zzcfa_info2z00(obj_t
		BgL_envz00_7638, obj_t BgL_oz00_7639)
	{
		{	/* Cfa/cinfo2.sch 824 */
			return
				BGl_conszd2appzd2ownerz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7639));
		}

	}



/* cons-app-lost-stamp */
	BGL_EXPORTED_DEF long
		BGl_conszd2appzd2lostzd2stampzd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_507)
	{
		{	/* Cfa/cinfo2.sch 826 */
			{
				BgL_conszd2appzd2_bglt BgL_auxz00_12274;

				{
					obj_t BgL_auxz00_12275;

					{	/* Cfa/cinfo2.sch 826 */
						BgL_objectz00_bglt BgL_tmpz00_12276;

						BgL_tmpz00_12276 = ((BgL_objectz00_bglt) BgL_oz00_507);
						BgL_auxz00_12275 = BGL_OBJECT_WIDENING(BgL_tmpz00_12276);
					}
					BgL_auxz00_12274 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_12275);
				}
				return
					(((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_12274))->
					BgL_lostzd2stampzd2);
			}
		}

	}



/* &cons-app-lost-stamp */
	obj_t BGl_z62conszd2appzd2lostzd2stampzb0zzcfa_info2z00(obj_t BgL_envz00_7640,
		obj_t BgL_oz00_7641)
	{
		{	/* Cfa/cinfo2.sch 826 */
			return
				BINT(BGl_conszd2appzd2lostzd2stampzd2zzcfa_info2z00(
					((BgL_appz00_bglt) BgL_oz00_7641)));
		}

	}



/* cons-app-lost-stamp-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2appzd2lostzd2stampzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_508, long BgL_vz00_509)
	{
		{	/* Cfa/cinfo2.sch 827 */
			{
				BgL_conszd2appzd2_bglt BgL_auxz00_12284;

				{
					obj_t BgL_auxz00_12285;

					{	/* Cfa/cinfo2.sch 827 */
						BgL_objectz00_bglt BgL_tmpz00_12286;

						BgL_tmpz00_12286 = ((BgL_objectz00_bglt) BgL_oz00_508);
						BgL_auxz00_12285 = BGL_OBJECT_WIDENING(BgL_tmpz00_12286);
					}
					BgL_auxz00_12284 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_12285);
				}
				return
					((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_12284))->
						BgL_lostzd2stampzd2) = ((long) BgL_vz00_509), BUNSPEC);
		}}

	}



/* &cons-app-lost-stamp-set! */
	obj_t BGl_z62conszd2appzd2lostzd2stampzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7642, obj_t BgL_oz00_7643, obj_t BgL_vz00_7644)
	{
		{	/* Cfa/cinfo2.sch 827 */
			return
				BGl_conszd2appzd2lostzd2stampzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7643), (long) CINT(BgL_vz00_7644));
		}

	}



/* cons-app-approxes */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2appzd2approxesz00zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_510)
	{
		{	/* Cfa/cinfo2.sch 828 */
			{
				BgL_conszd2appzd2_bglt BgL_auxz00_12294;

				{
					obj_t BgL_auxz00_12295;

					{	/* Cfa/cinfo2.sch 828 */
						BgL_objectz00_bglt BgL_tmpz00_12296;

						BgL_tmpz00_12296 = ((BgL_objectz00_bglt) BgL_oz00_510);
						BgL_auxz00_12295 = BGL_OBJECT_WIDENING(BgL_tmpz00_12296);
					}
					BgL_auxz00_12294 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_12295);
				}
				return
					(((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_12294))->
					BgL_approxesz00);
			}
		}

	}



/* &cons-app-approxes */
	obj_t BGl_z62conszd2appzd2approxesz62zzcfa_info2z00(obj_t BgL_envz00_7645,
		obj_t BgL_oz00_7646)
	{
		{	/* Cfa/cinfo2.sch 828 */
			return
				BGl_conszd2appzd2approxesz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7646));
		}

	}



/* cons-app-approx */
	BGL_EXPORTED_DEF BgL_approxz00_bglt
		BGl_conszd2appzd2approxz00zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_513)
	{
		{	/* Cfa/cinfo2.sch 830 */
			{
				BgL_conszd2appzd2_bglt BgL_auxz00_12303;

				{
					obj_t BgL_auxz00_12304;

					{	/* Cfa/cinfo2.sch 830 */
						BgL_objectz00_bglt BgL_tmpz00_12305;

						BgL_tmpz00_12305 = ((BgL_objectz00_bglt) BgL_oz00_513);
						BgL_auxz00_12304 = BGL_OBJECT_WIDENING(BgL_tmpz00_12305);
					}
					BgL_auxz00_12303 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_12304);
				}
				return
					(((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_12303))->BgL_approxz00);
			}
		}

	}



/* &cons-app-approx */
	BgL_approxz00_bglt BGl_z62conszd2appzd2approxz62zzcfa_info2z00(obj_t
		BgL_envz00_7647, obj_t BgL_oz00_7648)
	{
		{	/* Cfa/cinfo2.sch 830 */
			return
				BGl_conszd2appzd2approxz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7648));
		}

	}



/* cons-app-approx-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2appzd2approxzd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_514, BgL_approxz00_bglt BgL_vz00_515)
	{
		{	/* Cfa/cinfo2.sch 831 */
			{
				BgL_conszd2appzd2_bglt BgL_auxz00_12312;

				{
					obj_t BgL_auxz00_12313;

					{	/* Cfa/cinfo2.sch 831 */
						BgL_objectz00_bglt BgL_tmpz00_12314;

						BgL_tmpz00_12314 = ((BgL_objectz00_bglt) BgL_oz00_514);
						BgL_auxz00_12313 = BGL_OBJECT_WIDENING(BgL_tmpz00_12314);
					}
					BgL_auxz00_12312 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_12313);
				}
				return
					((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_12312))->
						BgL_approxz00) = ((BgL_approxz00_bglt) BgL_vz00_515), BUNSPEC);
			}
		}

	}



/* &cons-app-approx-set! */
	obj_t BGl_z62conszd2appzd2approxzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7649, obj_t BgL_oz00_7650, obj_t BgL_vz00_7651)
	{
		{	/* Cfa/cinfo2.sch 831 */
			return
				BGl_conszd2appzd2approxzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7650),
				((BgL_approxz00_bglt) BgL_vz00_7651));
		}

	}



/* cons-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2appzd2stackablez00zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_516)
	{
		{	/* Cfa/cinfo2.sch 832 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_516)))->BgL_stackablez00);
		}

	}



/* &cons-app-stackable */
	obj_t BGl_z62conszd2appzd2stackablez62zzcfa_info2z00(obj_t BgL_envz00_7652,
		obj_t BgL_oz00_7653)
	{
		{	/* Cfa/cinfo2.sch 832 */
			return
				BGl_conszd2appzd2stackablez00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7653));
		}

	}



/* cons-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2appzd2stackablezd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_517, obj_t BgL_vz00_518)
	{
		{	/* Cfa/cinfo2.sch 833 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_517)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_518), BUNSPEC);
		}

	}



/* &cons-app-stackable-set! */
	obj_t BGl_z62conszd2appzd2stackablezd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7654, obj_t BgL_oz00_7655, obj_t BgL_vz00_7656)
	{
		{	/* Cfa/cinfo2.sch 833 */
			return
				BGl_conszd2appzd2stackablezd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7655), BgL_vz00_7656);
		}

	}



/* cons-app-args */
	BGL_EXPORTED_DEF obj_t BGl_conszd2appzd2argsz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_519)
	{
		{	/* Cfa/cinfo2.sch 834 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_519)))->BgL_argsz00);
		}

	}



/* &cons-app-args */
	obj_t BGl_z62conszd2appzd2argsz62zzcfa_info2z00(obj_t BgL_envz00_7657,
		obj_t BgL_oz00_7658)
	{
		{	/* Cfa/cinfo2.sch 834 */
			return
				BGl_conszd2appzd2argsz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7658));
		}

	}



/* cons-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2appzd2argszd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_520, obj_t BgL_vz00_521)
	{
		{	/* Cfa/cinfo2.sch 835 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_520)))->BgL_argsz00) =
				((obj_t) BgL_vz00_521), BUNSPEC);
		}

	}



/* &cons-app-args-set! */
	obj_t BGl_z62conszd2appzd2argszd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7659, obj_t BgL_oz00_7660, obj_t BgL_vz00_7661)
	{
		{	/* Cfa/cinfo2.sch 835 */
			return
				BGl_conszd2appzd2argszd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7660), BgL_vz00_7661);
		}

	}



/* cons-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_conszd2appzd2funz00zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_522)
	{
		{	/* Cfa/cinfo2.sch 836 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_522)))->BgL_funz00);
		}

	}



/* &cons-app-fun */
	BgL_varz00_bglt BGl_z62conszd2appzd2funz62zzcfa_info2z00(obj_t
		BgL_envz00_7662, obj_t BgL_oz00_7663)
	{
		{	/* Cfa/cinfo2.sch 836 */
			return
				BGl_conszd2appzd2funz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7663));
		}

	}



/* cons-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2appzd2funzd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_523,
		BgL_varz00_bglt BgL_vz00_524)
	{
		{	/* Cfa/cinfo2.sch 837 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_523)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_524), BUNSPEC);
		}

	}



/* &cons-app-fun-set! */
	obj_t BGl_z62conszd2appzd2funzd2setz12za2zzcfa_info2z00(obj_t BgL_envz00_7664,
		obj_t BgL_oz00_7665, obj_t BgL_vz00_7666)
	{
		{	/* Cfa/cinfo2.sch 837 */
			return
				BGl_conszd2appzd2funzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7665), ((BgL_varz00_bglt) BgL_vz00_7666));
		}

	}



/* cons-app-key */
	BGL_EXPORTED_DEF obj_t BGl_conszd2appzd2keyz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_525)
	{
		{	/* Cfa/cinfo2.sch 838 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_525)))->BgL_keyz00);
		}

	}



/* &cons-app-key */
	obj_t BGl_z62conszd2appzd2keyz62zzcfa_info2z00(obj_t BgL_envz00_7667,
		obj_t BgL_oz00_7668)
	{
		{	/* Cfa/cinfo2.sch 838 */
			return
				BGl_conszd2appzd2keyz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7668));
		}

	}



/* cons-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2appzd2keyzd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_526,
		obj_t BgL_vz00_527)
	{
		{	/* Cfa/cinfo2.sch 839 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_526)))->BgL_keyz00) =
				((obj_t) BgL_vz00_527), BUNSPEC);
		}

	}



/* &cons-app-key-set! */
	obj_t BGl_z62conszd2appzd2keyzd2setz12za2zzcfa_info2z00(obj_t BgL_envz00_7669,
		obj_t BgL_oz00_7670, obj_t BgL_vz00_7671)
	{
		{	/* Cfa/cinfo2.sch 839 */
			return
				BGl_conszd2appzd2keyzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7670), BgL_vz00_7671);
		}

	}



/* cons-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2appzd2sidezd2effectzd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_528)
	{
		{	/* Cfa/cinfo2.sch 840 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_528)))->BgL_sidezd2effectzd2);
		}

	}



/* &cons-app-side-effect */
	obj_t BGl_z62conszd2appzd2sidezd2effectzb0zzcfa_info2z00(obj_t
		BgL_envz00_7672, obj_t BgL_oz00_7673)
	{
		{	/* Cfa/cinfo2.sch 840 */
			return
				BGl_conszd2appzd2sidezd2effectzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7673));
		}

	}



/* cons-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_529, obj_t BgL_vz00_530)
	{
		{	/* Cfa/cinfo2.sch 841 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_529)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_530), BUNSPEC);
		}

	}



/* &cons-app-side-effect-set! */
	obj_t BGl_z62conszd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7674, obj_t BgL_oz00_7675, obj_t BgL_vz00_7676)
	{
		{	/* Cfa/cinfo2.sch 841 */
			return
				BGl_conszd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7675), BgL_vz00_7676);
		}

	}



/* cons-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_conszd2appzd2typez00zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_531)
	{
		{	/* Cfa/cinfo2.sch 842 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_531)))->BgL_typez00);
		}

	}



/* &cons-app-type */
	BgL_typez00_bglt BGl_z62conszd2appzd2typez62zzcfa_info2z00(obj_t
		BgL_envz00_7677, obj_t BgL_oz00_7678)
	{
		{	/* Cfa/cinfo2.sch 842 */
			return
				BGl_conszd2appzd2typez00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7678));
		}

	}



/* cons-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2appzd2typezd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_532, BgL_typez00_bglt BgL_vz00_533)
	{
		{	/* Cfa/cinfo2.sch 843 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_532)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_533), BUNSPEC);
		}

	}



/* &cons-app-type-set! */
	obj_t BGl_z62conszd2appzd2typezd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7679, obj_t BgL_oz00_7680, obj_t BgL_vz00_7681)
	{
		{	/* Cfa/cinfo2.sch 843 */
			return
				BGl_conszd2appzd2typezd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7680), ((BgL_typez00_bglt) BgL_vz00_7681));
		}

	}



/* cons-app-loc */
	BGL_EXPORTED_DEF obj_t BGl_conszd2appzd2locz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_534)
	{
		{	/* Cfa/cinfo2.sch 844 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_534)))->BgL_locz00);
		}

	}



/* &cons-app-loc */
	obj_t BGl_z62conszd2appzd2locz62zzcfa_info2z00(obj_t BgL_envz00_7682,
		obj_t BgL_oz00_7683)
	{
		{	/* Cfa/cinfo2.sch 844 */
			return
				BGl_conszd2appzd2locz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7683));
		}

	}



/* make-cons-ref-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2conszd2refzd2appzd2zzcfa_info2z00(obj_t BgL_loc1540z00_537,
		BgL_typez00_bglt BgL_type1541z00_538, obj_t BgL_sidezd2effect1542zd2_539,
		obj_t BgL_key1543z00_540, BgL_varz00_bglt BgL_fun1544z00_541,
		obj_t BgL_args1545z00_542, obj_t BgL_stackable1546z00_543,
		BgL_approxz00_bglt BgL_approx1547z00_544, obj_t BgL_get1548z00_545)
	{
		{	/* Cfa/cinfo2.sch 848 */
			{	/* Cfa/cinfo2.sch 848 */
				BgL_appz00_bglt BgL_new1525z00_9116;

				{	/* Cfa/cinfo2.sch 848 */
					BgL_appz00_bglt BgL_tmp1523z00_9117;
					BgL_conszd2refzd2appz00_bglt BgL_wide1524z00_9118;

					{
						BgL_appz00_bglt BgL_auxz00_12376;

						{	/* Cfa/cinfo2.sch 848 */
							BgL_appz00_bglt BgL_new1522z00_9119;

							BgL_new1522z00_9119 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 848 */
								long BgL_arg1968z00_9120;

								BgL_arg1968z00_9120 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1522z00_9119),
									BgL_arg1968z00_9120);
							}
							{	/* Cfa/cinfo2.sch 848 */
								BgL_objectz00_bglt BgL_tmpz00_12381;

								BgL_tmpz00_12381 = ((BgL_objectz00_bglt) BgL_new1522z00_9119);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_12381, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1522z00_9119);
							BgL_auxz00_12376 = BgL_new1522z00_9119;
						}
						BgL_tmp1523z00_9117 = ((BgL_appz00_bglt) BgL_auxz00_12376);
					}
					BgL_wide1524z00_9118 =
						((BgL_conszd2refzd2appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
									BgL_conszd2refzd2appz00_bgl))));
					{	/* Cfa/cinfo2.sch 848 */
						obj_t BgL_auxz00_12389;
						BgL_objectz00_bglt BgL_tmpz00_12387;

						BgL_auxz00_12389 = ((obj_t) BgL_wide1524z00_9118);
						BgL_tmpz00_12387 = ((BgL_objectz00_bglt) BgL_tmp1523z00_9117);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_12387, BgL_auxz00_12389);
					}
					((BgL_objectz00_bglt) BgL_tmp1523z00_9117);
					{	/* Cfa/cinfo2.sch 848 */
						long BgL_arg1967z00_9121;

						BgL_arg1967z00_9121 =
							BGL_CLASS_NUM(BGl_conszd2refzd2appz00zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1523z00_9117), BgL_arg1967z00_9121);
					}
					BgL_new1525z00_9116 = ((BgL_appz00_bglt) BgL_tmp1523z00_9117);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1525z00_9116)))->BgL_locz00) =
					((obj_t) BgL_loc1540z00_537), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1525z00_9116)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1541z00_538), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1525z00_9116)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1542zd2_539), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1525z00_9116)))->BgL_keyz00) =
					((obj_t) BgL_key1543z00_540), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1525z00_9116)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1544z00_541), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1525z00_9116)))->
						BgL_argsz00) = ((obj_t) BgL_args1545z00_542), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1525z00_9116)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1546z00_543), BUNSPEC);
				{
					BgL_conszd2refzd2appz00_bglt BgL_auxz00_12411;

					{
						obj_t BgL_auxz00_12412;

						{	/* Cfa/cinfo2.sch 848 */
							BgL_objectz00_bglt BgL_tmpz00_12413;

							BgL_tmpz00_12413 = ((BgL_objectz00_bglt) BgL_new1525z00_9116);
							BgL_auxz00_12412 = BGL_OBJECT_WIDENING(BgL_tmpz00_12413);
						}
						BgL_auxz00_12411 =
							((BgL_conszd2refzd2appz00_bglt) BgL_auxz00_12412);
					}
					((((BgL_conszd2refzd2appz00_bglt) COBJECT(BgL_auxz00_12411))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_approx1547z00_544), BUNSPEC);
				}
				{
					BgL_conszd2refzd2appz00_bglt BgL_auxz00_12418;

					{
						obj_t BgL_auxz00_12419;

						{	/* Cfa/cinfo2.sch 848 */
							BgL_objectz00_bglt BgL_tmpz00_12420;

							BgL_tmpz00_12420 = ((BgL_objectz00_bglt) BgL_new1525z00_9116);
							BgL_auxz00_12419 = BGL_OBJECT_WIDENING(BgL_tmpz00_12420);
						}
						BgL_auxz00_12418 =
							((BgL_conszd2refzd2appz00_bglt) BgL_auxz00_12419);
					}
					((((BgL_conszd2refzd2appz00_bglt) COBJECT(BgL_auxz00_12418))->
							BgL_getz00) = ((obj_t) BgL_get1548z00_545), BUNSPEC);
				}
				return BgL_new1525z00_9116;
			}
		}

	}



/* &make-cons-ref-app */
	BgL_appz00_bglt BGl_z62makezd2conszd2refzd2appzb0zzcfa_info2z00(obj_t
		BgL_envz00_7684, obj_t BgL_loc1540z00_7685, obj_t BgL_type1541z00_7686,
		obj_t BgL_sidezd2effect1542zd2_7687, obj_t BgL_key1543z00_7688,
		obj_t BgL_fun1544z00_7689, obj_t BgL_args1545z00_7690,
		obj_t BgL_stackable1546z00_7691, obj_t BgL_approx1547z00_7692,
		obj_t BgL_get1548z00_7693)
	{
		{	/* Cfa/cinfo2.sch 848 */
			return
				BGl_makezd2conszd2refzd2appzd2zzcfa_info2z00(BgL_loc1540z00_7685,
				((BgL_typez00_bglt) BgL_type1541z00_7686),
				BgL_sidezd2effect1542zd2_7687, BgL_key1543z00_7688,
				((BgL_varz00_bglt) BgL_fun1544z00_7689), BgL_args1545z00_7690,
				BgL_stackable1546z00_7691,
				((BgL_approxz00_bglt) BgL_approx1547z00_7692), BgL_get1548z00_7693);
		}

	}



/* cons-ref-app? */
	BGL_EXPORTED_DEF bool_t BGl_conszd2refzd2appzf3zf3zzcfa_info2z00(obj_t
		BgL_objz00_546)
	{
		{	/* Cfa/cinfo2.sch 849 */
			{	/* Cfa/cinfo2.sch 849 */
				obj_t BgL_classz00_9122;

				BgL_classz00_9122 = BGl_conszd2refzd2appz00zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_546))
					{	/* Cfa/cinfo2.sch 849 */
						BgL_objectz00_bglt BgL_arg1801z00_9123;

						BgL_arg1801z00_9123 = (BgL_objectz00_bglt) (BgL_objz00_546);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 849 */
								long BgL_idxz00_9124;

								BgL_idxz00_9124 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_9123);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_9124 + 4L)) == BgL_classz00_9122);
							}
						else
							{	/* Cfa/cinfo2.sch 849 */
								bool_t BgL_res2848z00_9127;

								{	/* Cfa/cinfo2.sch 849 */
									obj_t BgL_oclassz00_9128;

									{	/* Cfa/cinfo2.sch 849 */
										long BgL_arg1808z00_9129;

										{	/* Cfa/cinfo2.sch 849 */
											long BgL_arg1809z00_9130;

											BgL_arg1809z00_9130 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_9123);
											BgL_arg1808z00_9129 = (BgL_arg1809z00_9130 - OBJECT_TYPE);
										}
										BgL_oclassz00_9128 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_9129);
									}
									{	/* Cfa/cinfo2.sch 849 */
										bool_t BgL__ortest_1115z00_9131;

										BgL__ortest_1115z00_9131 =
											(BgL_classz00_9122 == BgL_oclassz00_9128);
										if (BgL__ortest_1115z00_9131)
											{	/* Cfa/cinfo2.sch 849 */
												BgL_res2848z00_9127 = BgL__ortest_1115z00_9131;
											}
										else
											{	/* Cfa/cinfo2.sch 849 */
												long BgL_odepthz00_9132;

												BgL_odepthz00_9132 =
													BGL_CLASS_DEPTH(BgL_oclassz00_9128);
												if ((4L < BgL_odepthz00_9132))
													{	/* Cfa/cinfo2.sch 849 */
														obj_t BgL_arg1797z00_9133;

														BgL_arg1797z00_9133 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_9128, 4L);
														BgL_res2848z00_9127 =
															(BgL_arg1797z00_9133 == BgL_classz00_9122);
													}
												else
													{	/* Cfa/cinfo2.sch 849 */
														BgL_res2848z00_9127 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2848z00_9127;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 849 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &cons-ref-app? */
	obj_t BGl_z62conszd2refzd2appzf3z91zzcfa_info2z00(obj_t BgL_envz00_7694,
		obj_t BgL_objz00_7695)
	{
		{	/* Cfa/cinfo2.sch 849 */
			return BBOOL(BGl_conszd2refzd2appzf3zf3zzcfa_info2z00(BgL_objz00_7695));
		}

	}



/* cons-ref-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_conszd2refzd2appzd2nilzd2zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 850 */
			{	/* Cfa/cinfo2.sch 850 */
				obj_t BgL_classz00_5701;

				BgL_classz00_5701 = BGl_conszd2refzd2appz00zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 850 */
					obj_t BgL__ortest_1117z00_5702;

					BgL__ortest_1117z00_5702 = BGL_CLASS_NIL(BgL_classz00_5701);
					if (CBOOL(BgL__ortest_1117z00_5702))
						{	/* Cfa/cinfo2.sch 850 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_5702);
						}
					else
						{	/* Cfa/cinfo2.sch 850 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_5701));
						}
				}
			}
		}

	}



/* &cons-ref-app-nil */
	BgL_appz00_bglt BGl_z62conszd2refzd2appzd2nilzb0zzcfa_info2z00(obj_t
		BgL_envz00_7696)
	{
		{	/* Cfa/cinfo2.sch 850 */
			return BGl_conszd2refzd2appzd2nilzd2zzcfa_info2z00();
		}

	}



/* cons-ref-app-get */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2refzd2appzd2getzd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_547)
	{
		{	/* Cfa/cinfo2.sch 851 */
			{
				BgL_conszd2refzd2appz00_bglt BgL_auxz00_12457;

				{
					obj_t BgL_auxz00_12458;

					{	/* Cfa/cinfo2.sch 851 */
						BgL_objectz00_bglt BgL_tmpz00_12459;

						BgL_tmpz00_12459 = ((BgL_objectz00_bglt) BgL_oz00_547);
						BgL_auxz00_12458 = BGL_OBJECT_WIDENING(BgL_tmpz00_12459);
					}
					BgL_auxz00_12457 = ((BgL_conszd2refzd2appz00_bglt) BgL_auxz00_12458);
				}
				return
					(((BgL_conszd2refzd2appz00_bglt) COBJECT(BgL_auxz00_12457))->
					BgL_getz00);
			}
		}

	}



/* &cons-ref-app-get */
	obj_t BGl_z62conszd2refzd2appzd2getzb0zzcfa_info2z00(obj_t BgL_envz00_7697,
		obj_t BgL_oz00_7698)
	{
		{	/* Cfa/cinfo2.sch 851 */
			return
				BGl_conszd2refzd2appzd2getzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7698));
		}

	}



/* cons-ref-app-approx */
	BGL_EXPORTED_DEF BgL_approxz00_bglt
		BGl_conszd2refzd2appzd2approxzd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_550)
	{
		{	/* Cfa/cinfo2.sch 853 */
			{
				BgL_conszd2refzd2appz00_bglt BgL_auxz00_12466;

				{
					obj_t BgL_auxz00_12467;

					{	/* Cfa/cinfo2.sch 853 */
						BgL_objectz00_bglt BgL_tmpz00_12468;

						BgL_tmpz00_12468 = ((BgL_objectz00_bglt) BgL_oz00_550);
						BgL_auxz00_12467 = BGL_OBJECT_WIDENING(BgL_tmpz00_12468);
					}
					BgL_auxz00_12466 = ((BgL_conszd2refzd2appz00_bglt) BgL_auxz00_12467);
				}
				return
					(((BgL_conszd2refzd2appz00_bglt) COBJECT(BgL_auxz00_12466))->
					BgL_approxz00);
			}
		}

	}



/* &cons-ref-app-approx */
	BgL_approxz00_bglt BGl_z62conszd2refzd2appzd2approxzb0zzcfa_info2z00(obj_t
		BgL_envz00_7699, obj_t BgL_oz00_7700)
	{
		{	/* Cfa/cinfo2.sch 853 */
			return
				BGl_conszd2refzd2appzd2approxzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7700));
		}

	}



/* cons-ref-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2refzd2appzd2stackablezd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_553)
	{
		{	/* Cfa/cinfo2.sch 855 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_553)))->BgL_stackablez00);
		}

	}



/* &cons-ref-app-stackable */
	obj_t BGl_z62conszd2refzd2appzd2stackablezb0zzcfa_info2z00(obj_t
		BgL_envz00_7701, obj_t BgL_oz00_7702)
	{
		{	/* Cfa/cinfo2.sch 855 */
			return
				BGl_conszd2refzd2appzd2stackablezd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7702));
		}

	}



/* cons-ref-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2refzd2appzd2stackablezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_554, obj_t BgL_vz00_555)
	{
		{	/* Cfa/cinfo2.sch 856 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_554)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_555), BUNSPEC);
		}

	}



/* &cons-ref-app-stackable-set! */
	obj_t BGl_z62conszd2refzd2appzd2stackablezd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7703, obj_t BgL_oz00_7704, obj_t BgL_vz00_7705)
	{
		{	/* Cfa/cinfo2.sch 856 */
			return
				BGl_conszd2refzd2appzd2stackablezd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7704), BgL_vz00_7705);
		}

	}



/* cons-ref-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2refzd2appzd2argszd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_556)
	{
		{	/* Cfa/cinfo2.sch 857 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_556)))->BgL_argsz00);
		}

	}



/* &cons-ref-app-args */
	obj_t BGl_z62conszd2refzd2appzd2argszb0zzcfa_info2z00(obj_t BgL_envz00_7706,
		obj_t BgL_oz00_7707)
	{
		{	/* Cfa/cinfo2.sch 857 */
			return
				BGl_conszd2refzd2appzd2argszd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7707));
		}

	}



/* cons-ref-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2refzd2appzd2argszd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_557, obj_t BgL_vz00_558)
	{
		{	/* Cfa/cinfo2.sch 858 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_557)))->BgL_argsz00) =
				((obj_t) BgL_vz00_558), BUNSPEC);
		}

	}



/* &cons-ref-app-args-set! */
	obj_t BGl_z62conszd2refzd2appzd2argszd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7708, obj_t BgL_oz00_7709, obj_t BgL_vz00_7710)
	{
		{	/* Cfa/cinfo2.sch 858 */
			return
				BGl_conszd2refzd2appzd2argszd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7709), BgL_vz00_7710);
		}

	}



/* cons-ref-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_conszd2refzd2appzd2funzd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_559)
	{
		{	/* Cfa/cinfo2.sch 859 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_559)))->BgL_funz00);
		}

	}



/* &cons-ref-app-fun */
	BgL_varz00_bglt BGl_z62conszd2refzd2appzd2funzb0zzcfa_info2z00(obj_t
		BgL_envz00_7711, obj_t BgL_oz00_7712)
	{
		{	/* Cfa/cinfo2.sch 859 */
			return
				BGl_conszd2refzd2appzd2funzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7712));
		}

	}



/* cons-ref-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2refzd2appzd2funzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_560, BgL_varz00_bglt BgL_vz00_561)
	{
		{	/* Cfa/cinfo2.sch 860 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_560)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_561), BUNSPEC);
		}

	}



/* &cons-ref-app-fun-set! */
	obj_t BGl_z62conszd2refzd2appzd2funzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7713, obj_t BgL_oz00_7714, obj_t BgL_vz00_7715)
	{
		{	/* Cfa/cinfo2.sch 860 */
			return
				BGl_conszd2refzd2appzd2funzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7714), ((BgL_varz00_bglt) BgL_vz00_7715));
		}

	}



/* cons-ref-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2refzd2appzd2keyzd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_562)
	{
		{	/* Cfa/cinfo2.sch 861 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_562)))->BgL_keyz00);
		}

	}



/* &cons-ref-app-key */
	obj_t BGl_z62conszd2refzd2appzd2keyzb0zzcfa_info2z00(obj_t BgL_envz00_7716,
		obj_t BgL_oz00_7717)
	{
		{	/* Cfa/cinfo2.sch 861 */
			return
				BGl_conszd2refzd2appzd2keyzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7717));
		}

	}



/* cons-ref-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2refzd2appzd2keyzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_563, obj_t BgL_vz00_564)
	{
		{	/* Cfa/cinfo2.sch 862 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_563)))->BgL_keyz00) =
				((obj_t) BgL_vz00_564), BUNSPEC);
		}

	}



/* &cons-ref-app-key-set! */
	obj_t BGl_z62conszd2refzd2appzd2keyzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7718, obj_t BgL_oz00_7719, obj_t BgL_vz00_7720)
	{
		{	/* Cfa/cinfo2.sch 862 */
			return
				BGl_conszd2refzd2appzd2keyzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7719), BgL_vz00_7720);
		}

	}



/* cons-ref-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2refzd2appzd2sidezd2effectz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_565)
	{
		{	/* Cfa/cinfo2.sch 863 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_565)))->BgL_sidezd2effectzd2);
		}

	}



/* &cons-ref-app-side-effect */
	obj_t BGl_z62conszd2refzd2appzd2sidezd2effectz62zzcfa_info2z00(obj_t
		BgL_envz00_7721, obj_t BgL_oz00_7722)
	{
		{	/* Cfa/cinfo2.sch 863 */
			return
				BGl_conszd2refzd2appzd2sidezd2effectz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7722));
		}

	}



/* cons-ref-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2refzd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_566, obj_t BgL_vz00_567)
	{
		{	/* Cfa/cinfo2.sch 864 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_566)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_567), BUNSPEC);
		}

	}



/* &cons-ref-app-side-effect-set! */
	obj_t BGl_z62conszd2refzd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7723, obj_t BgL_oz00_7724, obj_t BgL_vz00_7725)
	{
		{	/* Cfa/cinfo2.sch 864 */
			return
				BGl_conszd2refzd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7724), BgL_vz00_7725);
		}

	}



/* cons-ref-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_conszd2refzd2appzd2typezd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_568)
	{
		{	/* Cfa/cinfo2.sch 865 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_568)))->BgL_typez00);
		}

	}



/* &cons-ref-app-type */
	BgL_typez00_bglt BGl_z62conszd2refzd2appzd2typezb0zzcfa_info2z00(obj_t
		BgL_envz00_7726, obj_t BgL_oz00_7727)
	{
		{	/* Cfa/cinfo2.sch 865 */
			return
				BGl_conszd2refzd2appzd2typezd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7727));
		}

	}



/* cons-ref-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2refzd2appzd2typezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_569, BgL_typez00_bglt BgL_vz00_570)
	{
		{	/* Cfa/cinfo2.sch 866 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_569)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_570), BUNSPEC);
		}

	}



/* &cons-ref-app-type-set! */
	obj_t BGl_z62conszd2refzd2appzd2typezd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7728, obj_t BgL_oz00_7729, obj_t BgL_vz00_7730)
	{
		{	/* Cfa/cinfo2.sch 866 */
			return
				BGl_conszd2refzd2appzd2typezd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7729), ((BgL_typez00_bglt) BgL_vz00_7730));
		}

	}



/* cons-ref-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2refzd2appzd2loczd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_571)
	{
		{	/* Cfa/cinfo2.sch 867 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_571)))->BgL_locz00);
		}

	}



/* &cons-ref-app-loc */
	obj_t BGl_z62conszd2refzd2appzd2loczb0zzcfa_info2z00(obj_t BgL_envz00_7731,
		obj_t BgL_oz00_7732)
	{
		{	/* Cfa/cinfo2.sch 867 */
			return
				BGl_conszd2refzd2appzd2loczd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7732));
		}

	}



/* make-cons-set!-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2conszd2setz12zd2appzc0zzcfa_info2z00(obj_t BgL_loc1530z00_574,
		BgL_typez00_bglt BgL_type1531z00_575, obj_t BgL_sidezd2effect1532zd2_576,
		obj_t BgL_key1533z00_577, BgL_varz00_bglt BgL_fun1534z00_578,
		obj_t BgL_args1535z00_579, obj_t BgL_stackable1536z00_580,
		BgL_approxz00_bglt BgL_approx1537z00_581, obj_t BgL_get1538z00_582)
	{
		{	/* Cfa/cinfo2.sch 871 */
			{	/* Cfa/cinfo2.sch 871 */
				BgL_appz00_bglt BgL_new1529z00_9134;

				{	/* Cfa/cinfo2.sch 871 */
					BgL_appz00_bglt BgL_tmp1527z00_9135;
					BgL_conszd2setz12zd2appz12_bglt BgL_wide1528z00_9136;

					{
						BgL_appz00_bglt BgL_auxz00_12529;

						{	/* Cfa/cinfo2.sch 871 */
							BgL_appz00_bglt BgL_new1526z00_9137;

							BgL_new1526z00_9137 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 871 */
								long BgL_arg1970z00_9138;

								BgL_arg1970z00_9138 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1526z00_9137),
									BgL_arg1970z00_9138);
							}
							{	/* Cfa/cinfo2.sch 871 */
								BgL_objectz00_bglt BgL_tmpz00_12534;

								BgL_tmpz00_12534 = ((BgL_objectz00_bglt) BgL_new1526z00_9137);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_12534, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1526z00_9137);
							BgL_auxz00_12529 = BgL_new1526z00_9137;
						}
						BgL_tmp1527z00_9135 = ((BgL_appz00_bglt) BgL_auxz00_12529);
					}
					BgL_wide1528z00_9136 =
						((BgL_conszd2setz12zd2appz12_bglt) BOBJECT(GC_MALLOC(sizeof(struct
									BgL_conszd2setz12zd2appz12_bgl))));
					{	/* Cfa/cinfo2.sch 871 */
						obj_t BgL_auxz00_12542;
						BgL_objectz00_bglt BgL_tmpz00_12540;

						BgL_auxz00_12542 = ((obj_t) BgL_wide1528z00_9136);
						BgL_tmpz00_12540 = ((BgL_objectz00_bglt) BgL_tmp1527z00_9135);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_12540, BgL_auxz00_12542);
					}
					((BgL_objectz00_bglt) BgL_tmp1527z00_9135);
					{	/* Cfa/cinfo2.sch 871 */
						long BgL_arg1969z00_9139;

						BgL_arg1969z00_9139 =
							BGL_CLASS_NUM(BGl_conszd2setz12zd2appz12zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1527z00_9135), BgL_arg1969z00_9139);
					}
					BgL_new1529z00_9134 = ((BgL_appz00_bglt) BgL_tmp1527z00_9135);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1529z00_9134)))->BgL_locz00) =
					((obj_t) BgL_loc1530z00_574), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1529z00_9134)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1531z00_575), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1529z00_9134)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1532zd2_576), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1529z00_9134)))->BgL_keyz00) =
					((obj_t) BgL_key1533z00_577), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1529z00_9134)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1534z00_578), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1529z00_9134)))->
						BgL_argsz00) = ((obj_t) BgL_args1535z00_579), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1529z00_9134)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1536z00_580), BUNSPEC);
				{
					BgL_conszd2setz12zd2appz12_bglt BgL_auxz00_12564;

					{
						obj_t BgL_auxz00_12565;

						{	/* Cfa/cinfo2.sch 871 */
							BgL_objectz00_bglt BgL_tmpz00_12566;

							BgL_tmpz00_12566 = ((BgL_objectz00_bglt) BgL_new1529z00_9134);
							BgL_auxz00_12565 = BGL_OBJECT_WIDENING(BgL_tmpz00_12566);
						}
						BgL_auxz00_12564 =
							((BgL_conszd2setz12zd2appz12_bglt) BgL_auxz00_12565);
					}
					((((BgL_conszd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_12564))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_approx1537z00_581), BUNSPEC);
				}
				{
					BgL_conszd2setz12zd2appz12_bglt BgL_auxz00_12571;

					{
						obj_t BgL_auxz00_12572;

						{	/* Cfa/cinfo2.sch 871 */
							BgL_objectz00_bglt BgL_tmpz00_12573;

							BgL_tmpz00_12573 = ((BgL_objectz00_bglt) BgL_new1529z00_9134);
							BgL_auxz00_12572 = BGL_OBJECT_WIDENING(BgL_tmpz00_12573);
						}
						BgL_auxz00_12571 =
							((BgL_conszd2setz12zd2appz12_bglt) BgL_auxz00_12572);
					}
					((((BgL_conszd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_12571))->
							BgL_getz00) = ((obj_t) BgL_get1538z00_582), BUNSPEC);
				}
				return BgL_new1529z00_9134;
			}
		}

	}



/* &make-cons-set!-app */
	BgL_appz00_bglt BGl_z62makezd2conszd2setz12zd2appza2zzcfa_info2z00(obj_t
		BgL_envz00_7733, obj_t BgL_loc1530z00_7734, obj_t BgL_type1531z00_7735,
		obj_t BgL_sidezd2effect1532zd2_7736, obj_t BgL_key1533z00_7737,
		obj_t BgL_fun1534z00_7738, obj_t BgL_args1535z00_7739,
		obj_t BgL_stackable1536z00_7740, obj_t BgL_approx1537z00_7741,
		obj_t BgL_get1538z00_7742)
	{
		{	/* Cfa/cinfo2.sch 871 */
			return
				BGl_makezd2conszd2setz12zd2appzc0zzcfa_info2z00(BgL_loc1530z00_7734,
				((BgL_typez00_bglt) BgL_type1531z00_7735),
				BgL_sidezd2effect1532zd2_7736, BgL_key1533z00_7737,
				((BgL_varz00_bglt) BgL_fun1534z00_7738), BgL_args1535z00_7739,
				BgL_stackable1536z00_7740,
				((BgL_approxz00_bglt) BgL_approx1537z00_7741), BgL_get1538z00_7742);
		}

	}



/* cons-set!-app? */
	BGL_EXPORTED_DEF bool_t BGl_conszd2setz12zd2appzf3ze1zzcfa_info2z00(obj_t
		BgL_objz00_583)
	{
		{	/* Cfa/cinfo2.sch 872 */
			{	/* Cfa/cinfo2.sch 872 */
				obj_t BgL_classz00_9140;

				BgL_classz00_9140 = BGl_conszd2setz12zd2appz12zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_583))
					{	/* Cfa/cinfo2.sch 872 */
						BgL_objectz00_bglt BgL_arg1801z00_9141;

						BgL_arg1801z00_9141 = (BgL_objectz00_bglt) (BgL_objz00_583);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 872 */
								long BgL_idxz00_9142;

								BgL_idxz00_9142 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_9141);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_9142 + 4L)) == BgL_classz00_9140);
							}
						else
							{	/* Cfa/cinfo2.sch 872 */
								bool_t BgL_res2849z00_9145;

								{	/* Cfa/cinfo2.sch 872 */
									obj_t BgL_oclassz00_9146;

									{	/* Cfa/cinfo2.sch 872 */
										long BgL_arg1808z00_9147;

										{	/* Cfa/cinfo2.sch 872 */
											long BgL_arg1809z00_9148;

											BgL_arg1809z00_9148 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_9141);
											BgL_arg1808z00_9147 = (BgL_arg1809z00_9148 - OBJECT_TYPE);
										}
										BgL_oclassz00_9146 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_9147);
									}
									{	/* Cfa/cinfo2.sch 872 */
										bool_t BgL__ortest_1115z00_9149;

										BgL__ortest_1115z00_9149 =
											(BgL_classz00_9140 == BgL_oclassz00_9146);
										if (BgL__ortest_1115z00_9149)
											{	/* Cfa/cinfo2.sch 872 */
												BgL_res2849z00_9145 = BgL__ortest_1115z00_9149;
											}
										else
											{	/* Cfa/cinfo2.sch 872 */
												long BgL_odepthz00_9150;

												BgL_odepthz00_9150 =
													BGL_CLASS_DEPTH(BgL_oclassz00_9146);
												if ((4L < BgL_odepthz00_9150))
													{	/* Cfa/cinfo2.sch 872 */
														obj_t BgL_arg1797z00_9151;

														BgL_arg1797z00_9151 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_9146, 4L);
														BgL_res2849z00_9145 =
															(BgL_arg1797z00_9151 == BgL_classz00_9140);
													}
												else
													{	/* Cfa/cinfo2.sch 872 */
														BgL_res2849z00_9145 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2849z00_9145;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 872 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &cons-set!-app? */
	obj_t BGl_z62conszd2setz12zd2appzf3z83zzcfa_info2z00(obj_t BgL_envz00_7743,
		obj_t BgL_objz00_7744)
	{
		{	/* Cfa/cinfo2.sch 872 */
			return
				BBOOL(BGl_conszd2setz12zd2appzf3ze1zzcfa_info2z00(BgL_objz00_7744));
		}

	}



/* cons-set!-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_conszd2setz12zd2appzd2nilzc0zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 873 */
			{	/* Cfa/cinfo2.sch 873 */
				obj_t BgL_classz00_5752;

				BgL_classz00_5752 = BGl_conszd2setz12zd2appz12zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 873 */
					obj_t BgL__ortest_1117z00_5753;

					BgL__ortest_1117z00_5753 = BGL_CLASS_NIL(BgL_classz00_5752);
					if (CBOOL(BgL__ortest_1117z00_5753))
						{	/* Cfa/cinfo2.sch 873 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_5753);
						}
					else
						{	/* Cfa/cinfo2.sch 873 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_5752));
						}
				}
			}
		}

	}



/* &cons-set!-app-nil */
	BgL_appz00_bglt BGl_z62conszd2setz12zd2appzd2nilza2zzcfa_info2z00(obj_t
		BgL_envz00_7745)
	{
		{	/* Cfa/cinfo2.sch 873 */
			return BGl_conszd2setz12zd2appzd2nilzc0zzcfa_info2z00();
		}

	}



/* cons-set!-app-get */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2setz12zd2appzd2getzc0zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_584)
	{
		{	/* Cfa/cinfo2.sch 874 */
			{
				BgL_conszd2setz12zd2appz12_bglt BgL_auxz00_12610;

				{
					obj_t BgL_auxz00_12611;

					{	/* Cfa/cinfo2.sch 874 */
						BgL_objectz00_bglt BgL_tmpz00_12612;

						BgL_tmpz00_12612 = ((BgL_objectz00_bglt) BgL_oz00_584);
						BgL_auxz00_12611 = BGL_OBJECT_WIDENING(BgL_tmpz00_12612);
					}
					BgL_auxz00_12610 =
						((BgL_conszd2setz12zd2appz12_bglt) BgL_auxz00_12611);
				}
				return
					(((BgL_conszd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_12610))->
					BgL_getz00);
			}
		}

	}



/* &cons-set!-app-get */
	obj_t BGl_z62conszd2setz12zd2appzd2getza2zzcfa_info2z00(obj_t BgL_envz00_7746,
		obj_t BgL_oz00_7747)
	{
		{	/* Cfa/cinfo2.sch 874 */
			return
				BGl_conszd2setz12zd2appzd2getzc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7747));
		}

	}



/* cons-set!-app-approx */
	BGL_EXPORTED_DEF BgL_approxz00_bglt
		BGl_conszd2setz12zd2appzd2approxzc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_587)
	{
		{	/* Cfa/cinfo2.sch 876 */
			{
				BgL_conszd2setz12zd2appz12_bglt BgL_auxz00_12619;

				{
					obj_t BgL_auxz00_12620;

					{	/* Cfa/cinfo2.sch 876 */
						BgL_objectz00_bglt BgL_tmpz00_12621;

						BgL_tmpz00_12621 = ((BgL_objectz00_bglt) BgL_oz00_587);
						BgL_auxz00_12620 = BGL_OBJECT_WIDENING(BgL_tmpz00_12621);
					}
					BgL_auxz00_12619 =
						((BgL_conszd2setz12zd2appz12_bglt) BgL_auxz00_12620);
				}
				return
					(((BgL_conszd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_12619))->
					BgL_approxz00);
			}
		}

	}



/* &cons-set!-app-approx */
	BgL_approxz00_bglt BGl_z62conszd2setz12zd2appzd2approxza2zzcfa_info2z00(obj_t
		BgL_envz00_7748, obj_t BgL_oz00_7749)
	{
		{	/* Cfa/cinfo2.sch 876 */
			return
				BGl_conszd2setz12zd2appzd2approxzc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7749));
		}

	}



/* cons-set!-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2setz12zd2appzd2stackablezc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_590)
	{
		{	/* Cfa/cinfo2.sch 878 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_590)))->BgL_stackablez00);
		}

	}



/* &cons-set!-app-stackable */
	obj_t BGl_z62conszd2setz12zd2appzd2stackableza2zzcfa_info2z00(obj_t
		BgL_envz00_7750, obj_t BgL_oz00_7751)
	{
		{	/* Cfa/cinfo2.sch 878 */
			return
				BGl_conszd2setz12zd2appzd2stackablezc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7751));
		}

	}



/* cons-set!-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2setz12zd2appzd2stackablezd2setz12z00zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_591, obj_t BgL_vz00_592)
	{
		{	/* Cfa/cinfo2.sch 879 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_591)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_592), BUNSPEC);
		}

	}



/* &cons-set!-app-stackable-set! */
	obj_t BGl_z62conszd2setz12zd2appzd2stackablezd2setz12z62zzcfa_info2z00(obj_t
		BgL_envz00_7752, obj_t BgL_oz00_7753, obj_t BgL_vz00_7754)
	{
		{	/* Cfa/cinfo2.sch 879 */
			return
				BGl_conszd2setz12zd2appzd2stackablezd2setz12z00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7753), BgL_vz00_7754);
		}

	}



/* cons-set!-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2setz12zd2appzd2argszc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_593)
	{
		{	/* Cfa/cinfo2.sch 880 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_593)))->BgL_argsz00);
		}

	}



/* &cons-set!-app-args */
	obj_t BGl_z62conszd2setz12zd2appzd2argsza2zzcfa_info2z00(obj_t
		BgL_envz00_7755, obj_t BgL_oz00_7756)
	{
		{	/* Cfa/cinfo2.sch 880 */
			return
				BGl_conszd2setz12zd2appzd2argszc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7756));
		}

	}



/* cons-set!-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2setz12zd2appzd2argszd2setz12z00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_594, obj_t BgL_vz00_595)
	{
		{	/* Cfa/cinfo2.sch 881 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_594)))->BgL_argsz00) =
				((obj_t) BgL_vz00_595), BUNSPEC);
		}

	}



/* &cons-set!-app-args-set! */
	obj_t BGl_z62conszd2setz12zd2appzd2argszd2setz12z62zzcfa_info2z00(obj_t
		BgL_envz00_7757, obj_t BgL_oz00_7758, obj_t BgL_vz00_7759)
	{
		{	/* Cfa/cinfo2.sch 881 */
			return
				BGl_conszd2setz12zd2appzd2argszd2setz12z00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7758), BgL_vz00_7759);
		}

	}



/* cons-set!-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_conszd2setz12zd2appzd2funzc0zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_596)
	{
		{	/* Cfa/cinfo2.sch 882 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_596)))->BgL_funz00);
		}

	}



/* &cons-set!-app-fun */
	BgL_varz00_bglt BGl_z62conszd2setz12zd2appzd2funza2zzcfa_info2z00(obj_t
		BgL_envz00_7760, obj_t BgL_oz00_7761)
	{
		{	/* Cfa/cinfo2.sch 882 */
			return
				BGl_conszd2setz12zd2appzd2funzc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7761));
		}

	}



/* cons-set!-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2setz12zd2appzd2funzd2setz12z00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_597, BgL_varz00_bglt BgL_vz00_598)
	{
		{	/* Cfa/cinfo2.sch 883 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_597)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_598), BUNSPEC);
		}

	}



/* &cons-set!-app-fun-set! */
	obj_t BGl_z62conszd2setz12zd2appzd2funzd2setz12z62zzcfa_info2z00(obj_t
		BgL_envz00_7762, obj_t BgL_oz00_7763, obj_t BgL_vz00_7764)
	{
		{	/* Cfa/cinfo2.sch 883 */
			return
				BGl_conszd2setz12zd2appzd2funzd2setz12z00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7763), ((BgL_varz00_bglt) BgL_vz00_7764));
		}

	}



/* cons-set!-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2setz12zd2appzd2keyzc0zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_599)
	{
		{	/* Cfa/cinfo2.sch 884 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_599)))->BgL_keyz00);
		}

	}



/* &cons-set!-app-key */
	obj_t BGl_z62conszd2setz12zd2appzd2keyza2zzcfa_info2z00(obj_t BgL_envz00_7765,
		obj_t BgL_oz00_7766)
	{
		{	/* Cfa/cinfo2.sch 884 */
			return
				BGl_conszd2setz12zd2appzd2keyzc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7766));
		}

	}



/* cons-set!-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2setz12zd2appzd2keyzd2setz12z00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_600, obj_t BgL_vz00_601)
	{
		{	/* Cfa/cinfo2.sch 885 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_600)))->BgL_keyz00) =
				((obj_t) BgL_vz00_601), BUNSPEC);
		}

	}



/* &cons-set!-app-key-set! */
	obj_t BGl_z62conszd2setz12zd2appzd2keyzd2setz12z62zzcfa_info2z00(obj_t
		BgL_envz00_7767, obj_t BgL_oz00_7768, obj_t BgL_vz00_7769)
	{
		{	/* Cfa/cinfo2.sch 885 */
			return
				BGl_conszd2setz12zd2appzd2keyzd2setz12z00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7768), BgL_vz00_7769);
		}

	}



/* cons-set!-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2setz12zd2appzd2sidezd2effectz12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_602)
	{
		{	/* Cfa/cinfo2.sch 886 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_602)))->BgL_sidezd2effectzd2);
		}

	}



/* &cons-set!-app-side-effect */
	obj_t BGl_z62conszd2setz12zd2appzd2sidezd2effectz70zzcfa_info2z00(obj_t
		BgL_envz00_7770, obj_t BgL_oz00_7771)
	{
		{	/* Cfa/cinfo2.sch 886 */
			return
				BGl_conszd2setz12zd2appzd2sidezd2effectz12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7771));
		}

	}



/* cons-set!-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2setz12zd2appzd2sidezd2effectzd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_603, obj_t BgL_vz00_604)
	{
		{	/* Cfa/cinfo2.sch 887 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_603)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_604), BUNSPEC);
		}

	}



/* &cons-set!-app-side-effect-set! */
	obj_t
		BGl_z62conszd2setz12zd2appzd2sidezd2effectzd2setz12zb0zzcfa_info2z00(obj_t
		BgL_envz00_7772, obj_t BgL_oz00_7773, obj_t BgL_vz00_7774)
	{
		{	/* Cfa/cinfo2.sch 887 */
			return
				BGl_conszd2setz12zd2appzd2sidezd2effectzd2setz12zd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7773), BgL_vz00_7774);
		}

	}



/* cons-set!-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_conszd2setz12zd2appzd2typezc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_605)
	{
		{	/* Cfa/cinfo2.sch 888 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_605)))->BgL_typez00);
		}

	}



/* &cons-set!-app-type */
	BgL_typez00_bglt BGl_z62conszd2setz12zd2appzd2typeza2zzcfa_info2z00(obj_t
		BgL_envz00_7775, obj_t BgL_oz00_7776)
	{
		{	/* Cfa/cinfo2.sch 888 */
			return
				BGl_conszd2setz12zd2appzd2typezc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7776));
		}

	}



/* cons-set!-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2setz12zd2appzd2typezd2setz12z00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_606, BgL_typez00_bglt BgL_vz00_607)
	{
		{	/* Cfa/cinfo2.sch 889 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_606)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_607), BUNSPEC);
		}

	}



/* &cons-set!-app-type-set! */
	obj_t BGl_z62conszd2setz12zd2appzd2typezd2setz12z62zzcfa_info2z00(obj_t
		BgL_envz00_7777, obj_t BgL_oz00_7778, obj_t BgL_vz00_7779)
	{
		{	/* Cfa/cinfo2.sch 889 */
			return
				BGl_conszd2setz12zd2appzd2typezd2setz12z00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7778), ((BgL_typez00_bglt) BgL_vz00_7779));
		}

	}



/* cons-set!-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_conszd2setz12zd2appzd2loczc0zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_608)
	{
		{	/* Cfa/cinfo2.sch 890 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_608)))->BgL_locz00);
		}

	}



/* &cons-set!-app-loc */
	obj_t BGl_z62conszd2setz12zd2appzd2locza2zzcfa_info2z00(obj_t BgL_envz00_7780,
		obj_t BgL_oz00_7781)
	{
		{	/* Cfa/cinfo2.sch 890 */
			return
				BGl_conszd2setz12zd2appzd2loczc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7781));
		}

	}



/* make-pre-make-struct-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2prezd2makezd2structzd2appz00zzcfa_info2z00(obj_t
		BgL_loc1521z00_611, BgL_typez00_bglt BgL_type1522z00_612,
		obj_t BgL_sidezd2effect1523zd2_613, obj_t BgL_key1524z00_614,
		BgL_varz00_bglt BgL_fun1525z00_615, obj_t BgL_args1526z00_616,
		obj_t BgL_stackable1527z00_617, BgL_variablez00_bglt BgL_owner1528z00_618)
	{
		{	/* Cfa/cinfo2.sch 894 */
			{	/* Cfa/cinfo2.sch 894 */
				BgL_appz00_bglt BgL_new1533z00_9152;

				{	/* Cfa/cinfo2.sch 894 */
					BgL_appz00_bglt BgL_tmp1531z00_9153;
					BgL_prezd2makezd2structzd2appzd2_bglt BgL_wide1532z00_9154;

					{
						BgL_appz00_bglt BgL_auxz00_12682;

						{	/* Cfa/cinfo2.sch 894 */
							BgL_appz00_bglt BgL_new1530z00_9155;

							BgL_new1530z00_9155 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 894 */
								long BgL_arg1972z00_9156;

								BgL_arg1972z00_9156 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1530z00_9155),
									BgL_arg1972z00_9156);
							}
							{	/* Cfa/cinfo2.sch 894 */
								BgL_objectz00_bglt BgL_tmpz00_12687;

								BgL_tmpz00_12687 = ((BgL_objectz00_bglt) BgL_new1530z00_9155);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_12687, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1530z00_9155);
							BgL_auxz00_12682 = BgL_new1530z00_9155;
						}
						BgL_tmp1531z00_9153 = ((BgL_appz00_bglt) BgL_auxz00_12682);
					}
					BgL_wide1532z00_9154 =
						((BgL_prezd2makezd2structzd2appzd2_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2makezd2structzd2appzd2_bgl))));
					{	/* Cfa/cinfo2.sch 894 */
						obj_t BgL_auxz00_12695;
						BgL_objectz00_bglt BgL_tmpz00_12693;

						BgL_auxz00_12695 = ((obj_t) BgL_wide1532z00_9154);
						BgL_tmpz00_12693 = ((BgL_objectz00_bglt) BgL_tmp1531z00_9153);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_12693, BgL_auxz00_12695);
					}
					((BgL_objectz00_bglt) BgL_tmp1531z00_9153);
					{	/* Cfa/cinfo2.sch 894 */
						long BgL_arg1971z00_9157;

						BgL_arg1971z00_9157 =
							BGL_CLASS_NUM(BGl_prezd2makezd2structzd2appzd2zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1531z00_9153), BgL_arg1971z00_9157);
					}
					BgL_new1533z00_9152 = ((BgL_appz00_bglt) BgL_tmp1531z00_9153);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1533z00_9152)))->BgL_locz00) =
					((obj_t) BgL_loc1521z00_611), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1533z00_9152)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1522z00_612), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1533z00_9152)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1523zd2_613), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1533z00_9152)))->BgL_keyz00) =
					((obj_t) BgL_key1524z00_614), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1533z00_9152)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1525z00_615), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1533z00_9152)))->
						BgL_argsz00) = ((obj_t) BgL_args1526z00_616), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1533z00_9152)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1527z00_617), BUNSPEC);
				{
					BgL_prezd2makezd2structzd2appzd2_bglt BgL_auxz00_12717;

					{
						obj_t BgL_auxz00_12718;

						{	/* Cfa/cinfo2.sch 894 */
							BgL_objectz00_bglt BgL_tmpz00_12719;

							BgL_tmpz00_12719 = ((BgL_objectz00_bglt) BgL_new1533z00_9152);
							BgL_auxz00_12718 = BGL_OBJECT_WIDENING(BgL_tmpz00_12719);
						}
						BgL_auxz00_12717 =
							((BgL_prezd2makezd2structzd2appzd2_bglt) BgL_auxz00_12718);
					}
					((((BgL_prezd2makezd2structzd2appzd2_bglt)
								COBJECT(BgL_auxz00_12717))->BgL_ownerz00) =
						((BgL_variablez00_bglt) BgL_owner1528z00_618), BUNSPEC);
				}
				return BgL_new1533z00_9152;
			}
		}

	}



/* &make-pre-make-struct-app */
	BgL_appz00_bglt BGl_z62makezd2prezd2makezd2structzd2appz62zzcfa_info2z00(obj_t
		BgL_envz00_7782, obj_t BgL_loc1521z00_7783, obj_t BgL_type1522z00_7784,
		obj_t BgL_sidezd2effect1523zd2_7785, obj_t BgL_key1524z00_7786,
		obj_t BgL_fun1525z00_7787, obj_t BgL_args1526z00_7788,
		obj_t BgL_stackable1527z00_7789, obj_t BgL_owner1528z00_7790)
	{
		{	/* Cfa/cinfo2.sch 894 */
			return
				BGl_makezd2prezd2makezd2structzd2appz00zzcfa_info2z00
				(BgL_loc1521z00_7783, ((BgL_typez00_bglt) BgL_type1522z00_7784),
				BgL_sidezd2effect1523zd2_7785, BgL_key1524z00_7786,
				((BgL_varz00_bglt) BgL_fun1525z00_7787), BgL_args1526z00_7788,
				BgL_stackable1527z00_7789,
				((BgL_variablez00_bglt) BgL_owner1528z00_7790));
		}

	}



/* pre-make-struct-app? */
	BGL_EXPORTED_DEF bool_t
		BGl_prezd2makezd2structzd2appzf3z21zzcfa_info2z00(obj_t BgL_objz00_619)
	{
		{	/* Cfa/cinfo2.sch 895 */
			{	/* Cfa/cinfo2.sch 895 */
				obj_t BgL_classz00_9158;

				BgL_classz00_9158 = BGl_prezd2makezd2structzd2appzd2zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_619))
					{	/* Cfa/cinfo2.sch 895 */
						BgL_objectz00_bglt BgL_arg1801z00_9159;

						BgL_arg1801z00_9159 = (BgL_objectz00_bglt) (BgL_objz00_619);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 895 */
								long BgL_idxz00_9160;

								BgL_idxz00_9160 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_9159);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_9160 + 4L)) == BgL_classz00_9158);
							}
						else
							{	/* Cfa/cinfo2.sch 895 */
								bool_t BgL_res2850z00_9163;

								{	/* Cfa/cinfo2.sch 895 */
									obj_t BgL_oclassz00_9164;

									{	/* Cfa/cinfo2.sch 895 */
										long BgL_arg1808z00_9165;

										{	/* Cfa/cinfo2.sch 895 */
											long BgL_arg1809z00_9166;

											BgL_arg1809z00_9166 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_9159);
											BgL_arg1808z00_9165 = (BgL_arg1809z00_9166 - OBJECT_TYPE);
										}
										BgL_oclassz00_9164 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_9165);
									}
									{	/* Cfa/cinfo2.sch 895 */
										bool_t BgL__ortest_1115z00_9167;

										BgL__ortest_1115z00_9167 =
											(BgL_classz00_9158 == BgL_oclassz00_9164);
										if (BgL__ortest_1115z00_9167)
											{	/* Cfa/cinfo2.sch 895 */
												BgL_res2850z00_9163 = BgL__ortest_1115z00_9167;
											}
										else
											{	/* Cfa/cinfo2.sch 895 */
												long BgL_odepthz00_9168;

												BgL_odepthz00_9168 =
													BGL_CLASS_DEPTH(BgL_oclassz00_9164);
												if ((4L < BgL_odepthz00_9168))
													{	/* Cfa/cinfo2.sch 895 */
														obj_t BgL_arg1797z00_9169;

														BgL_arg1797z00_9169 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_9164, 4L);
														BgL_res2850z00_9163 =
															(BgL_arg1797z00_9169 == BgL_classz00_9158);
													}
												else
													{	/* Cfa/cinfo2.sch 895 */
														BgL_res2850z00_9163 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2850z00_9163;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 895 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &pre-make-struct-app? */
	obj_t BGl_z62prezd2makezd2structzd2appzf3z43zzcfa_info2z00(obj_t
		BgL_envz00_7791, obj_t BgL_objz00_7792)
	{
		{	/* Cfa/cinfo2.sch 895 */
			return
				BBOOL(BGl_prezd2makezd2structzd2appzf3z21zzcfa_info2z00
				(BgL_objz00_7792));
		}

	}



/* pre-make-struct-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_prezd2makezd2structzd2appzd2nilz00zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 896 */
			{	/* Cfa/cinfo2.sch 896 */
				obj_t BgL_classz00_5802;

				BgL_classz00_5802 = BGl_prezd2makezd2structzd2appzd2zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 896 */
					obj_t BgL__ortest_1117z00_5803;

					BgL__ortest_1117z00_5803 = BGL_CLASS_NIL(BgL_classz00_5802);
					if (CBOOL(BgL__ortest_1117z00_5803))
						{	/* Cfa/cinfo2.sch 896 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_5803);
						}
					else
						{	/* Cfa/cinfo2.sch 896 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_5802));
						}
				}
			}
		}

	}



/* &pre-make-struct-app-nil */
	BgL_appz00_bglt BGl_z62prezd2makezd2structzd2appzd2nilz62zzcfa_info2z00(obj_t
		BgL_envz00_7793)
	{
		{	/* Cfa/cinfo2.sch 896 */
			return BGl_prezd2makezd2structzd2appzd2nilz00zzcfa_info2z00();
		}

	}



/* pre-make-struct-app-owner */
	BGL_EXPORTED_DEF BgL_variablez00_bglt
		BGl_prezd2makezd2structzd2appzd2ownerz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_620)
	{
		{	/* Cfa/cinfo2.sch 897 */
			{
				BgL_prezd2makezd2structzd2appzd2_bglt BgL_auxz00_12756;

				{
					obj_t BgL_auxz00_12757;

					{	/* Cfa/cinfo2.sch 897 */
						BgL_objectz00_bglt BgL_tmpz00_12758;

						BgL_tmpz00_12758 = ((BgL_objectz00_bglt) BgL_oz00_620);
						BgL_auxz00_12757 = BGL_OBJECT_WIDENING(BgL_tmpz00_12758);
					}
					BgL_auxz00_12756 =
						((BgL_prezd2makezd2structzd2appzd2_bglt) BgL_auxz00_12757);
				}
				return
					(((BgL_prezd2makezd2structzd2appzd2_bglt) COBJECT(BgL_auxz00_12756))->
					BgL_ownerz00);
			}
		}

	}



/* &pre-make-struct-app-owner */
	BgL_variablez00_bglt
		BGl_z62prezd2makezd2structzd2appzd2ownerz62zzcfa_info2z00(obj_t
		BgL_envz00_7794, obj_t BgL_oz00_7795)
	{
		{	/* Cfa/cinfo2.sch 897 */
			return
				BGl_prezd2makezd2structzd2appzd2ownerz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7795));
		}

	}



/* pre-make-struct-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2structzd2appzd2stackablez00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_623)
	{
		{	/* Cfa/cinfo2.sch 899 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_623)))->BgL_stackablez00);
		}

	}



/* &pre-make-struct-app-stackable */
	obj_t BGl_z62prezd2makezd2structzd2appzd2stackablez62zzcfa_info2z00(obj_t
		BgL_envz00_7796, obj_t BgL_oz00_7797)
	{
		{	/* Cfa/cinfo2.sch 899 */
			return
				BGl_prezd2makezd2structzd2appzd2stackablez00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7797));
		}

	}



/* pre-make-struct-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2structzd2appzd2stackablezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_624, obj_t BgL_vz00_625)
	{
		{	/* Cfa/cinfo2.sch 900 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_624)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_625), BUNSPEC);
		}

	}



/* &pre-make-struct-app-stackable-set! */
	obj_t
		BGl_z62prezd2makezd2structzd2appzd2stackablezd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7798, obj_t BgL_oz00_7799, obj_t BgL_vz00_7800)
	{
		{	/* Cfa/cinfo2.sch 900 */
			return
				BGl_prezd2makezd2structzd2appzd2stackablezd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7799), BgL_vz00_7800);
		}

	}



/* pre-make-struct-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2structzd2appzd2argsz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_626)
	{
		{	/* Cfa/cinfo2.sch 901 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_626)))->BgL_argsz00);
		}

	}



/* &pre-make-struct-app-args */
	obj_t BGl_z62prezd2makezd2structzd2appzd2argsz62zzcfa_info2z00(obj_t
		BgL_envz00_7801, obj_t BgL_oz00_7802)
	{
		{	/* Cfa/cinfo2.sch 901 */
			return
				BGl_prezd2makezd2structzd2appzd2argsz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7802));
		}

	}



/* pre-make-struct-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2structzd2appzd2argszd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_627, obj_t BgL_vz00_628)
	{
		{	/* Cfa/cinfo2.sch 902 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_627)))->BgL_argsz00) =
				((obj_t) BgL_vz00_628), BUNSPEC);
		}

	}



/* &pre-make-struct-app-args-set! */
	obj_t BGl_z62prezd2makezd2structzd2appzd2argszd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7803, obj_t BgL_oz00_7804, obj_t BgL_vz00_7805)
	{
		{	/* Cfa/cinfo2.sch 902 */
			return
				BGl_prezd2makezd2structzd2appzd2argszd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7804), BgL_vz00_7805);
		}

	}



/* pre-make-struct-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_prezd2makezd2structzd2appzd2funz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_629)
	{
		{	/* Cfa/cinfo2.sch 903 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_629)))->BgL_funz00);
		}

	}



/* &pre-make-struct-app-fun */
	BgL_varz00_bglt BGl_z62prezd2makezd2structzd2appzd2funz62zzcfa_info2z00(obj_t
		BgL_envz00_7806, obj_t BgL_oz00_7807)
	{
		{	/* Cfa/cinfo2.sch 903 */
			return
				BGl_prezd2makezd2structzd2appzd2funz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7807));
		}

	}



/* pre-make-struct-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2structzd2appzd2funzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_630, BgL_varz00_bglt BgL_vz00_631)
	{
		{	/* Cfa/cinfo2.sch 904 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_630)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_631), BUNSPEC);
		}

	}



/* &pre-make-struct-app-fun-set! */
	obj_t BGl_z62prezd2makezd2structzd2appzd2funzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7808, obj_t BgL_oz00_7809, obj_t BgL_vz00_7810)
	{
		{	/* Cfa/cinfo2.sch 904 */
			return
				BGl_prezd2makezd2structzd2appzd2funzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7809), ((BgL_varz00_bglt) BgL_vz00_7810));
		}

	}



/* pre-make-struct-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2structzd2appzd2keyz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_632)
	{
		{	/* Cfa/cinfo2.sch 905 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_632)))->BgL_keyz00);
		}

	}



/* &pre-make-struct-app-key */
	obj_t BGl_z62prezd2makezd2structzd2appzd2keyz62zzcfa_info2z00(obj_t
		BgL_envz00_7811, obj_t BgL_oz00_7812)
	{
		{	/* Cfa/cinfo2.sch 905 */
			return
				BGl_prezd2makezd2structzd2appzd2keyz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7812));
		}

	}



/* pre-make-struct-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2structzd2appzd2keyzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_633, obj_t BgL_vz00_634)
	{
		{	/* Cfa/cinfo2.sch 906 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_633)))->BgL_keyz00) =
				((obj_t) BgL_vz00_634), BUNSPEC);
		}

	}



/* &pre-make-struct-app-key-set! */
	obj_t BGl_z62prezd2makezd2structzd2appzd2keyzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7813, obj_t BgL_oz00_7814, obj_t BgL_vz00_7815)
	{
		{	/* Cfa/cinfo2.sch 906 */
			return
				BGl_prezd2makezd2structzd2appzd2keyzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7814), BgL_vz00_7815);
		}

	}



/* pre-make-struct-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2structzd2appzd2sidezd2effectzd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_635)
	{
		{	/* Cfa/cinfo2.sch 907 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_635)))->BgL_sidezd2effectzd2);
		}

	}



/* &pre-make-struct-app-side-effect */
	obj_t BGl_z62prezd2makezd2structzd2appzd2sidezd2effectzb0zzcfa_info2z00(obj_t
		BgL_envz00_7816, obj_t BgL_oz00_7817)
	{
		{	/* Cfa/cinfo2.sch 907 */
			return
				BGl_prezd2makezd2structzd2appzd2sidezd2effectzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7817));
		}

	}



/* pre-make-struct-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2structzd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_636, obj_t BgL_vz00_637)
	{
		{	/* Cfa/cinfo2.sch 908 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_636)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_637), BUNSPEC);
		}

	}



/* &pre-make-struct-app-side-effect-set! */
	obj_t
		BGl_z62prezd2makezd2structzd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00
		(obj_t BgL_envz00_7818, obj_t BgL_oz00_7819, obj_t BgL_vz00_7820)
	{
		{	/* Cfa/cinfo2.sch 908 */
			return
				BGl_prezd2makezd2structzd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7819), BgL_vz00_7820);
		}

	}



/* pre-make-struct-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_prezd2makezd2structzd2appzd2typez00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_638)
	{
		{	/* Cfa/cinfo2.sch 909 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_638)))->BgL_typez00);
		}

	}



/* &pre-make-struct-app-type */
	BgL_typez00_bglt
		BGl_z62prezd2makezd2structzd2appzd2typez62zzcfa_info2z00(obj_t
		BgL_envz00_7821, obj_t BgL_oz00_7822)
	{
		{	/* Cfa/cinfo2.sch 909 */
			return
				BGl_prezd2makezd2structzd2appzd2typez00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7822));
		}

	}



/* pre-make-struct-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2structzd2appzd2typezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_639, BgL_typez00_bglt BgL_vz00_640)
	{
		{	/* Cfa/cinfo2.sch 910 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_639)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_640), BUNSPEC);
		}

	}



/* &pre-make-struct-app-type-set! */
	obj_t BGl_z62prezd2makezd2structzd2appzd2typezd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7823, obj_t BgL_oz00_7824, obj_t BgL_vz00_7825)
	{
		{	/* Cfa/cinfo2.sch 910 */
			return
				BGl_prezd2makezd2structzd2appzd2typezd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7824), ((BgL_typez00_bglt) BgL_vz00_7825));
		}

	}



/* pre-make-struct-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2makezd2structzd2appzd2locz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_641)
	{
		{	/* Cfa/cinfo2.sch 911 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_641)))->BgL_locz00);
		}

	}



/* &pre-make-struct-app-loc */
	obj_t BGl_z62prezd2makezd2structzd2appzd2locz62zzcfa_info2z00(obj_t
		BgL_envz00_7826, obj_t BgL_oz00_7827)
	{
		{	/* Cfa/cinfo2.sch 911 */
			return
				BGl_prezd2makezd2structzd2appzd2locz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7827));
		}

	}



/* make-pre-struct-ref-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2prezd2structzd2refzd2appz00zzcfa_info2z00(obj_t
		BgL_loc1512z00_644, BgL_typez00_bglt BgL_type1513z00_645,
		obj_t BgL_sidezd2effect1514zd2_646, obj_t BgL_key1515z00_647,
		BgL_varz00_bglt BgL_fun1517z00_648, obj_t BgL_args1518z00_649,
		obj_t BgL_stackable1519z00_650)
	{
		{	/* Cfa/cinfo2.sch 915 */
			{	/* Cfa/cinfo2.sch 915 */
				BgL_appz00_bglt BgL_new1537z00_9170;

				{	/* Cfa/cinfo2.sch 915 */
					BgL_appz00_bglt BgL_tmp1535z00_9171;
					BgL_prezd2structzd2refzd2appzd2_bglt BgL_wide1536z00_9172;

					{
						BgL_appz00_bglt BgL_auxz00_12819;

						{	/* Cfa/cinfo2.sch 915 */
							BgL_appz00_bglt BgL_new1534z00_9173;

							BgL_new1534z00_9173 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 915 */
								long BgL_arg1974z00_9174;

								BgL_arg1974z00_9174 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1534z00_9173),
									BgL_arg1974z00_9174);
							}
							{	/* Cfa/cinfo2.sch 915 */
								BgL_objectz00_bglt BgL_tmpz00_12824;

								BgL_tmpz00_12824 = ((BgL_objectz00_bglt) BgL_new1534z00_9173);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_12824, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1534z00_9173);
							BgL_auxz00_12819 = BgL_new1534z00_9173;
						}
						BgL_tmp1535z00_9171 = ((BgL_appz00_bglt) BgL_auxz00_12819);
					}
					BgL_wide1536z00_9172 =
						((BgL_prezd2structzd2refzd2appzd2_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2structzd2refzd2appzd2_bgl))));
					{	/* Cfa/cinfo2.sch 915 */
						obj_t BgL_auxz00_12832;
						BgL_objectz00_bglt BgL_tmpz00_12830;

						BgL_auxz00_12832 = ((obj_t) BgL_wide1536z00_9172);
						BgL_tmpz00_12830 = ((BgL_objectz00_bglt) BgL_tmp1535z00_9171);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_12830, BgL_auxz00_12832);
					}
					((BgL_objectz00_bglt) BgL_tmp1535z00_9171);
					{	/* Cfa/cinfo2.sch 915 */
						long BgL_arg1973z00_9175;

						BgL_arg1973z00_9175 =
							BGL_CLASS_NUM(BGl_prezd2structzd2refzd2appzd2zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1535z00_9171), BgL_arg1973z00_9175);
					}
					BgL_new1537z00_9170 = ((BgL_appz00_bglt) BgL_tmp1535z00_9171);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1537z00_9170)))->BgL_locz00) =
					((obj_t) BgL_loc1512z00_644), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1537z00_9170)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1513z00_645), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1537z00_9170)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1514zd2_646), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1537z00_9170)))->BgL_keyz00) =
					((obj_t) BgL_key1515z00_647), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1537z00_9170)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1517z00_648), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1537z00_9170)))->
						BgL_argsz00) = ((obj_t) BgL_args1518z00_649), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1537z00_9170)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1519z00_650), BUNSPEC);
				return BgL_new1537z00_9170;
			}
		}

	}



/* &make-pre-struct-ref-app */
	BgL_appz00_bglt BGl_z62makezd2prezd2structzd2refzd2appz62zzcfa_info2z00(obj_t
		BgL_envz00_7828, obj_t BgL_loc1512z00_7829, obj_t BgL_type1513z00_7830,
		obj_t BgL_sidezd2effect1514zd2_7831, obj_t BgL_key1515z00_7832,
		obj_t BgL_fun1517z00_7833, obj_t BgL_args1518z00_7834,
		obj_t BgL_stackable1519z00_7835)
	{
		{	/* Cfa/cinfo2.sch 915 */
			return
				BGl_makezd2prezd2structzd2refzd2appz00zzcfa_info2z00
				(BgL_loc1512z00_7829, ((BgL_typez00_bglt) BgL_type1513z00_7830),
				BgL_sidezd2effect1514zd2_7831, BgL_key1515z00_7832,
				((BgL_varz00_bglt) BgL_fun1517z00_7833), BgL_args1518z00_7834,
				BgL_stackable1519z00_7835);
		}

	}



/* pre-struct-ref-app? */
	BGL_EXPORTED_DEF bool_t BGl_prezd2structzd2refzd2appzf3z21zzcfa_info2z00(obj_t
		BgL_objz00_651)
	{
		{	/* Cfa/cinfo2.sch 916 */
			{	/* Cfa/cinfo2.sch 916 */
				obj_t BgL_classz00_9176;

				BgL_classz00_9176 = BGl_prezd2structzd2refzd2appzd2zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_651))
					{	/* Cfa/cinfo2.sch 916 */
						BgL_objectz00_bglt BgL_arg1801z00_9177;

						BgL_arg1801z00_9177 = (BgL_objectz00_bglt) (BgL_objz00_651);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 916 */
								long BgL_idxz00_9178;

								BgL_idxz00_9178 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_9177);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_9178 + 4L)) == BgL_classz00_9176);
							}
						else
							{	/* Cfa/cinfo2.sch 916 */
								bool_t BgL_res2851z00_9181;

								{	/* Cfa/cinfo2.sch 916 */
									obj_t BgL_oclassz00_9182;

									{	/* Cfa/cinfo2.sch 916 */
										long BgL_arg1808z00_9183;

										{	/* Cfa/cinfo2.sch 916 */
											long BgL_arg1809z00_9184;

											BgL_arg1809z00_9184 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_9177);
											BgL_arg1808z00_9183 = (BgL_arg1809z00_9184 - OBJECT_TYPE);
										}
										BgL_oclassz00_9182 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_9183);
									}
									{	/* Cfa/cinfo2.sch 916 */
										bool_t BgL__ortest_1115z00_9185;

										BgL__ortest_1115z00_9185 =
											(BgL_classz00_9176 == BgL_oclassz00_9182);
										if (BgL__ortest_1115z00_9185)
											{	/* Cfa/cinfo2.sch 916 */
												BgL_res2851z00_9181 = BgL__ortest_1115z00_9185;
											}
										else
											{	/* Cfa/cinfo2.sch 916 */
												long BgL_odepthz00_9186;

												BgL_odepthz00_9186 =
													BGL_CLASS_DEPTH(BgL_oclassz00_9182);
												if ((4L < BgL_odepthz00_9186))
													{	/* Cfa/cinfo2.sch 916 */
														obj_t BgL_arg1797z00_9187;

														BgL_arg1797z00_9187 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_9182, 4L);
														BgL_res2851z00_9181 =
															(BgL_arg1797z00_9187 == BgL_classz00_9176);
													}
												else
													{	/* Cfa/cinfo2.sch 916 */
														BgL_res2851z00_9181 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2851z00_9181;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 916 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &pre-struct-ref-app? */
	obj_t BGl_z62prezd2structzd2refzd2appzf3z43zzcfa_info2z00(obj_t
		BgL_envz00_7836, obj_t BgL_objz00_7837)
	{
		{	/* Cfa/cinfo2.sch 916 */
			return
				BBOOL(BGl_prezd2structzd2refzd2appzf3z21zzcfa_info2z00
				(BgL_objz00_7837));
		}

	}



/* pre-struct-ref-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_prezd2structzd2refzd2appzd2nilz00zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 917 */
			{	/* Cfa/cinfo2.sch 917 */
				obj_t BgL_classz00_5850;

				BgL_classz00_5850 = BGl_prezd2structzd2refzd2appzd2zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 917 */
					obj_t BgL__ortest_1117z00_5851;

					BgL__ortest_1117z00_5851 = BGL_CLASS_NIL(BgL_classz00_5850);
					if (CBOOL(BgL__ortest_1117z00_5851))
						{	/* Cfa/cinfo2.sch 917 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_5851);
						}
					else
						{	/* Cfa/cinfo2.sch 917 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_5850));
						}
				}
			}
		}

	}



/* &pre-struct-ref-app-nil */
	BgL_appz00_bglt BGl_z62prezd2structzd2refzd2appzd2nilz62zzcfa_info2z00(obj_t
		BgL_envz00_7838)
	{
		{	/* Cfa/cinfo2.sch 917 */
			return BGl_prezd2structzd2refzd2appzd2nilz00zzcfa_info2z00();
		}

	}



/* pre-struct-ref-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2refzd2appzd2stackablez00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_652)
	{
		{	/* Cfa/cinfo2.sch 918 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_652)))->BgL_stackablez00);
		}

	}



/* &pre-struct-ref-app-stackable */
	obj_t BGl_z62prezd2structzd2refzd2appzd2stackablez62zzcfa_info2z00(obj_t
		BgL_envz00_7839, obj_t BgL_oz00_7840)
	{
		{	/* Cfa/cinfo2.sch 918 */
			return
				BGl_prezd2structzd2refzd2appzd2stackablez00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7840));
		}

	}



/* pre-struct-ref-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2refzd2appzd2stackablezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_653, obj_t BgL_vz00_654)
	{
		{	/* Cfa/cinfo2.sch 919 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_653)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_654), BUNSPEC);
		}

	}



/* &pre-struct-ref-app-stackable-set! */
	obj_t
		BGl_z62prezd2structzd2refzd2appzd2stackablezd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7841, obj_t BgL_oz00_7842, obj_t BgL_vz00_7843)
	{
		{	/* Cfa/cinfo2.sch 919 */
			return
				BGl_prezd2structzd2refzd2appzd2stackablezd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7842), BgL_vz00_7843);
		}

	}



/* pre-struct-ref-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2refzd2appzd2argsz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_655)
	{
		{	/* Cfa/cinfo2.sch 920 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_655)))->BgL_argsz00);
		}

	}



/* &pre-struct-ref-app-args */
	obj_t BGl_z62prezd2structzd2refzd2appzd2argsz62zzcfa_info2z00(obj_t
		BgL_envz00_7844, obj_t BgL_oz00_7845)
	{
		{	/* Cfa/cinfo2.sch 920 */
			return
				BGl_prezd2structzd2refzd2appzd2argsz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7845));
		}

	}



/* pre-struct-ref-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2refzd2appzd2argszd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_656, obj_t BgL_vz00_657)
	{
		{	/* Cfa/cinfo2.sch 921 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_656)))->BgL_argsz00) =
				((obj_t) BgL_vz00_657), BUNSPEC);
		}

	}



/* &pre-struct-ref-app-args-set! */
	obj_t BGl_z62prezd2structzd2refzd2appzd2argszd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7846, obj_t BgL_oz00_7847, obj_t BgL_vz00_7848)
	{
		{	/* Cfa/cinfo2.sch 921 */
			return
				BGl_prezd2structzd2refzd2appzd2argszd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7847), BgL_vz00_7848);
		}

	}



/* pre-struct-ref-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_prezd2structzd2refzd2appzd2funz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_658)
	{
		{	/* Cfa/cinfo2.sch 922 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_658)))->BgL_funz00);
		}

	}



/* &pre-struct-ref-app-fun */
	BgL_varz00_bglt BGl_z62prezd2structzd2refzd2appzd2funz62zzcfa_info2z00(obj_t
		BgL_envz00_7849, obj_t BgL_oz00_7850)
	{
		{	/* Cfa/cinfo2.sch 922 */
			return
				BGl_prezd2structzd2refzd2appzd2funz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7850));
		}

	}



/* pre-struct-ref-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2refzd2appzd2funzd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_659, BgL_varz00_bglt BgL_vz00_660)
	{
		{	/* Cfa/cinfo2.sch 923 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_659)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_660), BUNSPEC);
		}

	}



/* &pre-struct-ref-app-fun-set! */
	obj_t BGl_z62prezd2structzd2refzd2appzd2funzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7851, obj_t BgL_oz00_7852, obj_t BgL_vz00_7853)
	{
		{	/* Cfa/cinfo2.sch 923 */
			return
				BGl_prezd2structzd2refzd2appzd2funzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7852), ((BgL_varz00_bglt) BgL_vz00_7853));
		}

	}



/* pre-struct-ref-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2refzd2appzd2keyz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_661)
	{
		{	/* Cfa/cinfo2.sch 924 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_661)))->BgL_keyz00);
		}

	}



/* &pre-struct-ref-app-key */
	obj_t BGl_z62prezd2structzd2refzd2appzd2keyz62zzcfa_info2z00(obj_t
		BgL_envz00_7854, obj_t BgL_oz00_7855)
	{
		{	/* Cfa/cinfo2.sch 924 */
			return
				BGl_prezd2structzd2refzd2appzd2keyz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7855));
		}

	}



/* pre-struct-ref-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2refzd2appzd2keyzd2setz12zc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_662, obj_t BgL_vz00_663)
	{
		{	/* Cfa/cinfo2.sch 925 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_662)))->BgL_keyz00) =
				((obj_t) BgL_vz00_663), BUNSPEC);
		}

	}



/* &pre-struct-ref-app-key-set! */
	obj_t BGl_z62prezd2structzd2refzd2appzd2keyzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7856, obj_t BgL_oz00_7857, obj_t BgL_vz00_7858)
	{
		{	/* Cfa/cinfo2.sch 925 */
			return
				BGl_prezd2structzd2refzd2appzd2keyzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7857), BgL_vz00_7858);
		}

	}



/* pre-struct-ref-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2refzd2appzd2sidezd2effectzd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_664)
	{
		{	/* Cfa/cinfo2.sch 926 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_664)))->BgL_sidezd2effectzd2);
		}

	}



/* &pre-struct-ref-app-side-effect */
	obj_t BGl_z62prezd2structzd2refzd2appzd2sidezd2effectzb0zzcfa_info2z00(obj_t
		BgL_envz00_7859, obj_t BgL_oz00_7860)
	{
		{	/* Cfa/cinfo2.sch 926 */
			return
				BGl_prezd2structzd2refzd2appzd2sidezd2effectzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7860));
		}

	}



/* pre-struct-ref-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2refzd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_665, obj_t BgL_vz00_666)
	{
		{	/* Cfa/cinfo2.sch 927 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_665)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_666), BUNSPEC);
		}

	}



/* &pre-struct-ref-app-side-effect-set! */
	obj_t
		BGl_z62prezd2structzd2refzd2appzd2sidezd2effectzd2setz12z70zzcfa_info2z00
		(obj_t BgL_envz00_7861, obj_t BgL_oz00_7862, obj_t BgL_vz00_7863)
	{
		{	/* Cfa/cinfo2.sch 927 */
			return
				BGl_prezd2structzd2refzd2appzd2sidezd2effectzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7862), BgL_vz00_7863);
		}

	}



/* pre-struct-ref-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_prezd2structzd2refzd2appzd2typez00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_667)
	{
		{	/* Cfa/cinfo2.sch 928 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_667)))->BgL_typez00);
		}

	}



/* &pre-struct-ref-app-type */
	BgL_typez00_bglt BGl_z62prezd2structzd2refzd2appzd2typez62zzcfa_info2z00(obj_t
		BgL_envz00_7864, obj_t BgL_oz00_7865)
	{
		{	/* Cfa/cinfo2.sch 928 */
			return
				BGl_prezd2structzd2refzd2appzd2typez00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7865));
		}

	}



/* pre-struct-ref-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2refzd2appzd2typezd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_668, BgL_typez00_bglt BgL_vz00_669)
	{
		{	/* Cfa/cinfo2.sch 929 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_668)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_669), BUNSPEC);
		}

	}



/* &pre-struct-ref-app-type-set! */
	obj_t BGl_z62prezd2structzd2refzd2appzd2typezd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7866, obj_t BgL_oz00_7867, obj_t BgL_vz00_7868)
	{
		{	/* Cfa/cinfo2.sch 929 */
			return
				BGl_prezd2structzd2refzd2appzd2typezd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7867), ((BgL_typez00_bglt) BgL_vz00_7868));
		}

	}



/* pre-struct-ref-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2refzd2appzd2locz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_670)
	{
		{	/* Cfa/cinfo2.sch 930 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_670)))->BgL_locz00);
		}

	}



/* &pre-struct-ref-app-loc */
	obj_t BGl_z62prezd2structzd2refzd2appzd2locz62zzcfa_info2z00(obj_t
		BgL_envz00_7869, obj_t BgL_oz00_7870)
	{
		{	/* Cfa/cinfo2.sch 930 */
			return
				BGl_prezd2structzd2refzd2appzd2locz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7870));
		}

	}



/* make-pre-struct-set!-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2prezd2structzd2setz12zd2appz12zzcfa_info2z00(obj_t
		BgL_loc1504z00_673, BgL_typez00_bglt BgL_type1505z00_674,
		obj_t BgL_sidezd2effect1506zd2_675, obj_t BgL_key1507z00_676,
		BgL_varz00_bglt BgL_fun1508z00_677, obj_t BgL_args1509z00_678,
		obj_t BgL_stackable1510z00_679)
	{
		{	/* Cfa/cinfo2.sch 934 */
			{	/* Cfa/cinfo2.sch 934 */
				BgL_appz00_bglt BgL_new1541z00_9188;

				{	/* Cfa/cinfo2.sch 934 */
					BgL_appz00_bglt BgL_tmp1539z00_9189;
					BgL_prezd2structzd2setz12zd2appzc0_bglt BgL_wide1540z00_9190;

					{
						BgL_appz00_bglt BgL_auxz00_12939;

						{	/* Cfa/cinfo2.sch 934 */
							BgL_appz00_bglt BgL_new1538z00_9191;

							BgL_new1538z00_9191 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 934 */
								long BgL_arg1976z00_9192;

								BgL_arg1976z00_9192 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1538z00_9191),
									BgL_arg1976z00_9192);
							}
							{	/* Cfa/cinfo2.sch 934 */
								BgL_objectz00_bglt BgL_tmpz00_12944;

								BgL_tmpz00_12944 = ((BgL_objectz00_bglt) BgL_new1538z00_9191);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_12944, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1538z00_9191);
							BgL_auxz00_12939 = BgL_new1538z00_9191;
						}
						BgL_tmp1539z00_9189 = ((BgL_appz00_bglt) BgL_auxz00_12939);
					}
					BgL_wide1540z00_9190 =
						((BgL_prezd2structzd2setz12zd2appzc0_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2structzd2setz12zd2appzc0_bgl))));
					{	/* Cfa/cinfo2.sch 934 */
						obj_t BgL_auxz00_12952;
						BgL_objectz00_bglt BgL_tmpz00_12950;

						BgL_auxz00_12952 = ((obj_t) BgL_wide1540z00_9190);
						BgL_tmpz00_12950 = ((BgL_objectz00_bglt) BgL_tmp1539z00_9189);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_12950, BgL_auxz00_12952);
					}
					((BgL_objectz00_bglt) BgL_tmp1539z00_9189);
					{	/* Cfa/cinfo2.sch 934 */
						long BgL_arg1975z00_9193;

						BgL_arg1975z00_9193 =
							BGL_CLASS_NUM(BGl_prezd2structzd2setz12zd2appzc0zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1539z00_9189), BgL_arg1975z00_9193);
					}
					BgL_new1541z00_9188 = ((BgL_appz00_bglt) BgL_tmp1539z00_9189);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1541z00_9188)))->BgL_locz00) =
					((obj_t) BgL_loc1504z00_673), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1541z00_9188)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1505z00_674), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1541z00_9188)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1506zd2_675), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1541z00_9188)))->BgL_keyz00) =
					((obj_t) BgL_key1507z00_676), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1541z00_9188)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1508z00_677), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1541z00_9188)))->
						BgL_argsz00) = ((obj_t) BgL_args1509z00_678), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1541z00_9188)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1510z00_679), BUNSPEC);
				return BgL_new1541z00_9188;
			}
		}

	}



/* &make-pre-struct-set!-app */
	BgL_appz00_bglt
		BGl_z62makezd2prezd2structzd2setz12zd2appz70zzcfa_info2z00(obj_t
		BgL_envz00_7871, obj_t BgL_loc1504z00_7872, obj_t BgL_type1505z00_7873,
		obj_t BgL_sidezd2effect1506zd2_7874, obj_t BgL_key1507z00_7875,
		obj_t BgL_fun1508z00_7876, obj_t BgL_args1509z00_7877,
		obj_t BgL_stackable1510z00_7878)
	{
		{	/* Cfa/cinfo2.sch 934 */
			return
				BGl_makezd2prezd2structzd2setz12zd2appz12zzcfa_info2z00
				(BgL_loc1504z00_7872, ((BgL_typez00_bglt) BgL_type1505z00_7873),
				BgL_sidezd2effect1506zd2_7874, BgL_key1507z00_7875,
				((BgL_varz00_bglt) BgL_fun1508z00_7876), BgL_args1509z00_7877,
				BgL_stackable1510z00_7878);
		}

	}



/* pre-struct-set!-app? */
	BGL_EXPORTED_DEF bool_t
		BGl_prezd2structzd2setz12zd2appzf3z33zzcfa_info2z00(obj_t BgL_objz00_680)
	{
		{	/* Cfa/cinfo2.sch 935 */
			{	/* Cfa/cinfo2.sch 935 */
				obj_t BgL_classz00_9194;

				BgL_classz00_9194 = BGl_prezd2structzd2setz12zd2appzc0zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_680))
					{	/* Cfa/cinfo2.sch 935 */
						BgL_objectz00_bglt BgL_arg1801z00_9195;

						BgL_arg1801z00_9195 = (BgL_objectz00_bglt) (BgL_objz00_680);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 935 */
								long BgL_idxz00_9196;

								BgL_idxz00_9196 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_9195);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_9196 + 4L)) == BgL_classz00_9194);
							}
						else
							{	/* Cfa/cinfo2.sch 935 */
								bool_t BgL_res2852z00_9199;

								{	/* Cfa/cinfo2.sch 935 */
									obj_t BgL_oclassz00_9200;

									{	/* Cfa/cinfo2.sch 935 */
										long BgL_arg1808z00_9201;

										{	/* Cfa/cinfo2.sch 935 */
											long BgL_arg1809z00_9202;

											BgL_arg1809z00_9202 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_9195);
											BgL_arg1808z00_9201 = (BgL_arg1809z00_9202 - OBJECT_TYPE);
										}
										BgL_oclassz00_9200 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_9201);
									}
									{	/* Cfa/cinfo2.sch 935 */
										bool_t BgL__ortest_1115z00_9203;

										BgL__ortest_1115z00_9203 =
											(BgL_classz00_9194 == BgL_oclassz00_9200);
										if (BgL__ortest_1115z00_9203)
											{	/* Cfa/cinfo2.sch 935 */
												BgL_res2852z00_9199 = BgL__ortest_1115z00_9203;
											}
										else
											{	/* Cfa/cinfo2.sch 935 */
												long BgL_odepthz00_9204;

												BgL_odepthz00_9204 =
													BGL_CLASS_DEPTH(BgL_oclassz00_9200);
												if ((4L < BgL_odepthz00_9204))
													{	/* Cfa/cinfo2.sch 935 */
														obj_t BgL_arg1797z00_9205;

														BgL_arg1797z00_9205 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_9200, 4L);
														BgL_res2852z00_9199 =
															(BgL_arg1797z00_9205 == BgL_classz00_9194);
													}
												else
													{	/* Cfa/cinfo2.sch 935 */
														BgL_res2852z00_9199 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2852z00_9199;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 935 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &pre-struct-set!-app? */
	obj_t BGl_z62prezd2structzd2setz12zd2appzf3z51zzcfa_info2z00(obj_t
		BgL_envz00_7879, obj_t BgL_objz00_7880)
	{
		{	/* Cfa/cinfo2.sch 935 */
			return
				BBOOL(BGl_prezd2structzd2setz12zd2appzf3z33zzcfa_info2z00
				(BgL_objz00_7880));
		}

	}



/* pre-struct-set!-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_prezd2structzd2setz12zd2appzd2nilz12zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 936 */
			{	/* Cfa/cinfo2.sch 936 */
				obj_t BgL_classz00_5897;

				BgL_classz00_5897 = BGl_prezd2structzd2setz12zd2appzc0zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 936 */
					obj_t BgL__ortest_1117z00_5898;

					BgL__ortest_1117z00_5898 = BGL_CLASS_NIL(BgL_classz00_5897);
					if (CBOOL(BgL__ortest_1117z00_5898))
						{	/* Cfa/cinfo2.sch 936 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_5898);
						}
					else
						{	/* Cfa/cinfo2.sch 936 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_5897));
						}
				}
			}
		}

	}



/* &pre-struct-set!-app-nil */
	BgL_appz00_bglt
		BGl_z62prezd2structzd2setz12zd2appzd2nilz70zzcfa_info2z00(obj_t
		BgL_envz00_7881)
	{
		{	/* Cfa/cinfo2.sch 936 */
			return BGl_prezd2structzd2setz12zd2appzd2nilz12zzcfa_info2z00();
		}

	}



/* pre-struct-set!-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2setz12zd2appzd2stackablez12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_681)
	{
		{	/* Cfa/cinfo2.sch 937 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_681)))->BgL_stackablez00);
		}

	}



/* &pre-struct-set!-app-stackable */
	obj_t BGl_z62prezd2structzd2setz12zd2appzd2stackablez70zzcfa_info2z00(obj_t
		BgL_envz00_7882, obj_t BgL_oz00_7883)
	{
		{	/* Cfa/cinfo2.sch 937 */
			return
				BGl_prezd2structzd2setz12zd2appzd2stackablez12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7883));
		}

	}



/* pre-struct-set!-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2setz12zd2appzd2stackablezd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_682, obj_t BgL_vz00_683)
	{
		{	/* Cfa/cinfo2.sch 938 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_682)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_683), BUNSPEC);
		}

	}



/* &pre-struct-set!-app-stackable-set! */
	obj_t
		BGl_z62prezd2structzd2setz12zd2appzd2stackablezd2setz12zb0zzcfa_info2z00
		(obj_t BgL_envz00_7884, obj_t BgL_oz00_7885, obj_t BgL_vz00_7886)
	{
		{	/* Cfa/cinfo2.sch 938 */
			return
				BGl_prezd2structzd2setz12zd2appzd2stackablezd2setz12zd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7885), BgL_vz00_7886);
		}

	}



/* pre-struct-set!-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2setz12zd2appzd2argsz12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_684)
	{
		{	/* Cfa/cinfo2.sch 939 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_684)))->BgL_argsz00);
		}

	}



/* &pre-struct-set!-app-args */
	obj_t BGl_z62prezd2structzd2setz12zd2appzd2argsz70zzcfa_info2z00(obj_t
		BgL_envz00_7887, obj_t BgL_oz00_7888)
	{
		{	/* Cfa/cinfo2.sch 939 */
			return
				BGl_prezd2structzd2setz12zd2appzd2argsz12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7888));
		}

	}



/* pre-struct-set!-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2setz12zd2appzd2argszd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_685, obj_t BgL_vz00_686)
	{
		{	/* Cfa/cinfo2.sch 940 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_685)))->BgL_argsz00) =
				((obj_t) BgL_vz00_686), BUNSPEC);
		}

	}



/* &pre-struct-set!-app-args-set! */
	obj_t
		BGl_z62prezd2structzd2setz12zd2appzd2argszd2setz12zb0zzcfa_info2z00(obj_t
		BgL_envz00_7889, obj_t BgL_oz00_7890, obj_t BgL_vz00_7891)
	{
		{	/* Cfa/cinfo2.sch 940 */
			return
				BGl_prezd2structzd2setz12zd2appzd2argszd2setz12zd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7890), BgL_vz00_7891);
		}

	}



/* pre-struct-set!-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_prezd2structzd2setz12zd2appzd2funz12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_687)
	{
		{	/* Cfa/cinfo2.sch 941 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_687)))->BgL_funz00);
		}

	}



/* &pre-struct-set!-app-fun */
	BgL_varz00_bglt
		BGl_z62prezd2structzd2setz12zd2appzd2funz70zzcfa_info2z00(obj_t
		BgL_envz00_7892, obj_t BgL_oz00_7893)
	{
		{	/* Cfa/cinfo2.sch 941 */
			return
				BGl_prezd2structzd2setz12zd2appzd2funz12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7893));
		}

	}



/* pre-struct-set!-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2setz12zd2appzd2funzd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_688, BgL_varz00_bglt BgL_vz00_689)
	{
		{	/* Cfa/cinfo2.sch 942 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_688)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_689), BUNSPEC);
		}

	}



/* &pre-struct-set!-app-fun-set! */
	obj_t BGl_z62prezd2structzd2setz12zd2appzd2funzd2setz12zb0zzcfa_info2z00(obj_t
		BgL_envz00_7894, obj_t BgL_oz00_7895, obj_t BgL_vz00_7896)
	{
		{	/* Cfa/cinfo2.sch 942 */
			return
				BGl_prezd2structzd2setz12zd2appzd2funzd2setz12zd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7895), ((BgL_varz00_bglt) BgL_vz00_7896));
		}

	}



/* pre-struct-set!-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2setz12zd2appzd2keyz12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_690)
	{
		{	/* Cfa/cinfo2.sch 943 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_690)))->BgL_keyz00);
		}

	}



/* &pre-struct-set!-app-key */
	obj_t BGl_z62prezd2structzd2setz12zd2appzd2keyz70zzcfa_info2z00(obj_t
		BgL_envz00_7897, obj_t BgL_oz00_7898)
	{
		{	/* Cfa/cinfo2.sch 943 */
			return
				BGl_prezd2structzd2setz12zd2appzd2keyz12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7898));
		}

	}



/* pre-struct-set!-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2setz12zd2appzd2keyzd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_691, obj_t BgL_vz00_692)
	{
		{	/* Cfa/cinfo2.sch 944 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_691)))->BgL_keyz00) =
				((obj_t) BgL_vz00_692), BUNSPEC);
		}

	}



/* &pre-struct-set!-app-key-set! */
	obj_t BGl_z62prezd2structzd2setz12zd2appzd2keyzd2setz12zb0zzcfa_info2z00(obj_t
		BgL_envz00_7899, obj_t BgL_oz00_7900, obj_t BgL_vz00_7901)
	{
		{	/* Cfa/cinfo2.sch 944 */
			return
				BGl_prezd2structzd2setz12zd2appzd2keyzd2setz12zd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7900), BgL_vz00_7901);
		}

	}



/* pre-struct-set!-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2setz12zd2appzd2sidezd2effectzc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_693)
	{
		{	/* Cfa/cinfo2.sch 945 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_693)))->BgL_sidezd2effectzd2);
		}

	}



/* &pre-struct-set!-app-side-effect */
	obj_t
		BGl_z62prezd2structzd2setz12zd2appzd2sidezd2effectza2zzcfa_info2z00(obj_t
		BgL_envz00_7902, obj_t BgL_oz00_7903)
	{
		{	/* Cfa/cinfo2.sch 945 */
			return
				BGl_prezd2structzd2setz12zd2appzd2sidezd2effectzc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7903));
		}

	}



/* pre-struct-set!-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2setz12zd2appzd2sidezd2effectzd2setz12z00zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_694, obj_t BgL_vz00_695)
	{
		{	/* Cfa/cinfo2.sch 946 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_694)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_695), BUNSPEC);
		}

	}



/* &pre-struct-set!-app-side-effect-set! */
	obj_t
		BGl_z62prezd2structzd2setz12zd2appzd2sidezd2effectzd2setz12z62zzcfa_info2z00
		(obj_t BgL_envz00_7904, obj_t BgL_oz00_7905, obj_t BgL_vz00_7906)
	{
		{	/* Cfa/cinfo2.sch 946 */
			return
				BGl_prezd2structzd2setz12zd2appzd2sidezd2effectzd2setz12z00zzcfa_info2z00
				(((BgL_appz00_bglt) BgL_oz00_7905), BgL_vz00_7906);
		}

	}



/* pre-struct-set!-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_prezd2structzd2setz12zd2appzd2typez12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_696)
	{
		{	/* Cfa/cinfo2.sch 947 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_696)))->BgL_typez00);
		}

	}



/* &pre-struct-set!-app-type */
	BgL_typez00_bglt
		BGl_z62prezd2structzd2setz12zd2appzd2typez70zzcfa_info2z00(obj_t
		BgL_envz00_7907, obj_t BgL_oz00_7908)
	{
		{	/* Cfa/cinfo2.sch 947 */
			return
				BGl_prezd2structzd2setz12zd2appzd2typez12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7908));
		}

	}



/* pre-struct-set!-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2setz12zd2appzd2typezd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_697, BgL_typez00_bglt BgL_vz00_698)
	{
		{	/* Cfa/cinfo2.sch 948 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_697)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_698), BUNSPEC);
		}

	}



/* &pre-struct-set!-app-type-set! */
	obj_t
		BGl_z62prezd2structzd2setz12zd2appzd2typezd2setz12zb0zzcfa_info2z00(obj_t
		BgL_envz00_7909, obj_t BgL_oz00_7910, obj_t BgL_vz00_7911)
	{
		{	/* Cfa/cinfo2.sch 948 */
			return
				BGl_prezd2structzd2setz12zd2appzd2typezd2setz12zd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7910), ((BgL_typez00_bglt) BgL_vz00_7911));
		}

	}



/* pre-struct-set!-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_prezd2structzd2setz12zd2appzd2locz12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_699)
	{
		{	/* Cfa/cinfo2.sch 949 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_699)))->BgL_locz00);
		}

	}



/* &pre-struct-set!-app-loc */
	obj_t BGl_z62prezd2structzd2setz12zd2appzd2locz70zzcfa_info2z00(obj_t
		BgL_envz00_7912, obj_t BgL_oz00_7913)
	{
		{	/* Cfa/cinfo2.sch 949 */
			return
				BGl_prezd2structzd2setz12zd2appzd2locz12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7913));
		}

	}



/* make-make-struct-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2makezd2structzd2appzd2zzcfa_info2z00(obj_t BgL_loc1490z00_702,
		BgL_typez00_bglt BgL_type1491z00_703, obj_t BgL_sidezd2effect1492zd2_704,
		obj_t BgL_key1493z00_705, BgL_varz00_bglt BgL_fun1494z00_706,
		obj_t BgL_args1495z00_707, obj_t BgL_stackable1496z00_708,
		BgL_approxz00_bglt BgL_approx1498z00_709,
		BgL_approxz00_bglt BgL_valuezd2approx1499zd2_710,
		long BgL_lostzd2stamp1500zd2_711, BgL_variablez00_bglt BgL_owner1501z00_712,
		obj_t BgL_stackzd2stamp1502zd2_713)
	{
		{	/* Cfa/cinfo2.sch 953 */
			{	/* Cfa/cinfo2.sch 953 */
				BgL_appz00_bglt BgL_new1545z00_9206;

				{	/* Cfa/cinfo2.sch 953 */
					BgL_appz00_bglt BgL_tmp1543z00_9207;
					BgL_makezd2structzd2appz00_bglt BgL_wide1544z00_9208;

					{
						BgL_appz00_bglt BgL_auxz00_13059;

						{	/* Cfa/cinfo2.sch 953 */
							BgL_appz00_bglt BgL_new1542z00_9209;

							BgL_new1542z00_9209 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 953 */
								long BgL_arg1978z00_9210;

								BgL_arg1978z00_9210 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1542z00_9209),
									BgL_arg1978z00_9210);
							}
							{	/* Cfa/cinfo2.sch 953 */
								BgL_objectz00_bglt BgL_tmpz00_13064;

								BgL_tmpz00_13064 = ((BgL_objectz00_bglt) BgL_new1542z00_9209);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_13064, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1542z00_9209);
							BgL_auxz00_13059 = BgL_new1542z00_9209;
						}
						BgL_tmp1543z00_9207 = ((BgL_appz00_bglt) BgL_auxz00_13059);
					}
					BgL_wide1544z00_9208 =
						((BgL_makezd2structzd2appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
									BgL_makezd2structzd2appz00_bgl))));
					{	/* Cfa/cinfo2.sch 953 */
						obj_t BgL_auxz00_13072;
						BgL_objectz00_bglt BgL_tmpz00_13070;

						BgL_auxz00_13072 = ((obj_t) BgL_wide1544z00_9208);
						BgL_tmpz00_13070 = ((BgL_objectz00_bglt) BgL_tmp1543z00_9207);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_13070, BgL_auxz00_13072);
					}
					((BgL_objectz00_bglt) BgL_tmp1543z00_9207);
					{	/* Cfa/cinfo2.sch 953 */
						long BgL_arg1977z00_9211;

						BgL_arg1977z00_9211 =
							BGL_CLASS_NUM(BGl_makezd2structzd2appz00zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1543z00_9207), BgL_arg1977z00_9211);
					}
					BgL_new1545z00_9206 = ((BgL_appz00_bglt) BgL_tmp1543z00_9207);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1545z00_9206)))->BgL_locz00) =
					((obj_t) BgL_loc1490z00_702), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1545z00_9206)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1491z00_703), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1545z00_9206)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1492zd2_704), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1545z00_9206)))->BgL_keyz00) =
					((obj_t) BgL_key1493z00_705), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1545z00_9206)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1494z00_706), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1545z00_9206)))->
						BgL_argsz00) = ((obj_t) BgL_args1495z00_707), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1545z00_9206)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1496z00_708), BUNSPEC);
				{
					BgL_makezd2structzd2appz00_bglt BgL_auxz00_13094;

					{
						obj_t BgL_auxz00_13095;

						{	/* Cfa/cinfo2.sch 953 */
							BgL_objectz00_bglt BgL_tmpz00_13096;

							BgL_tmpz00_13096 = ((BgL_objectz00_bglt) BgL_new1545z00_9206);
							BgL_auxz00_13095 = BGL_OBJECT_WIDENING(BgL_tmpz00_13096);
						}
						BgL_auxz00_13094 =
							((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_13095);
					}
					((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_13094))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_approx1498z00_709), BUNSPEC);
				}
				{
					BgL_makezd2structzd2appz00_bglt BgL_auxz00_13101;

					{
						obj_t BgL_auxz00_13102;

						{	/* Cfa/cinfo2.sch 953 */
							BgL_objectz00_bglt BgL_tmpz00_13103;

							BgL_tmpz00_13103 = ((BgL_objectz00_bglt) BgL_new1545z00_9206);
							BgL_auxz00_13102 = BGL_OBJECT_WIDENING(BgL_tmpz00_13103);
						}
						BgL_auxz00_13101 =
							((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_13102);
					}
					((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_13101))->
							BgL_valuezd2approxzd2) =
						((BgL_approxz00_bglt) BgL_valuezd2approx1499zd2_710), BUNSPEC);
				}
				{
					BgL_makezd2structzd2appz00_bglt BgL_auxz00_13108;

					{
						obj_t BgL_auxz00_13109;

						{	/* Cfa/cinfo2.sch 953 */
							BgL_objectz00_bglt BgL_tmpz00_13110;

							BgL_tmpz00_13110 = ((BgL_objectz00_bglt) BgL_new1545z00_9206);
							BgL_auxz00_13109 = BGL_OBJECT_WIDENING(BgL_tmpz00_13110);
						}
						BgL_auxz00_13108 =
							((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_13109);
					}
					((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_13108))->
							BgL_lostzd2stampzd2) =
						((long) BgL_lostzd2stamp1500zd2_711), BUNSPEC);
				}
				{
					BgL_makezd2structzd2appz00_bglt BgL_auxz00_13115;

					{
						obj_t BgL_auxz00_13116;

						{	/* Cfa/cinfo2.sch 953 */
							BgL_objectz00_bglt BgL_tmpz00_13117;

							BgL_tmpz00_13117 = ((BgL_objectz00_bglt) BgL_new1545z00_9206);
							BgL_auxz00_13116 = BGL_OBJECT_WIDENING(BgL_tmpz00_13117);
						}
						BgL_auxz00_13115 =
							((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_13116);
					}
					((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_13115))->
							BgL_ownerz00) =
						((BgL_variablez00_bglt) BgL_owner1501z00_712), BUNSPEC);
				}
				{
					BgL_makezd2structzd2appz00_bglt BgL_auxz00_13122;

					{
						obj_t BgL_auxz00_13123;

						{	/* Cfa/cinfo2.sch 953 */
							BgL_objectz00_bglt BgL_tmpz00_13124;

							BgL_tmpz00_13124 = ((BgL_objectz00_bglt) BgL_new1545z00_9206);
							BgL_auxz00_13123 = BGL_OBJECT_WIDENING(BgL_tmpz00_13124);
						}
						BgL_auxz00_13122 =
							((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_13123);
					}
					((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_13122))->
							BgL_stackzd2stampzd2) =
						((obj_t) BgL_stackzd2stamp1502zd2_713), BUNSPEC);
				}
				return BgL_new1545z00_9206;
			}
		}

	}



/* &make-make-struct-app */
	BgL_appz00_bglt BGl_z62makezd2makezd2structzd2appzb0zzcfa_info2z00(obj_t
		BgL_envz00_7914, obj_t BgL_loc1490z00_7915, obj_t BgL_type1491z00_7916,
		obj_t BgL_sidezd2effect1492zd2_7917, obj_t BgL_key1493z00_7918,
		obj_t BgL_fun1494z00_7919, obj_t BgL_args1495z00_7920,
		obj_t BgL_stackable1496z00_7921, obj_t BgL_approx1498z00_7922,
		obj_t BgL_valuezd2approx1499zd2_7923, obj_t BgL_lostzd2stamp1500zd2_7924,
		obj_t BgL_owner1501z00_7925, obj_t BgL_stackzd2stamp1502zd2_7926)
	{
		{	/* Cfa/cinfo2.sch 953 */
			return
				BGl_makezd2makezd2structzd2appzd2zzcfa_info2z00(BgL_loc1490z00_7915,
				((BgL_typez00_bglt) BgL_type1491z00_7916),
				BgL_sidezd2effect1492zd2_7917, BgL_key1493z00_7918,
				((BgL_varz00_bglt) BgL_fun1494z00_7919), BgL_args1495z00_7920,
				BgL_stackable1496z00_7921,
				((BgL_approxz00_bglt) BgL_approx1498z00_7922),
				((BgL_approxz00_bglt) BgL_valuezd2approx1499zd2_7923),
				(long) CINT(BgL_lostzd2stamp1500zd2_7924),
				((BgL_variablez00_bglt) BgL_owner1501z00_7925),
				BgL_stackzd2stamp1502zd2_7926);
		}

	}



/* make-struct-app? */
	BGL_EXPORTED_DEF bool_t BGl_makezd2structzd2appzf3zf3zzcfa_info2z00(obj_t
		BgL_objz00_714)
	{
		{	/* Cfa/cinfo2.sch 954 */
			{	/* Cfa/cinfo2.sch 954 */
				obj_t BgL_classz00_9212;

				BgL_classz00_9212 = BGl_makezd2structzd2appz00zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_714))
					{	/* Cfa/cinfo2.sch 954 */
						BgL_objectz00_bglt BgL_arg1801z00_9213;

						BgL_arg1801z00_9213 = (BgL_objectz00_bglt) (BgL_objz00_714);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 954 */
								long BgL_idxz00_9214;

								BgL_idxz00_9214 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_9213);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_9214 + 4L)) == BgL_classz00_9212);
							}
						else
							{	/* Cfa/cinfo2.sch 954 */
								bool_t BgL_res2853z00_9217;

								{	/* Cfa/cinfo2.sch 954 */
									obj_t BgL_oclassz00_9218;

									{	/* Cfa/cinfo2.sch 954 */
										long BgL_arg1808z00_9219;

										{	/* Cfa/cinfo2.sch 954 */
											long BgL_arg1809z00_9220;

											BgL_arg1809z00_9220 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_9213);
											BgL_arg1808z00_9219 = (BgL_arg1809z00_9220 - OBJECT_TYPE);
										}
										BgL_oclassz00_9218 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_9219);
									}
									{	/* Cfa/cinfo2.sch 954 */
										bool_t BgL__ortest_1115z00_9221;

										BgL__ortest_1115z00_9221 =
											(BgL_classz00_9212 == BgL_oclassz00_9218);
										if (BgL__ortest_1115z00_9221)
											{	/* Cfa/cinfo2.sch 954 */
												BgL_res2853z00_9217 = BgL__ortest_1115z00_9221;
											}
										else
											{	/* Cfa/cinfo2.sch 954 */
												long BgL_odepthz00_9222;

												BgL_odepthz00_9222 =
													BGL_CLASS_DEPTH(BgL_oclassz00_9218);
												if ((4L < BgL_odepthz00_9222))
													{	/* Cfa/cinfo2.sch 954 */
														obj_t BgL_arg1797z00_9223;

														BgL_arg1797z00_9223 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_9218, 4L);
														BgL_res2853z00_9217 =
															(BgL_arg1797z00_9223 == BgL_classz00_9212);
													}
												else
													{	/* Cfa/cinfo2.sch 954 */
														BgL_res2853z00_9217 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2853z00_9217;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 954 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &make-struct-app? */
	obj_t BGl_z62makezd2structzd2appzf3z91zzcfa_info2z00(obj_t BgL_envz00_7927,
		obj_t BgL_objz00_7928)
	{
		{	/* Cfa/cinfo2.sch 954 */
			return
				BBOOL(BGl_makezd2structzd2appzf3zf3zzcfa_info2z00(BgL_objz00_7928));
		}

	}



/* make-struct-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2structzd2appzd2nilzd2zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 955 */
			{	/* Cfa/cinfo2.sch 955 */
				obj_t BgL_classz00_5949;

				BgL_classz00_5949 = BGl_makezd2structzd2appz00zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 955 */
					obj_t BgL__ortest_1117z00_5950;

					BgL__ortest_1117z00_5950 = BGL_CLASS_NIL(BgL_classz00_5949);
					if (CBOOL(BgL__ortest_1117z00_5950))
						{	/* Cfa/cinfo2.sch 955 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_5950);
						}
					else
						{	/* Cfa/cinfo2.sch 955 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_5949));
						}
				}
			}
		}

	}



/* &make-struct-app-nil */
	BgL_appz00_bglt BGl_z62makezd2structzd2appzd2nilzb0zzcfa_info2z00(obj_t
		BgL_envz00_7929)
	{
		{	/* Cfa/cinfo2.sch 955 */
			return BGl_makezd2structzd2appzd2nilzd2zzcfa_info2z00();
		}

	}



/* make-struct-app-stack-stamp */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2structzd2appzd2stackzd2stampz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_715)
	{
		{	/* Cfa/cinfo2.sch 956 */
			{
				BgL_makezd2structzd2appz00_bglt BgL_auxz00_13164;

				{
					obj_t BgL_auxz00_13165;

					{	/* Cfa/cinfo2.sch 956 */
						BgL_objectz00_bglt BgL_tmpz00_13166;

						BgL_tmpz00_13166 = ((BgL_objectz00_bglt) BgL_oz00_715);
						BgL_auxz00_13165 = BGL_OBJECT_WIDENING(BgL_tmpz00_13166);
					}
					BgL_auxz00_13164 =
						((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_13165);
				}
				return
					(((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_13164))->
					BgL_stackzd2stampzd2);
			}
		}

	}



/* &make-struct-app-stack-stamp */
	obj_t BGl_z62makezd2structzd2appzd2stackzd2stampz62zzcfa_info2z00(obj_t
		BgL_envz00_7930, obj_t BgL_oz00_7931)
	{
		{	/* Cfa/cinfo2.sch 956 */
			return
				BGl_makezd2structzd2appzd2stackzd2stampz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7931));
		}

	}



/* make-struct-app-stack-stamp-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2structzd2appzd2stackzd2stampzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_716, obj_t BgL_vz00_717)
	{
		{	/* Cfa/cinfo2.sch 957 */
			{
				BgL_makezd2structzd2appz00_bglt BgL_auxz00_13173;

				{
					obj_t BgL_auxz00_13174;

					{	/* Cfa/cinfo2.sch 957 */
						BgL_objectz00_bglt BgL_tmpz00_13175;

						BgL_tmpz00_13175 = ((BgL_objectz00_bglt) BgL_oz00_716);
						BgL_auxz00_13174 = BGL_OBJECT_WIDENING(BgL_tmpz00_13175);
					}
					BgL_auxz00_13173 =
						((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_13174);
				}
				return
					((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_13173))->
						BgL_stackzd2stampzd2) = ((obj_t) BgL_vz00_717), BUNSPEC);
			}
		}

	}



/* &make-struct-app-stack-stamp-set! */
	obj_t
		BGl_z62makezd2structzd2appzd2stackzd2stampzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7932, obj_t BgL_oz00_7933, obj_t BgL_vz00_7934)
	{
		{	/* Cfa/cinfo2.sch 957 */
			return
				BGl_makezd2structzd2appzd2stackzd2stampzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7933), BgL_vz00_7934);
		}

	}



/* make-struct-app-owner */
	BGL_EXPORTED_DEF BgL_variablez00_bglt
		BGl_makezd2structzd2appzd2ownerzd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_718)
	{
		{	/* Cfa/cinfo2.sch 958 */
			{
				BgL_makezd2structzd2appz00_bglt BgL_auxz00_13182;

				{
					obj_t BgL_auxz00_13183;

					{	/* Cfa/cinfo2.sch 958 */
						BgL_objectz00_bglt BgL_tmpz00_13184;

						BgL_tmpz00_13184 = ((BgL_objectz00_bglt) BgL_oz00_718);
						BgL_auxz00_13183 = BGL_OBJECT_WIDENING(BgL_tmpz00_13184);
					}
					BgL_auxz00_13182 =
						((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_13183);
				}
				return
					(((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_13182))->
					BgL_ownerz00);
			}
		}

	}



/* &make-struct-app-owner */
	BgL_variablez00_bglt BGl_z62makezd2structzd2appzd2ownerzb0zzcfa_info2z00(obj_t
		BgL_envz00_7935, obj_t BgL_oz00_7936)
	{
		{	/* Cfa/cinfo2.sch 958 */
			return
				BGl_makezd2structzd2appzd2ownerzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7936));
		}

	}



/* make-struct-app-lost-stamp */
	BGL_EXPORTED_DEF long
		BGl_makezd2structzd2appzd2lostzd2stampz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_721)
	{
		{	/* Cfa/cinfo2.sch 960 */
			{
				BgL_makezd2structzd2appz00_bglt BgL_auxz00_13191;

				{
					obj_t BgL_auxz00_13192;

					{	/* Cfa/cinfo2.sch 960 */
						BgL_objectz00_bglt BgL_tmpz00_13193;

						BgL_tmpz00_13193 = ((BgL_objectz00_bglt) BgL_oz00_721);
						BgL_auxz00_13192 = BGL_OBJECT_WIDENING(BgL_tmpz00_13193);
					}
					BgL_auxz00_13191 =
						((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_13192);
				}
				return
					(((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_13191))->
					BgL_lostzd2stampzd2);
			}
		}

	}



/* &make-struct-app-lost-stamp */
	obj_t BGl_z62makezd2structzd2appzd2lostzd2stampz62zzcfa_info2z00(obj_t
		BgL_envz00_7937, obj_t BgL_oz00_7938)
	{
		{	/* Cfa/cinfo2.sch 960 */
			return
				BINT(BGl_makezd2structzd2appzd2lostzd2stampz00zzcfa_info2z00(
					((BgL_appz00_bglt) BgL_oz00_7938)));
		}

	}



/* make-struct-app-lost-stamp-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2structzd2appzd2lostzd2stampzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_722, long BgL_vz00_723)
	{
		{	/* Cfa/cinfo2.sch 961 */
			{
				BgL_makezd2structzd2appz00_bglt BgL_auxz00_13201;

				{
					obj_t BgL_auxz00_13202;

					{	/* Cfa/cinfo2.sch 961 */
						BgL_objectz00_bglt BgL_tmpz00_13203;

						BgL_tmpz00_13203 = ((BgL_objectz00_bglt) BgL_oz00_722);
						BgL_auxz00_13202 = BGL_OBJECT_WIDENING(BgL_tmpz00_13203);
					}
					BgL_auxz00_13201 =
						((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_13202);
				}
				return
					((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_13201))->
						BgL_lostzd2stampzd2) = ((long) BgL_vz00_723), BUNSPEC);
		}}

	}



/* &make-struct-app-lost-stamp-set! */
	obj_t
		BGl_z62makezd2structzd2appzd2lostzd2stampzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7939, obj_t BgL_oz00_7940, obj_t BgL_vz00_7941)
	{
		{	/* Cfa/cinfo2.sch 961 */
			return
				BGl_makezd2structzd2appzd2lostzd2stampzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7940), (long) CINT(BgL_vz00_7941));
		}

	}



/* make-struct-app-value-approx */
	BGL_EXPORTED_DEF BgL_approxz00_bglt
		BGl_makezd2structzd2appzd2valuezd2approxz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_724)
	{
		{	/* Cfa/cinfo2.sch 962 */
			{
				BgL_makezd2structzd2appz00_bglt BgL_auxz00_13211;

				{
					obj_t BgL_auxz00_13212;

					{	/* Cfa/cinfo2.sch 962 */
						BgL_objectz00_bglt BgL_tmpz00_13213;

						BgL_tmpz00_13213 = ((BgL_objectz00_bglt) BgL_oz00_724);
						BgL_auxz00_13212 = BGL_OBJECT_WIDENING(BgL_tmpz00_13213);
					}
					BgL_auxz00_13211 =
						((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_13212);
				}
				return
					(((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_13211))->
					BgL_valuezd2approxzd2);
			}
		}

	}



/* &make-struct-app-value-approx */
	BgL_approxz00_bglt
		BGl_z62makezd2structzd2appzd2valuezd2approxz62zzcfa_info2z00(obj_t
		BgL_envz00_7942, obj_t BgL_oz00_7943)
	{
		{	/* Cfa/cinfo2.sch 962 */
			return
				BGl_makezd2structzd2appzd2valuezd2approxz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7943));
		}

	}



/* make-struct-app-approx */
	BGL_EXPORTED_DEF BgL_approxz00_bglt
		BGl_makezd2structzd2appzd2approxzd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_727)
	{
		{	/* Cfa/cinfo2.sch 964 */
			{
				BgL_makezd2structzd2appz00_bglt BgL_auxz00_13220;

				{
					obj_t BgL_auxz00_13221;

					{	/* Cfa/cinfo2.sch 964 */
						BgL_objectz00_bglt BgL_tmpz00_13222;

						BgL_tmpz00_13222 = ((BgL_objectz00_bglt) BgL_oz00_727);
						BgL_auxz00_13221 = BGL_OBJECT_WIDENING(BgL_tmpz00_13222);
					}
					BgL_auxz00_13220 =
						((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_13221);
				}
				return
					(((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_13220))->
					BgL_approxz00);
			}
		}

	}



/* &make-struct-app-approx */
	BgL_approxz00_bglt BGl_z62makezd2structzd2appzd2approxzb0zzcfa_info2z00(obj_t
		BgL_envz00_7944, obj_t BgL_oz00_7945)
	{
		{	/* Cfa/cinfo2.sch 964 */
			return
				BGl_makezd2structzd2appzd2approxzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7945));
		}

	}



/* make-struct-app-approx-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2structzd2appzd2approxzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_728, BgL_approxz00_bglt BgL_vz00_729)
	{
		{	/* Cfa/cinfo2.sch 965 */
			{
				BgL_makezd2structzd2appz00_bglt BgL_auxz00_13229;

				{
					obj_t BgL_auxz00_13230;

					{	/* Cfa/cinfo2.sch 965 */
						BgL_objectz00_bglt BgL_tmpz00_13231;

						BgL_tmpz00_13231 = ((BgL_objectz00_bglt) BgL_oz00_728);
						BgL_auxz00_13230 = BGL_OBJECT_WIDENING(BgL_tmpz00_13231);
					}
					BgL_auxz00_13229 =
						((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_13230);
				}
				return
					((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_13229))->
						BgL_approxz00) = ((BgL_approxz00_bglt) BgL_vz00_729), BUNSPEC);
			}
		}

	}



/* &make-struct-app-approx-set! */
	obj_t BGl_z62makezd2structzd2appzd2approxzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7946, obj_t BgL_oz00_7947, obj_t BgL_vz00_7948)
	{
		{	/* Cfa/cinfo2.sch 965 */
			return
				BGl_makezd2structzd2appzd2approxzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7947),
				((BgL_approxz00_bglt) BgL_vz00_7948));
		}

	}



/* make-struct-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2structzd2appzd2stackablezd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_730)
	{
		{	/* Cfa/cinfo2.sch 966 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_730)))->BgL_stackablez00);
		}

	}



/* &make-struct-app-stackable */
	obj_t BGl_z62makezd2structzd2appzd2stackablezb0zzcfa_info2z00(obj_t
		BgL_envz00_7949, obj_t BgL_oz00_7950)
	{
		{	/* Cfa/cinfo2.sch 966 */
			return
				BGl_makezd2structzd2appzd2stackablezd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7950));
		}

	}



/* make-struct-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2structzd2appzd2stackablezd2setz12z12zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_731, obj_t BgL_vz00_732)
	{
		{	/* Cfa/cinfo2.sch 967 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_731)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_732), BUNSPEC);
		}

	}



/* &make-struct-app-stackable-set! */
	obj_t BGl_z62makezd2structzd2appzd2stackablezd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7951, obj_t BgL_oz00_7952, obj_t BgL_vz00_7953)
	{
		{	/* Cfa/cinfo2.sch 967 */
			return
				BGl_makezd2structzd2appzd2stackablezd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7952), BgL_vz00_7953);
		}

	}



/* make-struct-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2structzd2appzd2argszd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_733)
	{
		{	/* Cfa/cinfo2.sch 968 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_733)))->BgL_argsz00);
		}

	}



/* &make-struct-app-args */
	obj_t BGl_z62makezd2structzd2appzd2argszb0zzcfa_info2z00(obj_t
		BgL_envz00_7954, obj_t BgL_oz00_7955)
	{
		{	/* Cfa/cinfo2.sch 968 */
			return
				BGl_makezd2structzd2appzd2argszd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7955));
		}

	}



/* make-struct-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2structzd2appzd2argszd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_734, obj_t BgL_vz00_735)
	{
		{	/* Cfa/cinfo2.sch 969 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_734)))->BgL_argsz00) =
				((obj_t) BgL_vz00_735), BUNSPEC);
		}

	}



/* &make-struct-app-args-set! */
	obj_t BGl_z62makezd2structzd2appzd2argszd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7956, obj_t BgL_oz00_7957, obj_t BgL_vz00_7958)
	{
		{	/* Cfa/cinfo2.sch 969 */
			return
				BGl_makezd2structzd2appzd2argszd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7957), BgL_vz00_7958);
		}

	}



/* make-struct-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_makezd2structzd2appzd2funzd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_736)
	{
		{	/* Cfa/cinfo2.sch 970 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_736)))->BgL_funz00);
		}

	}



/* &make-struct-app-fun */
	BgL_varz00_bglt BGl_z62makezd2structzd2appzd2funzb0zzcfa_info2z00(obj_t
		BgL_envz00_7959, obj_t BgL_oz00_7960)
	{
		{	/* Cfa/cinfo2.sch 970 */
			return
				BGl_makezd2structzd2appzd2funzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7960));
		}

	}



/* make-struct-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2structzd2appzd2funzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_737, BgL_varz00_bglt BgL_vz00_738)
	{
		{	/* Cfa/cinfo2.sch 971 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_737)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_738), BUNSPEC);
		}

	}



/* &make-struct-app-fun-set! */
	obj_t BGl_z62makezd2structzd2appzd2funzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7961, obj_t BgL_oz00_7962, obj_t BgL_vz00_7963)
	{
		{	/* Cfa/cinfo2.sch 971 */
			return
				BGl_makezd2structzd2appzd2funzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7962), ((BgL_varz00_bglt) BgL_vz00_7963));
		}

	}



/* make-struct-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2structzd2appzd2keyzd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_739)
	{
		{	/* Cfa/cinfo2.sch 972 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_739)))->BgL_keyz00);
		}

	}



/* &make-struct-app-key */
	obj_t BGl_z62makezd2structzd2appzd2keyzb0zzcfa_info2z00(obj_t BgL_envz00_7964,
		obj_t BgL_oz00_7965)
	{
		{	/* Cfa/cinfo2.sch 972 */
			return
				BGl_makezd2structzd2appzd2keyzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7965));
		}

	}



/* make-struct-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2structzd2appzd2keyzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_740, obj_t BgL_vz00_741)
	{
		{	/* Cfa/cinfo2.sch 973 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_740)))->BgL_keyz00) =
				((obj_t) BgL_vz00_741), BUNSPEC);
		}

	}



/* &make-struct-app-key-set! */
	obj_t BGl_z62makezd2structzd2appzd2keyzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7966, obj_t BgL_oz00_7967, obj_t BgL_vz00_7968)
	{
		{	/* Cfa/cinfo2.sch 973 */
			return
				BGl_makezd2structzd2appzd2keyzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7967), BgL_vz00_7968);
		}

	}



/* make-struct-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2structzd2appzd2sidezd2effectz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_742)
	{
		{	/* Cfa/cinfo2.sch 974 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_742)))->BgL_sidezd2effectzd2);
		}

	}



/* &make-struct-app-side-effect */
	obj_t BGl_z62makezd2structzd2appzd2sidezd2effectz62zzcfa_info2z00(obj_t
		BgL_envz00_7969, obj_t BgL_oz00_7970)
	{
		{	/* Cfa/cinfo2.sch 974 */
			return
				BGl_makezd2structzd2appzd2sidezd2effectz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7970));
		}

	}



/* make-struct-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2structzd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_743, obj_t BgL_vz00_744)
	{
		{	/* Cfa/cinfo2.sch 975 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_743)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_744), BUNSPEC);
		}

	}



/* &make-struct-app-side-effect-set! */
	obj_t
		BGl_z62makezd2structzd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_7971, obj_t BgL_oz00_7972, obj_t BgL_vz00_7973)
	{
		{	/* Cfa/cinfo2.sch 975 */
			return
				BGl_makezd2structzd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7972), BgL_vz00_7973);
		}

	}



/* make-struct-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_makezd2structzd2appzd2typezd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_745)
	{
		{	/* Cfa/cinfo2.sch 976 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_745)))->BgL_typez00);
		}

	}



/* &make-struct-app-type */
	BgL_typez00_bglt BGl_z62makezd2structzd2appzd2typezb0zzcfa_info2z00(obj_t
		BgL_envz00_7974, obj_t BgL_oz00_7975)
	{
		{	/* Cfa/cinfo2.sch 976 */
			return
				BGl_makezd2structzd2appzd2typezd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7975));
		}

	}



/* make-struct-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2structzd2appzd2typezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_746, BgL_typez00_bglt BgL_vz00_747)
	{
		{	/* Cfa/cinfo2.sch 977 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_746)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_747), BUNSPEC);
		}

	}



/* &make-struct-app-type-set! */
	obj_t BGl_z62makezd2structzd2appzd2typezd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7976, obj_t BgL_oz00_7977, obj_t BgL_vz00_7978)
	{
		{	/* Cfa/cinfo2.sch 977 */
			return
				BGl_makezd2structzd2appzd2typezd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7977), ((BgL_typez00_bglt) BgL_vz00_7978));
		}

	}



/* make-struct-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_makezd2structzd2appzd2loczd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_748)
	{
		{	/* Cfa/cinfo2.sch 978 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_748)))->BgL_locz00);
		}

	}



/* &make-struct-app-loc */
	obj_t BGl_z62makezd2structzd2appzd2loczb0zzcfa_info2z00(obj_t BgL_envz00_7979,
		obj_t BgL_oz00_7980)
	{
		{	/* Cfa/cinfo2.sch 978 */
			return
				BGl_makezd2structzd2appzd2loczd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7980));
		}

	}



/* make-struct-ref-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2structzd2refzd2appzd2zzcfa_info2z00(obj_t BgL_loc1481z00_751,
		BgL_typez00_bglt BgL_type1482z00_752, obj_t BgL_sidezd2effect1483zd2_753,
		obj_t BgL_key1484z00_754, BgL_varz00_bglt BgL_fun1485z00_755,
		obj_t BgL_args1486z00_756, obj_t BgL_stackable1487z00_757,
		BgL_approxz00_bglt BgL_approx1488z00_758)
	{
		{	/* Cfa/cinfo2.sch 982 */
			{	/* Cfa/cinfo2.sch 982 */
				BgL_appz00_bglt BgL_new1549z00_9224;

				{	/* Cfa/cinfo2.sch 982 */
					BgL_appz00_bglt BgL_tmp1547z00_9225;
					BgL_structzd2refzd2appz00_bglt BgL_wide1548z00_9226;

					{
						BgL_appz00_bglt BgL_auxz00_13293;

						{	/* Cfa/cinfo2.sch 982 */
							BgL_appz00_bglt BgL_new1546z00_9227;

							BgL_new1546z00_9227 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 982 */
								long BgL_arg1980z00_9228;

								BgL_arg1980z00_9228 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1546z00_9227),
									BgL_arg1980z00_9228);
							}
							{	/* Cfa/cinfo2.sch 982 */
								BgL_objectz00_bglt BgL_tmpz00_13298;

								BgL_tmpz00_13298 = ((BgL_objectz00_bglt) BgL_new1546z00_9227);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_13298, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1546z00_9227);
							BgL_auxz00_13293 = BgL_new1546z00_9227;
						}
						BgL_tmp1547z00_9225 = ((BgL_appz00_bglt) BgL_auxz00_13293);
					}
					BgL_wide1548z00_9226 =
						((BgL_structzd2refzd2appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
									BgL_structzd2refzd2appz00_bgl))));
					{	/* Cfa/cinfo2.sch 982 */
						obj_t BgL_auxz00_13306;
						BgL_objectz00_bglt BgL_tmpz00_13304;

						BgL_auxz00_13306 = ((obj_t) BgL_wide1548z00_9226);
						BgL_tmpz00_13304 = ((BgL_objectz00_bglt) BgL_tmp1547z00_9225);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_13304, BgL_auxz00_13306);
					}
					((BgL_objectz00_bglt) BgL_tmp1547z00_9225);
					{	/* Cfa/cinfo2.sch 982 */
						long BgL_arg1979z00_9229;

						BgL_arg1979z00_9229 =
							BGL_CLASS_NUM(BGl_structzd2refzd2appz00zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1547z00_9225), BgL_arg1979z00_9229);
					}
					BgL_new1549z00_9224 = ((BgL_appz00_bglt) BgL_tmp1547z00_9225);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1549z00_9224)))->BgL_locz00) =
					((obj_t) BgL_loc1481z00_751), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1549z00_9224)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1482z00_752), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1549z00_9224)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1483zd2_753), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1549z00_9224)))->BgL_keyz00) =
					((obj_t) BgL_key1484z00_754), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1549z00_9224)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1485z00_755), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1549z00_9224)))->
						BgL_argsz00) = ((obj_t) BgL_args1486z00_756), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1549z00_9224)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1487z00_757), BUNSPEC);
				{
					BgL_structzd2refzd2appz00_bglt BgL_auxz00_13328;

					{
						obj_t BgL_auxz00_13329;

						{	/* Cfa/cinfo2.sch 982 */
							BgL_objectz00_bglt BgL_tmpz00_13330;

							BgL_tmpz00_13330 = ((BgL_objectz00_bglt) BgL_new1549z00_9224);
							BgL_auxz00_13329 = BGL_OBJECT_WIDENING(BgL_tmpz00_13330);
						}
						BgL_auxz00_13328 =
							((BgL_structzd2refzd2appz00_bglt) BgL_auxz00_13329);
					}
					((((BgL_structzd2refzd2appz00_bglt) COBJECT(BgL_auxz00_13328))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_approx1488z00_758), BUNSPEC);
				}
				return BgL_new1549z00_9224;
			}
		}

	}



/* &make-struct-ref-app */
	BgL_appz00_bglt BGl_z62makezd2structzd2refzd2appzb0zzcfa_info2z00(obj_t
		BgL_envz00_7981, obj_t BgL_loc1481z00_7982, obj_t BgL_type1482z00_7983,
		obj_t BgL_sidezd2effect1483zd2_7984, obj_t BgL_key1484z00_7985,
		obj_t BgL_fun1485z00_7986, obj_t BgL_args1486z00_7987,
		obj_t BgL_stackable1487z00_7988, obj_t BgL_approx1488z00_7989)
	{
		{	/* Cfa/cinfo2.sch 982 */
			return
				BGl_makezd2structzd2refzd2appzd2zzcfa_info2z00(BgL_loc1481z00_7982,
				((BgL_typez00_bglt) BgL_type1482z00_7983),
				BgL_sidezd2effect1483zd2_7984, BgL_key1484z00_7985,
				((BgL_varz00_bglt) BgL_fun1485z00_7986), BgL_args1486z00_7987,
				BgL_stackable1487z00_7988,
				((BgL_approxz00_bglt) BgL_approx1488z00_7989));
		}

	}



/* struct-ref-app? */
	BGL_EXPORTED_DEF bool_t BGl_structzd2refzd2appzf3zf3zzcfa_info2z00(obj_t
		BgL_objz00_759)
	{
		{	/* Cfa/cinfo2.sch 983 */
			{	/* Cfa/cinfo2.sch 983 */
				obj_t BgL_classz00_9230;

				BgL_classz00_9230 = BGl_structzd2refzd2appz00zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_759))
					{	/* Cfa/cinfo2.sch 983 */
						BgL_objectz00_bglt BgL_arg1801z00_9231;

						BgL_arg1801z00_9231 = (BgL_objectz00_bglt) (BgL_objz00_759);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 983 */
								long BgL_idxz00_9232;

								BgL_idxz00_9232 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_9231);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_9232 + 4L)) == BgL_classz00_9230);
							}
						else
							{	/* Cfa/cinfo2.sch 983 */
								bool_t BgL_res2854z00_9235;

								{	/* Cfa/cinfo2.sch 983 */
									obj_t BgL_oclassz00_9236;

									{	/* Cfa/cinfo2.sch 983 */
										long BgL_arg1808z00_9237;

										{	/* Cfa/cinfo2.sch 983 */
											long BgL_arg1809z00_9238;

											BgL_arg1809z00_9238 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_9231);
											BgL_arg1808z00_9237 = (BgL_arg1809z00_9238 - OBJECT_TYPE);
										}
										BgL_oclassz00_9236 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_9237);
									}
									{	/* Cfa/cinfo2.sch 983 */
										bool_t BgL__ortest_1115z00_9239;

										BgL__ortest_1115z00_9239 =
											(BgL_classz00_9230 == BgL_oclassz00_9236);
										if (BgL__ortest_1115z00_9239)
											{	/* Cfa/cinfo2.sch 983 */
												BgL_res2854z00_9235 = BgL__ortest_1115z00_9239;
											}
										else
											{	/* Cfa/cinfo2.sch 983 */
												long BgL_odepthz00_9240;

												BgL_odepthz00_9240 =
													BGL_CLASS_DEPTH(BgL_oclassz00_9236);
												if ((4L < BgL_odepthz00_9240))
													{	/* Cfa/cinfo2.sch 983 */
														obj_t BgL_arg1797z00_9241;

														BgL_arg1797z00_9241 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_9236, 4L);
														BgL_res2854z00_9235 =
															(BgL_arg1797z00_9241 == BgL_classz00_9230);
													}
												else
													{	/* Cfa/cinfo2.sch 983 */
														BgL_res2854z00_9235 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2854z00_9235;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 983 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &struct-ref-app? */
	obj_t BGl_z62structzd2refzd2appzf3z91zzcfa_info2z00(obj_t BgL_envz00_7990,
		obj_t BgL_objz00_7991)
	{
		{	/* Cfa/cinfo2.sch 983 */
			return BBOOL(BGl_structzd2refzd2appzf3zf3zzcfa_info2z00(BgL_objz00_7991));
		}

	}



/* struct-ref-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_structzd2refzd2appzd2nilzd2zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 984 */
			{	/* Cfa/cinfo2.sch 984 */
				obj_t BgL_classz00_6005;

				BgL_classz00_6005 = BGl_structzd2refzd2appz00zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 984 */
					obj_t BgL__ortest_1117z00_6006;

					BgL__ortest_1117z00_6006 = BGL_CLASS_NIL(BgL_classz00_6005);
					if (CBOOL(BgL__ortest_1117z00_6006))
						{	/* Cfa/cinfo2.sch 984 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_6006);
						}
					else
						{	/* Cfa/cinfo2.sch 984 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_6005));
						}
				}
			}
		}

	}



/* &struct-ref-app-nil */
	BgL_appz00_bglt BGl_z62structzd2refzd2appzd2nilzb0zzcfa_info2z00(obj_t
		BgL_envz00_7992)
	{
		{	/* Cfa/cinfo2.sch 984 */
			return BGl_structzd2refzd2appzd2nilzd2zzcfa_info2z00();
		}

	}



/* struct-ref-app-approx */
	BGL_EXPORTED_DEF BgL_approxz00_bglt
		BGl_structzd2refzd2appzd2approxzd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_760)
	{
		{	/* Cfa/cinfo2.sch 985 */
			{
				BgL_structzd2refzd2appz00_bglt BgL_auxz00_13367;

				{
					obj_t BgL_auxz00_13368;

					{	/* Cfa/cinfo2.sch 985 */
						BgL_objectz00_bglt BgL_tmpz00_13369;

						BgL_tmpz00_13369 = ((BgL_objectz00_bglt) BgL_oz00_760);
						BgL_auxz00_13368 = BGL_OBJECT_WIDENING(BgL_tmpz00_13369);
					}
					BgL_auxz00_13367 =
						((BgL_structzd2refzd2appz00_bglt) BgL_auxz00_13368);
				}
				return
					(((BgL_structzd2refzd2appz00_bglt) COBJECT(BgL_auxz00_13367))->
					BgL_approxz00);
			}
		}

	}



/* &struct-ref-app-approx */
	BgL_approxz00_bglt BGl_z62structzd2refzd2appzd2approxzb0zzcfa_info2z00(obj_t
		BgL_envz00_7993, obj_t BgL_oz00_7994)
	{
		{	/* Cfa/cinfo2.sch 985 */
			return
				BGl_structzd2refzd2appzd2approxzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7994));
		}

	}



/* struct-ref-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2refzd2appzd2stackablezd2zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_763)
	{
		{	/* Cfa/cinfo2.sch 987 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_763)))->BgL_stackablez00);
		}

	}



/* &struct-ref-app-stackable */
	obj_t BGl_z62structzd2refzd2appzd2stackablezb0zzcfa_info2z00(obj_t
		BgL_envz00_7995, obj_t BgL_oz00_7996)
	{
		{	/* Cfa/cinfo2.sch 987 */
			return
				BGl_structzd2refzd2appzd2stackablezd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7996));
		}

	}



/* struct-ref-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2refzd2appzd2stackablezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_764, obj_t BgL_vz00_765)
	{
		{	/* Cfa/cinfo2.sch 988 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_764)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_765), BUNSPEC);
		}

	}



/* &struct-ref-app-stackable-set! */
	obj_t BGl_z62structzd2refzd2appzd2stackablezd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_7997, obj_t BgL_oz00_7998, obj_t BgL_vz00_7999)
	{
		{	/* Cfa/cinfo2.sch 988 */
			return
				BGl_structzd2refzd2appzd2stackablezd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_7998), BgL_vz00_7999);
		}

	}



/* struct-ref-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2refzd2appzd2argszd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_766)
	{
		{	/* Cfa/cinfo2.sch 989 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_766)))->BgL_argsz00);
		}

	}



/* &struct-ref-app-args */
	obj_t BGl_z62structzd2refzd2appzd2argszb0zzcfa_info2z00(obj_t BgL_envz00_8000,
		obj_t BgL_oz00_8001)
	{
		{	/* Cfa/cinfo2.sch 989 */
			return
				BGl_structzd2refzd2appzd2argszd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8001));
		}

	}



/* struct-ref-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2refzd2appzd2argszd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_767, obj_t BgL_vz00_768)
	{
		{	/* Cfa/cinfo2.sch 990 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_767)))->BgL_argsz00) =
				((obj_t) BgL_vz00_768), BUNSPEC);
		}

	}



/* &struct-ref-app-args-set! */
	obj_t BGl_z62structzd2refzd2appzd2argszd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_8002, obj_t BgL_oz00_8003, obj_t BgL_vz00_8004)
	{
		{	/* Cfa/cinfo2.sch 990 */
			return
				BGl_structzd2refzd2appzd2argszd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8003), BgL_vz00_8004);
		}

	}



/* struct-ref-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_structzd2refzd2appzd2funzd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_769)
	{
		{	/* Cfa/cinfo2.sch 991 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_769)))->BgL_funz00);
		}

	}



/* &struct-ref-app-fun */
	BgL_varz00_bglt BGl_z62structzd2refzd2appzd2funzb0zzcfa_info2z00(obj_t
		BgL_envz00_8005, obj_t BgL_oz00_8006)
	{
		{	/* Cfa/cinfo2.sch 991 */
			return
				BGl_structzd2refzd2appzd2funzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8006));
		}

	}



/* struct-ref-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2refzd2appzd2funzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_770, BgL_varz00_bglt BgL_vz00_771)
	{
		{	/* Cfa/cinfo2.sch 992 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_770)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_771), BUNSPEC);
		}

	}



/* &struct-ref-app-fun-set! */
	obj_t BGl_z62structzd2refzd2appzd2funzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_8007, obj_t BgL_oz00_8008, obj_t BgL_vz00_8009)
	{
		{	/* Cfa/cinfo2.sch 992 */
			return
				BGl_structzd2refzd2appzd2funzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8008), ((BgL_varz00_bglt) BgL_vz00_8009));
		}

	}



/* struct-ref-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2refzd2appzd2keyzd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_772)
	{
		{	/* Cfa/cinfo2.sch 993 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_772)))->BgL_keyz00);
		}

	}



/* &struct-ref-app-key */
	obj_t BGl_z62structzd2refzd2appzd2keyzb0zzcfa_info2z00(obj_t BgL_envz00_8010,
		obj_t BgL_oz00_8011)
	{
		{	/* Cfa/cinfo2.sch 993 */
			return
				BGl_structzd2refzd2appzd2keyzd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8011));
		}

	}



/* struct-ref-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2refzd2appzd2keyzd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_773, obj_t BgL_vz00_774)
	{
		{	/* Cfa/cinfo2.sch 994 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_773)))->BgL_keyz00) =
				((obj_t) BgL_vz00_774), BUNSPEC);
		}

	}



/* &struct-ref-app-key-set! */
	obj_t BGl_z62structzd2refzd2appzd2keyzd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_8012, obj_t BgL_oz00_8013, obj_t BgL_vz00_8014)
	{
		{	/* Cfa/cinfo2.sch 994 */
			return
				BGl_structzd2refzd2appzd2keyzd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8013), BgL_vz00_8014);
		}

	}



/* struct-ref-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2refzd2appzd2sidezd2effectz00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_775)
	{
		{	/* Cfa/cinfo2.sch 995 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_775)))->BgL_sidezd2effectzd2);
		}

	}



/* &struct-ref-app-side-effect */
	obj_t BGl_z62structzd2refzd2appzd2sidezd2effectz62zzcfa_info2z00(obj_t
		BgL_envz00_8015, obj_t BgL_oz00_8016)
	{
		{	/* Cfa/cinfo2.sch 995 */
			return
				BGl_structzd2refzd2appzd2sidezd2effectz00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8016));
		}

	}



/* struct-ref-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2refzd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_776, obj_t BgL_vz00_777)
	{
		{	/* Cfa/cinfo2.sch 996 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_776)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_777), BUNSPEC);
		}

	}



/* &struct-ref-app-side-effect-set! */
	obj_t
		BGl_z62structzd2refzd2appzd2sidezd2effectzd2setz12za2zzcfa_info2z00(obj_t
		BgL_envz00_8017, obj_t BgL_oz00_8018, obj_t BgL_vz00_8019)
	{
		{	/* Cfa/cinfo2.sch 996 */
			return
				BGl_structzd2refzd2appzd2sidezd2effectzd2setz12zc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8018), BgL_vz00_8019);
		}

	}



/* struct-ref-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_structzd2refzd2appzd2typezd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_778)
	{
		{	/* Cfa/cinfo2.sch 997 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_778)))->BgL_typez00);
		}

	}



/* &struct-ref-app-type */
	BgL_typez00_bglt BGl_z62structzd2refzd2appzd2typezb0zzcfa_info2z00(obj_t
		BgL_envz00_8020, obj_t BgL_oz00_8021)
	{
		{	/* Cfa/cinfo2.sch 997 */
			return
				BGl_structzd2refzd2appzd2typezd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8021));
		}

	}



/* struct-ref-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2refzd2appzd2typezd2setz12z12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_779, BgL_typez00_bglt BgL_vz00_780)
	{
		{	/* Cfa/cinfo2.sch 998 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_779)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_780), BUNSPEC);
		}

	}



/* &struct-ref-app-type-set! */
	obj_t BGl_z62structzd2refzd2appzd2typezd2setz12z70zzcfa_info2z00(obj_t
		BgL_envz00_8022, obj_t BgL_oz00_8023, obj_t BgL_vz00_8024)
	{
		{	/* Cfa/cinfo2.sch 998 */
			return
				BGl_structzd2refzd2appzd2typezd2setz12z12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8023), ((BgL_typez00_bglt) BgL_vz00_8024));
		}

	}



/* struct-ref-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2refzd2appzd2loczd2zzcfa_info2z00(BgL_appz00_bglt BgL_oz00_781)
	{
		{	/* Cfa/cinfo2.sch 999 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_781)))->BgL_locz00);
		}

	}



/* &struct-ref-app-loc */
	obj_t BGl_z62structzd2refzd2appzd2loczb0zzcfa_info2z00(obj_t BgL_envz00_8025,
		obj_t BgL_oz00_8026)
	{
		{	/* Cfa/cinfo2.sch 999 */
			return
				BGl_structzd2refzd2appzd2loczd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8026));
		}

	}



/* make-struct-set!-app */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_makezd2structzd2setz12zd2appzc0zzcfa_info2z00(obj_t BgL_loc1471z00_784,
		BgL_typez00_bglt BgL_type1472z00_785, obj_t BgL_sidezd2effect1473zd2_786,
		obj_t BgL_key1474z00_787, BgL_varz00_bglt BgL_fun1475z00_788,
		obj_t BgL_args1476z00_789, obj_t BgL_stackable1477z00_790,
		BgL_approxz00_bglt BgL_approx1478z00_791)
	{
		{	/* Cfa/cinfo2.sch 1003 */
			{	/* Cfa/cinfo2.sch 1003 */
				BgL_appz00_bglt BgL_new1553z00_9242;

				{	/* Cfa/cinfo2.sch 1003 */
					BgL_appz00_bglt BgL_tmp1551z00_9243;
					BgL_structzd2setz12zd2appz12_bglt BgL_wide1552z00_9244;

					{
						BgL_appz00_bglt BgL_auxz00_13430;

						{	/* Cfa/cinfo2.sch 1003 */
							BgL_appz00_bglt BgL_new1550z00_9245;

							BgL_new1550z00_9245 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.sch 1003 */
								long BgL_arg1982z00_9246;

								BgL_arg1982z00_9246 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1550z00_9245),
									BgL_arg1982z00_9246);
							}
							{	/* Cfa/cinfo2.sch 1003 */
								BgL_objectz00_bglt BgL_tmpz00_13435;

								BgL_tmpz00_13435 = ((BgL_objectz00_bglt) BgL_new1550z00_9245);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_13435, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1550z00_9245);
							BgL_auxz00_13430 = BgL_new1550z00_9245;
						}
						BgL_tmp1551z00_9243 = ((BgL_appz00_bglt) BgL_auxz00_13430);
					}
					BgL_wide1552z00_9244 =
						((BgL_structzd2setz12zd2appz12_bglt) BOBJECT(GC_MALLOC(sizeof(struct
									BgL_structzd2setz12zd2appz12_bgl))));
					{	/* Cfa/cinfo2.sch 1003 */
						obj_t BgL_auxz00_13443;
						BgL_objectz00_bglt BgL_tmpz00_13441;

						BgL_auxz00_13443 = ((obj_t) BgL_wide1552z00_9244);
						BgL_tmpz00_13441 = ((BgL_objectz00_bglt) BgL_tmp1551z00_9243);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_13441, BgL_auxz00_13443);
					}
					((BgL_objectz00_bglt) BgL_tmp1551z00_9243);
					{	/* Cfa/cinfo2.sch 1003 */
						long BgL_arg1981z00_9247;

						BgL_arg1981z00_9247 =
							BGL_CLASS_NUM(BGl_structzd2setz12zd2appz12zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1551z00_9243), BgL_arg1981z00_9247);
					}
					BgL_new1553z00_9242 = ((BgL_appz00_bglt) BgL_tmp1551z00_9243);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1553z00_9242)))->BgL_locz00) =
					((obj_t) BgL_loc1471z00_784), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1553z00_9242)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1472z00_785), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1553z00_9242)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1473zd2_786), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1553z00_9242)))->BgL_keyz00) =
					((obj_t) BgL_key1474z00_787), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1553z00_9242)))->
						BgL_funz00) = ((BgL_varz00_bglt) BgL_fun1475z00_788), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1553z00_9242)))->
						BgL_argsz00) = ((obj_t) BgL_args1476z00_789), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1553z00_9242)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1477z00_790), BUNSPEC);
				{
					BgL_structzd2setz12zd2appz12_bglt BgL_auxz00_13465;

					{
						obj_t BgL_auxz00_13466;

						{	/* Cfa/cinfo2.sch 1003 */
							BgL_objectz00_bglt BgL_tmpz00_13467;

							BgL_tmpz00_13467 = ((BgL_objectz00_bglt) BgL_new1553z00_9242);
							BgL_auxz00_13466 = BGL_OBJECT_WIDENING(BgL_tmpz00_13467);
						}
						BgL_auxz00_13465 =
							((BgL_structzd2setz12zd2appz12_bglt) BgL_auxz00_13466);
					}
					((((BgL_structzd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_13465))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_approx1478z00_791), BUNSPEC);
				}
				return BgL_new1553z00_9242;
			}
		}

	}



/* &make-struct-set!-app */
	BgL_appz00_bglt BGl_z62makezd2structzd2setz12zd2appza2zzcfa_info2z00(obj_t
		BgL_envz00_8027, obj_t BgL_loc1471z00_8028, obj_t BgL_type1472z00_8029,
		obj_t BgL_sidezd2effect1473zd2_8030, obj_t BgL_key1474z00_8031,
		obj_t BgL_fun1475z00_8032, obj_t BgL_args1476z00_8033,
		obj_t BgL_stackable1477z00_8034, obj_t BgL_approx1478z00_8035)
	{
		{	/* Cfa/cinfo2.sch 1003 */
			return
				BGl_makezd2structzd2setz12zd2appzc0zzcfa_info2z00(BgL_loc1471z00_8028,
				((BgL_typez00_bglt) BgL_type1472z00_8029),
				BgL_sidezd2effect1473zd2_8030, BgL_key1474z00_8031,
				((BgL_varz00_bglt) BgL_fun1475z00_8032), BgL_args1476z00_8033,
				BgL_stackable1477z00_8034,
				((BgL_approxz00_bglt) BgL_approx1478z00_8035));
		}

	}



/* struct-set!-app? */
	BGL_EXPORTED_DEF bool_t BGl_structzd2setz12zd2appzf3ze1zzcfa_info2z00(obj_t
		BgL_objz00_792)
	{
		{	/* Cfa/cinfo2.sch 1004 */
			{	/* Cfa/cinfo2.sch 1004 */
				obj_t BgL_classz00_9248;

				BgL_classz00_9248 = BGl_structzd2setz12zd2appz12zzcfa_info2z00;
				if (BGL_OBJECTP(BgL_objz00_792))
					{	/* Cfa/cinfo2.sch 1004 */
						BgL_objectz00_bglt BgL_arg1801z00_9249;

						BgL_arg1801z00_9249 = (BgL_objectz00_bglt) (BgL_objz00_792);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* Cfa/cinfo2.sch 1004 */
								long BgL_idxz00_9250;

								BgL_idxz00_9250 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_9249);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_9250 + 4L)) == BgL_classz00_9248);
							}
						else
							{	/* Cfa/cinfo2.sch 1004 */
								bool_t BgL_res2855z00_9253;

								{	/* Cfa/cinfo2.sch 1004 */
									obj_t BgL_oclassz00_9254;

									{	/* Cfa/cinfo2.sch 1004 */
										long BgL_arg1808z00_9255;

										{	/* Cfa/cinfo2.sch 1004 */
											long BgL_arg1809z00_9256;

											BgL_arg1809z00_9256 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_9249);
											BgL_arg1808z00_9255 = (BgL_arg1809z00_9256 - OBJECT_TYPE);
										}
										BgL_oclassz00_9254 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_9255);
									}
									{	/* Cfa/cinfo2.sch 1004 */
										bool_t BgL__ortest_1115z00_9257;

										BgL__ortest_1115z00_9257 =
											(BgL_classz00_9248 == BgL_oclassz00_9254);
										if (BgL__ortest_1115z00_9257)
											{	/* Cfa/cinfo2.sch 1004 */
												BgL_res2855z00_9253 = BgL__ortest_1115z00_9257;
											}
										else
											{	/* Cfa/cinfo2.sch 1004 */
												long BgL_odepthz00_9258;

												BgL_odepthz00_9258 =
													BGL_CLASS_DEPTH(BgL_oclassz00_9254);
												if ((4L < BgL_odepthz00_9258))
													{	/* Cfa/cinfo2.sch 1004 */
														obj_t BgL_arg1797z00_9259;

														BgL_arg1797z00_9259 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_9254, 4L);
														BgL_res2855z00_9253 =
															(BgL_arg1797z00_9259 == BgL_classz00_9248);
													}
												else
													{	/* Cfa/cinfo2.sch 1004 */
														BgL_res2855z00_9253 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2855z00_9253;
							}
					}
				else
					{	/* Cfa/cinfo2.sch 1004 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &struct-set!-app? */
	obj_t BGl_z62structzd2setz12zd2appzf3z83zzcfa_info2z00(obj_t BgL_envz00_8036,
		obj_t BgL_objz00_8037)
	{
		{	/* Cfa/cinfo2.sch 1004 */
			return
				BBOOL(BGl_structzd2setz12zd2appzf3ze1zzcfa_info2z00(BgL_objz00_8037));
		}

	}



/* struct-set!-app-nil */
	BGL_EXPORTED_DEF BgL_appz00_bglt
		BGl_structzd2setz12zd2appzd2nilzc0zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.sch 1005 */
			{	/* Cfa/cinfo2.sch 1005 */
				obj_t BgL_classz00_6054;

				BgL_classz00_6054 = BGl_structzd2setz12zd2appz12zzcfa_info2z00;
				{	/* Cfa/cinfo2.sch 1005 */
					obj_t BgL__ortest_1117z00_6055;

					BgL__ortest_1117z00_6055 = BGL_CLASS_NIL(BgL_classz00_6054);
					if (CBOOL(BgL__ortest_1117z00_6055))
						{	/* Cfa/cinfo2.sch 1005 */
							return ((BgL_appz00_bglt) BgL__ortest_1117z00_6055);
						}
					else
						{	/* Cfa/cinfo2.sch 1005 */
							return
								((BgL_appz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_6054));
						}
				}
			}
		}

	}



/* &struct-set!-app-nil */
	BgL_appz00_bglt BGl_z62structzd2setz12zd2appzd2nilza2zzcfa_info2z00(obj_t
		BgL_envz00_8038)
	{
		{	/* Cfa/cinfo2.sch 1005 */
			return BGl_structzd2setz12zd2appzd2nilzc0zzcfa_info2z00();
		}

	}



/* struct-set!-app-approx */
	BGL_EXPORTED_DEF BgL_approxz00_bglt
		BGl_structzd2setz12zd2appzd2approxzc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_793)
	{
		{	/* Cfa/cinfo2.sch 1006 */
			{
				BgL_structzd2setz12zd2appz12_bglt BgL_auxz00_13504;

				{
					obj_t BgL_auxz00_13505;

					{	/* Cfa/cinfo2.sch 1006 */
						BgL_objectz00_bglt BgL_tmpz00_13506;

						BgL_tmpz00_13506 = ((BgL_objectz00_bglt) BgL_oz00_793);
						BgL_auxz00_13505 = BGL_OBJECT_WIDENING(BgL_tmpz00_13506);
					}
					BgL_auxz00_13504 =
						((BgL_structzd2setz12zd2appz12_bglt) BgL_auxz00_13505);
				}
				return
					(((BgL_structzd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_13504))->
					BgL_approxz00);
			}
		}

	}



/* &struct-set!-app-approx */
	BgL_approxz00_bglt
		BGl_z62structzd2setz12zd2appzd2approxza2zzcfa_info2z00(obj_t
		BgL_envz00_8039, obj_t BgL_oz00_8040)
	{
		{	/* Cfa/cinfo2.sch 1006 */
			return
				BGl_structzd2setz12zd2appzd2approxzc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8040));
		}

	}



/* struct-set!-app-stackable */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2setz12zd2appzd2stackablezc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_796)
	{
		{	/* Cfa/cinfo2.sch 1008 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_796)))->BgL_stackablez00);
		}

	}



/* &struct-set!-app-stackable */
	obj_t BGl_z62structzd2setz12zd2appzd2stackableza2zzcfa_info2z00(obj_t
		BgL_envz00_8041, obj_t BgL_oz00_8042)
	{
		{	/* Cfa/cinfo2.sch 1008 */
			return
				BGl_structzd2setz12zd2appzd2stackablezc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8042));
		}

	}



/* struct-set!-app-stackable-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2setz12zd2appzd2stackablezd2setz12z00zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_797, obj_t BgL_vz00_798)
	{
		{	/* Cfa/cinfo2.sch 1009 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_797)))->BgL_stackablez00) =
				((obj_t) BgL_vz00_798), BUNSPEC);
		}

	}



/* &struct-set!-app-stackable-set! */
	obj_t BGl_z62structzd2setz12zd2appzd2stackablezd2setz12z62zzcfa_info2z00(obj_t
		BgL_envz00_8043, obj_t BgL_oz00_8044, obj_t BgL_vz00_8045)
	{
		{	/* Cfa/cinfo2.sch 1009 */
			return
				BGl_structzd2setz12zd2appzd2stackablezd2setz12z00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8044), BgL_vz00_8045);
		}

	}



/* struct-set!-app-args */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2setz12zd2appzd2argszc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_799)
	{
		{	/* Cfa/cinfo2.sch 1010 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_799)))->BgL_argsz00);
		}

	}



/* &struct-set!-app-args */
	obj_t BGl_z62structzd2setz12zd2appzd2argsza2zzcfa_info2z00(obj_t
		BgL_envz00_8046, obj_t BgL_oz00_8047)
	{
		{	/* Cfa/cinfo2.sch 1010 */
			return
				BGl_structzd2setz12zd2appzd2argszc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8047));
		}

	}



/* struct-set!-app-args-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2setz12zd2appzd2argszd2setz12z00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_800, obj_t BgL_vz00_801)
	{
		{	/* Cfa/cinfo2.sch 1011 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_800)))->BgL_argsz00) =
				((obj_t) BgL_vz00_801), BUNSPEC);
		}

	}



/* &struct-set!-app-args-set! */
	obj_t BGl_z62structzd2setz12zd2appzd2argszd2setz12z62zzcfa_info2z00(obj_t
		BgL_envz00_8048, obj_t BgL_oz00_8049, obj_t BgL_vz00_8050)
	{
		{	/* Cfa/cinfo2.sch 1011 */
			return
				BGl_structzd2setz12zd2appzd2argszd2setz12z00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8049), BgL_vz00_8050);
		}

	}



/* struct-set!-app-fun */
	BGL_EXPORTED_DEF BgL_varz00_bglt
		BGl_structzd2setz12zd2appzd2funzc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_802)
	{
		{	/* Cfa/cinfo2.sch 1012 */
			return
				(((BgL_appz00_bglt) COBJECT(
						((BgL_appz00_bglt) BgL_oz00_802)))->BgL_funz00);
		}

	}



/* &struct-set!-app-fun */
	BgL_varz00_bglt BGl_z62structzd2setz12zd2appzd2funza2zzcfa_info2z00(obj_t
		BgL_envz00_8051, obj_t BgL_oz00_8052)
	{
		{	/* Cfa/cinfo2.sch 1012 */
			return
				BGl_structzd2setz12zd2appzd2funzc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8052));
		}

	}



/* struct-set!-app-fun-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2setz12zd2appzd2funzd2setz12z00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_803, BgL_varz00_bglt BgL_vz00_804)
	{
		{	/* Cfa/cinfo2.sch 1013 */
			return
				((((BgL_appz00_bglt) COBJECT(
							((BgL_appz00_bglt) BgL_oz00_803)))->BgL_funz00) =
				((BgL_varz00_bglt) BgL_vz00_804), BUNSPEC);
		}

	}



/* &struct-set!-app-fun-set! */
	obj_t BGl_z62structzd2setz12zd2appzd2funzd2setz12z62zzcfa_info2z00(obj_t
		BgL_envz00_8053, obj_t BgL_oz00_8054, obj_t BgL_vz00_8055)
	{
		{	/* Cfa/cinfo2.sch 1013 */
			return
				BGl_structzd2setz12zd2appzd2funzd2setz12z00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8054), ((BgL_varz00_bglt) BgL_vz00_8055));
		}

	}



/* struct-set!-app-key */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2setz12zd2appzd2keyzc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_805)
	{
		{	/* Cfa/cinfo2.sch 1014 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_805)))->BgL_keyz00);
		}

	}



/* &struct-set!-app-key */
	obj_t BGl_z62structzd2setz12zd2appzd2keyza2zzcfa_info2z00(obj_t
		BgL_envz00_8056, obj_t BgL_oz00_8057)
	{
		{	/* Cfa/cinfo2.sch 1014 */
			return
				BGl_structzd2setz12zd2appzd2keyzc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8057));
		}

	}



/* struct-set!-app-key-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2setz12zd2appzd2keyzd2setz12z00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_806, obj_t BgL_vz00_807)
	{
		{	/* Cfa/cinfo2.sch 1015 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_806)))->BgL_keyz00) =
				((obj_t) BgL_vz00_807), BUNSPEC);
		}

	}



/* &struct-set!-app-key-set! */
	obj_t BGl_z62structzd2setz12zd2appzd2keyzd2setz12z62zzcfa_info2z00(obj_t
		BgL_envz00_8058, obj_t BgL_oz00_8059, obj_t BgL_vz00_8060)
	{
		{	/* Cfa/cinfo2.sch 1015 */
			return
				BGl_structzd2setz12zd2appzd2keyzd2setz12z00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8059), BgL_vz00_8060);
		}

	}



/* struct-set!-app-side-effect */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2setz12zd2appzd2sidezd2effectz12zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_808)
	{
		{	/* Cfa/cinfo2.sch 1016 */
			return
				(((BgL_nodezf2effectzf2_bglt) COBJECT(
						((BgL_nodezf2effectzf2_bglt) BgL_oz00_808)))->BgL_sidezd2effectzd2);
		}

	}



/* &struct-set!-app-side-effect */
	obj_t BGl_z62structzd2setz12zd2appzd2sidezd2effectz70zzcfa_info2z00(obj_t
		BgL_envz00_8061, obj_t BgL_oz00_8062)
	{
		{	/* Cfa/cinfo2.sch 1016 */
			return
				BGl_structzd2setz12zd2appzd2sidezd2effectz12zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8062));
		}

	}



/* struct-set!-app-side-effect-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2setz12zd2appzd2sidezd2effectzd2setz12zd2zzcfa_info2z00
		(BgL_appz00_bglt BgL_oz00_809, obj_t BgL_vz00_810)
	{
		{	/* Cfa/cinfo2.sch 1017 */
			return
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
							((BgL_nodezf2effectzf2_bglt) BgL_oz00_809)))->
					BgL_sidezd2effectzd2) = ((obj_t) BgL_vz00_810), BUNSPEC);
		}

	}



/* &struct-set!-app-side-effect-set! */
	obj_t
		BGl_z62structzd2setz12zd2appzd2sidezd2effectzd2setz12zb0zzcfa_info2z00(obj_t
		BgL_envz00_8063, obj_t BgL_oz00_8064, obj_t BgL_vz00_8065)
	{
		{	/* Cfa/cinfo2.sch 1017 */
			return
				BGl_structzd2setz12zd2appzd2sidezd2effectzd2setz12zd2zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8064), BgL_vz00_8065);
		}

	}



/* struct-set!-app-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_structzd2setz12zd2appzd2typezc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_811)
	{
		{	/* Cfa/cinfo2.sch 1018 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_811)))->BgL_typez00);
		}

	}



/* &struct-set!-app-type */
	BgL_typez00_bglt BGl_z62structzd2setz12zd2appzd2typeza2zzcfa_info2z00(obj_t
		BgL_envz00_8066, obj_t BgL_oz00_8067)
	{
		{	/* Cfa/cinfo2.sch 1018 */
			return
				BGl_structzd2setz12zd2appzd2typezc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8067));
		}

	}



/* struct-set!-app-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2setz12zd2appzd2typezd2setz12z00zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_812, BgL_typez00_bglt BgL_vz00_813)
	{
		{	/* Cfa/cinfo2.sch 1019 */
			return
				((((BgL_nodez00_bglt) COBJECT(
							((BgL_nodez00_bglt) BgL_oz00_812)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_813), BUNSPEC);
		}

	}



/* &struct-set!-app-type-set! */
	obj_t BGl_z62structzd2setz12zd2appzd2typezd2setz12z62zzcfa_info2z00(obj_t
		BgL_envz00_8068, obj_t BgL_oz00_8069, obj_t BgL_vz00_8070)
	{
		{	/* Cfa/cinfo2.sch 1019 */
			return
				BGl_structzd2setz12zd2appzd2typezd2setz12z00zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8069), ((BgL_typez00_bglt) BgL_vz00_8070));
		}

	}



/* struct-set!-app-loc */
	BGL_EXPORTED_DEF obj_t
		BGl_structzd2setz12zd2appzd2loczc0zzcfa_info2z00(BgL_appz00_bglt
		BgL_oz00_814)
	{
		{	/* Cfa/cinfo2.sch 1020 */
			return
				(((BgL_nodez00_bglt) COBJECT(
						((BgL_nodez00_bglt) BgL_oz00_814)))->BgL_locz00);
		}

	}



/* &struct-set!-app-loc */
	obj_t BGl_z62structzd2setz12zd2appzd2locza2zzcfa_info2z00(obj_t
		BgL_envz00_8071, obj_t BgL_oz00_8072)
	{
		{	/* Cfa/cinfo2.sch 1020 */
			return
				BGl_structzd2setz12zd2appzd2loczc0zzcfa_info2z00(
				((BgL_appz00_bglt) BgL_oz00_8072));
		}

	}



/* object-init */
	obj_t BGl_objectzd2initzd2zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.scm 16 */
			{	/* Cfa/cinfo2.scm 27 */
				obj_t BgL_arg1987z00_3193;
				obj_t BgL_arg1988z00_3194;

				{	/* Cfa/cinfo2.scm 27 */
					obj_t BgL_v1892z00_3223;

					BgL_v1892z00_3223 = create_vector(1L);
					{	/* Cfa/cinfo2.scm 27 */
						obj_t BgL_arg1999z00_3224;

						BgL_arg1999z00_3224 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(0L),
							BGl_proc2858z00zzcfa_info2z00, BGl_proc2857z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE, CNST_TABLE_REF(1L));
						VECTOR_SET(BgL_v1892z00_3223, 0L, BgL_arg1999z00_3224);
					}
					BgL_arg1987z00_3193 = BgL_v1892z00_3223;
				}
				{	/* Cfa/cinfo2.scm 27 */
					obj_t BgL_v1893z00_3234;

					BgL_v1893z00_3234 = create_vector(0L);
					BgL_arg1988z00_3194 = BgL_v1893z00_3234;
				}
				BGl_prezd2arithmeticzd2appz00zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(2L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 60464L,
					BGl_proc2862z00zzcfa_info2z00, BGl_proc2861z00zzcfa_info2z00, BFALSE,
					BGl_proc2860z00zzcfa_info2z00, BGl_proc2859z00zzcfa_info2z00,
					BgL_arg1987z00_3193, BgL_arg1988z00_3194);
			}
			{	/* Cfa/cinfo2.scm 29 */
				obj_t BgL_arg2009z00_3243;
				obj_t BgL_arg2010z00_3244;

				{	/* Cfa/cinfo2.scm 29 */
					obj_t BgL_v1894z00_3274;

					BgL_v1894z00_3274 = create_vector(2L);
					{	/* Cfa/cinfo2.scm 29 */
						obj_t BgL_arg2021z00_3275;

						BgL_arg2021z00_3275 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(4L),
							BGl_proc2864z00zzcfa_info2z00, BGl_proc2863z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE,
							BGl_approxz00zzcfa_infoz00);
						VECTOR_SET(BgL_v1894z00_3274, 0L, BgL_arg2021z00_3275);
					}
					{	/* Cfa/cinfo2.scm 29 */
						obj_t BgL_arg2028z00_3285;

						BgL_arg2028z00_3285 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(0L),
							BGl_proc2866z00zzcfa_info2z00, BGl_proc2865z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE, CNST_TABLE_REF(1L));
						VECTOR_SET(BgL_v1894z00_3274, 1L, BgL_arg2028z00_3285);
					}
					BgL_arg2009z00_3243 = BgL_v1894z00_3274;
				}
				{	/* Cfa/cinfo2.scm 29 */
					obj_t BgL_v1895z00_3295;

					BgL_v1895z00_3295 = create_vector(0L);
					BgL_arg2010z00_3244 = BgL_v1895z00_3295;
				}
				BGl_arithmeticzd2appzd2zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(5L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 10101L,
					BGl_proc2870z00zzcfa_info2z00, BGl_proc2869z00zzcfa_info2z00, BFALSE,
					BGl_proc2868z00zzcfa_info2z00, BGl_proc2867z00zzcfa_info2z00,
					BgL_arg2009z00_3243, BgL_arg2010z00_3244);
			}
			{	/* Cfa/cinfo2.scm 34 */
				obj_t BgL_arg2039z00_3304;
				obj_t BgL_arg2040z00_3305;

				{	/* Cfa/cinfo2.scm 34 */
					obj_t BgL_v1896z00_3334;

					BgL_v1896z00_3334 = create_vector(1L);
					{	/* Cfa/cinfo2.scm 34 */
						obj_t BgL_arg2053z00_3335;

						BgL_arg2053z00_3335 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(6L),
							BGl_proc2872z00zzcfa_info2z00, BGl_proc2871z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE,
							BGl_variablez00zzast_varz00);
						VECTOR_SET(BgL_v1896z00_3334, 0L, BgL_arg2053z00_3335);
					}
					BgL_arg2039z00_3304 = BgL_v1896z00_3334;
				}
				{	/* Cfa/cinfo2.scm 34 */
					obj_t BgL_v1897z00_3345;

					BgL_v1897z00_3345 = create_vector(0L);
					BgL_arg2040z00_3305 = BgL_v1897z00_3345;
				}
				BGl_prezd2makezd2procedurezd2appzd2zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(7L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 38750L,
					BGl_proc2876z00zzcfa_info2z00, BGl_proc2875z00zzcfa_info2z00, BFALSE,
					BGl_proc2874z00zzcfa_info2z00, BGl_proc2873z00zzcfa_info2z00,
					BgL_arg2039z00_3304, BgL_arg2040z00_3305);
			}
			{	/* Cfa/cinfo2.scm 37 */
				obj_t BgL_arg2062z00_3354;
				obj_t BgL_arg2063z00_3355;

				{	/* Cfa/cinfo2.scm 37 */
					obj_t BgL_v1898z00_3383;

					BgL_v1898z00_3383 = create_vector(0L);
					BgL_arg2062z00_3354 = BgL_v1898z00_3383;
				}
				{	/* Cfa/cinfo2.scm 37 */
					obj_t BgL_v1899z00_3384;

					BgL_v1899z00_3384 = create_vector(0L);
					BgL_arg2063z00_3355 = BgL_v1899z00_3384;
				}
				BGl_prezd2procedurezd2refzd2appzd2zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(8L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 42731L,
					BGl_proc2880z00zzcfa_info2z00, BGl_proc2879z00zzcfa_info2z00, BFALSE,
					BGl_proc2878z00zzcfa_info2z00, BGl_proc2877z00zzcfa_info2z00,
					BgL_arg2062z00_3354, BgL_arg2063z00_3355);
			}
			{	/* Cfa/cinfo2.scm 38 */
				obj_t BgL_arg2080z00_3393;
				obj_t BgL_arg2081z00_3394;

				{	/* Cfa/cinfo2.scm 38 */
					obj_t BgL_v1900z00_3422;

					BgL_v1900z00_3422 = create_vector(0L);
					BgL_arg2080z00_3393 = BgL_v1900z00_3422;
				}
				{	/* Cfa/cinfo2.scm 38 */
					obj_t BgL_v1901z00_3423;

					BgL_v1901z00_3423 = create_vector(0L);
					BgL_arg2081z00_3394 = BgL_v1901z00_3423;
				}
				BGl_prezd2procedurezd2setz12zd2appzc0zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(9L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 45211L,
					BGl_proc2884z00zzcfa_info2z00, BGl_proc2883z00zzcfa_info2z00, BFALSE,
					BGl_proc2882z00zzcfa_info2z00, BGl_proc2881z00zzcfa_info2z00,
					BgL_arg2080z00_3393, BgL_arg2081z00_3394);
			}
			{	/* Cfa/cinfo2.scm 40 */
				obj_t BgL_arg2098z00_3432;
				obj_t BgL_arg2099z00_3433;

				{	/* Cfa/cinfo2.scm 40 */
					obj_t BgL_v1902z00_3469;

					BgL_v1902z00_3469 = create_vector(8L);
					{	/* Cfa/cinfo2.scm 40 */
						obj_t BgL_arg2110z00_3470;

						BgL_arg2110z00_3470 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(4L),
							BGl_proc2886z00zzcfa_info2z00, BGl_proc2885z00zzcfa_info2z00,
							((bool_t) 0), ((bool_t) 0), BFALSE, BFALSE,
							BGl_approxz00zzcfa_infoz00);
						VECTOR_SET(BgL_v1902z00_3469, 0L, BgL_arg2110z00_3470);
					}
					{	/* Cfa/cinfo2.scm 40 */
						obj_t BgL_arg2115z00_3480;

						BgL_arg2115z00_3480 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(10L),
							BGl_proc2888z00zzcfa_info2z00, BGl_proc2887z00zzcfa_info2z00,
							((bool_t) 0), ((bool_t) 0), BFALSE, BFALSE, CNST_TABLE_REF(11L));
						VECTOR_SET(BgL_v1902z00_3469, 1L, BgL_arg2115z00_3480);
					}
					{	/* Cfa/cinfo2.scm 40 */
						obj_t BgL_arg2120z00_3490;

						BgL_arg2120z00_3490 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(12L),
							BGl_proc2891z00zzcfa_info2z00, BGl_proc2890z00zzcfa_info2z00,
							((bool_t) 0), ((bool_t) 0), BFALSE, BGl_proc2889z00zzcfa_info2z00,
							CNST_TABLE_REF(13L));
						VECTOR_SET(BgL_v1902z00_3469, 2L, BgL_arg2120z00_3490);
					}
					{	/* Cfa/cinfo2.scm 40 */
						obj_t BgL_arg2128z00_3503;

						BgL_arg2128z00_3503 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(14L),
							BGl_proc2894z00zzcfa_info2z00, BGl_proc2893z00zzcfa_info2z00,
							((bool_t) 0), ((bool_t) 0), BFALSE, BGl_proc2892z00zzcfa_info2z00,
							CNST_TABLE_REF(15L));
						VECTOR_SET(BgL_v1902z00_3469, 3L, BgL_arg2128z00_3503);
					}
					{	/* Cfa/cinfo2.scm 40 */
						obj_t BgL_arg2135z00_3516;

						BgL_arg2135z00_3516 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(16L),
							BGl_proc2897z00zzcfa_info2z00, BGl_proc2896z00zzcfa_info2z00,
							((bool_t) 0), ((bool_t) 0), BFALSE, BGl_proc2895z00zzcfa_info2z00,
							CNST_TABLE_REF(15L));
						VECTOR_SET(BgL_v1902z00_3469, 4L, BgL_arg2135z00_3516);
					}
					{	/* Cfa/cinfo2.scm 40 */
						obj_t BgL_arg2142z00_3529;

						BgL_arg2142z00_3529 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(17L),
							BGl_proc2900z00zzcfa_info2z00, BGl_proc2899z00zzcfa_info2z00,
							((bool_t) 0), ((bool_t) 0), BFALSE, BGl_proc2898z00zzcfa_info2z00,
							CNST_TABLE_REF(15L));
						VECTOR_SET(BgL_v1902z00_3469, 5L, BgL_arg2142z00_3529);
					}
					{	/* Cfa/cinfo2.scm 40 */
						obj_t BgL_arg2149z00_3542;

						BgL_arg2149z00_3542 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(6L),
							BGl_proc2902z00zzcfa_info2z00, BGl_proc2901z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE,
							BGl_variablez00zzast_varz00);
						VECTOR_SET(BgL_v1902z00_3469, 6L, BgL_arg2149z00_3542);
					}
					{	/* Cfa/cinfo2.scm 40 */
						obj_t BgL_arg2154z00_3552;

						BgL_arg2154z00_3552 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(18L),
							BGl_proc2905z00zzcfa_info2z00, BGl_proc2904z00zzcfa_info2z00,
							((bool_t) 0), ((bool_t) 0), BFALSE, BGl_proc2903z00zzcfa_info2z00,
							CNST_TABLE_REF(19L));
						VECTOR_SET(BgL_v1902z00_3469, 7L, BgL_arg2154z00_3552);
					}
					BgL_arg2098z00_3432 = BgL_v1902z00_3469;
				}
				{	/* Cfa/cinfo2.scm 40 */
					obj_t BgL_v1903z00_3565;

					BgL_v1903z00_3565 = create_vector(0L);
					BgL_arg2099z00_3433 = BgL_v1903z00_3565;
				}
				BGl_makezd2procedurezd2appz00zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(20L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 5360L,
					BGl_proc2909z00zzcfa_info2z00, BGl_proc2908z00zzcfa_info2z00, BFALSE,
					BGl_proc2907z00zzcfa_info2z00, BGl_proc2906z00zzcfa_info2z00,
					BgL_arg2098z00_3432, BgL_arg2099z00_3433);
			}
			{	/* Cfa/cinfo2.scm 57 */
				obj_t BgL_arg2165z00_3574;
				obj_t BgL_arg2166z00_3575;

				{	/* Cfa/cinfo2.scm 57 */
					obj_t BgL_v1904z00_3604;

					BgL_v1904z00_3604 = create_vector(1L);
					{	/* Cfa/cinfo2.scm 57 */
						obj_t BgL_arg2177z00_3605;

						BgL_arg2177z00_3605 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(4L),
							BGl_proc2911z00zzcfa_info2z00, BGl_proc2910z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE,
							BGl_approxz00zzcfa_infoz00);
						VECTOR_SET(BgL_v1904z00_3604, 0L, BgL_arg2177z00_3605);
					}
					BgL_arg2165z00_3574 = BgL_v1904z00_3604;
				}
				{	/* Cfa/cinfo2.scm 57 */
					obj_t BgL_v1905z00_3615;

					BgL_v1905z00_3615 = create_vector(0L);
					BgL_arg2166z00_3575 = BgL_v1905z00_3615;
				}
				BGl_procedurezd2refzd2appz00zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(21L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 33398L,
					BGl_proc2915z00zzcfa_info2z00, BGl_proc2914z00zzcfa_info2z00, BFALSE,
					BGl_proc2913z00zzcfa_info2z00, BGl_proc2912z00zzcfa_info2z00,
					BgL_arg2165z00_3574, BgL_arg2166z00_3575);
			}
			{	/* Cfa/cinfo2.scm 59 */
				obj_t BgL_arg2186z00_3624;
				obj_t BgL_arg2187z00_3625;

				{	/* Cfa/cinfo2.scm 59 */
					obj_t BgL_v1906z00_3655;

					BgL_v1906z00_3655 = create_vector(2L);
					{	/* Cfa/cinfo2.scm 59 */
						obj_t BgL_arg2198z00_3656;

						BgL_arg2198z00_3656 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(4L),
							BGl_proc2917z00zzcfa_info2z00, BGl_proc2916z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE,
							BGl_approxz00zzcfa_infoz00);
						VECTOR_SET(BgL_v1906z00_3655, 0L, BgL_arg2198z00_3656);
					}
					{	/* Cfa/cinfo2.scm 59 */
						obj_t BgL_arg2204z00_3666;

						BgL_arg2204z00_3666 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(22L),
							BGl_proc2919z00zzcfa_info2z00, BGl_proc2918z00zzcfa_info2z00,
							((bool_t) 0), ((bool_t) 0), BFALSE, BFALSE, CNST_TABLE_REF(19L));
						VECTOR_SET(BgL_v1906z00_3655, 1L, BgL_arg2204z00_3666);
					}
					BgL_arg2186z00_3624 = BgL_v1906z00_3655;
				}
				{	/* Cfa/cinfo2.scm 59 */
					obj_t BgL_v1907z00_3676;

					BgL_v1907z00_3676 = create_vector(0L);
					BgL_arg2187z00_3625 = BgL_v1907z00_3676;
				}
				BGl_procedurezd2setz12zd2appz12zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(23L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 19358L,
					BGl_proc2923z00zzcfa_info2z00, BGl_proc2922z00zzcfa_info2z00, BFALSE,
					BGl_proc2921z00zzcfa_info2z00, BGl_proc2920z00zzcfa_info2z00,
					BgL_arg2186z00_3624, BgL_arg2187z00_3625);
			}
			{	/* Cfa/cinfo2.scm 64 */
				obj_t BgL_arg2213z00_3685;
				obj_t BgL_arg2214z00_3686;

				{	/* Cfa/cinfo2.scm 64 */
					obj_t BgL_v1908z00_3715;

					BgL_v1908z00_3715 = create_vector(1L);
					{	/* Cfa/cinfo2.scm 64 */
						obj_t BgL_arg2225z00_3716;

						BgL_arg2225z00_3716 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(6L),
							BGl_proc2925z00zzcfa_info2z00, BGl_proc2924z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE,
							BGl_variablez00zzast_varz00);
						VECTOR_SET(BgL_v1908z00_3715, 0L, BgL_arg2225z00_3716);
					}
					BgL_arg2213z00_3685 = BgL_v1908z00_3715;
				}
				{	/* Cfa/cinfo2.scm 64 */
					obj_t BgL_v1909z00_3726;

					BgL_v1909z00_3726 = create_vector(0L);
					BgL_arg2214z00_3686 = BgL_v1909z00_3726;
				}
				BGl_prezd2makezd2vectorzd2appzd2zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(24L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 41780L,
					BGl_proc2929z00zzcfa_info2z00, BGl_proc2928z00zzcfa_info2z00, BFALSE,
					BGl_proc2927z00zzcfa_info2z00, BGl_proc2926z00zzcfa_info2z00,
					BgL_arg2213z00_3685, BgL_arg2214z00_3686);
			}
			{	/* Cfa/cinfo2.scm 68 */
				obj_t BgL_arg2234z00_3735;
				obj_t BgL_arg2235z00_3736;

				{	/* Cfa/cinfo2.scm 68 */
					obj_t BgL_v1910z00_3771;

					BgL_v1910z00_3771 = create_vector(7L);
					{	/* Cfa/cinfo2.scm 68 */
						obj_t BgL_arg2246z00_3772;

						BgL_arg2246z00_3772 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(4L),
							BGl_proc2931z00zzcfa_info2z00, BGl_proc2930z00zzcfa_info2z00,
							((bool_t) 0), ((bool_t) 0), BFALSE, BFALSE,
							BGl_approxz00zzcfa_infoz00);
						VECTOR_SET(BgL_v1910z00_3771, 0L, BgL_arg2246z00_3772);
					}
					{	/* Cfa/cinfo2.scm 68 */
						obj_t BgL_arg2251z00_3782;

						BgL_arg2251z00_3782 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(25L),
							BGl_proc2933z00zzcfa_info2z00, BGl_proc2932z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE,
							BGl_approxz00zzcfa_infoz00);
						VECTOR_SET(BgL_v1910z00_3771, 1L, BgL_arg2251z00_3782);
					}
					{	/* Cfa/cinfo2.scm 68 */
						obj_t BgL_arg2256z00_3792;

						BgL_arg2256z00_3792 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(12L),
							BGl_proc2936z00zzcfa_info2z00, BGl_proc2935z00zzcfa_info2z00,
							((bool_t) 0), ((bool_t) 0), BFALSE, BGl_proc2934z00zzcfa_info2z00,
							CNST_TABLE_REF(13L));
						VECTOR_SET(BgL_v1910z00_3771, 2L, BgL_arg2256z00_3792);
					}
					{	/* Cfa/cinfo2.scm 68 */
						obj_t BgL_arg2263z00_3805;

						BgL_arg2263z00_3805 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(6L),
							BGl_proc2938z00zzcfa_info2z00, BGl_proc2937z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE,
							BGl_variablez00zzast_varz00);
						VECTOR_SET(BgL_v1910z00_3771, 3L, BgL_arg2263z00_3805);
					}
					{	/* Cfa/cinfo2.scm 68 */
						obj_t BgL_arg2268z00_3815;

						BgL_arg2268z00_3815 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(18L),
							BGl_proc2941z00zzcfa_info2z00, BGl_proc2940z00zzcfa_info2z00,
							((bool_t) 0), ((bool_t) 0), BFALSE, BGl_proc2939z00zzcfa_info2z00,
							CNST_TABLE_REF(19L));
						VECTOR_SET(BgL_v1910z00_3771, 4L, BgL_arg2268z00_3815);
					}
					{	/* Cfa/cinfo2.scm 68 */
						obj_t BgL_arg2275z00_3828;

						BgL_arg2275z00_3828 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(26L),
							BGl_proc2944z00zzcfa_info2z00, BGl_proc2943z00zzcfa_info2z00,
							((bool_t) 0), ((bool_t) 0), BFALSE, BGl_proc2942z00zzcfa_info2z00,
							CNST_TABLE_REF(15L));
						VECTOR_SET(BgL_v1910z00_3771, 5L, BgL_arg2275z00_3828);
					}
					{	/* Cfa/cinfo2.scm 68 */
						obj_t BgL_arg2283z00_3841;

						BgL_arg2283z00_3841 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(27L),
							BGl_proc2947z00zzcfa_info2z00, BGl_proc2946z00zzcfa_info2z00,
							((bool_t) 0), ((bool_t) 0), BFALSE, BGl_proc2945z00zzcfa_info2z00,
							CNST_TABLE_REF(15L));
						VECTOR_SET(BgL_v1910z00_3771, 6L, BgL_arg2283z00_3841);
					}
					BgL_arg2234z00_3735 = BgL_v1910z00_3771;
				}
				{	/* Cfa/cinfo2.scm 68 */
					obj_t BgL_v1911z00_3854;

					BgL_v1911z00_3854 = create_vector(0L);
					BgL_arg2235z00_3736 = BgL_v1911z00_3854;
				}
				BGl_makezd2vectorzd2appz00zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(28L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 52729L,
					BGl_proc2951z00zzcfa_info2z00, BGl_proc2950z00zzcfa_info2z00, BFALSE,
					BGl_proc2949z00zzcfa_info2z00, BGl_proc2948z00zzcfa_info2z00,
					BgL_arg2234z00_3735, BgL_arg2235z00_3736);
			}
			{	/* Cfa/cinfo2.scm 93 */
				obj_t BgL_arg2294z00_3863;
				obj_t BgL_arg2295z00_3864;

				{	/* Cfa/cinfo2.scm 93 */
					obj_t BgL_v1912z00_3893;

					BgL_v1912z00_3893 = create_vector(1L);
					{	/* Cfa/cinfo2.scm 93 */
						obj_t BgL_arg2307z00_3894;

						BgL_arg2307z00_3894 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(6L),
							BGl_proc2953z00zzcfa_info2z00, BGl_proc2952z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE,
							BGl_variablez00zzast_varz00);
						VECTOR_SET(BgL_v1912z00_3893, 0L, BgL_arg2307z00_3894);
					}
					BgL_arg2294z00_3863 = BgL_v1912z00_3893;
				}
				{	/* Cfa/cinfo2.scm 93 */
					obj_t BgL_v1913z00_3904;

					BgL_v1913z00_3904 = create_vector(0L);
					BgL_arg2295z00_3864 = BgL_v1913z00_3904;
				}
				BGl_prezd2conszd2appz00zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(29L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 63039L,
					BGl_proc2957z00zzcfa_info2z00, BGl_proc2956z00zzcfa_info2z00, BFALSE,
					BGl_proc2955z00zzcfa_info2z00, BGl_proc2954z00zzcfa_info2z00,
					BgL_arg2294z00_3863, BgL_arg2295z00_3864);
			}
			{	/* Cfa/cinfo2.scm 96 */
				obj_t BgL_arg2316z00_3913;
				obj_t BgL_arg2317z00_3914;

				{	/* Cfa/cinfo2.scm 96 */
					obj_t BgL_v1914z00_3943;

					BgL_v1914z00_3943 = create_vector(1L);
					{	/* Cfa/cinfo2.scm 96 */
						obj_t BgL_arg2330z00_3944;

						BgL_arg2330z00_3944 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(30L),
							BGl_proc2959z00zzcfa_info2z00, BGl_proc2958z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE, CNST_TABLE_REF(31L));
						VECTOR_SET(BgL_v1914z00_3943, 0L, BgL_arg2330z00_3944);
					}
					BgL_arg2316z00_3913 = BgL_v1914z00_3943;
				}
				{	/* Cfa/cinfo2.scm 96 */
					obj_t BgL_v1915z00_3954;

					BgL_v1915z00_3954 = create_vector(0L);
					BgL_arg2317z00_3914 = BgL_v1915z00_3954;
				}
				BGl_prezd2conszd2refzd2appzd2zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(32L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 63293L,
					BGl_proc2963z00zzcfa_info2z00, BGl_proc2962z00zzcfa_info2z00, BFALSE,
					BGl_proc2961z00zzcfa_info2z00, BGl_proc2960z00zzcfa_info2z00,
					BgL_arg2316z00_3913, BgL_arg2317z00_3914);
			}
			{	/* Cfa/cinfo2.scm 98 */
				obj_t BgL_arg2339z00_3963;
				obj_t BgL_arg2340z00_3964;

				{	/* Cfa/cinfo2.scm 98 */
					obj_t BgL_v1916z00_3993;

					BgL_v1916z00_3993 = create_vector(1L);
					{	/* Cfa/cinfo2.scm 98 */
						obj_t BgL_arg2353z00_3994;

						BgL_arg2353z00_3994 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(30L),
							BGl_proc2965z00zzcfa_info2z00, BGl_proc2964z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE, CNST_TABLE_REF(31L));
						VECTOR_SET(BgL_v1916z00_3993, 0L, BgL_arg2353z00_3994);
					}
					BgL_arg2339z00_3963 = BgL_v1916z00_3993;
				}
				{	/* Cfa/cinfo2.scm 98 */
					obj_t BgL_v1917z00_4004;

					BgL_v1917z00_4004 = create_vector(0L);
					BgL_arg2340z00_3964 = BgL_v1917z00_4004;
				}
				BGl_prezd2conszd2setz12zd2appzc0zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(33L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 16909L,
					BGl_proc2969z00zzcfa_info2z00, BGl_proc2968z00zzcfa_info2z00, BFALSE,
					BGl_proc2967z00zzcfa_info2z00, BGl_proc2966z00zzcfa_info2z00,
					BgL_arg2339z00_3963, BgL_arg2340z00_3964);
			}
			{	/* Cfa/cinfo2.scm 101 */
				obj_t BgL_arg2363z00_4013;
				obj_t BgL_arg2364z00_4014;

				{	/* Cfa/cinfo2.scm 101 */
					obj_t BgL_v1918z00_4048;

					BgL_v1918z00_4048 = create_vector(6L);
					{	/* Cfa/cinfo2.scm 101 */
						obj_t BgL_arg2377z00_4049;

						BgL_arg2377z00_4049 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(4L),
							BGl_proc2971z00zzcfa_info2z00, BGl_proc2970z00zzcfa_info2z00,
							((bool_t) 0), ((bool_t) 0), BFALSE, BFALSE,
							BGl_approxz00zzcfa_infoz00);
						VECTOR_SET(BgL_v1918z00_4048, 0L, BgL_arg2377z00_4049);
					}
					{	/* Cfa/cinfo2.scm 101 */
						obj_t BgL_arg2383z00_4059;

						BgL_arg2383z00_4059 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(34L),
							BGl_proc2973z00zzcfa_info2z00, BGl_proc2972z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE, CNST_TABLE_REF(1L));
						VECTOR_SET(BgL_v1918z00_4048, 1L, BgL_arg2383z00_4059);
					}
					{	/* Cfa/cinfo2.scm 101 */
						obj_t BgL_arg2388z00_4069;

						BgL_arg2388z00_4069 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(12L),
							BGl_proc2976z00zzcfa_info2z00, BGl_proc2975z00zzcfa_info2z00,
							((bool_t) 0), ((bool_t) 0), BFALSE, BGl_proc2974z00zzcfa_info2z00,
							CNST_TABLE_REF(13L));
						VECTOR_SET(BgL_v1918z00_4048, 2L, BgL_arg2388z00_4069);
					}
					{	/* Cfa/cinfo2.scm 101 */
						obj_t BgL_arg2397z00_4082;

						BgL_arg2397z00_4082 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(6L),
							BGl_proc2978z00zzcfa_info2z00, BGl_proc2977z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE,
							BGl_variablez00zzast_varz00);
						VECTOR_SET(BgL_v1918z00_4048, 3L, BgL_arg2397z00_4082);
					}
					{	/* Cfa/cinfo2.scm 101 */
						obj_t BgL_arg2402z00_4092;

						BgL_arg2402z00_4092 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(18L),
							BGl_proc2981z00zzcfa_info2z00, BGl_proc2980z00zzcfa_info2z00,
							((bool_t) 0), ((bool_t) 0), BFALSE, BGl_proc2979z00zzcfa_info2z00,
							CNST_TABLE_REF(19L));
						VECTOR_SET(BgL_v1918z00_4048, 4L, BgL_arg2402z00_4092);
					}
					{	/* Cfa/cinfo2.scm 101 */
						obj_t BgL_arg2409z00_4105;

						BgL_arg2409z00_4105 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(26L),
							BGl_proc2984z00zzcfa_info2z00, BGl_proc2983z00zzcfa_info2z00,
							((bool_t) 0), ((bool_t) 0), BFALSE, BGl_proc2982z00zzcfa_info2z00,
							CNST_TABLE_REF(15L));
						VECTOR_SET(BgL_v1918z00_4048, 5L, BgL_arg2409z00_4105);
					}
					BgL_arg2363z00_4013 = BgL_v1918z00_4048;
				}
				{	/* Cfa/cinfo2.scm 101 */
					obj_t BgL_v1919z00_4118;

					BgL_v1919z00_4118 = create_vector(0L);
					BgL_arg2364z00_4014 = BgL_v1919z00_4118;
				}
				BGl_conszd2appzd2zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(35L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 11591L,
					BGl_proc2988z00zzcfa_info2z00, BGl_proc2987z00zzcfa_info2z00, BFALSE,
					BGl_proc2986z00zzcfa_info2z00, BGl_proc2985z00zzcfa_info2z00,
					BgL_arg2363z00_4013, BgL_arg2364z00_4014);
			}
			{	/* Cfa/cinfo2.scm 122 */
				obj_t BgL_arg2421z00_4127;
				obj_t BgL_arg2422z00_4128;

				{	/* Cfa/cinfo2.scm 122 */
					obj_t BgL_v1920z00_4158;

					BgL_v1920z00_4158 = create_vector(2L);
					{	/* Cfa/cinfo2.scm 122 */
						obj_t BgL_arg2436z00_4159;

						BgL_arg2436z00_4159 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(4L),
							BGl_proc2990z00zzcfa_info2z00, BGl_proc2989z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE,
							BGl_approxz00zzcfa_infoz00);
						VECTOR_SET(BgL_v1920z00_4158, 0L, BgL_arg2436z00_4159);
					}
					{	/* Cfa/cinfo2.scm 122 */
						obj_t BgL_arg2443z00_4169;

						BgL_arg2443z00_4169 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(30L),
							BGl_proc2992z00zzcfa_info2z00, BGl_proc2991z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE, CNST_TABLE_REF(31L));
						VECTOR_SET(BgL_v1920z00_4158, 1L, BgL_arg2443z00_4169);
					}
					BgL_arg2421z00_4127 = BgL_v1920z00_4158;
				}
				{	/* Cfa/cinfo2.scm 122 */
					obj_t BgL_v1921z00_4179;

					BgL_v1921z00_4179 = create_vector(0L);
					BgL_arg2422z00_4128 = BgL_v1921z00_4179;
				}
				BGl_conszd2refzd2appz00zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(36L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 63312L,
					BGl_proc2996z00zzcfa_info2z00, BGl_proc2995z00zzcfa_info2z00, BFALSE,
					BGl_proc2994z00zzcfa_info2z00, BGl_proc2993z00zzcfa_info2z00,
					BgL_arg2421z00_4127, BgL_arg2422z00_4128);
			}
			{	/* Cfa/cinfo2.scm 125 */
				obj_t BgL_arg2453z00_4188;
				obj_t BgL_arg2455z00_4189;

				{	/* Cfa/cinfo2.scm 125 */
					obj_t BgL_v1922z00_4219;

					BgL_v1922z00_4219 = create_vector(2L);
					{	/* Cfa/cinfo2.scm 125 */
						obj_t BgL_arg2466z00_4220;

						BgL_arg2466z00_4220 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(4L),
							BGl_proc2998z00zzcfa_info2z00, BGl_proc2997z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE,
							BGl_approxz00zzcfa_infoz00);
						VECTOR_SET(BgL_v1922z00_4219, 0L, BgL_arg2466z00_4220);
					}
					{	/* Cfa/cinfo2.scm 125 */
						obj_t BgL_arg2471z00_4230;

						BgL_arg2471z00_4230 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(30L),
							BGl_proc3000z00zzcfa_info2z00, BGl_proc2999z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE, CNST_TABLE_REF(31L));
						VECTOR_SET(BgL_v1922z00_4219, 1L, BgL_arg2471z00_4230);
					}
					BgL_arg2453z00_4188 = BgL_v1922z00_4219;
				}
				{	/* Cfa/cinfo2.scm 125 */
					obj_t BgL_v1923z00_4240;

					BgL_v1923z00_4240 = create_vector(0L);
					BgL_arg2455z00_4189 = BgL_v1923z00_4240;
				}
				BGl_conszd2setz12zd2appz12zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(37L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 23744L,
					BGl_proc3004z00zzcfa_info2z00, BGl_proc3003z00zzcfa_info2z00, BFALSE,
					BGl_proc3002z00zzcfa_info2z00, BGl_proc3001z00zzcfa_info2z00,
					BgL_arg2453z00_4188, BgL_arg2455z00_4189);
			}
			{	/* Cfa/cinfo2.scm 130 */
				obj_t BgL_arg2482z00_4249;
				obj_t BgL_arg2483z00_4250;

				{	/* Cfa/cinfo2.scm 130 */
					obj_t BgL_v1924z00_4279;

					BgL_v1924z00_4279 = create_vector(1L);
					{	/* Cfa/cinfo2.scm 130 */
						obj_t BgL_arg2497z00_4280;

						BgL_arg2497z00_4280 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(6L),
							BGl_proc3006z00zzcfa_info2z00, BGl_proc3005z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE,
							BGl_variablez00zzast_varz00);
						VECTOR_SET(BgL_v1924z00_4279, 0L, BgL_arg2497z00_4280);
					}
					BgL_arg2482z00_4249 = BgL_v1924z00_4279;
				}
				{	/* Cfa/cinfo2.scm 130 */
					obj_t BgL_v1925z00_4290;

					BgL_v1925z00_4290 = create_vector(0L);
					BgL_arg2483z00_4250 = BgL_v1925z00_4290;
				}
				BGl_prezd2makezd2structzd2appzd2zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(38L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 51586L,
					BGl_proc3010z00zzcfa_info2z00, BGl_proc3009z00zzcfa_info2z00, BFALSE,
					BGl_proc3008z00zzcfa_info2z00, BGl_proc3007z00zzcfa_info2z00,
					BgL_arg2482z00_4249, BgL_arg2483z00_4250);
			}
			{	/* Cfa/cinfo2.scm 133 */
				obj_t BgL_arg2506z00_4299;
				obj_t BgL_arg2508z00_4300;

				{	/* Cfa/cinfo2.scm 133 */
					obj_t BgL_v1926z00_4328;

					BgL_v1926z00_4328 = create_vector(0L);
					BgL_arg2506z00_4299 = BgL_v1926z00_4328;
				}
				{	/* Cfa/cinfo2.scm 133 */
					obj_t BgL_v1927z00_4329;

					BgL_v1927z00_4329 = create_vector(0L);
					BgL_arg2508z00_4300 = BgL_v1927z00_4329;
				}
				BGl_prezd2structzd2refzd2appzd2zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(39L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 36759L,
					BGl_proc3014z00zzcfa_info2z00, BGl_proc3013z00zzcfa_info2z00, BFALSE,
					BGl_proc3012z00zzcfa_info2z00, BGl_proc3011z00zzcfa_info2z00,
					BgL_arg2506z00_4299, BgL_arg2508z00_4300);
			}
			{	/* Cfa/cinfo2.scm 134 */
				obj_t BgL_arg2537z00_4338;
				obj_t BgL_arg2538z00_4339;

				{	/* Cfa/cinfo2.scm 134 */
					obj_t BgL_v1928z00_4367;

					BgL_v1928z00_4367 = create_vector(0L);
					BgL_arg2537z00_4338 = BgL_v1928z00_4367;
				}
				{	/* Cfa/cinfo2.scm 134 */
					obj_t BgL_v1929z00_4368;

					BgL_v1929z00_4368 = create_vector(0L);
					BgL_arg2538z00_4339 = BgL_v1929z00_4368;
				}
				BGl_prezd2structzd2setz12zd2appzc0zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(40L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 48327L,
					BGl_proc3018z00zzcfa_info2z00, BGl_proc3017z00zzcfa_info2z00, BFALSE,
					BGl_proc3016z00zzcfa_info2z00, BGl_proc3015z00zzcfa_info2z00,
					BgL_arg2537z00_4338, BgL_arg2538z00_4339);
			}
			{	/* Cfa/cinfo2.scm 136 */
				obj_t BgL_arg2566z00_4377;
				obj_t BgL_arg2567z00_4378;

				{	/* Cfa/cinfo2.scm 136 */
					obj_t BgL_v1930z00_4411;

					BgL_v1930z00_4411 = create_vector(5L);
					{	/* Cfa/cinfo2.scm 136 */
						obj_t BgL_arg2580z00_4412;

						BgL_arg2580z00_4412 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(4L),
							BGl_proc3020z00zzcfa_info2z00, BGl_proc3019z00zzcfa_info2z00,
							((bool_t) 0), ((bool_t) 0), BFALSE, BFALSE,
							BGl_approxz00zzcfa_infoz00);
						VECTOR_SET(BgL_v1930z00_4411, 0L, BgL_arg2580z00_4412);
					}
					{	/* Cfa/cinfo2.scm 136 */
						obj_t BgL_arg2585z00_4422;

						BgL_arg2585z00_4422 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(25L),
							BGl_proc3022z00zzcfa_info2z00, BGl_proc3021z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE,
							BGl_approxz00zzcfa_infoz00);
						VECTOR_SET(BgL_v1930z00_4411, 1L, BgL_arg2585z00_4422);
					}
					{	/* Cfa/cinfo2.scm 136 */
						obj_t BgL_arg2590z00_4432;

						BgL_arg2590z00_4432 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(12L),
							BGl_proc3025z00zzcfa_info2z00, BGl_proc3024z00zzcfa_info2z00,
							((bool_t) 0), ((bool_t) 0), BFALSE, BGl_proc3023z00zzcfa_info2z00,
							CNST_TABLE_REF(13L));
						VECTOR_SET(BgL_v1930z00_4411, 2L, BgL_arg2590z00_4432);
					}
					{	/* Cfa/cinfo2.scm 136 */
						obj_t BgL_arg2598z00_4445;

						BgL_arg2598z00_4445 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(6L),
							BGl_proc3027z00zzcfa_info2z00, BGl_proc3026z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE,
							BGl_variablez00zzast_varz00);
						VECTOR_SET(BgL_v1930z00_4411, 3L, BgL_arg2598z00_4445);
					}
					{	/* Cfa/cinfo2.scm 136 */
						obj_t BgL_arg2607z00_4455;

						BgL_arg2607z00_4455 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(18L),
							BGl_proc3030z00zzcfa_info2z00, BGl_proc3029z00zzcfa_info2z00,
							((bool_t) 0), ((bool_t) 0), BFALSE, BGl_proc3028z00zzcfa_info2z00,
							CNST_TABLE_REF(19L));
						VECTOR_SET(BgL_v1930z00_4411, 4L, BgL_arg2607z00_4455);
					}
					BgL_arg2566z00_4377 = BgL_v1930z00_4411;
				}
				{	/* Cfa/cinfo2.scm 136 */
					obj_t BgL_v1931z00_4468;

					BgL_v1931z00_4468 = create_vector(0L);
					BgL_arg2567z00_4378 = BgL_v1931z00_4468;
				}
				BGl_makezd2structzd2appz00zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(41L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 1162L,
					BGl_proc3034z00zzcfa_info2z00, BGl_proc3033z00zzcfa_info2z00, BFALSE,
					BGl_proc3032z00zzcfa_info2z00, BGl_proc3031z00zzcfa_info2z00,
					BgL_arg2566z00_4377, BgL_arg2567z00_4378);
			}
			{	/* Cfa/cinfo2.scm 148 */
				obj_t BgL_arg2618z00_4477;
				obj_t BgL_arg2619z00_4478;

				{	/* Cfa/cinfo2.scm 148 */
					obj_t BgL_v1932z00_4507;

					BgL_v1932z00_4507 = create_vector(1L);
					{	/* Cfa/cinfo2.scm 148 */
						obj_t BgL_arg2631z00_4508;

						BgL_arg2631z00_4508 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(4L),
							BGl_proc3036z00zzcfa_info2z00, BGl_proc3035z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE,
							BGl_approxz00zzcfa_infoz00);
						VECTOR_SET(BgL_v1932z00_4507, 0L, BgL_arg2631z00_4508);
					}
					BgL_arg2618z00_4477 = BgL_v1932z00_4507;
				}
				{	/* Cfa/cinfo2.scm 148 */
					obj_t BgL_v1933z00_4518;

					BgL_v1933z00_4518 = create_vector(0L);
					BgL_arg2619z00_4478 = BgL_v1933z00_4518;
				}
				BGl_structzd2refzd2appz00zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(42L),
					CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 13010L,
					BGl_proc3040z00zzcfa_info2z00, BGl_proc3039z00zzcfa_info2z00, BFALSE,
					BGl_proc3038z00zzcfa_info2z00, BGl_proc3037z00zzcfa_info2z00,
					BgL_arg2618z00_4477, BgL_arg2619z00_4478);
			}
			{	/* Cfa/cinfo2.scm 149 */
				obj_t BgL_arg2641z00_4527;
				obj_t BgL_arg2643z00_4528;

				{	/* Cfa/cinfo2.scm 149 */
					obj_t BgL_v1934z00_4557;

					BgL_v1934z00_4557 = create_vector(1L);
					{	/* Cfa/cinfo2.scm 149 */
						obj_t BgL_arg2656z00_4558;

						BgL_arg2656z00_4558 =
							BGl_makezd2classzd2fieldz00zz__objectz00(CNST_TABLE_REF(4L),
							BGl_proc3042z00zzcfa_info2z00, BGl_proc3041z00zzcfa_info2z00,
							((bool_t) 1), ((bool_t) 0), BFALSE, BFALSE,
							BGl_approxz00zzcfa_infoz00);
						VECTOR_SET(BgL_v1934z00_4557, 0L, BgL_arg2656z00_4558);
					}
					BgL_arg2641z00_4527 = BgL_v1934z00_4557;
				}
				{	/* Cfa/cinfo2.scm 149 */
					obj_t BgL_v1935z00_4568;

					BgL_v1935z00_4568 = create_vector(0L);
					BgL_arg2643z00_4528 = BgL_v1935z00_4568;
				}
				return (BGl_structzd2setz12zd2appz12zzcfa_info2z00 =
					BGl_registerzd2classz12zc0zz__objectz00(CNST_TABLE_REF(43L),
						CNST_TABLE_REF(3L), BGl_appz00zzast_nodez00, 2338L,
						BGl_proc3046z00zzcfa_info2z00, BGl_proc3045z00zzcfa_info2z00,
						BFALSE, BGl_proc3044z00zzcfa_info2z00,
						BGl_proc3043z00zzcfa_info2z00, BgL_arg2641z00_4527,
						BgL_arg2643z00_4528), BUNSPEC);
			}
		}

	}



/* &lambda2651 */
	BgL_appz00_bglt BGl_z62lambda2651z62zzcfa_info2z00(obj_t BgL_envz00_8266,
		obj_t BgL_o1465z00_8267)
	{
		{	/* Cfa/cinfo2.scm 149 */
			{	/* Cfa/cinfo2.scm 149 */
				long BgL_arg2652z00_9261;

				{	/* Cfa/cinfo2.scm 149 */
					obj_t BgL_arg2654z00_9262;

					{	/* Cfa/cinfo2.scm 149 */
						obj_t BgL_arg2655z00_9263;

						{	/* Cfa/cinfo2.scm 149 */
							long BgL_arg1808z00_9264;

							{	/* Cfa/cinfo2.scm 149 */
								long BgL_arg1809z00_9265;

								BgL_arg1809z00_9265 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1465z00_8267)));
								BgL_arg1808z00_9264 = (BgL_arg1809z00_9265 - OBJECT_TYPE);
							}
							BgL_arg2655z00_9263 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9264);
						}
						BgL_arg2654z00_9262 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2655z00_9263);
					}
					{	/* Cfa/cinfo2.scm 149 */
						obj_t BgL_tmpz00_13838;

						BgL_tmpz00_13838 = ((obj_t) BgL_arg2654z00_9262);
						BgL_arg2652z00_9261 = BGL_CLASS_NUM(BgL_tmpz00_13838);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1465z00_8267)), BgL_arg2652z00_9261);
			}
			{	/* Cfa/cinfo2.scm 149 */
				BgL_objectz00_bglt BgL_tmpz00_13844;

				BgL_tmpz00_13844 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1465z00_8267));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_13844, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1465z00_8267));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1465z00_8267));
		}

	}



/* &<@anonymous:2650> */
	obj_t BGl_z62zc3z04anonymousza32650ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8268,
		obj_t BgL_new1464z00_8269)
	{
		{	/* Cfa/cinfo2.scm 149 */
			{
				BgL_appz00_bglt BgL_auxz00_13852;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1464z00_8269))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_13856;

					{	/* Cfa/cinfo2.scm 149 */
						obj_t BgL_classz00_9267;

						BgL_classz00_9267 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 149 */
							obj_t BgL__ortest_1117z00_9268;

							BgL__ortest_1117z00_9268 = BGL_CLASS_NIL(BgL_classz00_9267);
							if (CBOOL(BgL__ortest_1117z00_9268))
								{	/* Cfa/cinfo2.scm 149 */
									BgL_auxz00_13856 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9268);
								}
							else
								{	/* Cfa/cinfo2.scm 149 */
									BgL_auxz00_13856 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9267));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1464z00_8269))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_13856), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1464z00_8269))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1464z00_8269))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_13872;

					{	/* Cfa/cinfo2.scm 149 */
						obj_t BgL_classz00_9269;

						BgL_classz00_9269 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 149 */
							obj_t BgL__ortest_1117z00_9270;

							BgL__ortest_1117z00_9270 = BGL_CLASS_NIL(BgL_classz00_9269);
							if (CBOOL(BgL__ortest_1117z00_9270))
								{	/* Cfa/cinfo2.scm 149 */
									BgL_auxz00_13872 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9270);
								}
							else
								{	/* Cfa/cinfo2.scm 149 */
									BgL_auxz00_13872 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9269));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1464z00_8269))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_13872), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1464z00_8269))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1464z00_8269))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_approxz00_bglt BgL_auxz00_13895;
					BgL_structzd2setz12zd2appz12_bglt BgL_auxz00_13888;

					{	/* Cfa/cinfo2.scm 149 */
						obj_t BgL_classz00_9271;

						BgL_classz00_9271 = BGl_approxz00zzcfa_infoz00;
						{	/* Cfa/cinfo2.scm 149 */
							obj_t BgL__ortest_1117z00_9272;

							BgL__ortest_1117z00_9272 = BGL_CLASS_NIL(BgL_classz00_9271);
							if (CBOOL(BgL__ortest_1117z00_9272))
								{	/* Cfa/cinfo2.scm 149 */
									BgL_auxz00_13895 =
										((BgL_approxz00_bglt) BgL__ortest_1117z00_9272);
								}
							else
								{	/* Cfa/cinfo2.scm 149 */
									BgL_auxz00_13895 =
										((BgL_approxz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9271));
								}
						}
					}
					{
						obj_t BgL_auxz00_13889;

						{	/* Cfa/cinfo2.scm 149 */
							BgL_objectz00_bglt BgL_tmpz00_13890;

							BgL_tmpz00_13890 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1464z00_8269));
							BgL_auxz00_13889 = BGL_OBJECT_WIDENING(BgL_tmpz00_13890);
						}
						BgL_auxz00_13888 =
							((BgL_structzd2setz12zd2appz12_bglt) BgL_auxz00_13889);
					}
					((((BgL_structzd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_13888))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_auxz00_13895), BUNSPEC);
				}
				BgL_auxz00_13852 = ((BgL_appz00_bglt) BgL_new1464z00_8269);
				return ((obj_t) BgL_auxz00_13852);
			}
		}

	}



/* &lambda2648 */
	BgL_appz00_bglt BGl_z62lambda2648z62zzcfa_info2z00(obj_t BgL_envz00_8270,
		obj_t BgL_o1461z00_8271)
	{
		{	/* Cfa/cinfo2.scm 149 */
			{	/* Cfa/cinfo2.scm 149 */
				BgL_structzd2setz12zd2appz12_bglt BgL_wide1463z00_9274;

				BgL_wide1463z00_9274 =
					((BgL_structzd2setz12zd2appz12_bglt) BOBJECT(GC_MALLOC(sizeof(struct
								BgL_structzd2setz12zd2appz12_bgl))));
				{	/* Cfa/cinfo2.scm 149 */
					obj_t BgL_auxz00_13910;
					BgL_objectz00_bglt BgL_tmpz00_13906;

					BgL_auxz00_13910 = ((obj_t) BgL_wide1463z00_9274);
					BgL_tmpz00_13906 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1461z00_8271)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_13906, BgL_auxz00_13910);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1461z00_8271)));
				{	/* Cfa/cinfo2.scm 149 */
					long BgL_arg2649z00_9275;

					BgL_arg2649z00_9275 =
						BGL_CLASS_NUM(BGl_structzd2setz12zd2appz12zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1461z00_8271))), BgL_arg2649z00_9275);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1461z00_8271)));
			}
		}

	}



/* &lambda2644 */
	BgL_appz00_bglt BGl_z62lambda2644z62zzcfa_info2z00(obj_t BgL_envz00_8272,
		obj_t BgL_loc1453z00_8273, obj_t BgL_type1454z00_8274,
		obj_t BgL_sidezd2effect1455zd2_8275, obj_t BgL_key1456z00_8276,
		obj_t BgL_fun1457z00_8277, obj_t BgL_args1458z00_8278,
		obj_t BgL_stackable1459z00_8279, obj_t BgL_approx1460z00_8280)
	{
		{	/* Cfa/cinfo2.scm 149 */
			{	/* Cfa/cinfo2.scm 149 */
				BgL_appz00_bglt BgL_new1662z00_9279;

				{	/* Cfa/cinfo2.scm 149 */
					BgL_appz00_bglt BgL_tmp1660z00_9280;
					BgL_structzd2setz12zd2appz12_bglt BgL_wide1661z00_9281;

					{
						BgL_appz00_bglt BgL_auxz00_13924;

						{	/* Cfa/cinfo2.scm 149 */
							BgL_appz00_bglt BgL_new1659z00_9282;

							BgL_new1659z00_9282 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.scm 149 */
								long BgL_arg2647z00_9283;

								BgL_arg2647z00_9283 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1659z00_9282),
									BgL_arg2647z00_9283);
							}
							{	/* Cfa/cinfo2.scm 149 */
								BgL_objectz00_bglt BgL_tmpz00_13929;

								BgL_tmpz00_13929 = ((BgL_objectz00_bglt) BgL_new1659z00_9282);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_13929, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1659z00_9282);
							BgL_auxz00_13924 = BgL_new1659z00_9282;
						}
						BgL_tmp1660z00_9280 = ((BgL_appz00_bglt) BgL_auxz00_13924);
					}
					BgL_wide1661z00_9281 =
						((BgL_structzd2setz12zd2appz12_bglt) BOBJECT(GC_MALLOC(sizeof(struct
									BgL_structzd2setz12zd2appz12_bgl))));
					{	/* Cfa/cinfo2.scm 149 */
						obj_t BgL_auxz00_13937;
						BgL_objectz00_bglt BgL_tmpz00_13935;

						BgL_auxz00_13937 = ((obj_t) BgL_wide1661z00_9281);
						BgL_tmpz00_13935 = ((BgL_objectz00_bglt) BgL_tmp1660z00_9280);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_13935, BgL_auxz00_13937);
					}
					((BgL_objectz00_bglt) BgL_tmp1660z00_9280);
					{	/* Cfa/cinfo2.scm 149 */
						long BgL_arg2646z00_9284;

						BgL_arg2646z00_9284 =
							BGL_CLASS_NUM(BGl_structzd2setz12zd2appz12zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1660z00_9280), BgL_arg2646z00_9284);
					}
					BgL_new1662z00_9279 = ((BgL_appz00_bglt) BgL_tmp1660z00_9280);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1662z00_9279)))->BgL_locz00) =
					((obj_t) BgL_loc1453z00_8273), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1662z00_9279)))->BgL_typez00) =
					((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1454z00_8274)),
					BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1662z00_9279)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1455zd2_8275), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1662z00_9279)))->BgL_keyz00) =
					((obj_t) BgL_key1456z00_8276), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1662z00_9279)))->
						BgL_funz00) =
					((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1457z00_8277)), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1662z00_9279)))->
						BgL_argsz00) = ((obj_t) BgL_args1458z00_8278), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1662z00_9279)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1459z00_8279), BUNSPEC);
				{
					BgL_structzd2setz12zd2appz12_bglt BgL_auxz00_13961;

					{
						obj_t BgL_auxz00_13962;

						{	/* Cfa/cinfo2.scm 149 */
							BgL_objectz00_bglt BgL_tmpz00_13963;

							BgL_tmpz00_13963 = ((BgL_objectz00_bglt) BgL_new1662z00_9279);
							BgL_auxz00_13962 = BGL_OBJECT_WIDENING(BgL_tmpz00_13963);
						}
						BgL_auxz00_13961 =
							((BgL_structzd2setz12zd2appz12_bglt) BgL_auxz00_13962);
					}
					((((BgL_structzd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_13961))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) ((BgL_approxz00_bglt)
								BgL_approx1460z00_8280)), BUNSPEC);
				}
				return BgL_new1662z00_9279;
			}
		}

	}



/* &lambda2660 */
	obj_t BGl_z62lambda2660z62zzcfa_info2z00(obj_t BgL_envz00_8281,
		obj_t BgL_oz00_8282, obj_t BgL_vz00_8283)
	{
		{	/* Cfa/cinfo2.scm 149 */
			{
				BgL_structzd2setz12zd2appz12_bglt BgL_auxz00_13969;

				{
					obj_t BgL_auxz00_13970;

					{	/* Cfa/cinfo2.scm 149 */
						BgL_objectz00_bglt BgL_tmpz00_13971;

						BgL_tmpz00_13971 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8282));
						BgL_auxz00_13970 = BGL_OBJECT_WIDENING(BgL_tmpz00_13971);
					}
					BgL_auxz00_13969 =
						((BgL_structzd2setz12zd2appz12_bglt) BgL_auxz00_13970);
				}
				return
					((((BgL_structzd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_13969))->
						BgL_approxz00) =
					((BgL_approxz00_bglt) ((BgL_approxz00_bglt) BgL_vz00_8283)), BUNSPEC);
			}
		}

	}



/* &lambda2659 */
	BgL_approxz00_bglt BGl_z62lambda2659z62zzcfa_info2z00(obj_t BgL_envz00_8284,
		obj_t BgL_oz00_8285)
	{
		{	/* Cfa/cinfo2.scm 149 */
			{
				BgL_structzd2setz12zd2appz12_bglt BgL_auxz00_13978;

				{
					obj_t BgL_auxz00_13979;

					{	/* Cfa/cinfo2.scm 149 */
						BgL_objectz00_bglt BgL_tmpz00_13980;

						BgL_tmpz00_13980 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8285));
						BgL_auxz00_13979 = BGL_OBJECT_WIDENING(BgL_tmpz00_13980);
					}
					BgL_auxz00_13978 =
						((BgL_structzd2setz12zd2appz12_bglt) BgL_auxz00_13979);
				}
				return
					(((BgL_structzd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_13978))->
					BgL_approxz00);
			}
		}

	}



/* &lambda2626 */
	BgL_appz00_bglt BGl_z62lambda2626z62zzcfa_info2z00(obj_t BgL_envz00_8286,
		obj_t BgL_o1451z00_8287)
	{
		{	/* Cfa/cinfo2.scm 148 */
			{	/* Cfa/cinfo2.scm 148 */
				long BgL_arg2627z00_9289;

				{	/* Cfa/cinfo2.scm 148 */
					obj_t BgL_arg2629z00_9290;

					{	/* Cfa/cinfo2.scm 148 */
						obj_t BgL_arg2630z00_9291;

						{	/* Cfa/cinfo2.scm 148 */
							long BgL_arg1808z00_9292;

							{	/* Cfa/cinfo2.scm 148 */
								long BgL_arg1809z00_9293;

								BgL_arg1809z00_9293 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1451z00_8287)));
								BgL_arg1808z00_9292 = (BgL_arg1809z00_9293 - OBJECT_TYPE);
							}
							BgL_arg2630z00_9291 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9292);
						}
						BgL_arg2629z00_9290 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2630z00_9291);
					}
					{	/* Cfa/cinfo2.scm 148 */
						obj_t BgL_tmpz00_13992;

						BgL_tmpz00_13992 = ((obj_t) BgL_arg2629z00_9290);
						BgL_arg2627z00_9289 = BGL_CLASS_NUM(BgL_tmpz00_13992);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1451z00_8287)), BgL_arg2627z00_9289);
			}
			{	/* Cfa/cinfo2.scm 148 */
				BgL_objectz00_bglt BgL_tmpz00_13998;

				BgL_tmpz00_13998 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1451z00_8287));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_13998, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1451z00_8287));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1451z00_8287));
		}

	}



/* &<@anonymous:2625> */
	obj_t BGl_z62zc3z04anonymousza32625ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8288,
		obj_t BgL_new1450z00_8289)
	{
		{	/* Cfa/cinfo2.scm 148 */
			{
				BgL_appz00_bglt BgL_auxz00_14006;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1450z00_8289))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_14010;

					{	/* Cfa/cinfo2.scm 148 */
						obj_t BgL_classz00_9295;

						BgL_classz00_9295 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 148 */
							obj_t BgL__ortest_1117z00_9296;

							BgL__ortest_1117z00_9296 = BGL_CLASS_NIL(BgL_classz00_9295);
							if (CBOOL(BgL__ortest_1117z00_9296))
								{	/* Cfa/cinfo2.scm 148 */
									BgL_auxz00_14010 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9296);
								}
							else
								{	/* Cfa/cinfo2.scm 148 */
									BgL_auxz00_14010 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9295));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1450z00_8289))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_14010), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1450z00_8289))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1450z00_8289))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_14026;

					{	/* Cfa/cinfo2.scm 148 */
						obj_t BgL_classz00_9297;

						BgL_classz00_9297 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 148 */
							obj_t BgL__ortest_1117z00_9298;

							BgL__ortest_1117z00_9298 = BGL_CLASS_NIL(BgL_classz00_9297);
							if (CBOOL(BgL__ortest_1117z00_9298))
								{	/* Cfa/cinfo2.scm 148 */
									BgL_auxz00_14026 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9298);
								}
							else
								{	/* Cfa/cinfo2.scm 148 */
									BgL_auxz00_14026 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9297));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1450z00_8289))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_14026), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1450z00_8289))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1450z00_8289))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_approxz00_bglt BgL_auxz00_14049;
					BgL_structzd2refzd2appz00_bglt BgL_auxz00_14042;

					{	/* Cfa/cinfo2.scm 148 */
						obj_t BgL_classz00_9299;

						BgL_classz00_9299 = BGl_approxz00zzcfa_infoz00;
						{	/* Cfa/cinfo2.scm 148 */
							obj_t BgL__ortest_1117z00_9300;

							BgL__ortest_1117z00_9300 = BGL_CLASS_NIL(BgL_classz00_9299);
							if (CBOOL(BgL__ortest_1117z00_9300))
								{	/* Cfa/cinfo2.scm 148 */
									BgL_auxz00_14049 =
										((BgL_approxz00_bglt) BgL__ortest_1117z00_9300);
								}
							else
								{	/* Cfa/cinfo2.scm 148 */
									BgL_auxz00_14049 =
										((BgL_approxz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9299));
								}
						}
					}
					{
						obj_t BgL_auxz00_14043;

						{	/* Cfa/cinfo2.scm 148 */
							BgL_objectz00_bglt BgL_tmpz00_14044;

							BgL_tmpz00_14044 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1450z00_8289));
							BgL_auxz00_14043 = BGL_OBJECT_WIDENING(BgL_tmpz00_14044);
						}
						BgL_auxz00_14042 =
							((BgL_structzd2refzd2appz00_bglt) BgL_auxz00_14043);
					}
					((((BgL_structzd2refzd2appz00_bglt) COBJECT(BgL_auxz00_14042))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_auxz00_14049), BUNSPEC);
				}
				BgL_auxz00_14006 = ((BgL_appz00_bglt) BgL_new1450z00_8289);
				return ((obj_t) BgL_auxz00_14006);
			}
		}

	}



/* &lambda2623 */
	BgL_appz00_bglt BGl_z62lambda2623z62zzcfa_info2z00(obj_t BgL_envz00_8290,
		obj_t BgL_o1447z00_8291)
	{
		{	/* Cfa/cinfo2.scm 148 */
			{	/* Cfa/cinfo2.scm 148 */
				BgL_structzd2refzd2appz00_bglt BgL_wide1449z00_9302;

				BgL_wide1449z00_9302 =
					((BgL_structzd2refzd2appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
								BgL_structzd2refzd2appz00_bgl))));
				{	/* Cfa/cinfo2.scm 148 */
					obj_t BgL_auxz00_14064;
					BgL_objectz00_bglt BgL_tmpz00_14060;

					BgL_auxz00_14064 = ((obj_t) BgL_wide1449z00_9302);
					BgL_tmpz00_14060 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1447z00_8291)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14060, BgL_auxz00_14064);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1447z00_8291)));
				{	/* Cfa/cinfo2.scm 148 */
					long BgL_arg2624z00_9303;

					BgL_arg2624z00_9303 =
						BGL_CLASS_NUM(BGl_structzd2refzd2appz00zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1447z00_8291))), BgL_arg2624z00_9303);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1447z00_8291)));
			}
		}

	}



/* &lambda2620 */
	BgL_appz00_bglt BGl_z62lambda2620z62zzcfa_info2z00(obj_t BgL_envz00_8292,
		obj_t BgL_loc1439z00_8293, obj_t BgL_type1440z00_8294,
		obj_t BgL_sidezd2effect1441zd2_8295, obj_t BgL_key1442z00_8296,
		obj_t BgL_fun1443z00_8297, obj_t BgL_args1444z00_8298,
		obj_t BgL_stackable1445z00_8299, obj_t BgL_approx1446z00_8300)
	{
		{	/* Cfa/cinfo2.scm 148 */
			{	/* Cfa/cinfo2.scm 148 */
				BgL_appz00_bglt BgL_new1657z00_9307;

				{	/* Cfa/cinfo2.scm 148 */
					BgL_appz00_bglt BgL_tmp1655z00_9308;
					BgL_structzd2refzd2appz00_bglt BgL_wide1656z00_9309;

					{
						BgL_appz00_bglt BgL_auxz00_14078;

						{	/* Cfa/cinfo2.scm 148 */
							BgL_appz00_bglt BgL_new1654z00_9310;

							BgL_new1654z00_9310 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.scm 148 */
								long BgL_arg2622z00_9311;

								BgL_arg2622z00_9311 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1654z00_9310),
									BgL_arg2622z00_9311);
							}
							{	/* Cfa/cinfo2.scm 148 */
								BgL_objectz00_bglt BgL_tmpz00_14083;

								BgL_tmpz00_14083 = ((BgL_objectz00_bglt) BgL_new1654z00_9310);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14083, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1654z00_9310);
							BgL_auxz00_14078 = BgL_new1654z00_9310;
						}
						BgL_tmp1655z00_9308 = ((BgL_appz00_bglt) BgL_auxz00_14078);
					}
					BgL_wide1656z00_9309 =
						((BgL_structzd2refzd2appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
									BgL_structzd2refzd2appz00_bgl))));
					{	/* Cfa/cinfo2.scm 148 */
						obj_t BgL_auxz00_14091;
						BgL_objectz00_bglt BgL_tmpz00_14089;

						BgL_auxz00_14091 = ((obj_t) BgL_wide1656z00_9309);
						BgL_tmpz00_14089 = ((BgL_objectz00_bglt) BgL_tmp1655z00_9308);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14089, BgL_auxz00_14091);
					}
					((BgL_objectz00_bglt) BgL_tmp1655z00_9308);
					{	/* Cfa/cinfo2.scm 148 */
						long BgL_arg2621z00_9312;

						BgL_arg2621z00_9312 =
							BGL_CLASS_NUM(BGl_structzd2refzd2appz00zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1655z00_9308), BgL_arg2621z00_9312);
					}
					BgL_new1657z00_9307 = ((BgL_appz00_bglt) BgL_tmp1655z00_9308);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1657z00_9307)))->BgL_locz00) =
					((obj_t) BgL_loc1439z00_8293), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1657z00_9307)))->BgL_typez00) =
					((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1440z00_8294)),
					BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1657z00_9307)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1441zd2_8295), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1657z00_9307)))->BgL_keyz00) =
					((obj_t) BgL_key1442z00_8296), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1657z00_9307)))->
						BgL_funz00) =
					((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1443z00_8297)), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1657z00_9307)))->
						BgL_argsz00) = ((obj_t) BgL_args1444z00_8298), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1657z00_9307)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1445z00_8299), BUNSPEC);
				{
					BgL_structzd2refzd2appz00_bglt BgL_auxz00_14115;

					{
						obj_t BgL_auxz00_14116;

						{	/* Cfa/cinfo2.scm 148 */
							BgL_objectz00_bglt BgL_tmpz00_14117;

							BgL_tmpz00_14117 = ((BgL_objectz00_bglt) BgL_new1657z00_9307);
							BgL_auxz00_14116 = BGL_OBJECT_WIDENING(BgL_tmpz00_14117);
						}
						BgL_auxz00_14115 =
							((BgL_structzd2refzd2appz00_bglt) BgL_auxz00_14116);
					}
					((((BgL_structzd2refzd2appz00_bglt) COBJECT(BgL_auxz00_14115))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) ((BgL_approxz00_bglt)
								BgL_approx1446z00_8300)), BUNSPEC);
				}
				return BgL_new1657z00_9307;
			}
		}

	}



/* &lambda2635 */
	obj_t BGl_z62lambda2635z62zzcfa_info2z00(obj_t BgL_envz00_8301,
		obj_t BgL_oz00_8302, obj_t BgL_vz00_8303)
	{
		{	/* Cfa/cinfo2.scm 148 */
			{
				BgL_structzd2refzd2appz00_bglt BgL_auxz00_14123;

				{
					obj_t BgL_auxz00_14124;

					{	/* Cfa/cinfo2.scm 148 */
						BgL_objectz00_bglt BgL_tmpz00_14125;

						BgL_tmpz00_14125 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8302));
						BgL_auxz00_14124 = BGL_OBJECT_WIDENING(BgL_tmpz00_14125);
					}
					BgL_auxz00_14123 =
						((BgL_structzd2refzd2appz00_bglt) BgL_auxz00_14124);
				}
				return
					((((BgL_structzd2refzd2appz00_bglt) COBJECT(BgL_auxz00_14123))->
						BgL_approxz00) =
					((BgL_approxz00_bglt) ((BgL_approxz00_bglt) BgL_vz00_8303)), BUNSPEC);
			}
		}

	}



/* &lambda2634 */
	BgL_approxz00_bglt BGl_z62lambda2634z62zzcfa_info2z00(obj_t BgL_envz00_8304,
		obj_t BgL_oz00_8305)
	{
		{	/* Cfa/cinfo2.scm 148 */
			{
				BgL_structzd2refzd2appz00_bglt BgL_auxz00_14132;

				{
					obj_t BgL_auxz00_14133;

					{	/* Cfa/cinfo2.scm 148 */
						BgL_objectz00_bglt BgL_tmpz00_14134;

						BgL_tmpz00_14134 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8305));
						BgL_auxz00_14133 = BGL_OBJECT_WIDENING(BgL_tmpz00_14134);
					}
					BgL_auxz00_14132 =
						((BgL_structzd2refzd2appz00_bglt) BgL_auxz00_14133);
				}
				return
					(((BgL_structzd2refzd2appz00_bglt) COBJECT(BgL_auxz00_14132))->
					BgL_approxz00);
			}
		}

	}



/* &lambda2575 */
	BgL_appz00_bglt BGl_z62lambda2575z62zzcfa_info2z00(obj_t BgL_envz00_8306,
		obj_t BgL_o1437z00_8307)
	{
		{	/* Cfa/cinfo2.scm 136 */
			{	/* Cfa/cinfo2.scm 136 */
				long BgL_arg2576z00_9317;

				{	/* Cfa/cinfo2.scm 136 */
					obj_t BgL_arg2577z00_9318;

					{	/* Cfa/cinfo2.scm 136 */
						obj_t BgL_arg2579z00_9319;

						{	/* Cfa/cinfo2.scm 136 */
							long BgL_arg1808z00_9320;

							{	/* Cfa/cinfo2.scm 136 */
								long BgL_arg1809z00_9321;

								BgL_arg1809z00_9321 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1437z00_8307)));
								BgL_arg1808z00_9320 = (BgL_arg1809z00_9321 - OBJECT_TYPE);
							}
							BgL_arg2579z00_9319 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9320);
						}
						BgL_arg2577z00_9318 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2579z00_9319);
					}
					{	/* Cfa/cinfo2.scm 136 */
						obj_t BgL_tmpz00_14146;

						BgL_tmpz00_14146 = ((obj_t) BgL_arg2577z00_9318);
						BgL_arg2576z00_9317 = BGL_CLASS_NUM(BgL_tmpz00_14146);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1437z00_8307)), BgL_arg2576z00_9317);
			}
			{	/* Cfa/cinfo2.scm 136 */
				BgL_objectz00_bglt BgL_tmpz00_14152;

				BgL_tmpz00_14152 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1437z00_8307));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14152, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1437z00_8307));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1437z00_8307));
		}

	}



/* &<@anonymous:2574> */
	obj_t BGl_z62zc3z04anonymousza32574ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8308,
		obj_t BgL_new1436z00_8309)
	{
		{	/* Cfa/cinfo2.scm 136 */
			{
				BgL_appz00_bglt BgL_auxz00_14160;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1436z00_8309))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_14164;

					{	/* Cfa/cinfo2.scm 136 */
						obj_t BgL_classz00_9323;

						BgL_classz00_9323 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 136 */
							obj_t BgL__ortest_1117z00_9324;

							BgL__ortest_1117z00_9324 = BGL_CLASS_NIL(BgL_classz00_9323);
							if (CBOOL(BgL__ortest_1117z00_9324))
								{	/* Cfa/cinfo2.scm 136 */
									BgL_auxz00_14164 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9324);
								}
							else
								{	/* Cfa/cinfo2.scm 136 */
									BgL_auxz00_14164 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9323));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1436z00_8309))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_14164), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1436z00_8309))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1436z00_8309))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_14180;

					{	/* Cfa/cinfo2.scm 136 */
						obj_t BgL_classz00_9325;

						BgL_classz00_9325 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 136 */
							obj_t BgL__ortest_1117z00_9326;

							BgL__ortest_1117z00_9326 = BGL_CLASS_NIL(BgL_classz00_9325);
							if (CBOOL(BgL__ortest_1117z00_9326))
								{	/* Cfa/cinfo2.scm 136 */
									BgL_auxz00_14180 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9326);
								}
							else
								{	/* Cfa/cinfo2.scm 136 */
									BgL_auxz00_14180 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9325));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1436z00_8309))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_14180), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1436z00_8309))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1436z00_8309))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_approxz00_bglt BgL_auxz00_14203;
					BgL_makezd2structzd2appz00_bglt BgL_auxz00_14196;

					{	/* Cfa/cinfo2.scm 136 */
						obj_t BgL_classz00_9327;

						BgL_classz00_9327 = BGl_approxz00zzcfa_infoz00;
						{	/* Cfa/cinfo2.scm 136 */
							obj_t BgL__ortest_1117z00_9328;

							BgL__ortest_1117z00_9328 = BGL_CLASS_NIL(BgL_classz00_9327);
							if (CBOOL(BgL__ortest_1117z00_9328))
								{	/* Cfa/cinfo2.scm 136 */
									BgL_auxz00_14203 =
										((BgL_approxz00_bglt) BgL__ortest_1117z00_9328);
								}
							else
								{	/* Cfa/cinfo2.scm 136 */
									BgL_auxz00_14203 =
										((BgL_approxz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9327));
								}
						}
					}
					{
						obj_t BgL_auxz00_14197;

						{	/* Cfa/cinfo2.scm 136 */
							BgL_objectz00_bglt BgL_tmpz00_14198;

							BgL_tmpz00_14198 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1436z00_8309));
							BgL_auxz00_14197 = BGL_OBJECT_WIDENING(BgL_tmpz00_14198);
						}
						BgL_auxz00_14196 =
							((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_14197);
					}
					((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_14196))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_auxz00_14203), BUNSPEC);
				}
				{
					BgL_approxz00_bglt BgL_auxz00_14218;
					BgL_makezd2structzd2appz00_bglt BgL_auxz00_14211;

					{	/* Cfa/cinfo2.scm 136 */
						obj_t BgL_classz00_9329;

						BgL_classz00_9329 = BGl_approxz00zzcfa_infoz00;
						{	/* Cfa/cinfo2.scm 136 */
							obj_t BgL__ortest_1117z00_9330;

							BgL__ortest_1117z00_9330 = BGL_CLASS_NIL(BgL_classz00_9329);
							if (CBOOL(BgL__ortest_1117z00_9330))
								{	/* Cfa/cinfo2.scm 136 */
									BgL_auxz00_14218 =
										((BgL_approxz00_bglt) BgL__ortest_1117z00_9330);
								}
							else
								{	/* Cfa/cinfo2.scm 136 */
									BgL_auxz00_14218 =
										((BgL_approxz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9329));
								}
						}
					}
					{
						obj_t BgL_auxz00_14212;

						{	/* Cfa/cinfo2.scm 136 */
							BgL_objectz00_bglt BgL_tmpz00_14213;

							BgL_tmpz00_14213 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1436z00_8309));
							BgL_auxz00_14212 = BGL_OBJECT_WIDENING(BgL_tmpz00_14213);
						}
						BgL_auxz00_14211 =
							((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_14212);
					}
					((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_14211))->
							BgL_valuezd2approxzd2) =
						((BgL_approxz00_bglt) BgL_auxz00_14218), BUNSPEC);
				}
				{
					BgL_makezd2structzd2appz00_bglt BgL_auxz00_14226;

					{
						obj_t BgL_auxz00_14227;

						{	/* Cfa/cinfo2.scm 136 */
							BgL_objectz00_bglt BgL_tmpz00_14228;

							BgL_tmpz00_14228 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1436z00_8309));
							BgL_auxz00_14227 = BGL_OBJECT_WIDENING(BgL_tmpz00_14228);
						}
						BgL_auxz00_14226 =
							((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_14227);
					}
					((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_14226))->
							BgL_lostzd2stampzd2) = ((long) 0L), BUNSPEC);
				}
				{
					BgL_variablez00_bglt BgL_auxz00_14241;
					BgL_makezd2structzd2appz00_bglt BgL_auxz00_14234;

					{	/* Cfa/cinfo2.scm 136 */
						obj_t BgL_classz00_9331;

						BgL_classz00_9331 = BGl_variablez00zzast_varz00;
						{	/* Cfa/cinfo2.scm 136 */
							obj_t BgL__ortest_1117z00_9332;

							BgL__ortest_1117z00_9332 = BGL_CLASS_NIL(BgL_classz00_9331);
							if (CBOOL(BgL__ortest_1117z00_9332))
								{	/* Cfa/cinfo2.scm 136 */
									BgL_auxz00_14241 =
										((BgL_variablez00_bglt) BgL__ortest_1117z00_9332);
								}
							else
								{	/* Cfa/cinfo2.scm 136 */
									BgL_auxz00_14241 =
										((BgL_variablez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9331));
								}
						}
					}
					{
						obj_t BgL_auxz00_14235;

						{	/* Cfa/cinfo2.scm 136 */
							BgL_objectz00_bglt BgL_tmpz00_14236;

							BgL_tmpz00_14236 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1436z00_8309));
							BgL_auxz00_14235 = BGL_OBJECT_WIDENING(BgL_tmpz00_14236);
						}
						BgL_auxz00_14234 =
							((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_14235);
					}
					((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_14234))->
							BgL_ownerz00) =
						((BgL_variablez00_bglt) BgL_auxz00_14241), BUNSPEC);
				}
				{
					BgL_makezd2structzd2appz00_bglt BgL_auxz00_14249;

					{
						obj_t BgL_auxz00_14250;

						{	/* Cfa/cinfo2.scm 136 */
							BgL_objectz00_bglt BgL_tmpz00_14251;

							BgL_tmpz00_14251 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1436z00_8309));
							BgL_auxz00_14250 = BGL_OBJECT_WIDENING(BgL_tmpz00_14251);
						}
						BgL_auxz00_14249 =
							((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_14250);
					}
					((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_14249))->
							BgL_stackzd2stampzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				}
				BgL_auxz00_14160 = ((BgL_appz00_bglt) BgL_new1436z00_8309);
				return ((obj_t) BgL_auxz00_14160);
			}
		}

	}



/* &lambda2572 */
	BgL_appz00_bglt BGl_z62lambda2572z62zzcfa_info2z00(obj_t BgL_envz00_8310,
		obj_t BgL_o1433z00_8311)
	{
		{	/* Cfa/cinfo2.scm 136 */
			{	/* Cfa/cinfo2.scm 136 */
				BgL_makezd2structzd2appz00_bglt BgL_wide1435z00_9334;

				BgL_wide1435z00_9334 =
					((BgL_makezd2structzd2appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
								BgL_makezd2structzd2appz00_bgl))));
				{	/* Cfa/cinfo2.scm 136 */
					obj_t BgL_auxz00_14264;
					BgL_objectz00_bglt BgL_tmpz00_14260;

					BgL_auxz00_14264 = ((obj_t) BgL_wide1435z00_9334);
					BgL_tmpz00_14260 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1433z00_8311)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14260, BgL_auxz00_14264);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1433z00_8311)));
				{	/* Cfa/cinfo2.scm 136 */
					long BgL_arg2573z00_9335;

					BgL_arg2573z00_9335 =
						BGL_CLASS_NUM(BGl_makezd2structzd2appz00zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1433z00_8311))), BgL_arg2573z00_9335);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1433z00_8311)));
			}
		}

	}



/* &lambda2568 */
	BgL_appz00_bglt BGl_z62lambda2568z62zzcfa_info2z00(obj_t BgL_envz00_8312,
		obj_t BgL_loc1421z00_8313, obj_t BgL_type1422z00_8314,
		obj_t BgL_sidezd2effect1423zd2_8315, obj_t BgL_key1424z00_8316,
		obj_t BgL_fun1425z00_8317, obj_t BgL_args1426z00_8318,
		obj_t BgL_stackable1427z00_8319, obj_t BgL_approx1428z00_8320,
		obj_t BgL_valuezd2approx1429zd2_8321, obj_t BgL_lostzd2stamp1430zd2_8322,
		obj_t BgL_owner1431z00_8323, obj_t BgL_stackzd2stamp1432zd2_8324)
	{
		{	/* Cfa/cinfo2.scm 136 */
			{	/* Cfa/cinfo2.scm 136 */
				long BgL_lostzd2stamp1430zd2_9340;

				BgL_lostzd2stamp1430zd2_9340 =
					(long) CINT(BgL_lostzd2stamp1430zd2_8322);
				{	/* Cfa/cinfo2.scm 136 */
					BgL_appz00_bglt BgL_new1652z00_9342;

					{	/* Cfa/cinfo2.scm 136 */
						BgL_appz00_bglt BgL_tmp1650z00_9343;
						BgL_makezd2structzd2appz00_bglt BgL_wide1651z00_9344;

						{
							BgL_appz00_bglt BgL_auxz00_14279;

							{	/* Cfa/cinfo2.scm 136 */
								BgL_appz00_bglt BgL_new1649z00_9345;

								BgL_new1649z00_9345 =
									((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
												BgL_appz00_bgl))));
								{	/* Cfa/cinfo2.scm 136 */
									long BgL_arg2571z00_9346;

									BgL_arg2571z00_9346 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
									BGL_OBJECT_CLASS_NUM_SET(
										((BgL_objectz00_bglt) BgL_new1649z00_9345),
										BgL_arg2571z00_9346);
								}
								{	/* Cfa/cinfo2.scm 136 */
									BgL_objectz00_bglt BgL_tmpz00_14284;

									BgL_tmpz00_14284 = ((BgL_objectz00_bglt) BgL_new1649z00_9345);
									BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14284, BFALSE);
								}
								((BgL_objectz00_bglt) BgL_new1649z00_9345);
								BgL_auxz00_14279 = BgL_new1649z00_9345;
							}
							BgL_tmp1650z00_9343 = ((BgL_appz00_bglt) BgL_auxz00_14279);
						}
						BgL_wide1651z00_9344 =
							((BgL_makezd2structzd2appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
										BgL_makezd2structzd2appz00_bgl))));
						{	/* Cfa/cinfo2.scm 136 */
							obj_t BgL_auxz00_14292;
							BgL_objectz00_bglt BgL_tmpz00_14290;

							BgL_auxz00_14292 = ((obj_t) BgL_wide1651z00_9344);
							BgL_tmpz00_14290 = ((BgL_objectz00_bglt) BgL_tmp1650z00_9343);
							BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14290, BgL_auxz00_14292);
						}
						((BgL_objectz00_bglt) BgL_tmp1650z00_9343);
						{	/* Cfa/cinfo2.scm 136 */
							long BgL_arg2570z00_9347;

							BgL_arg2570z00_9347 =
								BGL_CLASS_NUM(BGl_makezd2structzd2appz00zzcfa_info2z00);
							BGL_OBJECT_CLASS_NUM_SET(
								((BgL_objectz00_bglt) BgL_tmp1650z00_9343),
								BgL_arg2570z00_9347);
						}
						BgL_new1652z00_9342 = ((BgL_appz00_bglt) BgL_tmp1650z00_9343);
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt) BgL_new1652z00_9342)))->BgL_locz00) =
						((obj_t) BgL_loc1421z00_8313), BUNSPEC);
					((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
										BgL_new1652z00_9342)))->BgL_typez00) =
						((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1422z00_8314)),
						BUNSPEC);
					((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
										BgL_new1652z00_9342)))->BgL_sidezd2effectzd2) =
						((obj_t) BgL_sidezd2effect1423zd2_8315), BUNSPEC);
					((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
										BgL_new1652z00_9342)))->BgL_keyz00) =
						((obj_t) BgL_key1424z00_8316), BUNSPEC);
					((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt)
										BgL_new1652z00_9342)))->BgL_funz00) =
						((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1425z00_8317)),
						BUNSPEC);
					((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt)
										BgL_new1652z00_9342)))->BgL_argsz00) =
						((obj_t) BgL_args1426z00_8318), BUNSPEC);
					((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt)
										BgL_new1652z00_9342)))->BgL_stackablez00) =
						((obj_t) BgL_stackable1427z00_8319), BUNSPEC);
					{
						BgL_makezd2structzd2appz00_bglt BgL_auxz00_14316;

						{
							obj_t BgL_auxz00_14317;

							{	/* Cfa/cinfo2.scm 136 */
								BgL_objectz00_bglt BgL_tmpz00_14318;

								BgL_tmpz00_14318 = ((BgL_objectz00_bglt) BgL_new1652z00_9342);
								BgL_auxz00_14317 = BGL_OBJECT_WIDENING(BgL_tmpz00_14318);
							}
							BgL_auxz00_14316 =
								((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_14317);
						}
						((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_14316))->
								BgL_approxz00) =
							((BgL_approxz00_bglt) ((BgL_approxz00_bglt)
									BgL_approx1428z00_8320)), BUNSPEC);
					}
					{
						BgL_makezd2structzd2appz00_bglt BgL_auxz00_14324;

						{
							obj_t BgL_auxz00_14325;

							{	/* Cfa/cinfo2.scm 136 */
								BgL_objectz00_bglt BgL_tmpz00_14326;

								BgL_tmpz00_14326 = ((BgL_objectz00_bglt) BgL_new1652z00_9342);
								BgL_auxz00_14325 = BGL_OBJECT_WIDENING(BgL_tmpz00_14326);
							}
							BgL_auxz00_14324 =
								((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_14325);
						}
						((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_14324))->
								BgL_valuezd2approxzd2) =
							((BgL_approxz00_bglt) ((BgL_approxz00_bglt)
									BgL_valuezd2approx1429zd2_8321)), BUNSPEC);
					}
					{
						BgL_makezd2structzd2appz00_bglt BgL_auxz00_14332;

						{
							obj_t BgL_auxz00_14333;

							{	/* Cfa/cinfo2.scm 136 */
								BgL_objectz00_bglt BgL_tmpz00_14334;

								BgL_tmpz00_14334 = ((BgL_objectz00_bglt) BgL_new1652z00_9342);
								BgL_auxz00_14333 = BGL_OBJECT_WIDENING(BgL_tmpz00_14334);
							}
							BgL_auxz00_14332 =
								((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_14333);
						}
						((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_14332))->
								BgL_lostzd2stampzd2) =
							((long) BgL_lostzd2stamp1430zd2_9340), BUNSPEC);
					}
					{
						BgL_makezd2structzd2appz00_bglt BgL_auxz00_14339;

						{
							obj_t BgL_auxz00_14340;

							{	/* Cfa/cinfo2.scm 136 */
								BgL_objectz00_bglt BgL_tmpz00_14341;

								BgL_tmpz00_14341 = ((BgL_objectz00_bglt) BgL_new1652z00_9342);
								BgL_auxz00_14340 = BGL_OBJECT_WIDENING(BgL_tmpz00_14341);
							}
							BgL_auxz00_14339 =
								((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_14340);
						}
						((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_14339))->
								BgL_ownerz00) =
							((BgL_variablez00_bglt) ((BgL_variablez00_bglt)
									BgL_owner1431z00_8323)), BUNSPEC);
					}
					{
						BgL_makezd2structzd2appz00_bglt BgL_auxz00_14347;

						{
							obj_t BgL_auxz00_14348;

							{	/* Cfa/cinfo2.scm 136 */
								BgL_objectz00_bglt BgL_tmpz00_14349;

								BgL_tmpz00_14349 = ((BgL_objectz00_bglt) BgL_new1652z00_9342);
								BgL_auxz00_14348 = BGL_OBJECT_WIDENING(BgL_tmpz00_14349);
							}
							BgL_auxz00_14347 =
								((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_14348);
						}
						((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_14347))->
								BgL_stackzd2stampzd2) =
							((obj_t) BgL_stackzd2stamp1432zd2_8324), BUNSPEC);
					}
					return BgL_new1652z00_9342;
				}
			}
		}

	}



/* &<@anonymous:2613> */
	obj_t BGl_z62zc3z04anonymousza32613ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8325)
	{
		{	/* Cfa/cinfo2.scm 136 */
			return BNIL;
		}

	}



/* &lambda2612 */
	obj_t BGl_z62lambda2612z62zzcfa_info2z00(obj_t BgL_envz00_8326,
		obj_t BgL_oz00_8327, obj_t BgL_vz00_8328)
	{
		{	/* Cfa/cinfo2.scm 136 */
			{
				BgL_makezd2structzd2appz00_bglt BgL_auxz00_14354;

				{
					obj_t BgL_auxz00_14355;

					{	/* Cfa/cinfo2.scm 136 */
						BgL_objectz00_bglt BgL_tmpz00_14356;

						BgL_tmpz00_14356 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8327));
						BgL_auxz00_14355 = BGL_OBJECT_WIDENING(BgL_tmpz00_14356);
					}
					BgL_auxz00_14354 =
						((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_14355);
				}
				return
					((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_14354))->
						BgL_stackzd2stampzd2) = ((obj_t) BgL_vz00_8328), BUNSPEC);
			}
		}

	}



/* &lambda2611 */
	obj_t BGl_z62lambda2611z62zzcfa_info2z00(obj_t BgL_envz00_8329,
		obj_t BgL_oz00_8330)
	{
		{	/* Cfa/cinfo2.scm 136 */
			{
				BgL_makezd2structzd2appz00_bglt BgL_auxz00_14362;

				{
					obj_t BgL_auxz00_14363;

					{	/* Cfa/cinfo2.scm 136 */
						BgL_objectz00_bglt BgL_tmpz00_14364;

						BgL_tmpz00_14364 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8330));
						BgL_auxz00_14363 = BGL_OBJECT_WIDENING(BgL_tmpz00_14364);
					}
					BgL_auxz00_14362 =
						((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_14363);
				}
				return
					(((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_14362))->
					BgL_stackzd2stampzd2);
			}
		}

	}



/* &lambda2606 */
	obj_t BGl_z62lambda2606z62zzcfa_info2z00(obj_t BgL_envz00_8331,
		obj_t BgL_oz00_8332, obj_t BgL_vz00_8333)
	{
		{	/* Cfa/cinfo2.scm 136 */
			{
				BgL_makezd2structzd2appz00_bglt BgL_auxz00_14370;

				{
					obj_t BgL_auxz00_14371;

					{	/* Cfa/cinfo2.scm 136 */
						BgL_objectz00_bglt BgL_tmpz00_14372;

						BgL_tmpz00_14372 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8332));
						BgL_auxz00_14371 = BGL_OBJECT_WIDENING(BgL_tmpz00_14372);
					}
					BgL_auxz00_14370 =
						((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_14371);
				}
				return
					((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_14370))->
						BgL_ownerz00) =
					((BgL_variablez00_bglt) ((BgL_variablez00_bglt) BgL_vz00_8333)),
					BUNSPEC);
			}
		}

	}



/* &lambda2605 */
	BgL_variablez00_bglt BGl_z62lambda2605z62zzcfa_info2z00(obj_t BgL_envz00_8334,
		obj_t BgL_oz00_8335)
	{
		{	/* Cfa/cinfo2.scm 136 */
			{
				BgL_makezd2structzd2appz00_bglt BgL_auxz00_14379;

				{
					obj_t BgL_auxz00_14380;

					{	/* Cfa/cinfo2.scm 136 */
						BgL_objectz00_bglt BgL_tmpz00_14381;

						BgL_tmpz00_14381 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8335));
						BgL_auxz00_14380 = BGL_OBJECT_WIDENING(BgL_tmpz00_14381);
					}
					BgL_auxz00_14379 =
						((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_14380);
				}
				return
					(((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_14379))->
					BgL_ownerz00);
			}
		}

	}



/* &<@anonymous:2597> */
	obj_t BGl_z62zc3z04anonymousza32597ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8336)
	{
		{	/* Cfa/cinfo2.scm 136 */
			return BINT(-1L);
		}

	}



/* &lambda2596 */
	obj_t BGl_z62lambda2596z62zzcfa_info2z00(obj_t BgL_envz00_8337,
		obj_t BgL_oz00_8338, obj_t BgL_vz00_8339)
	{
		{	/* Cfa/cinfo2.scm 136 */
			{	/* Cfa/cinfo2.scm 136 */
				long BgL_vz00_9354;

				BgL_vz00_9354 = (long) CINT(BgL_vz00_8339);
				{
					BgL_makezd2structzd2appz00_bglt BgL_auxz00_14389;

					{
						obj_t BgL_auxz00_14390;

						{	/* Cfa/cinfo2.scm 136 */
							BgL_objectz00_bglt BgL_tmpz00_14391;

							BgL_tmpz00_14391 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8338));
							BgL_auxz00_14390 = BGL_OBJECT_WIDENING(BgL_tmpz00_14391);
						}
						BgL_auxz00_14389 =
							((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_14390);
					}
					return
						((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_14389))->
							BgL_lostzd2stampzd2) = ((long) BgL_vz00_9354), BUNSPEC);
		}}}

	}



/* &lambda2595 */
	obj_t BGl_z62lambda2595z62zzcfa_info2z00(obj_t BgL_envz00_8340,
		obj_t BgL_oz00_8341)
	{
		{	/* Cfa/cinfo2.scm 136 */
			{	/* Cfa/cinfo2.scm 136 */
				long BgL_tmpz00_14397;

				{
					BgL_makezd2structzd2appz00_bglt BgL_auxz00_14398;

					{
						obj_t BgL_auxz00_14399;

						{	/* Cfa/cinfo2.scm 136 */
							BgL_objectz00_bglt BgL_tmpz00_14400;

							BgL_tmpz00_14400 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8341));
							BgL_auxz00_14399 = BGL_OBJECT_WIDENING(BgL_tmpz00_14400);
						}
						BgL_auxz00_14398 =
							((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_14399);
					}
					BgL_tmpz00_14397 =
						(((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_14398))->
						BgL_lostzd2stampzd2);
				}
				return BINT(BgL_tmpz00_14397);
			}
		}

	}



/* &lambda2589 */
	obj_t BGl_z62lambda2589z62zzcfa_info2z00(obj_t BgL_envz00_8342,
		obj_t BgL_oz00_8343, obj_t BgL_vz00_8344)
	{
		{	/* Cfa/cinfo2.scm 136 */
			{
				BgL_makezd2structzd2appz00_bglt BgL_auxz00_14407;

				{
					obj_t BgL_auxz00_14408;

					{	/* Cfa/cinfo2.scm 136 */
						BgL_objectz00_bglt BgL_tmpz00_14409;

						BgL_tmpz00_14409 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8343));
						BgL_auxz00_14408 = BGL_OBJECT_WIDENING(BgL_tmpz00_14409);
					}
					BgL_auxz00_14407 =
						((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_14408);
				}
				return
					((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_14407))->
						BgL_valuezd2approxzd2) =
					((BgL_approxz00_bglt) ((BgL_approxz00_bglt) BgL_vz00_8344)), BUNSPEC);
			}
		}

	}



/* &lambda2588 */
	BgL_approxz00_bglt BGl_z62lambda2588z62zzcfa_info2z00(obj_t BgL_envz00_8345,
		obj_t BgL_oz00_8346)
	{
		{	/* Cfa/cinfo2.scm 136 */
			{
				BgL_makezd2structzd2appz00_bglt BgL_auxz00_14416;

				{
					obj_t BgL_auxz00_14417;

					{	/* Cfa/cinfo2.scm 136 */
						BgL_objectz00_bglt BgL_tmpz00_14418;

						BgL_tmpz00_14418 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8346));
						BgL_auxz00_14417 = BGL_OBJECT_WIDENING(BgL_tmpz00_14418);
					}
					BgL_auxz00_14416 =
						((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_14417);
				}
				return
					(((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_14416))->
					BgL_valuezd2approxzd2);
			}
		}

	}



/* &lambda2584 */
	obj_t BGl_z62lambda2584z62zzcfa_info2z00(obj_t BgL_envz00_8347,
		obj_t BgL_oz00_8348, obj_t BgL_vz00_8349)
	{
		{	/* Cfa/cinfo2.scm 136 */
			{
				BgL_makezd2structzd2appz00_bglt BgL_auxz00_14424;

				{
					obj_t BgL_auxz00_14425;

					{	/* Cfa/cinfo2.scm 136 */
						BgL_objectz00_bglt BgL_tmpz00_14426;

						BgL_tmpz00_14426 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8348));
						BgL_auxz00_14425 = BGL_OBJECT_WIDENING(BgL_tmpz00_14426);
					}
					BgL_auxz00_14424 =
						((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_14425);
				}
				return
					((((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_14424))->
						BgL_approxz00) =
					((BgL_approxz00_bglt) ((BgL_approxz00_bglt) BgL_vz00_8349)), BUNSPEC);
			}
		}

	}



/* &lambda2583 */
	BgL_approxz00_bglt BGl_z62lambda2583z62zzcfa_info2z00(obj_t BgL_envz00_8350,
		obj_t BgL_oz00_8351)
	{
		{	/* Cfa/cinfo2.scm 136 */
			{
				BgL_makezd2structzd2appz00_bglt BgL_auxz00_14433;

				{
					obj_t BgL_auxz00_14434;

					{	/* Cfa/cinfo2.scm 136 */
						BgL_objectz00_bglt BgL_tmpz00_14435;

						BgL_tmpz00_14435 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8351));
						BgL_auxz00_14434 = BGL_OBJECT_WIDENING(BgL_tmpz00_14435);
					}
					BgL_auxz00_14433 =
						((BgL_makezd2structzd2appz00_bglt) BgL_auxz00_14434);
				}
				return
					(((BgL_makezd2structzd2appz00_bglt) COBJECT(BgL_auxz00_14433))->
					BgL_approxz00);
			}
		}

	}



/* &lambda2547 */
	BgL_appz00_bglt BGl_z62lambda2547z62zzcfa_info2z00(obj_t BgL_envz00_8352,
		obj_t BgL_o1419z00_8353)
	{
		{	/* Cfa/cinfo2.scm 134 */
			{	/* Cfa/cinfo2.scm 134 */
				long BgL_arg2549z00_9363;

				{	/* Cfa/cinfo2.scm 134 */
					obj_t BgL_arg2551z00_9364;

					{	/* Cfa/cinfo2.scm 134 */
						obj_t BgL_arg2553z00_9365;

						{	/* Cfa/cinfo2.scm 134 */
							long BgL_arg1808z00_9366;

							{	/* Cfa/cinfo2.scm 134 */
								long BgL_arg1809z00_9367;

								BgL_arg1809z00_9367 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1419z00_8353)));
								BgL_arg1808z00_9366 = (BgL_arg1809z00_9367 - OBJECT_TYPE);
							}
							BgL_arg2553z00_9365 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9366);
						}
						BgL_arg2551z00_9364 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2553z00_9365);
					}
					{	/* Cfa/cinfo2.scm 134 */
						obj_t BgL_tmpz00_14447;

						BgL_tmpz00_14447 = ((obj_t) BgL_arg2551z00_9364);
						BgL_arg2549z00_9363 = BGL_CLASS_NUM(BgL_tmpz00_14447);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1419z00_8353)), BgL_arg2549z00_9363);
			}
			{	/* Cfa/cinfo2.scm 134 */
				BgL_objectz00_bglt BgL_tmpz00_14453;

				BgL_tmpz00_14453 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1419z00_8353));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14453, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1419z00_8353));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1419z00_8353));
		}

	}



/* &<@anonymous:2546> */
	obj_t BGl_z62zc3z04anonymousza32546ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8354,
		obj_t BgL_new1418z00_8355)
	{
		{	/* Cfa/cinfo2.scm 134 */
			{
				BgL_appz00_bglt BgL_auxz00_14461;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1418z00_8355))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_14465;

					{	/* Cfa/cinfo2.scm 134 */
						obj_t BgL_classz00_9369;

						BgL_classz00_9369 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 134 */
							obj_t BgL__ortest_1117z00_9370;

							BgL__ortest_1117z00_9370 = BGL_CLASS_NIL(BgL_classz00_9369);
							if (CBOOL(BgL__ortest_1117z00_9370))
								{	/* Cfa/cinfo2.scm 134 */
									BgL_auxz00_14465 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9370);
								}
							else
								{	/* Cfa/cinfo2.scm 134 */
									BgL_auxz00_14465 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9369));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1418z00_8355))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_14465), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1418z00_8355))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1418z00_8355))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_14481;

					{	/* Cfa/cinfo2.scm 134 */
						obj_t BgL_classz00_9371;

						BgL_classz00_9371 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 134 */
							obj_t BgL__ortest_1117z00_9372;

							BgL__ortest_1117z00_9372 = BGL_CLASS_NIL(BgL_classz00_9371);
							if (CBOOL(BgL__ortest_1117z00_9372))
								{	/* Cfa/cinfo2.scm 134 */
									BgL_auxz00_14481 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9372);
								}
							else
								{	/* Cfa/cinfo2.scm 134 */
									BgL_auxz00_14481 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9371));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1418z00_8355))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_14481), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1418z00_8355))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1418z00_8355))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				BgL_auxz00_14461 = ((BgL_appz00_bglt) BgL_new1418z00_8355);
				return ((obj_t) BgL_auxz00_14461);
			}
		}

	}



/* &lambda2542 */
	BgL_appz00_bglt BGl_z62lambda2542z62zzcfa_info2z00(obj_t BgL_envz00_8356,
		obj_t BgL_o1415z00_8357)
	{
		{	/* Cfa/cinfo2.scm 134 */
			{	/* Cfa/cinfo2.scm 134 */
				BgL_prezd2structzd2setz12zd2appzc0_bglt BgL_wide1417z00_9374;

				BgL_wide1417z00_9374 =
					((BgL_prezd2structzd2setz12zd2appzc0_bglt)
					BOBJECT(GC_MALLOC(sizeof(struct
								BgL_prezd2structzd2setz12zd2appzc0_bgl))));
				{	/* Cfa/cinfo2.scm 134 */
					obj_t BgL_auxz00_14504;
					BgL_objectz00_bglt BgL_tmpz00_14500;

					BgL_auxz00_14504 = ((obj_t) BgL_wide1417z00_9374);
					BgL_tmpz00_14500 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1415z00_8357)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14500, BgL_auxz00_14504);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1415z00_8357)));
				{	/* Cfa/cinfo2.scm 134 */
					long BgL_arg2545z00_9375;

					BgL_arg2545z00_9375 =
						BGL_CLASS_NUM(BGl_prezd2structzd2setz12zd2appzc0zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1415z00_8357))), BgL_arg2545z00_9375);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1415z00_8357)));
			}
		}

	}



/* &lambda2539 */
	BgL_appz00_bglt BGl_z62lambda2539z62zzcfa_info2z00(obj_t BgL_envz00_8358,
		obj_t BgL_loc1408z00_8359, obj_t BgL_type1409z00_8360,
		obj_t BgL_sidezd2effect1410zd2_8361, obj_t BgL_key1411z00_8362,
		obj_t BgL_fun1412z00_8363, obj_t BgL_args1413z00_8364,
		obj_t BgL_stackable1414z00_8365)
	{
		{	/* Cfa/cinfo2.scm 134 */
			{	/* Cfa/cinfo2.scm 134 */
				BgL_appz00_bglt BgL_new1647z00_9378;

				{	/* Cfa/cinfo2.scm 134 */
					BgL_appz00_bglt BgL_tmp1645z00_9379;
					BgL_prezd2structzd2setz12zd2appzc0_bglt BgL_wide1646z00_9380;

					{
						BgL_appz00_bglt BgL_auxz00_14518;

						{	/* Cfa/cinfo2.scm 134 */
							BgL_appz00_bglt BgL_new1644z00_9381;

							BgL_new1644z00_9381 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.scm 134 */
								long BgL_arg2541z00_9382;

								BgL_arg2541z00_9382 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1644z00_9381),
									BgL_arg2541z00_9382);
							}
							{	/* Cfa/cinfo2.scm 134 */
								BgL_objectz00_bglt BgL_tmpz00_14523;

								BgL_tmpz00_14523 = ((BgL_objectz00_bglt) BgL_new1644z00_9381);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14523, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1644z00_9381);
							BgL_auxz00_14518 = BgL_new1644z00_9381;
						}
						BgL_tmp1645z00_9379 = ((BgL_appz00_bglt) BgL_auxz00_14518);
					}
					BgL_wide1646z00_9380 =
						((BgL_prezd2structzd2setz12zd2appzc0_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2structzd2setz12zd2appzc0_bgl))));
					{	/* Cfa/cinfo2.scm 134 */
						obj_t BgL_auxz00_14531;
						BgL_objectz00_bglt BgL_tmpz00_14529;

						BgL_auxz00_14531 = ((obj_t) BgL_wide1646z00_9380);
						BgL_tmpz00_14529 = ((BgL_objectz00_bglt) BgL_tmp1645z00_9379);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14529, BgL_auxz00_14531);
					}
					((BgL_objectz00_bglt) BgL_tmp1645z00_9379);
					{	/* Cfa/cinfo2.scm 134 */
						long BgL_arg2540z00_9383;

						BgL_arg2540z00_9383 =
							BGL_CLASS_NUM(BGl_prezd2structzd2setz12zd2appzc0zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1645z00_9379), BgL_arg2540z00_9383);
					}
					BgL_new1647z00_9378 = ((BgL_appz00_bglt) BgL_tmp1645z00_9379);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1647z00_9378)))->BgL_locz00) =
					((obj_t) BgL_loc1408z00_8359), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1647z00_9378)))->BgL_typez00) =
					((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1409z00_8360)),
					BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1647z00_9378)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1410zd2_8361), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1647z00_9378)))->BgL_keyz00) =
					((obj_t) BgL_key1411z00_8362), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1647z00_9378)))->
						BgL_funz00) =
					((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1412z00_8363)), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1647z00_9378)))->
						BgL_argsz00) = ((obj_t) BgL_args1413z00_8364), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1647z00_9378)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1414z00_8365), BUNSPEC);
				return BgL_new1647z00_9378;
			}
		}

	}



/* &lambda2518 */
	BgL_appz00_bglt BGl_z62lambda2518z62zzcfa_info2z00(obj_t BgL_envz00_8366,
		obj_t BgL_o1406z00_8367)
	{
		{	/* Cfa/cinfo2.scm 133 */
			{	/* Cfa/cinfo2.scm 133 */
				long BgL_arg2520z00_9385;

				{	/* Cfa/cinfo2.scm 133 */
					obj_t BgL_arg2524z00_9386;

					{	/* Cfa/cinfo2.scm 133 */
						obj_t BgL_arg2527z00_9387;

						{	/* Cfa/cinfo2.scm 133 */
							long BgL_arg1808z00_9388;

							{	/* Cfa/cinfo2.scm 133 */
								long BgL_arg1809z00_9389;

								BgL_arg1809z00_9389 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1406z00_8367)));
								BgL_arg1808z00_9388 = (BgL_arg1809z00_9389 - OBJECT_TYPE);
							}
							BgL_arg2527z00_9387 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9388);
						}
						BgL_arg2524z00_9386 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2527z00_9387);
					}
					{	/* Cfa/cinfo2.scm 133 */
						obj_t BgL_tmpz00_14561;

						BgL_tmpz00_14561 = ((obj_t) BgL_arg2524z00_9386);
						BgL_arg2520z00_9385 = BGL_CLASS_NUM(BgL_tmpz00_14561);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1406z00_8367)), BgL_arg2520z00_9385);
			}
			{	/* Cfa/cinfo2.scm 133 */
				BgL_objectz00_bglt BgL_tmpz00_14567;

				BgL_tmpz00_14567 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1406z00_8367));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14567, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1406z00_8367));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1406z00_8367));
		}

	}



/* &<@anonymous:2517> */
	obj_t BGl_z62zc3z04anonymousza32517ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8368,
		obj_t BgL_new1405z00_8369)
	{
		{	/* Cfa/cinfo2.scm 133 */
			{
				BgL_appz00_bglt BgL_auxz00_14575;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1405z00_8369))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_14579;

					{	/* Cfa/cinfo2.scm 133 */
						obj_t BgL_classz00_9391;

						BgL_classz00_9391 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 133 */
							obj_t BgL__ortest_1117z00_9392;

							BgL__ortest_1117z00_9392 = BGL_CLASS_NIL(BgL_classz00_9391);
							if (CBOOL(BgL__ortest_1117z00_9392))
								{	/* Cfa/cinfo2.scm 133 */
									BgL_auxz00_14579 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9392);
								}
							else
								{	/* Cfa/cinfo2.scm 133 */
									BgL_auxz00_14579 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9391));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1405z00_8369))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_14579), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1405z00_8369))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1405z00_8369))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_14595;

					{	/* Cfa/cinfo2.scm 133 */
						obj_t BgL_classz00_9393;

						BgL_classz00_9393 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 133 */
							obj_t BgL__ortest_1117z00_9394;

							BgL__ortest_1117z00_9394 = BGL_CLASS_NIL(BgL_classz00_9393);
							if (CBOOL(BgL__ortest_1117z00_9394))
								{	/* Cfa/cinfo2.scm 133 */
									BgL_auxz00_14595 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9394);
								}
							else
								{	/* Cfa/cinfo2.scm 133 */
									BgL_auxz00_14595 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9393));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1405z00_8369))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_14595), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1405z00_8369))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1405z00_8369))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				BgL_auxz00_14575 = ((BgL_appz00_bglt) BgL_new1405z00_8369);
				return ((obj_t) BgL_auxz00_14575);
			}
		}

	}



/* &lambda2515 */
	BgL_appz00_bglt BGl_z62lambda2515z62zzcfa_info2z00(obj_t BgL_envz00_8370,
		obj_t BgL_o1402z00_8371)
	{
		{	/* Cfa/cinfo2.scm 133 */
			{	/* Cfa/cinfo2.scm 133 */
				BgL_prezd2structzd2refzd2appzd2_bglt BgL_wide1404z00_9396;

				BgL_wide1404z00_9396 =
					((BgL_prezd2structzd2refzd2appzd2_bglt)
					BOBJECT(GC_MALLOC(sizeof(struct
								BgL_prezd2structzd2refzd2appzd2_bgl))));
				{	/* Cfa/cinfo2.scm 133 */
					obj_t BgL_auxz00_14618;
					BgL_objectz00_bglt BgL_tmpz00_14614;

					BgL_auxz00_14618 = ((obj_t) BgL_wide1404z00_9396);
					BgL_tmpz00_14614 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1402z00_8371)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14614, BgL_auxz00_14618);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1402z00_8371)));
				{	/* Cfa/cinfo2.scm 133 */
					long BgL_arg2516z00_9397;

					BgL_arg2516z00_9397 =
						BGL_CLASS_NUM(BGl_prezd2structzd2refzd2appzd2zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1402z00_8371))), BgL_arg2516z00_9397);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1402z00_8371)));
			}
		}

	}



/* &lambda2509 */
	BgL_appz00_bglt BGl_z62lambda2509z62zzcfa_info2z00(obj_t BgL_envz00_8372,
		obj_t BgL_loc1395z00_8373, obj_t BgL_type1396z00_8374,
		obj_t BgL_sidezd2effect1397zd2_8375, obj_t BgL_key1398z00_8376,
		obj_t BgL_fun1399z00_8377, obj_t BgL_args1400z00_8378,
		obj_t BgL_stackable1401z00_8379)
	{
		{	/* Cfa/cinfo2.scm 133 */
			{	/* Cfa/cinfo2.scm 133 */
				BgL_appz00_bglt BgL_new1642z00_9400;

				{	/* Cfa/cinfo2.scm 133 */
					BgL_appz00_bglt BgL_tmp1640z00_9401;
					BgL_prezd2structzd2refzd2appzd2_bglt BgL_wide1641z00_9402;

					{
						BgL_appz00_bglt BgL_auxz00_14632;

						{	/* Cfa/cinfo2.scm 133 */
							BgL_appz00_bglt BgL_new1639z00_9403;

							BgL_new1639z00_9403 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.scm 133 */
								long BgL_arg2514z00_9404;

								BgL_arg2514z00_9404 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1639z00_9403),
									BgL_arg2514z00_9404);
							}
							{	/* Cfa/cinfo2.scm 133 */
								BgL_objectz00_bglt BgL_tmpz00_14637;

								BgL_tmpz00_14637 = ((BgL_objectz00_bglt) BgL_new1639z00_9403);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14637, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1639z00_9403);
							BgL_auxz00_14632 = BgL_new1639z00_9403;
						}
						BgL_tmp1640z00_9401 = ((BgL_appz00_bglt) BgL_auxz00_14632);
					}
					BgL_wide1641z00_9402 =
						((BgL_prezd2structzd2refzd2appzd2_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2structzd2refzd2appzd2_bgl))));
					{	/* Cfa/cinfo2.scm 133 */
						obj_t BgL_auxz00_14645;
						BgL_objectz00_bglt BgL_tmpz00_14643;

						BgL_auxz00_14645 = ((obj_t) BgL_wide1641z00_9402);
						BgL_tmpz00_14643 = ((BgL_objectz00_bglt) BgL_tmp1640z00_9401);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14643, BgL_auxz00_14645);
					}
					((BgL_objectz00_bglt) BgL_tmp1640z00_9401);
					{	/* Cfa/cinfo2.scm 133 */
						long BgL_arg2512z00_9405;

						BgL_arg2512z00_9405 =
							BGL_CLASS_NUM(BGl_prezd2structzd2refzd2appzd2zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1640z00_9401), BgL_arg2512z00_9405);
					}
					BgL_new1642z00_9400 = ((BgL_appz00_bglt) BgL_tmp1640z00_9401);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1642z00_9400)))->BgL_locz00) =
					((obj_t) BgL_loc1395z00_8373), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1642z00_9400)))->BgL_typez00) =
					((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1396z00_8374)),
					BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1642z00_9400)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1397zd2_8375), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1642z00_9400)))->BgL_keyz00) =
					((obj_t) BgL_key1398z00_8376), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1642z00_9400)))->
						BgL_funz00) =
					((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1399z00_8377)), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1642z00_9400)))->
						BgL_argsz00) = ((obj_t) BgL_args1400z00_8378), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1642z00_9400)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1401z00_8379), BUNSPEC);
				return BgL_new1642z00_9400;
			}
		}

	}



/* &lambda2490 */
	BgL_appz00_bglt BGl_z62lambda2490z62zzcfa_info2z00(obj_t BgL_envz00_8380,
		obj_t BgL_o1393z00_8381)
	{
		{	/* Cfa/cinfo2.scm 130 */
			{	/* Cfa/cinfo2.scm 130 */
				long BgL_arg2492z00_9407;

				{	/* Cfa/cinfo2.scm 130 */
					obj_t BgL_arg2494z00_9408;

					{	/* Cfa/cinfo2.scm 130 */
						obj_t BgL_arg2496z00_9409;

						{	/* Cfa/cinfo2.scm 130 */
							long BgL_arg1808z00_9410;

							{	/* Cfa/cinfo2.scm 130 */
								long BgL_arg1809z00_9411;

								BgL_arg1809z00_9411 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1393z00_8381)));
								BgL_arg1808z00_9410 = (BgL_arg1809z00_9411 - OBJECT_TYPE);
							}
							BgL_arg2496z00_9409 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9410);
						}
						BgL_arg2494z00_9408 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2496z00_9409);
					}
					{	/* Cfa/cinfo2.scm 130 */
						obj_t BgL_tmpz00_14675;

						BgL_tmpz00_14675 = ((obj_t) BgL_arg2494z00_9408);
						BgL_arg2492z00_9407 = BGL_CLASS_NUM(BgL_tmpz00_14675);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1393z00_8381)), BgL_arg2492z00_9407);
			}
			{	/* Cfa/cinfo2.scm 130 */
				BgL_objectz00_bglt BgL_tmpz00_14681;

				BgL_tmpz00_14681 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1393z00_8381));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14681, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1393z00_8381));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1393z00_8381));
		}

	}



/* &<@anonymous:2489> */
	obj_t BGl_z62zc3z04anonymousza32489ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8382,
		obj_t BgL_new1392z00_8383)
	{
		{	/* Cfa/cinfo2.scm 130 */
			{
				BgL_appz00_bglt BgL_auxz00_14689;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1392z00_8383))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_14693;

					{	/* Cfa/cinfo2.scm 130 */
						obj_t BgL_classz00_9413;

						BgL_classz00_9413 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 130 */
							obj_t BgL__ortest_1117z00_9414;

							BgL__ortest_1117z00_9414 = BGL_CLASS_NIL(BgL_classz00_9413);
							if (CBOOL(BgL__ortest_1117z00_9414))
								{	/* Cfa/cinfo2.scm 130 */
									BgL_auxz00_14693 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9414);
								}
							else
								{	/* Cfa/cinfo2.scm 130 */
									BgL_auxz00_14693 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9413));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1392z00_8383))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_14693), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1392z00_8383))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1392z00_8383))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_14709;

					{	/* Cfa/cinfo2.scm 130 */
						obj_t BgL_classz00_9415;

						BgL_classz00_9415 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 130 */
							obj_t BgL__ortest_1117z00_9416;

							BgL__ortest_1117z00_9416 = BGL_CLASS_NIL(BgL_classz00_9415);
							if (CBOOL(BgL__ortest_1117z00_9416))
								{	/* Cfa/cinfo2.scm 130 */
									BgL_auxz00_14709 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9416);
								}
							else
								{	/* Cfa/cinfo2.scm 130 */
									BgL_auxz00_14709 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9415));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1392z00_8383))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_14709), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1392z00_8383))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1392z00_8383))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_variablez00_bglt BgL_auxz00_14732;
					BgL_prezd2makezd2structzd2appzd2_bglt BgL_auxz00_14725;

					{	/* Cfa/cinfo2.scm 130 */
						obj_t BgL_classz00_9417;

						BgL_classz00_9417 = BGl_variablez00zzast_varz00;
						{	/* Cfa/cinfo2.scm 130 */
							obj_t BgL__ortest_1117z00_9418;

							BgL__ortest_1117z00_9418 = BGL_CLASS_NIL(BgL_classz00_9417);
							if (CBOOL(BgL__ortest_1117z00_9418))
								{	/* Cfa/cinfo2.scm 130 */
									BgL_auxz00_14732 =
										((BgL_variablez00_bglt) BgL__ortest_1117z00_9418);
								}
							else
								{	/* Cfa/cinfo2.scm 130 */
									BgL_auxz00_14732 =
										((BgL_variablez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9417));
								}
						}
					}
					{
						obj_t BgL_auxz00_14726;

						{	/* Cfa/cinfo2.scm 130 */
							BgL_objectz00_bglt BgL_tmpz00_14727;

							BgL_tmpz00_14727 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1392z00_8383));
							BgL_auxz00_14726 = BGL_OBJECT_WIDENING(BgL_tmpz00_14727);
						}
						BgL_auxz00_14725 =
							((BgL_prezd2makezd2structzd2appzd2_bglt) BgL_auxz00_14726);
					}
					((((BgL_prezd2makezd2structzd2appzd2_bglt)
								COBJECT(BgL_auxz00_14725))->BgL_ownerz00) =
						((BgL_variablez00_bglt) BgL_auxz00_14732), BUNSPEC);
				}
				BgL_auxz00_14689 = ((BgL_appz00_bglt) BgL_new1392z00_8383);
				return ((obj_t) BgL_auxz00_14689);
			}
		}

	}



/* &lambda2487 */
	BgL_appz00_bglt BGl_z62lambda2487z62zzcfa_info2z00(obj_t BgL_envz00_8384,
		obj_t BgL_o1389z00_8385)
	{
		{	/* Cfa/cinfo2.scm 130 */
			{	/* Cfa/cinfo2.scm 130 */
				BgL_prezd2makezd2structzd2appzd2_bglt BgL_wide1391z00_9420;

				BgL_wide1391z00_9420 =
					((BgL_prezd2makezd2structzd2appzd2_bglt)
					BOBJECT(GC_MALLOC(sizeof(struct
								BgL_prezd2makezd2structzd2appzd2_bgl))));
				{	/* Cfa/cinfo2.scm 130 */
					obj_t BgL_auxz00_14747;
					BgL_objectz00_bglt BgL_tmpz00_14743;

					BgL_auxz00_14747 = ((obj_t) BgL_wide1391z00_9420);
					BgL_tmpz00_14743 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1389z00_8385)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14743, BgL_auxz00_14747);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1389z00_8385)));
				{	/* Cfa/cinfo2.scm 130 */
					long BgL_arg2488z00_9421;

					BgL_arg2488z00_9421 =
						BGL_CLASS_NUM(BGl_prezd2makezd2structzd2appzd2zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1389z00_8385))), BgL_arg2488z00_9421);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1389z00_8385)));
			}
		}

	}



/* &lambda2484 */
	BgL_appz00_bglt BGl_z62lambda2484z62zzcfa_info2z00(obj_t BgL_envz00_8386,
		obj_t BgL_loc1381z00_8387, obj_t BgL_type1382z00_8388,
		obj_t BgL_sidezd2effect1383zd2_8389, obj_t BgL_key1384z00_8390,
		obj_t BgL_fun1385z00_8391, obj_t BgL_args1386z00_8392,
		obj_t BgL_stackable1387z00_8393, obj_t BgL_owner1388z00_8394)
	{
		{	/* Cfa/cinfo2.scm 130 */
			{	/* Cfa/cinfo2.scm 130 */
				BgL_appz00_bglt BgL_new1637z00_9425;

				{	/* Cfa/cinfo2.scm 130 */
					BgL_appz00_bglt BgL_tmp1635z00_9426;
					BgL_prezd2makezd2structzd2appzd2_bglt BgL_wide1636z00_9427;

					{
						BgL_appz00_bglt BgL_auxz00_14761;

						{	/* Cfa/cinfo2.scm 130 */
							BgL_appz00_bglt BgL_new1634z00_9428;

							BgL_new1634z00_9428 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.scm 130 */
								long BgL_arg2486z00_9429;

								BgL_arg2486z00_9429 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1634z00_9428),
									BgL_arg2486z00_9429);
							}
							{	/* Cfa/cinfo2.scm 130 */
								BgL_objectz00_bglt BgL_tmpz00_14766;

								BgL_tmpz00_14766 = ((BgL_objectz00_bglt) BgL_new1634z00_9428);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14766, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1634z00_9428);
							BgL_auxz00_14761 = BgL_new1634z00_9428;
						}
						BgL_tmp1635z00_9426 = ((BgL_appz00_bglt) BgL_auxz00_14761);
					}
					BgL_wide1636z00_9427 =
						((BgL_prezd2makezd2structzd2appzd2_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2makezd2structzd2appzd2_bgl))));
					{	/* Cfa/cinfo2.scm 130 */
						obj_t BgL_auxz00_14774;
						BgL_objectz00_bglt BgL_tmpz00_14772;

						BgL_auxz00_14774 = ((obj_t) BgL_wide1636z00_9427);
						BgL_tmpz00_14772 = ((BgL_objectz00_bglt) BgL_tmp1635z00_9426);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14772, BgL_auxz00_14774);
					}
					((BgL_objectz00_bglt) BgL_tmp1635z00_9426);
					{	/* Cfa/cinfo2.scm 130 */
						long BgL_arg2485z00_9430;

						BgL_arg2485z00_9430 =
							BGL_CLASS_NUM(BGl_prezd2makezd2structzd2appzd2zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1635z00_9426), BgL_arg2485z00_9430);
					}
					BgL_new1637z00_9425 = ((BgL_appz00_bglt) BgL_tmp1635z00_9426);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1637z00_9425)))->BgL_locz00) =
					((obj_t) BgL_loc1381z00_8387), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1637z00_9425)))->BgL_typez00) =
					((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1382z00_8388)),
					BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1637z00_9425)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1383zd2_8389), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1637z00_9425)))->BgL_keyz00) =
					((obj_t) BgL_key1384z00_8390), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1637z00_9425)))->
						BgL_funz00) =
					((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1385z00_8391)), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1637z00_9425)))->
						BgL_argsz00) = ((obj_t) BgL_args1386z00_8392), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1637z00_9425)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1387z00_8393), BUNSPEC);
				{
					BgL_prezd2makezd2structzd2appzd2_bglt BgL_auxz00_14798;

					{
						obj_t BgL_auxz00_14799;

						{	/* Cfa/cinfo2.scm 130 */
							BgL_objectz00_bglt BgL_tmpz00_14800;

							BgL_tmpz00_14800 = ((BgL_objectz00_bglt) BgL_new1637z00_9425);
							BgL_auxz00_14799 = BGL_OBJECT_WIDENING(BgL_tmpz00_14800);
						}
						BgL_auxz00_14798 =
							((BgL_prezd2makezd2structzd2appzd2_bglt) BgL_auxz00_14799);
					}
					((((BgL_prezd2makezd2structzd2appzd2_bglt)
								COBJECT(BgL_auxz00_14798))->BgL_ownerz00) =
						((BgL_variablez00_bglt) ((BgL_variablez00_bglt)
								BgL_owner1388z00_8394)), BUNSPEC);
				}
				return BgL_new1637z00_9425;
			}
		}

	}



/* &lambda2501 */
	obj_t BGl_z62lambda2501z62zzcfa_info2z00(obj_t BgL_envz00_8395,
		obj_t BgL_oz00_8396, obj_t BgL_vz00_8397)
	{
		{	/* Cfa/cinfo2.scm 130 */
			{
				BgL_prezd2makezd2structzd2appzd2_bglt BgL_auxz00_14806;

				{
					obj_t BgL_auxz00_14807;

					{	/* Cfa/cinfo2.scm 130 */
						BgL_objectz00_bglt BgL_tmpz00_14808;

						BgL_tmpz00_14808 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8396));
						BgL_auxz00_14807 = BGL_OBJECT_WIDENING(BgL_tmpz00_14808);
					}
					BgL_auxz00_14806 =
						((BgL_prezd2makezd2structzd2appzd2_bglt) BgL_auxz00_14807);
				}
				return
					((((BgL_prezd2makezd2structzd2appzd2_bglt)
							COBJECT(BgL_auxz00_14806))->BgL_ownerz00) =
					((BgL_variablez00_bglt) ((BgL_variablez00_bglt) BgL_vz00_8397)),
					BUNSPEC);
			}
		}

	}



/* &lambda2500 */
	BgL_variablez00_bglt BGl_z62lambda2500z62zzcfa_info2z00(obj_t BgL_envz00_8398,
		obj_t BgL_oz00_8399)
	{
		{	/* Cfa/cinfo2.scm 130 */
			{
				BgL_prezd2makezd2structzd2appzd2_bglt BgL_auxz00_14815;

				{
					obj_t BgL_auxz00_14816;

					{	/* Cfa/cinfo2.scm 130 */
						BgL_objectz00_bglt BgL_tmpz00_14817;

						BgL_tmpz00_14817 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8399));
						BgL_auxz00_14816 = BGL_OBJECT_WIDENING(BgL_tmpz00_14817);
					}
					BgL_auxz00_14815 =
						((BgL_prezd2makezd2structzd2appzd2_bglt) BgL_auxz00_14816);
				}
				return
					(((BgL_prezd2makezd2structzd2appzd2_bglt) COBJECT(BgL_auxz00_14815))->
					BgL_ownerz00);
			}
		}

	}



/* &lambda2462 */
	BgL_appz00_bglt BGl_z62lambda2462z62zzcfa_info2z00(obj_t BgL_envz00_8400,
		obj_t BgL_o1379z00_8401)
	{
		{	/* Cfa/cinfo2.scm 125 */
			{	/* Cfa/cinfo2.scm 125 */
				long BgL_arg2463z00_9435;

				{	/* Cfa/cinfo2.scm 125 */
					obj_t BgL_arg2464z00_9436;

					{	/* Cfa/cinfo2.scm 125 */
						obj_t BgL_arg2465z00_9437;

						{	/* Cfa/cinfo2.scm 125 */
							long BgL_arg1808z00_9438;

							{	/* Cfa/cinfo2.scm 125 */
								long BgL_arg1809z00_9439;

								BgL_arg1809z00_9439 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1379z00_8401)));
								BgL_arg1808z00_9438 = (BgL_arg1809z00_9439 - OBJECT_TYPE);
							}
							BgL_arg2465z00_9437 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9438);
						}
						BgL_arg2464z00_9436 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2465z00_9437);
					}
					{	/* Cfa/cinfo2.scm 125 */
						obj_t BgL_tmpz00_14829;

						BgL_tmpz00_14829 = ((obj_t) BgL_arg2464z00_9436);
						BgL_arg2463z00_9435 = BGL_CLASS_NUM(BgL_tmpz00_14829);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1379z00_8401)), BgL_arg2463z00_9435);
			}
			{	/* Cfa/cinfo2.scm 125 */
				BgL_objectz00_bglt BgL_tmpz00_14835;

				BgL_tmpz00_14835 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1379z00_8401));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14835, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1379z00_8401));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1379z00_8401));
		}

	}



/* &<@anonymous:2461> */
	obj_t BGl_z62zc3z04anonymousza32461ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8402,
		obj_t BgL_new1378z00_8403)
	{
		{	/* Cfa/cinfo2.scm 125 */
			{
				BgL_appz00_bglt BgL_auxz00_14843;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1378z00_8403))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_14847;

					{	/* Cfa/cinfo2.scm 125 */
						obj_t BgL_classz00_9441;

						BgL_classz00_9441 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 125 */
							obj_t BgL__ortest_1117z00_9442;

							BgL__ortest_1117z00_9442 = BGL_CLASS_NIL(BgL_classz00_9441);
							if (CBOOL(BgL__ortest_1117z00_9442))
								{	/* Cfa/cinfo2.scm 125 */
									BgL_auxz00_14847 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9442);
								}
							else
								{	/* Cfa/cinfo2.scm 125 */
									BgL_auxz00_14847 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9441));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1378z00_8403))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_14847), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1378z00_8403))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1378z00_8403))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_14863;

					{	/* Cfa/cinfo2.scm 125 */
						obj_t BgL_classz00_9443;

						BgL_classz00_9443 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 125 */
							obj_t BgL__ortest_1117z00_9444;

							BgL__ortest_1117z00_9444 = BGL_CLASS_NIL(BgL_classz00_9443);
							if (CBOOL(BgL__ortest_1117z00_9444))
								{	/* Cfa/cinfo2.scm 125 */
									BgL_auxz00_14863 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9444);
								}
							else
								{	/* Cfa/cinfo2.scm 125 */
									BgL_auxz00_14863 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9443));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1378z00_8403))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_14863), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1378z00_8403))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1378z00_8403))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_approxz00_bglt BgL_auxz00_14886;
					BgL_conszd2setz12zd2appz12_bglt BgL_auxz00_14879;

					{	/* Cfa/cinfo2.scm 125 */
						obj_t BgL_classz00_9445;

						BgL_classz00_9445 = BGl_approxz00zzcfa_infoz00;
						{	/* Cfa/cinfo2.scm 125 */
							obj_t BgL__ortest_1117z00_9446;

							BgL__ortest_1117z00_9446 = BGL_CLASS_NIL(BgL_classz00_9445);
							if (CBOOL(BgL__ortest_1117z00_9446))
								{	/* Cfa/cinfo2.scm 125 */
									BgL_auxz00_14886 =
										((BgL_approxz00_bglt) BgL__ortest_1117z00_9446);
								}
							else
								{	/* Cfa/cinfo2.scm 125 */
									BgL_auxz00_14886 =
										((BgL_approxz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9445));
								}
						}
					}
					{
						obj_t BgL_auxz00_14880;

						{	/* Cfa/cinfo2.scm 125 */
							BgL_objectz00_bglt BgL_tmpz00_14881;

							BgL_tmpz00_14881 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1378z00_8403));
							BgL_auxz00_14880 = BGL_OBJECT_WIDENING(BgL_tmpz00_14881);
						}
						BgL_auxz00_14879 =
							((BgL_conszd2setz12zd2appz12_bglt) BgL_auxz00_14880);
					}
					((((BgL_conszd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_14879))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_auxz00_14886), BUNSPEC);
				}
				{
					BgL_conszd2setz12zd2appz12_bglt BgL_auxz00_14894;

					{
						obj_t BgL_auxz00_14895;

						{	/* Cfa/cinfo2.scm 125 */
							BgL_objectz00_bglt BgL_tmpz00_14896;

							BgL_tmpz00_14896 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1378z00_8403));
							BgL_auxz00_14895 = BGL_OBJECT_WIDENING(BgL_tmpz00_14896);
						}
						BgL_auxz00_14894 =
							((BgL_conszd2setz12zd2appz12_bglt) BgL_auxz00_14895);
					}
					((((BgL_conszd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_14894))->
							BgL_getz00) =
						((obj_t) BGl_conszd2envzd2zz__r4_pairs_and_lists_6_3z00), BUNSPEC);
				}
				BgL_auxz00_14843 = ((BgL_appz00_bglt) BgL_new1378z00_8403);
				return ((obj_t) BgL_auxz00_14843);
			}
		}

	}



/* &lambda2459 */
	BgL_appz00_bglt BGl_z62lambda2459z62zzcfa_info2z00(obj_t BgL_envz00_8404,
		obj_t BgL_o1375z00_8405)
	{
		{	/* Cfa/cinfo2.scm 125 */
			{	/* Cfa/cinfo2.scm 125 */
				BgL_conszd2setz12zd2appz12_bglt BgL_wide1377z00_9448;

				BgL_wide1377z00_9448 =
					((BgL_conszd2setz12zd2appz12_bglt) BOBJECT(GC_MALLOC(sizeof(struct
								BgL_conszd2setz12zd2appz12_bgl))));
				{	/* Cfa/cinfo2.scm 125 */
					obj_t BgL_auxz00_14909;
					BgL_objectz00_bglt BgL_tmpz00_14905;

					BgL_auxz00_14909 = ((obj_t) BgL_wide1377z00_9448);
					BgL_tmpz00_14905 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1375z00_8405)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14905, BgL_auxz00_14909);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1375z00_8405)));
				{	/* Cfa/cinfo2.scm 125 */
					long BgL_arg2460z00_9449;

					BgL_arg2460z00_9449 =
						BGL_CLASS_NUM(BGl_conszd2setz12zd2appz12zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1375z00_8405))), BgL_arg2460z00_9449);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1375z00_8405)));
			}
		}

	}



/* &lambda2456 */
	BgL_appz00_bglt BGl_z62lambda2456z62zzcfa_info2z00(obj_t BgL_envz00_8406,
		obj_t BgL_loc1366z00_8407, obj_t BgL_type1367z00_8408,
		obj_t BgL_sidezd2effect1368zd2_8409, obj_t BgL_key1369z00_8410,
		obj_t BgL_fun1370z00_8411, obj_t BgL_args1371z00_8412,
		obj_t BgL_stackable1372z00_8413, obj_t BgL_approx1373z00_8414,
		obj_t BgL_get1374z00_8415)
	{
		{	/* Cfa/cinfo2.scm 125 */
			{	/* Cfa/cinfo2.scm 125 */
				BgL_appz00_bglt BgL_new1632z00_9454;

				{	/* Cfa/cinfo2.scm 125 */
					BgL_appz00_bglt BgL_tmp1630z00_9455;
					BgL_conszd2setz12zd2appz12_bglt BgL_wide1631z00_9456;

					{
						BgL_appz00_bglt BgL_auxz00_14923;

						{	/* Cfa/cinfo2.scm 125 */
							BgL_appz00_bglt BgL_new1629z00_9457;

							BgL_new1629z00_9457 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.scm 125 */
								long BgL_arg2458z00_9458;

								BgL_arg2458z00_9458 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1629z00_9457),
									BgL_arg2458z00_9458);
							}
							{	/* Cfa/cinfo2.scm 125 */
								BgL_objectz00_bglt BgL_tmpz00_14928;

								BgL_tmpz00_14928 = ((BgL_objectz00_bglt) BgL_new1629z00_9457);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14928, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1629z00_9457);
							BgL_auxz00_14923 = BgL_new1629z00_9457;
						}
						BgL_tmp1630z00_9455 = ((BgL_appz00_bglt) BgL_auxz00_14923);
					}
					BgL_wide1631z00_9456 =
						((BgL_conszd2setz12zd2appz12_bglt) BOBJECT(GC_MALLOC(sizeof(struct
									BgL_conszd2setz12zd2appz12_bgl))));
					{	/* Cfa/cinfo2.scm 125 */
						obj_t BgL_auxz00_14936;
						BgL_objectz00_bglt BgL_tmpz00_14934;

						BgL_auxz00_14936 = ((obj_t) BgL_wide1631z00_9456);
						BgL_tmpz00_14934 = ((BgL_objectz00_bglt) BgL_tmp1630z00_9455);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_14934, BgL_auxz00_14936);
					}
					((BgL_objectz00_bglt) BgL_tmp1630z00_9455);
					{	/* Cfa/cinfo2.scm 125 */
						long BgL_arg2457z00_9459;

						BgL_arg2457z00_9459 =
							BGL_CLASS_NUM(BGl_conszd2setz12zd2appz12zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1630z00_9455), BgL_arg2457z00_9459);
					}
					BgL_new1632z00_9454 = ((BgL_appz00_bglt) BgL_tmp1630z00_9455);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1632z00_9454)))->BgL_locz00) =
					((obj_t) BgL_loc1366z00_8407), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1632z00_9454)))->BgL_typez00) =
					((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1367z00_8408)),
					BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1632z00_9454)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1368zd2_8409), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1632z00_9454)))->BgL_keyz00) =
					((obj_t) BgL_key1369z00_8410), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1632z00_9454)))->
						BgL_funz00) =
					((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1370z00_8411)), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1632z00_9454)))->
						BgL_argsz00) = ((obj_t) BgL_args1371z00_8412), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1632z00_9454)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1372z00_8413), BUNSPEC);
				{
					BgL_conszd2setz12zd2appz12_bglt BgL_auxz00_14960;

					{
						obj_t BgL_auxz00_14961;

						{	/* Cfa/cinfo2.scm 125 */
							BgL_objectz00_bglt BgL_tmpz00_14962;

							BgL_tmpz00_14962 = ((BgL_objectz00_bglt) BgL_new1632z00_9454);
							BgL_auxz00_14961 = BGL_OBJECT_WIDENING(BgL_tmpz00_14962);
						}
						BgL_auxz00_14960 =
							((BgL_conszd2setz12zd2appz12_bglt) BgL_auxz00_14961);
					}
					((((BgL_conszd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_14960))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) ((BgL_approxz00_bglt)
								BgL_approx1373z00_8414)), BUNSPEC);
				}
				{
					BgL_conszd2setz12zd2appz12_bglt BgL_auxz00_14968;

					{
						obj_t BgL_auxz00_14969;

						{	/* Cfa/cinfo2.scm 125 */
							BgL_objectz00_bglt BgL_tmpz00_14970;

							BgL_tmpz00_14970 = ((BgL_objectz00_bglt) BgL_new1632z00_9454);
							BgL_auxz00_14969 = BGL_OBJECT_WIDENING(BgL_tmpz00_14970);
						}
						BgL_auxz00_14968 =
							((BgL_conszd2setz12zd2appz12_bglt) BgL_auxz00_14969);
					}
					((((BgL_conszd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_14968))->
							BgL_getz00) = ((obj_t) ((obj_t) BgL_get1374z00_8415)), BUNSPEC);
				}
				return BgL_new1632z00_9454;
			}
		}

	}



/* &lambda2475 */
	obj_t BGl_z62lambda2475z62zzcfa_info2z00(obj_t BgL_envz00_8416,
		obj_t BgL_oz00_8417, obj_t BgL_vz00_8418)
	{
		{	/* Cfa/cinfo2.scm 125 */
			{
				BgL_conszd2setz12zd2appz12_bglt BgL_auxz00_14976;

				{
					obj_t BgL_auxz00_14977;

					{	/* Cfa/cinfo2.scm 125 */
						BgL_objectz00_bglt BgL_tmpz00_14978;

						BgL_tmpz00_14978 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8417));
						BgL_auxz00_14977 = BGL_OBJECT_WIDENING(BgL_tmpz00_14978);
					}
					BgL_auxz00_14976 =
						((BgL_conszd2setz12zd2appz12_bglt) BgL_auxz00_14977);
				}
				return
					((((BgL_conszd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_14976))->
						BgL_getz00) = ((obj_t) ((obj_t) BgL_vz00_8418)), BUNSPEC);
			}
		}

	}



/* &lambda2474 */
	obj_t BGl_z62lambda2474z62zzcfa_info2z00(obj_t BgL_envz00_8419,
		obj_t BgL_oz00_8420)
	{
		{	/* Cfa/cinfo2.scm 125 */
			{
				BgL_conszd2setz12zd2appz12_bglt BgL_auxz00_14985;

				{
					obj_t BgL_auxz00_14986;

					{	/* Cfa/cinfo2.scm 125 */
						BgL_objectz00_bglt BgL_tmpz00_14987;

						BgL_tmpz00_14987 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8420));
						BgL_auxz00_14986 = BGL_OBJECT_WIDENING(BgL_tmpz00_14987);
					}
					BgL_auxz00_14985 =
						((BgL_conszd2setz12zd2appz12_bglt) BgL_auxz00_14986);
				}
				return
					(((BgL_conszd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_14985))->
					BgL_getz00);
			}
		}

	}



/* &lambda2470 */
	obj_t BGl_z62lambda2470z62zzcfa_info2z00(obj_t BgL_envz00_8421,
		obj_t BgL_oz00_8422, obj_t BgL_vz00_8423)
	{
		{	/* Cfa/cinfo2.scm 125 */
			{
				BgL_conszd2setz12zd2appz12_bglt BgL_auxz00_14993;

				{
					obj_t BgL_auxz00_14994;

					{	/* Cfa/cinfo2.scm 125 */
						BgL_objectz00_bglt BgL_tmpz00_14995;

						BgL_tmpz00_14995 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8422));
						BgL_auxz00_14994 = BGL_OBJECT_WIDENING(BgL_tmpz00_14995);
					}
					BgL_auxz00_14993 =
						((BgL_conszd2setz12zd2appz12_bglt) BgL_auxz00_14994);
				}
				return
					((((BgL_conszd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_14993))->
						BgL_approxz00) =
					((BgL_approxz00_bglt) ((BgL_approxz00_bglt) BgL_vz00_8423)), BUNSPEC);
			}
		}

	}



/* &lambda2469 */
	BgL_approxz00_bglt BGl_z62lambda2469z62zzcfa_info2z00(obj_t BgL_envz00_8424,
		obj_t BgL_oz00_8425)
	{
		{	/* Cfa/cinfo2.scm 125 */
			{
				BgL_conszd2setz12zd2appz12_bglt BgL_auxz00_15002;

				{
					obj_t BgL_auxz00_15003;

					{	/* Cfa/cinfo2.scm 125 */
						BgL_objectz00_bglt BgL_tmpz00_15004;

						BgL_tmpz00_15004 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8425));
						BgL_auxz00_15003 = BGL_OBJECT_WIDENING(BgL_tmpz00_15004);
					}
					BgL_auxz00_15002 =
						((BgL_conszd2setz12zd2appz12_bglt) BgL_auxz00_15003);
				}
				return
					(((BgL_conszd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_15002))->
					BgL_approxz00);
			}
		}

	}



/* &lambda2431 */
	BgL_appz00_bglt BGl_z62lambda2431z62zzcfa_info2z00(obj_t BgL_envz00_8426,
		obj_t BgL_o1364z00_8427)
	{
		{	/* Cfa/cinfo2.scm 122 */
			{	/* Cfa/cinfo2.scm 122 */
				long BgL_arg2432z00_9467;

				{	/* Cfa/cinfo2.scm 122 */
					obj_t BgL_arg2434z00_9468;

					{	/* Cfa/cinfo2.scm 122 */
						obj_t BgL_arg2435z00_9469;

						{	/* Cfa/cinfo2.scm 122 */
							long BgL_arg1808z00_9470;

							{	/* Cfa/cinfo2.scm 122 */
								long BgL_arg1809z00_9471;

								BgL_arg1809z00_9471 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1364z00_8427)));
								BgL_arg1808z00_9470 = (BgL_arg1809z00_9471 - OBJECT_TYPE);
							}
							BgL_arg2435z00_9469 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9470);
						}
						BgL_arg2434z00_9468 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2435z00_9469);
					}
					{	/* Cfa/cinfo2.scm 122 */
						obj_t BgL_tmpz00_15016;

						BgL_tmpz00_15016 = ((obj_t) BgL_arg2434z00_9468);
						BgL_arg2432z00_9467 = BGL_CLASS_NUM(BgL_tmpz00_15016);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1364z00_8427)), BgL_arg2432z00_9467);
			}
			{	/* Cfa/cinfo2.scm 122 */
				BgL_objectz00_bglt BgL_tmpz00_15022;

				BgL_tmpz00_15022 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1364z00_8427));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15022, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1364z00_8427));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1364z00_8427));
		}

	}



/* &<@anonymous:2430> */
	obj_t BGl_z62zc3z04anonymousza32430ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8428,
		obj_t BgL_new1363z00_8429)
	{
		{	/* Cfa/cinfo2.scm 122 */
			{
				BgL_appz00_bglt BgL_auxz00_15030;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1363z00_8429))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_15034;

					{	/* Cfa/cinfo2.scm 122 */
						obj_t BgL_classz00_9473;

						BgL_classz00_9473 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 122 */
							obj_t BgL__ortest_1117z00_9474;

							BgL__ortest_1117z00_9474 = BGL_CLASS_NIL(BgL_classz00_9473);
							if (CBOOL(BgL__ortest_1117z00_9474))
								{	/* Cfa/cinfo2.scm 122 */
									BgL_auxz00_15034 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9474);
								}
							else
								{	/* Cfa/cinfo2.scm 122 */
									BgL_auxz00_15034 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9473));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1363z00_8429))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_15034), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1363z00_8429))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1363z00_8429))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_15050;

					{	/* Cfa/cinfo2.scm 122 */
						obj_t BgL_classz00_9475;

						BgL_classz00_9475 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 122 */
							obj_t BgL__ortest_1117z00_9476;

							BgL__ortest_1117z00_9476 = BGL_CLASS_NIL(BgL_classz00_9475);
							if (CBOOL(BgL__ortest_1117z00_9476))
								{	/* Cfa/cinfo2.scm 122 */
									BgL_auxz00_15050 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9476);
								}
							else
								{	/* Cfa/cinfo2.scm 122 */
									BgL_auxz00_15050 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9475));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1363z00_8429))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_15050), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1363z00_8429))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1363z00_8429))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_approxz00_bglt BgL_auxz00_15073;
					BgL_conszd2refzd2appz00_bglt BgL_auxz00_15066;

					{	/* Cfa/cinfo2.scm 122 */
						obj_t BgL_classz00_9477;

						BgL_classz00_9477 = BGl_approxz00zzcfa_infoz00;
						{	/* Cfa/cinfo2.scm 122 */
							obj_t BgL__ortest_1117z00_9478;

							BgL__ortest_1117z00_9478 = BGL_CLASS_NIL(BgL_classz00_9477);
							if (CBOOL(BgL__ortest_1117z00_9478))
								{	/* Cfa/cinfo2.scm 122 */
									BgL_auxz00_15073 =
										((BgL_approxz00_bglt) BgL__ortest_1117z00_9478);
								}
							else
								{	/* Cfa/cinfo2.scm 122 */
									BgL_auxz00_15073 =
										((BgL_approxz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9477));
								}
						}
					}
					{
						obj_t BgL_auxz00_15067;

						{	/* Cfa/cinfo2.scm 122 */
							BgL_objectz00_bglt BgL_tmpz00_15068;

							BgL_tmpz00_15068 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1363z00_8429));
							BgL_auxz00_15067 = BGL_OBJECT_WIDENING(BgL_tmpz00_15068);
						}
						BgL_auxz00_15066 =
							((BgL_conszd2refzd2appz00_bglt) BgL_auxz00_15067);
					}
					((((BgL_conszd2refzd2appz00_bglt) COBJECT(BgL_auxz00_15066))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_auxz00_15073), BUNSPEC);
				}
				{
					BgL_conszd2refzd2appz00_bglt BgL_auxz00_15081;

					{
						obj_t BgL_auxz00_15082;

						{	/* Cfa/cinfo2.scm 122 */
							BgL_objectz00_bglt BgL_tmpz00_15083;

							BgL_tmpz00_15083 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1363z00_8429));
							BgL_auxz00_15082 = BGL_OBJECT_WIDENING(BgL_tmpz00_15083);
						}
						BgL_auxz00_15081 =
							((BgL_conszd2refzd2appz00_bglt) BgL_auxz00_15082);
					}
					((((BgL_conszd2refzd2appz00_bglt) COBJECT(BgL_auxz00_15081))->
							BgL_getz00) =
						((obj_t) BGl_conszd2envzd2zz__r4_pairs_and_lists_6_3z00), BUNSPEC);
				}
				BgL_auxz00_15030 = ((BgL_appz00_bglt) BgL_new1363z00_8429);
				return ((obj_t) BgL_auxz00_15030);
			}
		}

	}



/* &lambda2427 */
	BgL_appz00_bglt BGl_z62lambda2427z62zzcfa_info2z00(obj_t BgL_envz00_8430,
		obj_t BgL_o1360z00_8431)
	{
		{	/* Cfa/cinfo2.scm 122 */
			{	/* Cfa/cinfo2.scm 122 */
				BgL_conszd2refzd2appz00_bglt BgL_wide1362z00_9480;

				BgL_wide1362z00_9480 =
					((BgL_conszd2refzd2appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
								BgL_conszd2refzd2appz00_bgl))));
				{	/* Cfa/cinfo2.scm 122 */
					obj_t BgL_auxz00_15096;
					BgL_objectz00_bglt BgL_tmpz00_15092;

					BgL_auxz00_15096 = ((obj_t) BgL_wide1362z00_9480);
					BgL_tmpz00_15092 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1360z00_8431)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15092, BgL_auxz00_15096);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1360z00_8431)));
				{	/* Cfa/cinfo2.scm 122 */
					long BgL_arg2429z00_9481;

					BgL_arg2429z00_9481 =
						BGL_CLASS_NUM(BGl_conszd2refzd2appz00zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1360z00_8431))), BgL_arg2429z00_9481);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1360z00_8431)));
			}
		}

	}



/* &lambda2423 */
	BgL_appz00_bglt BGl_z62lambda2423z62zzcfa_info2z00(obj_t BgL_envz00_8432,
		obj_t BgL_loc1351z00_8433, obj_t BgL_type1352z00_8434,
		obj_t BgL_sidezd2effect1353zd2_8435, obj_t BgL_key1354z00_8436,
		obj_t BgL_fun1355z00_8437, obj_t BgL_args1356z00_8438,
		obj_t BgL_stackable1357z00_8439, obj_t BgL_approx1358z00_8440,
		obj_t BgL_get1359z00_8441)
	{
		{	/* Cfa/cinfo2.scm 122 */
			{	/* Cfa/cinfo2.scm 122 */
				BgL_appz00_bglt BgL_new1627z00_9486;

				{	/* Cfa/cinfo2.scm 122 */
					BgL_appz00_bglt BgL_tmp1625z00_9487;
					BgL_conszd2refzd2appz00_bglt BgL_wide1626z00_9488;

					{
						BgL_appz00_bglt BgL_auxz00_15110;

						{	/* Cfa/cinfo2.scm 122 */
							BgL_appz00_bglt BgL_new1624z00_9489;

							BgL_new1624z00_9489 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.scm 122 */
								long BgL_arg2426z00_9490;

								BgL_arg2426z00_9490 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1624z00_9489),
									BgL_arg2426z00_9490);
							}
							{	/* Cfa/cinfo2.scm 122 */
								BgL_objectz00_bglt BgL_tmpz00_15115;

								BgL_tmpz00_15115 = ((BgL_objectz00_bglt) BgL_new1624z00_9489);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15115, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1624z00_9489);
							BgL_auxz00_15110 = BgL_new1624z00_9489;
						}
						BgL_tmp1625z00_9487 = ((BgL_appz00_bglt) BgL_auxz00_15110);
					}
					BgL_wide1626z00_9488 =
						((BgL_conszd2refzd2appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
									BgL_conszd2refzd2appz00_bgl))));
					{	/* Cfa/cinfo2.scm 122 */
						obj_t BgL_auxz00_15123;
						BgL_objectz00_bglt BgL_tmpz00_15121;

						BgL_auxz00_15123 = ((obj_t) BgL_wide1626z00_9488);
						BgL_tmpz00_15121 = ((BgL_objectz00_bglt) BgL_tmp1625z00_9487);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15121, BgL_auxz00_15123);
					}
					((BgL_objectz00_bglt) BgL_tmp1625z00_9487);
					{	/* Cfa/cinfo2.scm 122 */
						long BgL_arg2425z00_9491;

						BgL_arg2425z00_9491 =
							BGL_CLASS_NUM(BGl_conszd2refzd2appz00zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1625z00_9487), BgL_arg2425z00_9491);
					}
					BgL_new1627z00_9486 = ((BgL_appz00_bglt) BgL_tmp1625z00_9487);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1627z00_9486)))->BgL_locz00) =
					((obj_t) BgL_loc1351z00_8433), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1627z00_9486)))->BgL_typez00) =
					((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1352z00_8434)),
					BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1627z00_9486)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1353zd2_8435), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1627z00_9486)))->BgL_keyz00) =
					((obj_t) BgL_key1354z00_8436), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1627z00_9486)))->
						BgL_funz00) =
					((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1355z00_8437)), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1627z00_9486)))->
						BgL_argsz00) = ((obj_t) BgL_args1356z00_8438), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1627z00_9486)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1357z00_8439), BUNSPEC);
				{
					BgL_conszd2refzd2appz00_bglt BgL_auxz00_15147;

					{
						obj_t BgL_auxz00_15148;

						{	/* Cfa/cinfo2.scm 122 */
							BgL_objectz00_bglt BgL_tmpz00_15149;

							BgL_tmpz00_15149 = ((BgL_objectz00_bglt) BgL_new1627z00_9486);
							BgL_auxz00_15148 = BGL_OBJECT_WIDENING(BgL_tmpz00_15149);
						}
						BgL_auxz00_15147 =
							((BgL_conszd2refzd2appz00_bglt) BgL_auxz00_15148);
					}
					((((BgL_conszd2refzd2appz00_bglt) COBJECT(BgL_auxz00_15147))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) ((BgL_approxz00_bglt)
								BgL_approx1358z00_8440)), BUNSPEC);
				}
				{
					BgL_conszd2refzd2appz00_bglt BgL_auxz00_15155;

					{
						obj_t BgL_auxz00_15156;

						{	/* Cfa/cinfo2.scm 122 */
							BgL_objectz00_bglt BgL_tmpz00_15157;

							BgL_tmpz00_15157 = ((BgL_objectz00_bglt) BgL_new1627z00_9486);
							BgL_auxz00_15156 = BGL_OBJECT_WIDENING(BgL_tmpz00_15157);
						}
						BgL_auxz00_15155 =
							((BgL_conszd2refzd2appz00_bglt) BgL_auxz00_15156);
					}
					((((BgL_conszd2refzd2appz00_bglt) COBJECT(BgL_auxz00_15155))->
							BgL_getz00) = ((obj_t) ((obj_t) BgL_get1359z00_8441)), BUNSPEC);
				}
				return BgL_new1627z00_9486;
			}
		}

	}



/* &lambda2447 */
	obj_t BGl_z62lambda2447z62zzcfa_info2z00(obj_t BgL_envz00_8442,
		obj_t BgL_oz00_8443, obj_t BgL_vz00_8444)
	{
		{	/* Cfa/cinfo2.scm 122 */
			{
				BgL_conszd2refzd2appz00_bglt BgL_auxz00_15163;

				{
					obj_t BgL_auxz00_15164;

					{	/* Cfa/cinfo2.scm 122 */
						BgL_objectz00_bglt BgL_tmpz00_15165;

						BgL_tmpz00_15165 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8443));
						BgL_auxz00_15164 = BGL_OBJECT_WIDENING(BgL_tmpz00_15165);
					}
					BgL_auxz00_15163 = ((BgL_conszd2refzd2appz00_bglt) BgL_auxz00_15164);
				}
				return
					((((BgL_conszd2refzd2appz00_bglt) COBJECT(BgL_auxz00_15163))->
						BgL_getz00) = ((obj_t) ((obj_t) BgL_vz00_8444)), BUNSPEC);
			}
		}

	}



/* &lambda2446 */
	obj_t BGl_z62lambda2446z62zzcfa_info2z00(obj_t BgL_envz00_8445,
		obj_t BgL_oz00_8446)
	{
		{	/* Cfa/cinfo2.scm 122 */
			{
				BgL_conszd2refzd2appz00_bglt BgL_auxz00_15172;

				{
					obj_t BgL_auxz00_15173;

					{	/* Cfa/cinfo2.scm 122 */
						BgL_objectz00_bglt BgL_tmpz00_15174;

						BgL_tmpz00_15174 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8446));
						BgL_auxz00_15173 = BGL_OBJECT_WIDENING(BgL_tmpz00_15174);
					}
					BgL_auxz00_15172 = ((BgL_conszd2refzd2appz00_bglt) BgL_auxz00_15173);
				}
				return
					(((BgL_conszd2refzd2appz00_bglt) COBJECT(BgL_auxz00_15172))->
					BgL_getz00);
			}
		}

	}



/* &lambda2440 */
	obj_t BGl_z62lambda2440z62zzcfa_info2z00(obj_t BgL_envz00_8447,
		obj_t BgL_oz00_8448, obj_t BgL_vz00_8449)
	{
		{	/* Cfa/cinfo2.scm 122 */
			{
				BgL_conszd2refzd2appz00_bglt BgL_auxz00_15180;

				{
					obj_t BgL_auxz00_15181;

					{	/* Cfa/cinfo2.scm 122 */
						BgL_objectz00_bglt BgL_tmpz00_15182;

						BgL_tmpz00_15182 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8448));
						BgL_auxz00_15181 = BGL_OBJECT_WIDENING(BgL_tmpz00_15182);
					}
					BgL_auxz00_15180 = ((BgL_conszd2refzd2appz00_bglt) BgL_auxz00_15181);
				}
				return
					((((BgL_conszd2refzd2appz00_bglt) COBJECT(BgL_auxz00_15180))->
						BgL_approxz00) =
					((BgL_approxz00_bglt) ((BgL_approxz00_bglt) BgL_vz00_8449)), BUNSPEC);
			}
		}

	}



/* &lambda2439 */
	BgL_approxz00_bglt BGl_z62lambda2439z62zzcfa_info2z00(obj_t BgL_envz00_8450,
		obj_t BgL_oz00_8451)
	{
		{	/* Cfa/cinfo2.scm 122 */
			{
				BgL_conszd2refzd2appz00_bglt BgL_auxz00_15189;

				{
					obj_t BgL_auxz00_15190;

					{	/* Cfa/cinfo2.scm 122 */
						BgL_objectz00_bglt BgL_tmpz00_15191;

						BgL_tmpz00_15191 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8451));
						BgL_auxz00_15190 = BGL_OBJECT_WIDENING(BgL_tmpz00_15191);
					}
					BgL_auxz00_15189 = ((BgL_conszd2refzd2appz00_bglt) BgL_auxz00_15190);
				}
				return
					(((BgL_conszd2refzd2appz00_bglt) COBJECT(BgL_auxz00_15189))->
					BgL_approxz00);
			}
		}

	}



/* &lambda2371 */
	BgL_appz00_bglt BGl_z62lambda2371z62zzcfa_info2z00(obj_t BgL_envz00_8452,
		obj_t BgL_o1349z00_8453)
	{
		{	/* Cfa/cinfo2.scm 101 */
			{	/* Cfa/cinfo2.scm 101 */
				long BgL_arg2373z00_9499;

				{	/* Cfa/cinfo2.scm 101 */
					obj_t BgL_arg2374z00_9500;

					{	/* Cfa/cinfo2.scm 101 */
						obj_t BgL_arg2375z00_9501;

						{	/* Cfa/cinfo2.scm 101 */
							long BgL_arg1808z00_9502;

							{	/* Cfa/cinfo2.scm 101 */
								long BgL_arg1809z00_9503;

								BgL_arg1809z00_9503 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1349z00_8453)));
								BgL_arg1808z00_9502 = (BgL_arg1809z00_9503 - OBJECT_TYPE);
							}
							BgL_arg2375z00_9501 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9502);
						}
						BgL_arg2374z00_9500 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2375z00_9501);
					}
					{	/* Cfa/cinfo2.scm 101 */
						obj_t BgL_tmpz00_15203;

						BgL_tmpz00_15203 = ((obj_t) BgL_arg2374z00_9500);
						BgL_arg2373z00_9499 = BGL_CLASS_NUM(BgL_tmpz00_15203);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1349z00_8453)), BgL_arg2373z00_9499);
			}
			{	/* Cfa/cinfo2.scm 101 */
				BgL_objectz00_bglt BgL_tmpz00_15209;

				BgL_tmpz00_15209 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1349z00_8453));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15209, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1349z00_8453));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1349z00_8453));
		}

	}



/* &<@anonymous:2370> */
	obj_t BGl_z62zc3z04anonymousza32370ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8454,
		obj_t BgL_new1348z00_8455)
	{
		{	/* Cfa/cinfo2.scm 101 */
			{
				BgL_appz00_bglt BgL_auxz00_15217;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1348z00_8455))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_15221;

					{	/* Cfa/cinfo2.scm 101 */
						obj_t BgL_classz00_9505;

						BgL_classz00_9505 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 101 */
							obj_t BgL__ortest_1117z00_9506;

							BgL__ortest_1117z00_9506 = BGL_CLASS_NIL(BgL_classz00_9505);
							if (CBOOL(BgL__ortest_1117z00_9506))
								{	/* Cfa/cinfo2.scm 101 */
									BgL_auxz00_15221 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9506);
								}
							else
								{	/* Cfa/cinfo2.scm 101 */
									BgL_auxz00_15221 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9505));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1348z00_8455))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_15221), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1348z00_8455))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1348z00_8455))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_15237;

					{	/* Cfa/cinfo2.scm 101 */
						obj_t BgL_classz00_9507;

						BgL_classz00_9507 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 101 */
							obj_t BgL__ortest_1117z00_9508;

							BgL__ortest_1117z00_9508 = BGL_CLASS_NIL(BgL_classz00_9507);
							if (CBOOL(BgL__ortest_1117z00_9508))
								{	/* Cfa/cinfo2.scm 101 */
									BgL_auxz00_15237 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9508);
								}
							else
								{	/* Cfa/cinfo2.scm 101 */
									BgL_auxz00_15237 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9507));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1348z00_8455))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_15237), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1348z00_8455))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1348z00_8455))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_approxz00_bglt BgL_auxz00_15260;
					BgL_conszd2appzd2_bglt BgL_auxz00_15253;

					{	/* Cfa/cinfo2.scm 101 */
						obj_t BgL_classz00_9509;

						BgL_classz00_9509 = BGl_approxz00zzcfa_infoz00;
						{	/* Cfa/cinfo2.scm 101 */
							obj_t BgL__ortest_1117z00_9510;

							BgL__ortest_1117z00_9510 = BGL_CLASS_NIL(BgL_classz00_9509);
							if (CBOOL(BgL__ortest_1117z00_9510))
								{	/* Cfa/cinfo2.scm 101 */
									BgL_auxz00_15260 =
										((BgL_approxz00_bglt) BgL__ortest_1117z00_9510);
								}
							else
								{	/* Cfa/cinfo2.scm 101 */
									BgL_auxz00_15260 =
										((BgL_approxz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9509));
								}
						}
					}
					{
						obj_t BgL_auxz00_15254;

						{	/* Cfa/cinfo2.scm 101 */
							BgL_objectz00_bglt BgL_tmpz00_15255;

							BgL_tmpz00_15255 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1348z00_8455));
							BgL_auxz00_15254 = BGL_OBJECT_WIDENING(BgL_tmpz00_15255);
						}
						BgL_auxz00_15253 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15254);
					}
					((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15253))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_auxz00_15260), BUNSPEC);
				}
				{
					BgL_conszd2appzd2_bglt BgL_auxz00_15268;

					{
						obj_t BgL_auxz00_15269;

						{	/* Cfa/cinfo2.scm 101 */
							BgL_objectz00_bglt BgL_tmpz00_15270;

							BgL_tmpz00_15270 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1348z00_8455));
							BgL_auxz00_15269 = BGL_OBJECT_WIDENING(BgL_tmpz00_15270);
						}
						BgL_auxz00_15268 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15269);
					}
					((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15268))->
							BgL_approxesz00) =
						((obj_t) MAKE_YOUNG_PAIR(BFALSE, BFALSE)), BUNSPEC);
				}
				{
					BgL_conszd2appzd2_bglt BgL_auxz00_15277;

					{
						obj_t BgL_auxz00_15278;

						{	/* Cfa/cinfo2.scm 101 */
							BgL_objectz00_bglt BgL_tmpz00_15279;

							BgL_tmpz00_15279 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1348z00_8455));
							BgL_auxz00_15278 = BGL_OBJECT_WIDENING(BgL_tmpz00_15279);
						}
						BgL_auxz00_15277 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15278);
					}
					((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15277))->
							BgL_lostzd2stampzd2) = ((long) 0L), BUNSPEC);
				}
				{
					BgL_variablez00_bglt BgL_auxz00_15292;
					BgL_conszd2appzd2_bglt BgL_auxz00_15285;

					{	/* Cfa/cinfo2.scm 101 */
						obj_t BgL_classz00_9511;

						BgL_classz00_9511 = BGl_variablez00zzast_varz00;
						{	/* Cfa/cinfo2.scm 101 */
							obj_t BgL__ortest_1117z00_9512;

							BgL__ortest_1117z00_9512 = BGL_CLASS_NIL(BgL_classz00_9511);
							if (CBOOL(BgL__ortest_1117z00_9512))
								{	/* Cfa/cinfo2.scm 101 */
									BgL_auxz00_15292 =
										((BgL_variablez00_bglt) BgL__ortest_1117z00_9512);
								}
							else
								{	/* Cfa/cinfo2.scm 101 */
									BgL_auxz00_15292 =
										((BgL_variablez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9511));
								}
						}
					}
					{
						obj_t BgL_auxz00_15286;

						{	/* Cfa/cinfo2.scm 101 */
							BgL_objectz00_bglt BgL_tmpz00_15287;

							BgL_tmpz00_15287 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1348z00_8455));
							BgL_auxz00_15286 = BGL_OBJECT_WIDENING(BgL_tmpz00_15287);
						}
						BgL_auxz00_15285 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15286);
					}
					((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15285))->
							BgL_ownerz00) =
						((BgL_variablez00_bglt) BgL_auxz00_15292), BUNSPEC);
				}
				{
					BgL_conszd2appzd2_bglt BgL_auxz00_15300;

					{
						obj_t BgL_auxz00_15301;

						{	/* Cfa/cinfo2.scm 101 */
							BgL_objectz00_bglt BgL_tmpz00_15302;

							BgL_tmpz00_15302 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1348z00_8455));
							BgL_auxz00_15301 = BGL_OBJECT_WIDENING(BgL_tmpz00_15302);
						}
						BgL_auxz00_15300 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15301);
					}
					((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15300))->
							BgL_stackzd2stampzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				}
				{
					BgL_conszd2appzd2_bglt BgL_auxz00_15308;

					{
						obj_t BgL_auxz00_15309;

						{	/* Cfa/cinfo2.scm 101 */
							BgL_objectz00_bglt BgL_tmpz00_15310;

							BgL_tmpz00_15310 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1348z00_8455));
							BgL_auxz00_15309 = BGL_OBJECT_WIDENING(BgL_tmpz00_15310);
						}
						BgL_auxz00_15308 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15309);
					}
					((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15308))->
							BgL_seenzf3zf3) = ((bool_t) ((bool_t) 0)), BUNSPEC);
				}
				BgL_auxz00_15217 = ((BgL_appz00_bglt) BgL_new1348z00_8455);
				return ((obj_t) BgL_auxz00_15217);
			}
		}

	}



/* &lambda2368 */
	BgL_appz00_bglt BGl_z62lambda2368z62zzcfa_info2z00(obj_t BgL_envz00_8456,
		obj_t BgL_o1345z00_8457)
	{
		{	/* Cfa/cinfo2.scm 101 */
			{	/* Cfa/cinfo2.scm 101 */
				BgL_conszd2appzd2_bglt BgL_wide1347z00_9514;

				BgL_wide1347z00_9514 =
					((BgL_conszd2appzd2_bglt) BOBJECT(GC_MALLOC(sizeof(struct
								BgL_conszd2appzd2_bgl))));
				{	/* Cfa/cinfo2.scm 101 */
					obj_t BgL_auxz00_15323;
					BgL_objectz00_bglt BgL_tmpz00_15319;

					BgL_auxz00_15323 = ((obj_t) BgL_wide1347z00_9514);
					BgL_tmpz00_15319 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1345z00_8457)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15319, BgL_auxz00_15323);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1345z00_8457)));
				{	/* Cfa/cinfo2.scm 101 */
					long BgL_arg2369z00_9515;

					BgL_arg2369z00_9515 = BGL_CLASS_NUM(BGl_conszd2appzd2zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1345z00_8457))), BgL_arg2369z00_9515);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1345z00_8457)));
			}
		}

	}



/* &lambda2365 */
	BgL_appz00_bglt BGl_z62lambda2365z62zzcfa_info2z00(obj_t BgL_envz00_8458,
		obj_t BgL_loc1332z00_8459, obj_t BgL_type1333z00_8460,
		obj_t BgL_sidezd2effect1334zd2_8461, obj_t BgL_key1335z00_8462,
		obj_t BgL_fun1336z00_8463, obj_t BgL_args1337z00_8464,
		obj_t BgL_stackable1338z00_8465, obj_t BgL_approx1339z00_8466,
		obj_t BgL_approxes1340z00_8467, obj_t BgL_lostzd2stamp1341zd2_8468,
		obj_t BgL_owner1342z00_8469, obj_t BgL_stackzd2stamp1343zd2_8470,
		obj_t BgL_seenzf31344zf3_8471)
	{
		{	/* Cfa/cinfo2.scm 101 */
			{	/* Cfa/cinfo2.scm 101 */
				long BgL_lostzd2stamp1341zd2_9520;
				bool_t BgL_seenzf31344zf3_9522;

				BgL_lostzd2stamp1341zd2_9520 =
					(long) CINT(BgL_lostzd2stamp1341zd2_8468);
				BgL_seenzf31344zf3_9522 = CBOOL(BgL_seenzf31344zf3_8471);
				{	/* Cfa/cinfo2.scm 101 */
					BgL_appz00_bglt BgL_new1622z00_9523;

					{	/* Cfa/cinfo2.scm 101 */
						BgL_appz00_bglt BgL_tmp1620z00_9524;
						BgL_conszd2appzd2_bglt BgL_wide1621z00_9525;

						{
							BgL_appz00_bglt BgL_auxz00_15339;

							{	/* Cfa/cinfo2.scm 101 */
								BgL_appz00_bglt BgL_new1619z00_9526;

								BgL_new1619z00_9526 =
									((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
												BgL_appz00_bgl))));
								{	/* Cfa/cinfo2.scm 101 */
									long BgL_arg2367z00_9527;

									BgL_arg2367z00_9527 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
									BGL_OBJECT_CLASS_NUM_SET(
										((BgL_objectz00_bglt) BgL_new1619z00_9526),
										BgL_arg2367z00_9527);
								}
								{	/* Cfa/cinfo2.scm 101 */
									BgL_objectz00_bglt BgL_tmpz00_15344;

									BgL_tmpz00_15344 = ((BgL_objectz00_bglt) BgL_new1619z00_9526);
									BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15344, BFALSE);
								}
								((BgL_objectz00_bglt) BgL_new1619z00_9526);
								BgL_auxz00_15339 = BgL_new1619z00_9526;
							}
							BgL_tmp1620z00_9524 = ((BgL_appz00_bglt) BgL_auxz00_15339);
						}
						BgL_wide1621z00_9525 =
							((BgL_conszd2appzd2_bglt) BOBJECT(GC_MALLOC(sizeof(struct
										BgL_conszd2appzd2_bgl))));
						{	/* Cfa/cinfo2.scm 101 */
							obj_t BgL_auxz00_15352;
							BgL_objectz00_bglt BgL_tmpz00_15350;

							BgL_auxz00_15352 = ((obj_t) BgL_wide1621z00_9525);
							BgL_tmpz00_15350 = ((BgL_objectz00_bglt) BgL_tmp1620z00_9524);
							BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15350, BgL_auxz00_15352);
						}
						((BgL_objectz00_bglt) BgL_tmp1620z00_9524);
						{	/* Cfa/cinfo2.scm 101 */
							long BgL_arg2366z00_9528;

							BgL_arg2366z00_9528 =
								BGL_CLASS_NUM(BGl_conszd2appzd2zzcfa_info2z00);
							BGL_OBJECT_CLASS_NUM_SET(
								((BgL_objectz00_bglt) BgL_tmp1620z00_9524),
								BgL_arg2366z00_9528);
						}
						BgL_new1622z00_9523 = ((BgL_appz00_bglt) BgL_tmp1620z00_9524);
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt) BgL_new1622z00_9523)))->BgL_locz00) =
						((obj_t) BgL_loc1332z00_8459), BUNSPEC);
					((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
										BgL_new1622z00_9523)))->BgL_typez00) =
						((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1333z00_8460)),
						BUNSPEC);
					((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
										BgL_new1622z00_9523)))->BgL_sidezd2effectzd2) =
						((obj_t) BgL_sidezd2effect1334zd2_8461), BUNSPEC);
					((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
										BgL_new1622z00_9523)))->BgL_keyz00) =
						((obj_t) BgL_key1335z00_8462), BUNSPEC);
					((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt)
										BgL_new1622z00_9523)))->BgL_funz00) =
						((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1336z00_8463)),
						BUNSPEC);
					((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt)
										BgL_new1622z00_9523)))->BgL_argsz00) =
						((obj_t) BgL_args1337z00_8464), BUNSPEC);
					((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt)
										BgL_new1622z00_9523)))->BgL_stackablez00) =
						((obj_t) BgL_stackable1338z00_8465), BUNSPEC);
					{
						BgL_conszd2appzd2_bglt BgL_auxz00_15376;

						{
							obj_t BgL_auxz00_15377;

							{	/* Cfa/cinfo2.scm 101 */
								BgL_objectz00_bglt BgL_tmpz00_15378;

								BgL_tmpz00_15378 = ((BgL_objectz00_bglt) BgL_new1622z00_9523);
								BgL_auxz00_15377 = BGL_OBJECT_WIDENING(BgL_tmpz00_15378);
							}
							BgL_auxz00_15376 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15377);
						}
						((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15376))->
								BgL_approxz00) =
							((BgL_approxz00_bglt) ((BgL_approxz00_bglt)
									BgL_approx1339z00_8466)), BUNSPEC);
					}
					{
						BgL_conszd2appzd2_bglt BgL_auxz00_15384;

						{
							obj_t BgL_auxz00_15385;

							{	/* Cfa/cinfo2.scm 101 */
								BgL_objectz00_bglt BgL_tmpz00_15386;

								BgL_tmpz00_15386 = ((BgL_objectz00_bglt) BgL_new1622z00_9523);
								BgL_auxz00_15385 = BGL_OBJECT_WIDENING(BgL_tmpz00_15386);
							}
							BgL_auxz00_15384 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15385);
						}
						((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15384))->
								BgL_approxesz00) =
							((obj_t) ((obj_t) BgL_approxes1340z00_8467)), BUNSPEC);
					}
					{
						BgL_conszd2appzd2_bglt BgL_auxz00_15392;

						{
							obj_t BgL_auxz00_15393;

							{	/* Cfa/cinfo2.scm 101 */
								BgL_objectz00_bglt BgL_tmpz00_15394;

								BgL_tmpz00_15394 = ((BgL_objectz00_bglt) BgL_new1622z00_9523);
								BgL_auxz00_15393 = BGL_OBJECT_WIDENING(BgL_tmpz00_15394);
							}
							BgL_auxz00_15392 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15393);
						}
						((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15392))->
								BgL_lostzd2stampzd2) =
							((long) BgL_lostzd2stamp1341zd2_9520), BUNSPEC);
					}
					{
						BgL_conszd2appzd2_bglt BgL_auxz00_15399;

						{
							obj_t BgL_auxz00_15400;

							{	/* Cfa/cinfo2.scm 101 */
								BgL_objectz00_bglt BgL_tmpz00_15401;

								BgL_tmpz00_15401 = ((BgL_objectz00_bglt) BgL_new1622z00_9523);
								BgL_auxz00_15400 = BGL_OBJECT_WIDENING(BgL_tmpz00_15401);
							}
							BgL_auxz00_15399 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15400);
						}
						((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15399))->
								BgL_ownerz00) =
							((BgL_variablez00_bglt) ((BgL_variablez00_bglt)
									BgL_owner1342z00_8469)), BUNSPEC);
					}
					{
						BgL_conszd2appzd2_bglt BgL_auxz00_15407;

						{
							obj_t BgL_auxz00_15408;

							{	/* Cfa/cinfo2.scm 101 */
								BgL_objectz00_bglt BgL_tmpz00_15409;

								BgL_tmpz00_15409 = ((BgL_objectz00_bglt) BgL_new1622z00_9523);
								BgL_auxz00_15408 = BGL_OBJECT_WIDENING(BgL_tmpz00_15409);
							}
							BgL_auxz00_15407 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15408);
						}
						((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15407))->
								BgL_stackzd2stampzd2) =
							((obj_t) BgL_stackzd2stamp1343zd2_8470), BUNSPEC);
					}
					{
						BgL_conszd2appzd2_bglt BgL_auxz00_15414;

						{
							obj_t BgL_auxz00_15415;

							{	/* Cfa/cinfo2.scm 101 */
								BgL_objectz00_bglt BgL_tmpz00_15416;

								BgL_tmpz00_15416 = ((BgL_objectz00_bglt) BgL_new1622z00_9523);
								BgL_auxz00_15415 = BGL_OBJECT_WIDENING(BgL_tmpz00_15416);
							}
							BgL_auxz00_15414 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15415);
						}
						((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15414))->
								BgL_seenzf3zf3) = ((bool_t) BgL_seenzf31344zf3_9522), BUNSPEC);
					}
					return BgL_new1622z00_9523;
				}
			}
		}

	}



/* &<@anonymous:2415> */
	obj_t BGl_z62zc3z04anonymousza32415ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8472)
	{
		{	/* Cfa/cinfo2.scm 101 */
			return BBOOL(((bool_t) 0));
		}

	}



/* &lambda2414 */
	obj_t BGl_z62lambda2414z62zzcfa_info2z00(obj_t BgL_envz00_8473,
		obj_t BgL_oz00_8474, obj_t BgL_vz00_8475)
	{
		{	/* Cfa/cinfo2.scm 101 */
			{	/* Cfa/cinfo2.scm 101 */
				bool_t BgL_vz00_9530;

				BgL_vz00_9530 = CBOOL(BgL_vz00_8475);
				{
					BgL_conszd2appzd2_bglt BgL_auxz00_15423;

					{
						obj_t BgL_auxz00_15424;

						{	/* Cfa/cinfo2.scm 101 */
							BgL_objectz00_bglt BgL_tmpz00_15425;

							BgL_tmpz00_15425 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8474));
							BgL_auxz00_15424 = BGL_OBJECT_WIDENING(BgL_tmpz00_15425);
						}
						BgL_auxz00_15423 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15424);
					}
					return
						((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15423))->
							BgL_seenzf3zf3) = ((bool_t) BgL_vz00_9530), BUNSPEC);
				}
			}
		}

	}



/* &lambda2413 */
	obj_t BGl_z62lambda2413z62zzcfa_info2z00(obj_t BgL_envz00_8476,
		obj_t BgL_oz00_8477)
	{
		{	/* Cfa/cinfo2.scm 101 */
			{	/* Cfa/cinfo2.scm 101 */
				bool_t BgL_tmpz00_15431;

				{
					BgL_conszd2appzd2_bglt BgL_auxz00_15432;

					{
						obj_t BgL_auxz00_15433;

						{	/* Cfa/cinfo2.scm 101 */
							BgL_objectz00_bglt BgL_tmpz00_15434;

							BgL_tmpz00_15434 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8477));
							BgL_auxz00_15433 = BGL_OBJECT_WIDENING(BgL_tmpz00_15434);
						}
						BgL_auxz00_15432 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15433);
					}
					BgL_tmpz00_15431 =
						(((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15432))->
						BgL_seenzf3zf3);
				}
				return BBOOL(BgL_tmpz00_15431);
			}
		}

	}



/* &<@anonymous:2408> */
	obj_t BGl_z62zc3z04anonymousza32408ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8478)
	{
		{	/* Cfa/cinfo2.scm 101 */
			return BNIL;
		}

	}



/* &lambda2407 */
	obj_t BGl_z62lambda2407z62zzcfa_info2z00(obj_t BgL_envz00_8479,
		obj_t BgL_oz00_8480, obj_t BgL_vz00_8481)
	{
		{	/* Cfa/cinfo2.scm 101 */
			{
				BgL_conszd2appzd2_bglt BgL_auxz00_15441;

				{
					obj_t BgL_auxz00_15442;

					{	/* Cfa/cinfo2.scm 101 */
						BgL_objectz00_bglt BgL_tmpz00_15443;

						BgL_tmpz00_15443 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8480));
						BgL_auxz00_15442 = BGL_OBJECT_WIDENING(BgL_tmpz00_15443);
					}
					BgL_auxz00_15441 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15442);
				}
				return
					((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15441))->
						BgL_stackzd2stampzd2) = ((obj_t) BgL_vz00_8481), BUNSPEC);
			}
		}

	}



/* &lambda2406 */
	obj_t BGl_z62lambda2406z62zzcfa_info2z00(obj_t BgL_envz00_8482,
		obj_t BgL_oz00_8483)
	{
		{	/* Cfa/cinfo2.scm 101 */
			{
				BgL_conszd2appzd2_bglt BgL_auxz00_15449;

				{
					obj_t BgL_auxz00_15450;

					{	/* Cfa/cinfo2.scm 101 */
						BgL_objectz00_bglt BgL_tmpz00_15451;

						BgL_tmpz00_15451 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8483));
						BgL_auxz00_15450 = BGL_OBJECT_WIDENING(BgL_tmpz00_15451);
					}
					BgL_auxz00_15449 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15450);
				}
				return
					(((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15449))->
					BgL_stackzd2stampzd2);
			}
		}

	}



/* &lambda2401 */
	obj_t BGl_z62lambda2401z62zzcfa_info2z00(obj_t BgL_envz00_8484,
		obj_t BgL_oz00_8485, obj_t BgL_vz00_8486)
	{
		{	/* Cfa/cinfo2.scm 101 */
			{
				BgL_conszd2appzd2_bglt BgL_auxz00_15457;

				{
					obj_t BgL_auxz00_15458;

					{	/* Cfa/cinfo2.scm 101 */
						BgL_objectz00_bglt BgL_tmpz00_15459;

						BgL_tmpz00_15459 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8485));
						BgL_auxz00_15458 = BGL_OBJECT_WIDENING(BgL_tmpz00_15459);
					}
					BgL_auxz00_15457 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15458);
				}
				return
					((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15457))->
						BgL_ownerz00) =
					((BgL_variablez00_bglt) ((BgL_variablez00_bglt) BgL_vz00_8486)),
					BUNSPEC);
			}
		}

	}



/* &lambda2400 */
	BgL_variablez00_bglt BGl_z62lambda2400z62zzcfa_info2z00(obj_t BgL_envz00_8487,
		obj_t BgL_oz00_8488)
	{
		{	/* Cfa/cinfo2.scm 101 */
			{
				BgL_conszd2appzd2_bglt BgL_auxz00_15466;

				{
					obj_t BgL_auxz00_15467;

					{	/* Cfa/cinfo2.scm 101 */
						BgL_objectz00_bglt BgL_tmpz00_15468;

						BgL_tmpz00_15468 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8488));
						BgL_auxz00_15467 = BGL_OBJECT_WIDENING(BgL_tmpz00_15468);
					}
					BgL_auxz00_15466 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15467);
				}
				return
					(((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15466))->BgL_ownerz00);
			}
		}

	}



/* &<@anonymous:2396> */
	obj_t BGl_z62zc3z04anonymousza32396ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8489)
	{
		{	/* Cfa/cinfo2.scm 101 */
			return BINT(-1L);
		}

	}



/* &lambda2395 */
	obj_t BGl_z62lambda2395z62zzcfa_info2z00(obj_t BgL_envz00_8490,
		obj_t BgL_oz00_8491, obj_t BgL_vz00_8492)
	{
		{	/* Cfa/cinfo2.scm 101 */
			{	/* Cfa/cinfo2.scm 101 */
				long BgL_vz00_9538;

				BgL_vz00_9538 = (long) CINT(BgL_vz00_8492);
				{
					BgL_conszd2appzd2_bglt BgL_auxz00_15476;

					{
						obj_t BgL_auxz00_15477;

						{	/* Cfa/cinfo2.scm 101 */
							BgL_objectz00_bglt BgL_tmpz00_15478;

							BgL_tmpz00_15478 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8491));
							BgL_auxz00_15477 = BGL_OBJECT_WIDENING(BgL_tmpz00_15478);
						}
						BgL_auxz00_15476 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15477);
					}
					return
						((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15476))->
							BgL_lostzd2stampzd2) = ((long) BgL_vz00_9538), BUNSPEC);
		}}}

	}



/* &lambda2394 */
	obj_t BGl_z62lambda2394z62zzcfa_info2z00(obj_t BgL_envz00_8493,
		obj_t BgL_oz00_8494)
	{
		{	/* Cfa/cinfo2.scm 101 */
			{	/* Cfa/cinfo2.scm 101 */
				long BgL_tmpz00_15484;

				{
					BgL_conszd2appzd2_bglt BgL_auxz00_15485;

					{
						obj_t BgL_auxz00_15486;

						{	/* Cfa/cinfo2.scm 101 */
							BgL_objectz00_bglt BgL_tmpz00_15487;

							BgL_tmpz00_15487 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8494));
							BgL_auxz00_15486 = BGL_OBJECT_WIDENING(BgL_tmpz00_15487);
						}
						BgL_auxz00_15485 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15486);
					}
					BgL_tmpz00_15484 =
						(((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15485))->
						BgL_lostzd2stampzd2);
				}
				return BINT(BgL_tmpz00_15484);
			}
		}

	}



/* &lambda2387 */
	obj_t BGl_z62lambda2387z62zzcfa_info2z00(obj_t BgL_envz00_8495,
		obj_t BgL_oz00_8496, obj_t BgL_vz00_8497)
	{
		{	/* Cfa/cinfo2.scm 101 */
			{
				BgL_conszd2appzd2_bglt BgL_auxz00_15494;

				{
					obj_t BgL_auxz00_15495;

					{	/* Cfa/cinfo2.scm 101 */
						BgL_objectz00_bglt BgL_tmpz00_15496;

						BgL_tmpz00_15496 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8496));
						BgL_auxz00_15495 = BGL_OBJECT_WIDENING(BgL_tmpz00_15496);
					}
					BgL_auxz00_15494 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15495);
				}
				return
					((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15494))->
						BgL_approxesz00) = ((obj_t) ((obj_t) BgL_vz00_8497)), BUNSPEC);
			}
		}

	}



/* &lambda2386 */
	obj_t BGl_z62lambda2386z62zzcfa_info2z00(obj_t BgL_envz00_8498,
		obj_t BgL_oz00_8499)
	{
		{	/* Cfa/cinfo2.scm 101 */
			{
				BgL_conszd2appzd2_bglt BgL_auxz00_15503;

				{
					obj_t BgL_auxz00_15504;

					{	/* Cfa/cinfo2.scm 101 */
						BgL_objectz00_bglt BgL_tmpz00_15505;

						BgL_tmpz00_15505 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8499));
						BgL_auxz00_15504 = BGL_OBJECT_WIDENING(BgL_tmpz00_15505);
					}
					BgL_auxz00_15503 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15504);
				}
				return
					(((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15503))->
					BgL_approxesz00);
			}
		}

	}



/* &lambda2382 */
	obj_t BGl_z62lambda2382z62zzcfa_info2z00(obj_t BgL_envz00_8500,
		obj_t BgL_oz00_8501, obj_t BgL_vz00_8502)
	{
		{	/* Cfa/cinfo2.scm 101 */
			{
				BgL_conszd2appzd2_bglt BgL_auxz00_15511;

				{
					obj_t BgL_auxz00_15512;

					{	/* Cfa/cinfo2.scm 101 */
						BgL_objectz00_bglt BgL_tmpz00_15513;

						BgL_tmpz00_15513 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8501));
						BgL_auxz00_15512 = BGL_OBJECT_WIDENING(BgL_tmpz00_15513);
					}
					BgL_auxz00_15511 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15512);
				}
				return
					((((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15511))->
						BgL_approxz00) =
					((BgL_approxz00_bglt) ((BgL_approxz00_bglt) BgL_vz00_8502)), BUNSPEC);
			}
		}

	}



/* &lambda2381 */
	BgL_approxz00_bglt BGl_z62lambda2381z62zzcfa_info2z00(obj_t BgL_envz00_8503,
		obj_t BgL_oz00_8504)
	{
		{	/* Cfa/cinfo2.scm 101 */
			{
				BgL_conszd2appzd2_bglt BgL_auxz00_15520;

				{
					obj_t BgL_auxz00_15521;

					{	/* Cfa/cinfo2.scm 101 */
						BgL_objectz00_bglt BgL_tmpz00_15522;

						BgL_tmpz00_15522 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8504));
						BgL_auxz00_15521 = BGL_OBJECT_WIDENING(BgL_tmpz00_15522);
					}
					BgL_auxz00_15520 = ((BgL_conszd2appzd2_bglt) BgL_auxz00_15521);
				}
				return
					(((BgL_conszd2appzd2_bglt) COBJECT(BgL_auxz00_15520))->BgL_approxz00);
			}
		}

	}



/* &lambda2348 */
	BgL_appz00_bglt BGl_z62lambda2348z62zzcfa_info2z00(obj_t BgL_envz00_8505,
		obj_t BgL_o1330z00_8506)
	{
		{	/* Cfa/cinfo2.scm 98 */
			{	/* Cfa/cinfo2.scm 98 */
				long BgL_arg2349z00_9547;

				{	/* Cfa/cinfo2.scm 98 */
					obj_t BgL_arg2351z00_9548;

					{	/* Cfa/cinfo2.scm 98 */
						obj_t BgL_arg2352z00_9549;

						{	/* Cfa/cinfo2.scm 98 */
							long BgL_arg1808z00_9550;

							{	/* Cfa/cinfo2.scm 98 */
								long BgL_arg1809z00_9551;

								BgL_arg1809z00_9551 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1330z00_8506)));
								BgL_arg1808z00_9550 = (BgL_arg1809z00_9551 - OBJECT_TYPE);
							}
							BgL_arg2352z00_9549 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9550);
						}
						BgL_arg2351z00_9548 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2352z00_9549);
					}
					{	/* Cfa/cinfo2.scm 98 */
						obj_t BgL_tmpz00_15534;

						BgL_tmpz00_15534 = ((obj_t) BgL_arg2351z00_9548);
						BgL_arg2349z00_9547 = BGL_CLASS_NUM(BgL_tmpz00_15534);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1330z00_8506)), BgL_arg2349z00_9547);
			}
			{	/* Cfa/cinfo2.scm 98 */
				BgL_objectz00_bglt BgL_tmpz00_15540;

				BgL_tmpz00_15540 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1330z00_8506));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15540, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1330z00_8506));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1330z00_8506));
		}

	}



/* &<@anonymous:2347> */
	obj_t BGl_z62zc3z04anonymousza32347ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8507,
		obj_t BgL_new1329z00_8508)
	{
		{	/* Cfa/cinfo2.scm 98 */
			{
				BgL_appz00_bglt BgL_auxz00_15548;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1329z00_8508))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_15552;

					{	/* Cfa/cinfo2.scm 98 */
						obj_t BgL_classz00_9553;

						BgL_classz00_9553 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 98 */
							obj_t BgL__ortest_1117z00_9554;

							BgL__ortest_1117z00_9554 = BGL_CLASS_NIL(BgL_classz00_9553);
							if (CBOOL(BgL__ortest_1117z00_9554))
								{	/* Cfa/cinfo2.scm 98 */
									BgL_auxz00_15552 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9554);
								}
							else
								{	/* Cfa/cinfo2.scm 98 */
									BgL_auxz00_15552 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9553));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1329z00_8508))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_15552), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1329z00_8508))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1329z00_8508))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_15568;

					{	/* Cfa/cinfo2.scm 98 */
						obj_t BgL_classz00_9555;

						BgL_classz00_9555 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 98 */
							obj_t BgL__ortest_1117z00_9556;

							BgL__ortest_1117z00_9556 = BGL_CLASS_NIL(BgL_classz00_9555);
							if (CBOOL(BgL__ortest_1117z00_9556))
								{	/* Cfa/cinfo2.scm 98 */
									BgL_auxz00_15568 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9556);
								}
							else
								{	/* Cfa/cinfo2.scm 98 */
									BgL_auxz00_15568 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9555));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1329z00_8508))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_15568), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1329z00_8508))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1329z00_8508))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_prezd2conszd2setz12zd2appzc0_bglt BgL_auxz00_15584;

					{
						obj_t BgL_auxz00_15585;

						{	/* Cfa/cinfo2.scm 98 */
							BgL_objectz00_bglt BgL_tmpz00_15586;

							BgL_tmpz00_15586 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1329z00_8508));
							BgL_auxz00_15585 = BGL_OBJECT_WIDENING(BgL_tmpz00_15586);
						}
						BgL_auxz00_15584 =
							((BgL_prezd2conszd2setz12zd2appzc0_bglt) BgL_auxz00_15585);
					}
					((((BgL_prezd2conszd2setz12zd2appzc0_bglt)
								COBJECT(BgL_auxz00_15584))->BgL_getz00) =
						((obj_t) BGl_conszd2envzd2zz__r4_pairs_and_lists_6_3z00), BUNSPEC);
				}
				BgL_auxz00_15548 = ((BgL_appz00_bglt) BgL_new1329z00_8508);
				return ((obj_t) BgL_auxz00_15548);
			}
		}

	}



/* &lambda2345 */
	BgL_appz00_bglt BGl_z62lambda2345z62zzcfa_info2z00(obj_t BgL_envz00_8509,
		obj_t BgL_o1326z00_8510)
	{
		{	/* Cfa/cinfo2.scm 98 */
			{	/* Cfa/cinfo2.scm 98 */
				BgL_prezd2conszd2setz12zd2appzc0_bglt BgL_wide1328z00_9558;

				BgL_wide1328z00_9558 =
					((BgL_prezd2conszd2setz12zd2appzc0_bglt)
					BOBJECT(GC_MALLOC(sizeof(struct
								BgL_prezd2conszd2setz12zd2appzc0_bgl))));
				{	/* Cfa/cinfo2.scm 98 */
					obj_t BgL_auxz00_15599;
					BgL_objectz00_bglt BgL_tmpz00_15595;

					BgL_auxz00_15599 = ((obj_t) BgL_wide1328z00_9558);
					BgL_tmpz00_15595 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1326z00_8510)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15595, BgL_auxz00_15599);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1326z00_8510)));
				{	/* Cfa/cinfo2.scm 98 */
					long BgL_arg2346z00_9559;

					BgL_arg2346z00_9559 =
						BGL_CLASS_NUM(BGl_prezd2conszd2setz12zd2appzc0zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1326z00_8510))), BgL_arg2346z00_9559);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1326z00_8510)));
			}
		}

	}



/* &lambda2341 */
	BgL_appz00_bglt BGl_z62lambda2341z62zzcfa_info2z00(obj_t BgL_envz00_8511,
		obj_t BgL_loc1318z00_8512, obj_t BgL_type1319z00_8513,
		obj_t BgL_sidezd2effect1320zd2_8514, obj_t BgL_key1321z00_8515,
		obj_t BgL_fun1322z00_8516, obj_t BgL_args1323z00_8517,
		obj_t BgL_stackable1324z00_8518, obj_t BgL_get1325z00_8519)
	{
		{	/* Cfa/cinfo2.scm 98 */
			{	/* Cfa/cinfo2.scm 98 */
				BgL_appz00_bglt BgL_new1617z00_9563;

				{	/* Cfa/cinfo2.scm 98 */
					BgL_appz00_bglt BgL_tmp1615z00_9564;
					BgL_prezd2conszd2setz12zd2appzc0_bglt BgL_wide1616z00_9565;

					{
						BgL_appz00_bglt BgL_auxz00_15613;

						{	/* Cfa/cinfo2.scm 98 */
							BgL_appz00_bglt BgL_new1614z00_9566;

							BgL_new1614z00_9566 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.scm 98 */
								long BgL_arg2344z00_9567;

								BgL_arg2344z00_9567 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1614z00_9566),
									BgL_arg2344z00_9567);
							}
							{	/* Cfa/cinfo2.scm 98 */
								BgL_objectz00_bglt BgL_tmpz00_15618;

								BgL_tmpz00_15618 = ((BgL_objectz00_bglt) BgL_new1614z00_9566);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15618, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1614z00_9566);
							BgL_auxz00_15613 = BgL_new1614z00_9566;
						}
						BgL_tmp1615z00_9564 = ((BgL_appz00_bglt) BgL_auxz00_15613);
					}
					BgL_wide1616z00_9565 =
						((BgL_prezd2conszd2setz12zd2appzc0_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2conszd2setz12zd2appzc0_bgl))));
					{	/* Cfa/cinfo2.scm 98 */
						obj_t BgL_auxz00_15626;
						BgL_objectz00_bglt BgL_tmpz00_15624;

						BgL_auxz00_15626 = ((obj_t) BgL_wide1616z00_9565);
						BgL_tmpz00_15624 = ((BgL_objectz00_bglt) BgL_tmp1615z00_9564);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15624, BgL_auxz00_15626);
					}
					((BgL_objectz00_bglt) BgL_tmp1615z00_9564);
					{	/* Cfa/cinfo2.scm 98 */
						long BgL_arg2342z00_9568;

						BgL_arg2342z00_9568 =
							BGL_CLASS_NUM(BGl_prezd2conszd2setz12zd2appzc0zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1615z00_9564), BgL_arg2342z00_9568);
					}
					BgL_new1617z00_9563 = ((BgL_appz00_bglt) BgL_tmp1615z00_9564);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1617z00_9563)))->BgL_locz00) =
					((obj_t) BgL_loc1318z00_8512), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1617z00_9563)))->BgL_typez00) =
					((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1319z00_8513)),
					BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1617z00_9563)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1320zd2_8514), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1617z00_9563)))->BgL_keyz00) =
					((obj_t) BgL_key1321z00_8515), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1617z00_9563)))->
						BgL_funz00) =
					((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1322z00_8516)), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1617z00_9563)))->
						BgL_argsz00) = ((obj_t) BgL_args1323z00_8517), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1617z00_9563)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1324z00_8518), BUNSPEC);
				{
					BgL_prezd2conszd2setz12zd2appzc0_bglt BgL_auxz00_15650;

					{
						obj_t BgL_auxz00_15651;

						{	/* Cfa/cinfo2.scm 98 */
							BgL_objectz00_bglt BgL_tmpz00_15652;

							BgL_tmpz00_15652 = ((BgL_objectz00_bglt) BgL_new1617z00_9563);
							BgL_auxz00_15651 = BGL_OBJECT_WIDENING(BgL_tmpz00_15652);
						}
						BgL_auxz00_15650 =
							((BgL_prezd2conszd2setz12zd2appzc0_bglt) BgL_auxz00_15651);
					}
					((((BgL_prezd2conszd2setz12zd2appzc0_bglt)
								COBJECT(BgL_auxz00_15650))->BgL_getz00) =
						((obj_t) ((obj_t) BgL_get1325z00_8519)), BUNSPEC);
				}
				return BgL_new1617z00_9563;
			}
		}

	}



/* &lambda2357 */
	obj_t BGl_z62lambda2357z62zzcfa_info2z00(obj_t BgL_envz00_8520,
		obj_t BgL_oz00_8521, obj_t BgL_vz00_8522)
	{
		{	/* Cfa/cinfo2.scm 98 */
			{
				BgL_prezd2conszd2setz12zd2appzc0_bglt BgL_auxz00_15658;

				{
					obj_t BgL_auxz00_15659;

					{	/* Cfa/cinfo2.scm 98 */
						BgL_objectz00_bglt BgL_tmpz00_15660;

						BgL_tmpz00_15660 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8521));
						BgL_auxz00_15659 = BGL_OBJECT_WIDENING(BgL_tmpz00_15660);
					}
					BgL_auxz00_15658 =
						((BgL_prezd2conszd2setz12zd2appzc0_bglt) BgL_auxz00_15659);
				}
				return
					((((BgL_prezd2conszd2setz12zd2appzc0_bglt)
							COBJECT(BgL_auxz00_15658))->BgL_getz00) =
					((obj_t) ((obj_t) BgL_vz00_8522)), BUNSPEC);
			}
		}

	}



/* &lambda2356 */
	obj_t BGl_z62lambda2356z62zzcfa_info2z00(obj_t BgL_envz00_8523,
		obj_t BgL_oz00_8524)
	{
		{	/* Cfa/cinfo2.scm 98 */
			{
				BgL_prezd2conszd2setz12zd2appzc0_bglt BgL_auxz00_15667;

				{
					obj_t BgL_auxz00_15668;

					{	/* Cfa/cinfo2.scm 98 */
						BgL_objectz00_bglt BgL_tmpz00_15669;

						BgL_tmpz00_15669 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8524));
						BgL_auxz00_15668 = BGL_OBJECT_WIDENING(BgL_tmpz00_15669);
					}
					BgL_auxz00_15667 =
						((BgL_prezd2conszd2setz12zd2appzc0_bglt) BgL_auxz00_15668);
				}
				return
					(((BgL_prezd2conszd2setz12zd2appzc0_bglt) COBJECT(BgL_auxz00_15667))->
					BgL_getz00);
			}
		}

	}



/* &lambda2326 */
	BgL_appz00_bglt BGl_z62lambda2326z62zzcfa_info2z00(obj_t BgL_envz00_8525,
		obj_t BgL_o1316z00_8526)
	{
		{	/* Cfa/cinfo2.scm 96 */
			{	/* Cfa/cinfo2.scm 96 */
				long BgL_arg2327z00_9573;

				{	/* Cfa/cinfo2.scm 96 */
					obj_t BgL_arg2328z00_9574;

					{	/* Cfa/cinfo2.scm 96 */
						obj_t BgL_arg2329z00_9575;

						{	/* Cfa/cinfo2.scm 96 */
							long BgL_arg1808z00_9576;

							{	/* Cfa/cinfo2.scm 96 */
								long BgL_arg1809z00_9577;

								BgL_arg1809z00_9577 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1316z00_8526)));
								BgL_arg1808z00_9576 = (BgL_arg1809z00_9577 - OBJECT_TYPE);
							}
							BgL_arg2329z00_9575 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9576);
						}
						BgL_arg2328z00_9574 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2329z00_9575);
					}
					{	/* Cfa/cinfo2.scm 96 */
						obj_t BgL_tmpz00_15681;

						BgL_tmpz00_15681 = ((obj_t) BgL_arg2328z00_9574);
						BgL_arg2327z00_9573 = BGL_CLASS_NUM(BgL_tmpz00_15681);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1316z00_8526)), BgL_arg2327z00_9573);
			}
			{	/* Cfa/cinfo2.scm 96 */
				BgL_objectz00_bglt BgL_tmpz00_15687;

				BgL_tmpz00_15687 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1316z00_8526));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15687, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1316z00_8526));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1316z00_8526));
		}

	}



/* &<@anonymous:2325> */
	obj_t BGl_z62zc3z04anonymousza32325ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8527,
		obj_t BgL_new1315z00_8528)
	{
		{	/* Cfa/cinfo2.scm 96 */
			{
				BgL_appz00_bglt BgL_auxz00_15695;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1315z00_8528))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_15699;

					{	/* Cfa/cinfo2.scm 96 */
						obj_t BgL_classz00_9579;

						BgL_classz00_9579 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 96 */
							obj_t BgL__ortest_1117z00_9580;

							BgL__ortest_1117z00_9580 = BGL_CLASS_NIL(BgL_classz00_9579);
							if (CBOOL(BgL__ortest_1117z00_9580))
								{	/* Cfa/cinfo2.scm 96 */
									BgL_auxz00_15699 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9580);
								}
							else
								{	/* Cfa/cinfo2.scm 96 */
									BgL_auxz00_15699 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9579));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1315z00_8528))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_15699), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1315z00_8528))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1315z00_8528))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_15715;

					{	/* Cfa/cinfo2.scm 96 */
						obj_t BgL_classz00_9581;

						BgL_classz00_9581 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 96 */
							obj_t BgL__ortest_1117z00_9582;

							BgL__ortest_1117z00_9582 = BGL_CLASS_NIL(BgL_classz00_9581);
							if (CBOOL(BgL__ortest_1117z00_9582))
								{	/* Cfa/cinfo2.scm 96 */
									BgL_auxz00_15715 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9582);
								}
							else
								{	/* Cfa/cinfo2.scm 96 */
									BgL_auxz00_15715 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9581));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1315z00_8528))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_15715), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1315z00_8528))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1315z00_8528))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_prezd2conszd2refzd2appzd2_bglt BgL_auxz00_15731;

					{
						obj_t BgL_auxz00_15732;

						{	/* Cfa/cinfo2.scm 96 */
							BgL_objectz00_bglt BgL_tmpz00_15733;

							BgL_tmpz00_15733 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1315z00_8528));
							BgL_auxz00_15732 = BGL_OBJECT_WIDENING(BgL_tmpz00_15733);
						}
						BgL_auxz00_15731 =
							((BgL_prezd2conszd2refzd2appzd2_bglt) BgL_auxz00_15732);
					}
					((((BgL_prezd2conszd2refzd2appzd2_bglt) COBJECT(BgL_auxz00_15731))->
							BgL_getz00) =
						((obj_t) BGl_conszd2envzd2zz__r4_pairs_and_lists_6_3z00), BUNSPEC);
				}
				BgL_auxz00_15695 = ((BgL_appz00_bglt) BgL_new1315z00_8528);
				return ((obj_t) BgL_auxz00_15695);
			}
		}

	}



/* &lambda2323 */
	BgL_appz00_bglt BGl_z62lambda2323z62zzcfa_info2z00(obj_t BgL_envz00_8529,
		obj_t BgL_o1312z00_8530)
	{
		{	/* Cfa/cinfo2.scm 96 */
			{	/* Cfa/cinfo2.scm 96 */
				BgL_prezd2conszd2refzd2appzd2_bglt BgL_wide1314z00_9584;

				BgL_wide1314z00_9584 =
					((BgL_prezd2conszd2refzd2appzd2_bglt) BOBJECT(GC_MALLOC(sizeof(struct
								BgL_prezd2conszd2refzd2appzd2_bgl))));
				{	/* Cfa/cinfo2.scm 96 */
					obj_t BgL_auxz00_15746;
					BgL_objectz00_bglt BgL_tmpz00_15742;

					BgL_auxz00_15746 = ((obj_t) BgL_wide1314z00_9584);
					BgL_tmpz00_15742 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1312z00_8530)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15742, BgL_auxz00_15746);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1312z00_8530)));
				{	/* Cfa/cinfo2.scm 96 */
					long BgL_arg2324z00_9585;

					BgL_arg2324z00_9585 =
						BGL_CLASS_NUM(BGl_prezd2conszd2refzd2appzd2zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1312z00_8530))), BgL_arg2324z00_9585);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1312z00_8530)));
			}
		}

	}



/* &lambda2318 */
	BgL_appz00_bglt BGl_z62lambda2318z62zzcfa_info2z00(obj_t BgL_envz00_8531,
		obj_t BgL_loc1304z00_8532, obj_t BgL_type1305z00_8533,
		obj_t BgL_sidezd2effect1306zd2_8534, obj_t BgL_key1307z00_8535,
		obj_t BgL_fun1308z00_8536, obj_t BgL_args1309z00_8537,
		obj_t BgL_stackable1310z00_8538, obj_t BgL_get1311z00_8539)
	{
		{	/* Cfa/cinfo2.scm 96 */
			{	/* Cfa/cinfo2.scm 96 */
				BgL_appz00_bglt BgL_new1612z00_9589;

				{	/* Cfa/cinfo2.scm 96 */
					BgL_appz00_bglt BgL_tmp1610z00_9590;
					BgL_prezd2conszd2refzd2appzd2_bglt BgL_wide1611z00_9591;

					{
						BgL_appz00_bglt BgL_auxz00_15760;

						{	/* Cfa/cinfo2.scm 96 */
							BgL_appz00_bglt BgL_new1609z00_9592;

							BgL_new1609z00_9592 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.scm 96 */
								long BgL_arg2322z00_9593;

								BgL_arg2322z00_9593 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1609z00_9592),
									BgL_arg2322z00_9593);
							}
							{	/* Cfa/cinfo2.scm 96 */
								BgL_objectz00_bglt BgL_tmpz00_15765;

								BgL_tmpz00_15765 = ((BgL_objectz00_bglt) BgL_new1609z00_9592);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15765, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1609z00_9592);
							BgL_auxz00_15760 = BgL_new1609z00_9592;
						}
						BgL_tmp1610z00_9590 = ((BgL_appz00_bglt) BgL_auxz00_15760);
					}
					BgL_wide1611z00_9591 =
						((BgL_prezd2conszd2refzd2appzd2_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2conszd2refzd2appzd2_bgl))));
					{	/* Cfa/cinfo2.scm 96 */
						obj_t BgL_auxz00_15773;
						BgL_objectz00_bglt BgL_tmpz00_15771;

						BgL_auxz00_15773 = ((obj_t) BgL_wide1611z00_9591);
						BgL_tmpz00_15771 = ((BgL_objectz00_bglt) BgL_tmp1610z00_9590);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15771, BgL_auxz00_15773);
					}
					((BgL_objectz00_bglt) BgL_tmp1610z00_9590);
					{	/* Cfa/cinfo2.scm 96 */
						long BgL_arg2320z00_9594;

						BgL_arg2320z00_9594 =
							BGL_CLASS_NUM(BGl_prezd2conszd2refzd2appzd2zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1610z00_9590), BgL_arg2320z00_9594);
					}
					BgL_new1612z00_9589 = ((BgL_appz00_bglt) BgL_tmp1610z00_9590);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1612z00_9589)))->BgL_locz00) =
					((obj_t) BgL_loc1304z00_8532), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1612z00_9589)))->BgL_typez00) =
					((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1305z00_8533)),
					BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1612z00_9589)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1306zd2_8534), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1612z00_9589)))->BgL_keyz00) =
					((obj_t) BgL_key1307z00_8535), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1612z00_9589)))->
						BgL_funz00) =
					((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1308z00_8536)), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1612z00_9589)))->
						BgL_argsz00) = ((obj_t) BgL_args1309z00_8537), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1612z00_9589)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1310z00_8538), BUNSPEC);
				{
					BgL_prezd2conszd2refzd2appzd2_bglt BgL_auxz00_15797;

					{
						obj_t BgL_auxz00_15798;

						{	/* Cfa/cinfo2.scm 96 */
							BgL_objectz00_bglt BgL_tmpz00_15799;

							BgL_tmpz00_15799 = ((BgL_objectz00_bglt) BgL_new1612z00_9589);
							BgL_auxz00_15798 = BGL_OBJECT_WIDENING(BgL_tmpz00_15799);
						}
						BgL_auxz00_15797 =
							((BgL_prezd2conszd2refzd2appzd2_bglt) BgL_auxz00_15798);
					}
					((((BgL_prezd2conszd2refzd2appzd2_bglt) COBJECT(BgL_auxz00_15797))->
							BgL_getz00) = ((obj_t) ((obj_t) BgL_get1311z00_8539)), BUNSPEC);
				}
				return BgL_new1612z00_9589;
			}
		}

	}



/* &lambda2334 */
	obj_t BGl_z62lambda2334z62zzcfa_info2z00(obj_t BgL_envz00_8540,
		obj_t BgL_oz00_8541, obj_t BgL_vz00_8542)
	{
		{	/* Cfa/cinfo2.scm 96 */
			{
				BgL_prezd2conszd2refzd2appzd2_bglt BgL_auxz00_15805;

				{
					obj_t BgL_auxz00_15806;

					{	/* Cfa/cinfo2.scm 96 */
						BgL_objectz00_bglt BgL_tmpz00_15807;

						BgL_tmpz00_15807 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8541));
						BgL_auxz00_15806 = BGL_OBJECT_WIDENING(BgL_tmpz00_15807);
					}
					BgL_auxz00_15805 =
						((BgL_prezd2conszd2refzd2appzd2_bglt) BgL_auxz00_15806);
				}
				return
					((((BgL_prezd2conszd2refzd2appzd2_bglt) COBJECT(BgL_auxz00_15805))->
						BgL_getz00) = ((obj_t) ((obj_t) BgL_vz00_8542)), BUNSPEC);
			}
		}

	}



/* &lambda2333 */
	obj_t BGl_z62lambda2333z62zzcfa_info2z00(obj_t BgL_envz00_8543,
		obj_t BgL_oz00_8544)
	{
		{	/* Cfa/cinfo2.scm 96 */
			{
				BgL_prezd2conszd2refzd2appzd2_bglt BgL_auxz00_15814;

				{
					obj_t BgL_auxz00_15815;

					{	/* Cfa/cinfo2.scm 96 */
						BgL_objectz00_bglt BgL_tmpz00_15816;

						BgL_tmpz00_15816 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8544));
						BgL_auxz00_15815 = BGL_OBJECT_WIDENING(BgL_tmpz00_15816);
					}
					BgL_auxz00_15814 =
						((BgL_prezd2conszd2refzd2appzd2_bglt) BgL_auxz00_15815);
				}
				return
					(((BgL_prezd2conszd2refzd2appzd2_bglt) COBJECT(BgL_auxz00_15814))->
					BgL_getz00);
			}
		}

	}



/* &lambda2302 */
	BgL_appz00_bglt BGl_z62lambda2302z62zzcfa_info2z00(obj_t BgL_envz00_8545,
		obj_t BgL_o1302z00_8546)
	{
		{	/* Cfa/cinfo2.scm 93 */
			{	/* Cfa/cinfo2.scm 93 */
				long BgL_arg2304z00_9599;

				{	/* Cfa/cinfo2.scm 93 */
					obj_t BgL_arg2305z00_9600;

					{	/* Cfa/cinfo2.scm 93 */
						obj_t BgL_arg2306z00_9601;

						{	/* Cfa/cinfo2.scm 93 */
							long BgL_arg1808z00_9602;

							{	/* Cfa/cinfo2.scm 93 */
								long BgL_arg1809z00_9603;

								BgL_arg1809z00_9603 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1302z00_8546)));
								BgL_arg1808z00_9602 = (BgL_arg1809z00_9603 - OBJECT_TYPE);
							}
							BgL_arg2306z00_9601 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9602);
						}
						BgL_arg2305z00_9600 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2306z00_9601);
					}
					{	/* Cfa/cinfo2.scm 93 */
						obj_t BgL_tmpz00_15828;

						BgL_tmpz00_15828 = ((obj_t) BgL_arg2305z00_9600);
						BgL_arg2304z00_9599 = BGL_CLASS_NUM(BgL_tmpz00_15828);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1302z00_8546)), BgL_arg2304z00_9599);
			}
			{	/* Cfa/cinfo2.scm 93 */
				BgL_objectz00_bglt BgL_tmpz00_15834;

				BgL_tmpz00_15834 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1302z00_8546));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15834, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1302z00_8546));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1302z00_8546));
		}

	}



/* &<@anonymous:2301> */
	obj_t BGl_z62zc3z04anonymousza32301ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8547,
		obj_t BgL_new1301z00_8548)
	{
		{	/* Cfa/cinfo2.scm 93 */
			{
				BgL_appz00_bglt BgL_auxz00_15842;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1301z00_8548))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_15846;

					{	/* Cfa/cinfo2.scm 93 */
						obj_t BgL_classz00_9605;

						BgL_classz00_9605 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 93 */
							obj_t BgL__ortest_1117z00_9606;

							BgL__ortest_1117z00_9606 = BGL_CLASS_NIL(BgL_classz00_9605);
							if (CBOOL(BgL__ortest_1117z00_9606))
								{	/* Cfa/cinfo2.scm 93 */
									BgL_auxz00_15846 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9606);
								}
							else
								{	/* Cfa/cinfo2.scm 93 */
									BgL_auxz00_15846 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9605));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1301z00_8548))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_15846), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1301z00_8548))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1301z00_8548))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_15862;

					{	/* Cfa/cinfo2.scm 93 */
						obj_t BgL_classz00_9607;

						BgL_classz00_9607 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 93 */
							obj_t BgL__ortest_1117z00_9608;

							BgL__ortest_1117z00_9608 = BGL_CLASS_NIL(BgL_classz00_9607);
							if (CBOOL(BgL__ortest_1117z00_9608))
								{	/* Cfa/cinfo2.scm 93 */
									BgL_auxz00_15862 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9608);
								}
							else
								{	/* Cfa/cinfo2.scm 93 */
									BgL_auxz00_15862 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9607));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1301z00_8548))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_15862), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1301z00_8548))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1301z00_8548))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_variablez00_bglt BgL_auxz00_15885;
					BgL_prezd2conszd2appz00_bglt BgL_auxz00_15878;

					{	/* Cfa/cinfo2.scm 93 */
						obj_t BgL_classz00_9609;

						BgL_classz00_9609 = BGl_variablez00zzast_varz00;
						{	/* Cfa/cinfo2.scm 93 */
							obj_t BgL__ortest_1117z00_9610;

							BgL__ortest_1117z00_9610 = BGL_CLASS_NIL(BgL_classz00_9609);
							if (CBOOL(BgL__ortest_1117z00_9610))
								{	/* Cfa/cinfo2.scm 93 */
									BgL_auxz00_15885 =
										((BgL_variablez00_bglt) BgL__ortest_1117z00_9610);
								}
							else
								{	/* Cfa/cinfo2.scm 93 */
									BgL_auxz00_15885 =
										((BgL_variablez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9609));
								}
						}
					}
					{
						obj_t BgL_auxz00_15879;

						{	/* Cfa/cinfo2.scm 93 */
							BgL_objectz00_bglt BgL_tmpz00_15880;

							BgL_tmpz00_15880 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1301z00_8548));
							BgL_auxz00_15879 = BGL_OBJECT_WIDENING(BgL_tmpz00_15880);
						}
						BgL_auxz00_15878 =
							((BgL_prezd2conszd2appz00_bglt) BgL_auxz00_15879);
					}
					((((BgL_prezd2conszd2appz00_bglt) COBJECT(BgL_auxz00_15878))->
							BgL_ownerz00) =
						((BgL_variablez00_bglt) BgL_auxz00_15885), BUNSPEC);
				}
				BgL_auxz00_15842 = ((BgL_appz00_bglt) BgL_new1301z00_8548);
				return ((obj_t) BgL_auxz00_15842);
			}
		}

	}



/* &lambda2299 */
	BgL_appz00_bglt BGl_z62lambda2299z62zzcfa_info2z00(obj_t BgL_envz00_8549,
		obj_t BgL_o1298z00_8550)
	{
		{	/* Cfa/cinfo2.scm 93 */
			{	/* Cfa/cinfo2.scm 93 */
				BgL_prezd2conszd2appz00_bglt BgL_wide1300z00_9612;

				BgL_wide1300z00_9612 =
					((BgL_prezd2conszd2appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
								BgL_prezd2conszd2appz00_bgl))));
				{	/* Cfa/cinfo2.scm 93 */
					obj_t BgL_auxz00_15900;
					BgL_objectz00_bglt BgL_tmpz00_15896;

					BgL_auxz00_15900 = ((obj_t) BgL_wide1300z00_9612);
					BgL_tmpz00_15896 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1298z00_8550)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15896, BgL_auxz00_15900);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1298z00_8550)));
				{	/* Cfa/cinfo2.scm 93 */
					long BgL_arg2300z00_9613;

					BgL_arg2300z00_9613 =
						BGL_CLASS_NUM(BGl_prezd2conszd2appz00zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1298z00_8550))), BgL_arg2300z00_9613);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1298z00_8550)));
			}
		}

	}



/* &lambda2296 */
	BgL_appz00_bglt BGl_z62lambda2296z62zzcfa_info2z00(obj_t BgL_envz00_8551,
		obj_t BgL_loc1290z00_8552, obj_t BgL_type1291z00_8553,
		obj_t BgL_sidezd2effect1292zd2_8554, obj_t BgL_key1293z00_8555,
		obj_t BgL_fun1294z00_8556, obj_t BgL_args1295z00_8557,
		obj_t BgL_stackable1296z00_8558, obj_t BgL_owner1297z00_8559)
	{
		{	/* Cfa/cinfo2.scm 93 */
			{	/* Cfa/cinfo2.scm 93 */
				BgL_appz00_bglt BgL_new1607z00_9617;

				{	/* Cfa/cinfo2.scm 93 */
					BgL_appz00_bglt BgL_tmp1605z00_9618;
					BgL_prezd2conszd2appz00_bglt BgL_wide1606z00_9619;

					{
						BgL_appz00_bglt BgL_auxz00_15914;

						{	/* Cfa/cinfo2.scm 93 */
							BgL_appz00_bglt BgL_new1604z00_9620;

							BgL_new1604z00_9620 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.scm 93 */
								long BgL_arg2298z00_9621;

								BgL_arg2298z00_9621 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1604z00_9620),
									BgL_arg2298z00_9621);
							}
							{	/* Cfa/cinfo2.scm 93 */
								BgL_objectz00_bglt BgL_tmpz00_15919;

								BgL_tmpz00_15919 = ((BgL_objectz00_bglt) BgL_new1604z00_9620);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15919, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1604z00_9620);
							BgL_auxz00_15914 = BgL_new1604z00_9620;
						}
						BgL_tmp1605z00_9618 = ((BgL_appz00_bglt) BgL_auxz00_15914);
					}
					BgL_wide1606z00_9619 =
						((BgL_prezd2conszd2appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2conszd2appz00_bgl))));
					{	/* Cfa/cinfo2.scm 93 */
						obj_t BgL_auxz00_15927;
						BgL_objectz00_bglt BgL_tmpz00_15925;

						BgL_auxz00_15927 = ((obj_t) BgL_wide1606z00_9619);
						BgL_tmpz00_15925 = ((BgL_objectz00_bglt) BgL_tmp1605z00_9618);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15925, BgL_auxz00_15927);
					}
					((BgL_objectz00_bglt) BgL_tmp1605z00_9618);
					{	/* Cfa/cinfo2.scm 93 */
						long BgL_arg2297z00_9622;

						BgL_arg2297z00_9622 =
							BGL_CLASS_NUM(BGl_prezd2conszd2appz00zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1605z00_9618), BgL_arg2297z00_9622);
					}
					BgL_new1607z00_9617 = ((BgL_appz00_bglt) BgL_tmp1605z00_9618);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1607z00_9617)))->BgL_locz00) =
					((obj_t) BgL_loc1290z00_8552), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1607z00_9617)))->BgL_typez00) =
					((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1291z00_8553)),
					BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1607z00_9617)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1292zd2_8554), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1607z00_9617)))->BgL_keyz00) =
					((obj_t) BgL_key1293z00_8555), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1607z00_9617)))->
						BgL_funz00) =
					((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1294z00_8556)), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1607z00_9617)))->
						BgL_argsz00) = ((obj_t) BgL_args1295z00_8557), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1607z00_9617)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1296z00_8558), BUNSPEC);
				{
					BgL_prezd2conszd2appz00_bglt BgL_auxz00_15951;

					{
						obj_t BgL_auxz00_15952;

						{	/* Cfa/cinfo2.scm 93 */
							BgL_objectz00_bglt BgL_tmpz00_15953;

							BgL_tmpz00_15953 = ((BgL_objectz00_bglt) BgL_new1607z00_9617);
							BgL_auxz00_15952 = BGL_OBJECT_WIDENING(BgL_tmpz00_15953);
						}
						BgL_auxz00_15951 =
							((BgL_prezd2conszd2appz00_bglt) BgL_auxz00_15952);
					}
					((((BgL_prezd2conszd2appz00_bglt) COBJECT(BgL_auxz00_15951))->
							BgL_ownerz00) =
						((BgL_variablez00_bglt) ((BgL_variablez00_bglt)
								BgL_owner1297z00_8559)), BUNSPEC);
				}
				return BgL_new1607z00_9617;
			}
		}

	}



/* &lambda2311 */
	obj_t BGl_z62lambda2311z62zzcfa_info2z00(obj_t BgL_envz00_8560,
		obj_t BgL_oz00_8561, obj_t BgL_vz00_8562)
	{
		{	/* Cfa/cinfo2.scm 93 */
			{
				BgL_prezd2conszd2appz00_bglt BgL_auxz00_15959;

				{
					obj_t BgL_auxz00_15960;

					{	/* Cfa/cinfo2.scm 93 */
						BgL_objectz00_bglt BgL_tmpz00_15961;

						BgL_tmpz00_15961 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8561));
						BgL_auxz00_15960 = BGL_OBJECT_WIDENING(BgL_tmpz00_15961);
					}
					BgL_auxz00_15959 = ((BgL_prezd2conszd2appz00_bglt) BgL_auxz00_15960);
				}
				return
					((((BgL_prezd2conszd2appz00_bglt) COBJECT(BgL_auxz00_15959))->
						BgL_ownerz00) =
					((BgL_variablez00_bglt) ((BgL_variablez00_bglt) BgL_vz00_8562)),
					BUNSPEC);
			}
		}

	}



/* &lambda2310 */
	BgL_variablez00_bglt BGl_z62lambda2310z62zzcfa_info2z00(obj_t BgL_envz00_8563,
		obj_t BgL_oz00_8564)
	{
		{	/* Cfa/cinfo2.scm 93 */
			{
				BgL_prezd2conszd2appz00_bglt BgL_auxz00_15968;

				{
					obj_t BgL_auxz00_15969;

					{	/* Cfa/cinfo2.scm 93 */
						BgL_objectz00_bglt BgL_tmpz00_15970;

						BgL_tmpz00_15970 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8564));
						BgL_auxz00_15969 = BGL_OBJECT_WIDENING(BgL_tmpz00_15970);
					}
					BgL_auxz00_15968 = ((BgL_prezd2conszd2appz00_bglt) BgL_auxz00_15969);
				}
				return
					(((BgL_prezd2conszd2appz00_bglt) COBJECT(BgL_auxz00_15968))->
					BgL_ownerz00);
			}
		}

	}



/* &lambda2242 */
	BgL_appz00_bglt BGl_z62lambda2242z62zzcfa_info2z00(obj_t BgL_envz00_8565,
		obj_t BgL_o1288z00_8566)
	{
		{	/* Cfa/cinfo2.scm 68 */
			{	/* Cfa/cinfo2.scm 68 */
				long BgL_arg2243z00_9627;

				{	/* Cfa/cinfo2.scm 68 */
					obj_t BgL_arg2244z00_9628;

					{	/* Cfa/cinfo2.scm 68 */
						obj_t BgL_arg2245z00_9629;

						{	/* Cfa/cinfo2.scm 68 */
							long BgL_arg1808z00_9630;

							{	/* Cfa/cinfo2.scm 68 */
								long BgL_arg1809z00_9631;

								BgL_arg1809z00_9631 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1288z00_8566)));
								BgL_arg1808z00_9630 = (BgL_arg1809z00_9631 - OBJECT_TYPE);
							}
							BgL_arg2245z00_9629 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9630);
						}
						BgL_arg2244z00_9628 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2245z00_9629);
					}
					{	/* Cfa/cinfo2.scm 68 */
						obj_t BgL_tmpz00_15982;

						BgL_tmpz00_15982 = ((obj_t) BgL_arg2244z00_9628);
						BgL_arg2243z00_9627 = BGL_CLASS_NUM(BgL_tmpz00_15982);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1288z00_8566)), BgL_arg2243z00_9627);
			}
			{	/* Cfa/cinfo2.scm 68 */
				BgL_objectz00_bglt BgL_tmpz00_15988;

				BgL_tmpz00_15988 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1288z00_8566));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_15988, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1288z00_8566));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1288z00_8566));
		}

	}



/* &<@anonymous:2241> */
	obj_t BGl_z62zc3z04anonymousza32241ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8567,
		obj_t BgL_new1287z00_8568)
	{
		{	/* Cfa/cinfo2.scm 68 */
			{
				BgL_appz00_bglt BgL_auxz00_15996;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1287z00_8568))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_16000;

					{	/* Cfa/cinfo2.scm 68 */
						obj_t BgL_classz00_9633;

						BgL_classz00_9633 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 68 */
							obj_t BgL__ortest_1117z00_9634;

							BgL__ortest_1117z00_9634 = BGL_CLASS_NIL(BgL_classz00_9633);
							if (CBOOL(BgL__ortest_1117z00_9634))
								{	/* Cfa/cinfo2.scm 68 */
									BgL_auxz00_16000 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9634);
								}
							else
								{	/* Cfa/cinfo2.scm 68 */
									BgL_auxz00_16000 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9633));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1287z00_8568))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_16000), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1287z00_8568))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1287z00_8568))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_16016;

					{	/* Cfa/cinfo2.scm 68 */
						obj_t BgL_classz00_9635;

						BgL_classz00_9635 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 68 */
							obj_t BgL__ortest_1117z00_9636;

							BgL__ortest_1117z00_9636 = BGL_CLASS_NIL(BgL_classz00_9635);
							if (CBOOL(BgL__ortest_1117z00_9636))
								{	/* Cfa/cinfo2.scm 68 */
									BgL_auxz00_16016 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9636);
								}
							else
								{	/* Cfa/cinfo2.scm 68 */
									BgL_auxz00_16016 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9635));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1287z00_8568))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_16016), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1287z00_8568))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1287z00_8568))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_approxz00_bglt BgL_auxz00_16039;
					BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16032;

					{	/* Cfa/cinfo2.scm 68 */
						obj_t BgL_classz00_9637;

						BgL_classz00_9637 = BGl_approxz00zzcfa_infoz00;
						{	/* Cfa/cinfo2.scm 68 */
							obj_t BgL__ortest_1117z00_9638;

							BgL__ortest_1117z00_9638 = BGL_CLASS_NIL(BgL_classz00_9637);
							if (CBOOL(BgL__ortest_1117z00_9638))
								{	/* Cfa/cinfo2.scm 68 */
									BgL_auxz00_16039 =
										((BgL_approxz00_bglt) BgL__ortest_1117z00_9638);
								}
							else
								{	/* Cfa/cinfo2.scm 68 */
									BgL_auxz00_16039 =
										((BgL_approxz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9637));
								}
						}
					}
					{
						obj_t BgL_auxz00_16033;

						{	/* Cfa/cinfo2.scm 68 */
							BgL_objectz00_bglt BgL_tmpz00_16034;

							BgL_tmpz00_16034 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1287z00_8568));
							BgL_auxz00_16033 = BGL_OBJECT_WIDENING(BgL_tmpz00_16034);
						}
						BgL_auxz00_16032 =
							((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16033);
					}
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16032))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_auxz00_16039), BUNSPEC);
				}
				{
					BgL_approxz00_bglt BgL_auxz00_16054;
					BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16047;

					{	/* Cfa/cinfo2.scm 68 */
						obj_t BgL_classz00_9639;

						BgL_classz00_9639 = BGl_approxz00zzcfa_infoz00;
						{	/* Cfa/cinfo2.scm 68 */
							obj_t BgL__ortest_1117z00_9640;

							BgL__ortest_1117z00_9640 = BGL_CLASS_NIL(BgL_classz00_9639);
							if (CBOOL(BgL__ortest_1117z00_9640))
								{	/* Cfa/cinfo2.scm 68 */
									BgL_auxz00_16054 =
										((BgL_approxz00_bglt) BgL__ortest_1117z00_9640);
								}
							else
								{	/* Cfa/cinfo2.scm 68 */
									BgL_auxz00_16054 =
										((BgL_approxz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9639));
								}
						}
					}
					{
						obj_t BgL_auxz00_16048;

						{	/* Cfa/cinfo2.scm 68 */
							BgL_objectz00_bglt BgL_tmpz00_16049;

							BgL_tmpz00_16049 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1287z00_8568));
							BgL_auxz00_16048 = BGL_OBJECT_WIDENING(BgL_tmpz00_16049);
						}
						BgL_auxz00_16047 =
							((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16048);
					}
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16047))->
							BgL_valuezd2approxzd2) =
						((BgL_approxz00_bglt) BgL_auxz00_16054), BUNSPEC);
				}
				{
					BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16062;

					{
						obj_t BgL_auxz00_16063;

						{	/* Cfa/cinfo2.scm 68 */
							BgL_objectz00_bglt BgL_tmpz00_16064;

							BgL_tmpz00_16064 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1287z00_8568));
							BgL_auxz00_16063 = BGL_OBJECT_WIDENING(BgL_tmpz00_16064);
						}
						BgL_auxz00_16062 =
							((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16063);
					}
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16062))->
							BgL_lostzd2stampzd2) = ((long) 0L), BUNSPEC);
				}
				{
					BgL_variablez00_bglt BgL_auxz00_16077;
					BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16070;

					{	/* Cfa/cinfo2.scm 68 */
						obj_t BgL_classz00_9641;

						BgL_classz00_9641 = BGl_variablez00zzast_varz00;
						{	/* Cfa/cinfo2.scm 68 */
							obj_t BgL__ortest_1117z00_9642;

							BgL__ortest_1117z00_9642 = BGL_CLASS_NIL(BgL_classz00_9641);
							if (CBOOL(BgL__ortest_1117z00_9642))
								{	/* Cfa/cinfo2.scm 68 */
									BgL_auxz00_16077 =
										((BgL_variablez00_bglt) BgL__ortest_1117z00_9642);
								}
							else
								{	/* Cfa/cinfo2.scm 68 */
									BgL_auxz00_16077 =
										((BgL_variablez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9641));
								}
						}
					}
					{
						obj_t BgL_auxz00_16071;

						{	/* Cfa/cinfo2.scm 68 */
							BgL_objectz00_bglt BgL_tmpz00_16072;

							BgL_tmpz00_16072 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1287z00_8568));
							BgL_auxz00_16071 = BGL_OBJECT_WIDENING(BgL_tmpz00_16072);
						}
						BgL_auxz00_16070 =
							((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16071);
					}
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16070))->
							BgL_ownerz00) =
						((BgL_variablez00_bglt) BgL_auxz00_16077), BUNSPEC);
				}
				{
					BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16085;

					{
						obj_t BgL_auxz00_16086;

						{	/* Cfa/cinfo2.scm 68 */
							BgL_objectz00_bglt BgL_tmpz00_16087;

							BgL_tmpz00_16087 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1287z00_8568));
							BgL_auxz00_16086 = BGL_OBJECT_WIDENING(BgL_tmpz00_16087);
						}
						BgL_auxz00_16085 =
							((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16086);
					}
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16085))->
							BgL_stackzd2stampzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				}
				{
					BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16093;

					{
						obj_t BgL_auxz00_16094;

						{	/* Cfa/cinfo2.scm 68 */
							BgL_objectz00_bglt BgL_tmpz00_16095;

							BgL_tmpz00_16095 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1287z00_8568));
							BgL_auxz00_16094 = BGL_OBJECT_WIDENING(BgL_tmpz00_16095);
						}
						BgL_auxz00_16093 =
							((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16094);
					}
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16093))->
							BgL_seenzf3zf3) = ((bool_t) ((bool_t) 0)), BUNSPEC);
				}
				{
					BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16101;

					{
						obj_t BgL_auxz00_16102;

						{	/* Cfa/cinfo2.scm 68 */
							BgL_objectz00_bglt BgL_tmpz00_16103;

							BgL_tmpz00_16103 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1287z00_8568));
							BgL_auxz00_16102 = BGL_OBJECT_WIDENING(BgL_tmpz00_16103);
						}
						BgL_auxz00_16101 =
							((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16102);
					}
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16101))->
							BgL_tvectorzf3zf3) = ((bool_t) ((bool_t) 0)), BUNSPEC);
				}
				BgL_auxz00_15996 = ((BgL_appz00_bglt) BgL_new1287z00_8568);
				return ((obj_t) BgL_auxz00_15996);
			}
		}

	}



/* &lambda2239 */
	BgL_appz00_bglt BGl_z62lambda2239z62zzcfa_info2z00(obj_t BgL_envz00_8569,
		obj_t BgL_o1284z00_8570)
	{
		{	/* Cfa/cinfo2.scm 68 */
			{	/* Cfa/cinfo2.scm 68 */
				BgL_makezd2vectorzd2appz00_bglt BgL_wide1286z00_9644;

				BgL_wide1286z00_9644 =
					((BgL_makezd2vectorzd2appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
								BgL_makezd2vectorzd2appz00_bgl))));
				{	/* Cfa/cinfo2.scm 68 */
					obj_t BgL_auxz00_16116;
					BgL_objectz00_bglt BgL_tmpz00_16112;

					BgL_auxz00_16116 = ((obj_t) BgL_wide1286z00_9644);
					BgL_tmpz00_16112 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1284z00_8570)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_16112, BgL_auxz00_16116);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1284z00_8570)));
				{	/* Cfa/cinfo2.scm 68 */
					long BgL_arg2240z00_9645;

					BgL_arg2240z00_9645 =
						BGL_CLASS_NUM(BGl_makezd2vectorzd2appz00zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1284z00_8570))), BgL_arg2240z00_9645);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1284z00_8570)));
			}
		}

	}



/* &lambda2236 */
	BgL_appz00_bglt BGl_z62lambda2236z62zzcfa_info2z00(obj_t BgL_envz00_8571,
		obj_t BgL_loc1270z00_8572, obj_t BgL_type1271z00_8573,
		obj_t BgL_sidezd2effect1272zd2_8574, obj_t BgL_key1273z00_8575,
		obj_t BgL_fun1274z00_8576, obj_t BgL_args1275z00_8577,
		obj_t BgL_stackable1276z00_8578, obj_t BgL_approx1277z00_8579,
		obj_t BgL_valuezd2approx1278zd2_8580, obj_t BgL_lostzd2stamp1279zd2_8581,
		obj_t BgL_owner1280z00_8582, obj_t BgL_stackzd2stamp1281zd2_8583,
		obj_t BgL_seenzf31282zf3_8584, obj_t BgL_tvectorzf31283zf3_8585)
	{
		{	/* Cfa/cinfo2.scm 68 */
			{	/* Cfa/cinfo2.scm 68 */
				long BgL_lostzd2stamp1279zd2_9650;
				bool_t BgL_seenzf31282zf3_9652;
				bool_t BgL_tvectorzf31283zf3_9653;

				BgL_lostzd2stamp1279zd2_9650 =
					(long) CINT(BgL_lostzd2stamp1279zd2_8581);
				BgL_seenzf31282zf3_9652 = CBOOL(BgL_seenzf31282zf3_8584);
				BgL_tvectorzf31283zf3_9653 = CBOOL(BgL_tvectorzf31283zf3_8585);
				{	/* Cfa/cinfo2.scm 68 */
					BgL_appz00_bglt BgL_new1602z00_9654;

					{	/* Cfa/cinfo2.scm 68 */
						BgL_appz00_bglt BgL_tmp1600z00_9655;
						BgL_makezd2vectorzd2appz00_bglt BgL_wide1601z00_9656;

						{
							BgL_appz00_bglt BgL_auxz00_16133;

							{	/* Cfa/cinfo2.scm 68 */
								BgL_appz00_bglt BgL_new1599z00_9657;

								BgL_new1599z00_9657 =
									((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
												BgL_appz00_bgl))));
								{	/* Cfa/cinfo2.scm 68 */
									long BgL_arg2238z00_9658;

									BgL_arg2238z00_9658 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
									BGL_OBJECT_CLASS_NUM_SET(
										((BgL_objectz00_bglt) BgL_new1599z00_9657),
										BgL_arg2238z00_9658);
								}
								{	/* Cfa/cinfo2.scm 68 */
									BgL_objectz00_bglt BgL_tmpz00_16138;

									BgL_tmpz00_16138 = ((BgL_objectz00_bglt) BgL_new1599z00_9657);
									BGL_OBJECT_WIDENING_SET(BgL_tmpz00_16138, BFALSE);
								}
								((BgL_objectz00_bglt) BgL_new1599z00_9657);
								BgL_auxz00_16133 = BgL_new1599z00_9657;
							}
							BgL_tmp1600z00_9655 = ((BgL_appz00_bglt) BgL_auxz00_16133);
						}
						BgL_wide1601z00_9656 =
							((BgL_makezd2vectorzd2appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
										BgL_makezd2vectorzd2appz00_bgl))));
						{	/* Cfa/cinfo2.scm 68 */
							obj_t BgL_auxz00_16146;
							BgL_objectz00_bglt BgL_tmpz00_16144;

							BgL_auxz00_16146 = ((obj_t) BgL_wide1601z00_9656);
							BgL_tmpz00_16144 = ((BgL_objectz00_bglt) BgL_tmp1600z00_9655);
							BGL_OBJECT_WIDENING_SET(BgL_tmpz00_16144, BgL_auxz00_16146);
						}
						((BgL_objectz00_bglt) BgL_tmp1600z00_9655);
						{	/* Cfa/cinfo2.scm 68 */
							long BgL_arg2237z00_9659;

							BgL_arg2237z00_9659 =
								BGL_CLASS_NUM(BGl_makezd2vectorzd2appz00zzcfa_info2z00);
							BGL_OBJECT_CLASS_NUM_SET(
								((BgL_objectz00_bglt) BgL_tmp1600z00_9655),
								BgL_arg2237z00_9659);
						}
						BgL_new1602z00_9654 = ((BgL_appz00_bglt) BgL_tmp1600z00_9655);
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt) BgL_new1602z00_9654)))->BgL_locz00) =
						((obj_t) BgL_loc1270z00_8572), BUNSPEC);
					((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
										BgL_new1602z00_9654)))->BgL_typez00) =
						((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1271z00_8573)),
						BUNSPEC);
					((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
										BgL_new1602z00_9654)))->BgL_sidezd2effectzd2) =
						((obj_t) BgL_sidezd2effect1272zd2_8574), BUNSPEC);
					((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
										BgL_new1602z00_9654)))->BgL_keyz00) =
						((obj_t) BgL_key1273z00_8575), BUNSPEC);
					((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt)
										BgL_new1602z00_9654)))->BgL_funz00) =
						((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1274z00_8576)),
						BUNSPEC);
					((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt)
										BgL_new1602z00_9654)))->BgL_argsz00) =
						((obj_t) BgL_args1275z00_8577), BUNSPEC);
					((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt)
										BgL_new1602z00_9654)))->BgL_stackablez00) =
						((obj_t) BgL_stackable1276z00_8578), BUNSPEC);
					{
						BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16170;

						{
							obj_t BgL_auxz00_16171;

							{	/* Cfa/cinfo2.scm 68 */
								BgL_objectz00_bglt BgL_tmpz00_16172;

								BgL_tmpz00_16172 = ((BgL_objectz00_bglt) BgL_new1602z00_9654);
								BgL_auxz00_16171 = BGL_OBJECT_WIDENING(BgL_tmpz00_16172);
							}
							BgL_auxz00_16170 =
								((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16171);
						}
						((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16170))->
								BgL_approxz00) =
							((BgL_approxz00_bglt) ((BgL_approxz00_bglt)
									BgL_approx1277z00_8579)), BUNSPEC);
					}
					{
						BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16178;

						{
							obj_t BgL_auxz00_16179;

							{	/* Cfa/cinfo2.scm 68 */
								BgL_objectz00_bglt BgL_tmpz00_16180;

								BgL_tmpz00_16180 = ((BgL_objectz00_bglt) BgL_new1602z00_9654);
								BgL_auxz00_16179 = BGL_OBJECT_WIDENING(BgL_tmpz00_16180);
							}
							BgL_auxz00_16178 =
								((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16179);
						}
						((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16178))->
								BgL_valuezd2approxzd2) =
							((BgL_approxz00_bglt) ((BgL_approxz00_bglt)
									BgL_valuezd2approx1278zd2_8580)), BUNSPEC);
					}
					{
						BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16186;

						{
							obj_t BgL_auxz00_16187;

							{	/* Cfa/cinfo2.scm 68 */
								BgL_objectz00_bglt BgL_tmpz00_16188;

								BgL_tmpz00_16188 = ((BgL_objectz00_bglt) BgL_new1602z00_9654);
								BgL_auxz00_16187 = BGL_OBJECT_WIDENING(BgL_tmpz00_16188);
							}
							BgL_auxz00_16186 =
								((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16187);
						}
						((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16186))->
								BgL_lostzd2stampzd2) =
							((long) BgL_lostzd2stamp1279zd2_9650), BUNSPEC);
					}
					{
						BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16193;

						{
							obj_t BgL_auxz00_16194;

							{	/* Cfa/cinfo2.scm 68 */
								BgL_objectz00_bglt BgL_tmpz00_16195;

								BgL_tmpz00_16195 = ((BgL_objectz00_bglt) BgL_new1602z00_9654);
								BgL_auxz00_16194 = BGL_OBJECT_WIDENING(BgL_tmpz00_16195);
							}
							BgL_auxz00_16193 =
								((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16194);
						}
						((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16193))->
								BgL_ownerz00) =
							((BgL_variablez00_bglt) ((BgL_variablez00_bglt)
									BgL_owner1280z00_8582)), BUNSPEC);
					}
					{
						BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16201;

						{
							obj_t BgL_auxz00_16202;

							{	/* Cfa/cinfo2.scm 68 */
								BgL_objectz00_bglt BgL_tmpz00_16203;

								BgL_tmpz00_16203 = ((BgL_objectz00_bglt) BgL_new1602z00_9654);
								BgL_auxz00_16202 = BGL_OBJECT_WIDENING(BgL_tmpz00_16203);
							}
							BgL_auxz00_16201 =
								((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16202);
						}
						((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16201))->
								BgL_stackzd2stampzd2) =
							((obj_t) BgL_stackzd2stamp1281zd2_8583), BUNSPEC);
					}
					{
						BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16208;

						{
							obj_t BgL_auxz00_16209;

							{	/* Cfa/cinfo2.scm 68 */
								BgL_objectz00_bglt BgL_tmpz00_16210;

								BgL_tmpz00_16210 = ((BgL_objectz00_bglt) BgL_new1602z00_9654);
								BgL_auxz00_16209 = BGL_OBJECT_WIDENING(BgL_tmpz00_16210);
							}
							BgL_auxz00_16208 =
								((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16209);
						}
						((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16208))->
								BgL_seenzf3zf3) = ((bool_t) BgL_seenzf31282zf3_9652), BUNSPEC);
					}
					{
						BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16215;

						{
							obj_t BgL_auxz00_16216;

							{	/* Cfa/cinfo2.scm 68 */
								BgL_objectz00_bglt BgL_tmpz00_16217;

								BgL_tmpz00_16217 = ((BgL_objectz00_bglt) BgL_new1602z00_9654);
								BgL_auxz00_16216 = BGL_OBJECT_WIDENING(BgL_tmpz00_16217);
							}
							BgL_auxz00_16215 =
								((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16216);
						}
						((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16215))->
								BgL_tvectorzf3zf3) =
							((bool_t) BgL_tvectorzf31283zf3_9653), BUNSPEC);
					}
					return BgL_new1602z00_9654;
				}
			}
		}

	}



/* &<@anonymous:2289> */
	obj_t BGl_z62zc3z04anonymousza32289ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8586)
	{
		{	/* Cfa/cinfo2.scm 68 */
			return BBOOL(((bool_t) 1));
		}

	}



/* &lambda2288 */
	obj_t BGl_z62lambda2288z62zzcfa_info2z00(obj_t BgL_envz00_8587,
		obj_t BgL_oz00_8588, obj_t BgL_vz00_8589)
	{
		{	/* Cfa/cinfo2.scm 68 */
			{	/* Cfa/cinfo2.scm 68 */
				bool_t BgL_vz00_9661;

				BgL_vz00_9661 = CBOOL(BgL_vz00_8589);
				{
					BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16224;

					{
						obj_t BgL_auxz00_16225;

						{	/* Cfa/cinfo2.scm 68 */
							BgL_objectz00_bglt BgL_tmpz00_16226;

							BgL_tmpz00_16226 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8588));
							BgL_auxz00_16225 = BGL_OBJECT_WIDENING(BgL_tmpz00_16226);
						}
						BgL_auxz00_16224 =
							((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16225);
					}
					return
						((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16224))->
							BgL_tvectorzf3zf3) = ((bool_t) BgL_vz00_9661), BUNSPEC);
				}
			}
		}

	}



/* &lambda2287 */
	obj_t BGl_z62lambda2287z62zzcfa_info2z00(obj_t BgL_envz00_8590,
		obj_t BgL_oz00_8591)
	{
		{	/* Cfa/cinfo2.scm 68 */
			{	/* Cfa/cinfo2.scm 68 */
				bool_t BgL_tmpz00_16232;

				{
					BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16233;

					{
						obj_t BgL_auxz00_16234;

						{	/* Cfa/cinfo2.scm 68 */
							BgL_objectz00_bglt BgL_tmpz00_16235;

							BgL_tmpz00_16235 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8591));
							BgL_auxz00_16234 = BGL_OBJECT_WIDENING(BgL_tmpz00_16235);
						}
						BgL_auxz00_16233 =
							((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16234);
					}
					BgL_tmpz00_16232 =
						(((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16233))->
						BgL_tvectorzf3zf3);
				}
				return BBOOL(BgL_tmpz00_16232);
			}
		}

	}



/* &<@anonymous:2282> */
	obj_t BGl_z62zc3z04anonymousza32282ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8592)
	{
		{	/* Cfa/cinfo2.scm 68 */
			return BBOOL(((bool_t) 0));
		}

	}



/* &lambda2281 */
	obj_t BGl_z62lambda2281z62zzcfa_info2z00(obj_t BgL_envz00_8593,
		obj_t BgL_oz00_8594, obj_t BgL_vz00_8595)
	{
		{	/* Cfa/cinfo2.scm 68 */
			{	/* Cfa/cinfo2.scm 68 */
				bool_t BgL_vz00_9664;

				BgL_vz00_9664 = CBOOL(BgL_vz00_8595);
				{
					BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16244;

					{
						obj_t BgL_auxz00_16245;

						{	/* Cfa/cinfo2.scm 68 */
							BgL_objectz00_bglt BgL_tmpz00_16246;

							BgL_tmpz00_16246 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8594));
							BgL_auxz00_16245 = BGL_OBJECT_WIDENING(BgL_tmpz00_16246);
						}
						BgL_auxz00_16244 =
							((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16245);
					}
					return
						((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16244))->
							BgL_seenzf3zf3) = ((bool_t) BgL_vz00_9664), BUNSPEC);
				}
			}
		}

	}



/* &lambda2280 */
	obj_t BGl_z62lambda2280z62zzcfa_info2z00(obj_t BgL_envz00_8596,
		obj_t BgL_oz00_8597)
	{
		{	/* Cfa/cinfo2.scm 68 */
			{	/* Cfa/cinfo2.scm 68 */
				bool_t BgL_tmpz00_16252;

				{
					BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16253;

					{
						obj_t BgL_auxz00_16254;

						{	/* Cfa/cinfo2.scm 68 */
							BgL_objectz00_bglt BgL_tmpz00_16255;

							BgL_tmpz00_16255 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8597));
							BgL_auxz00_16254 = BGL_OBJECT_WIDENING(BgL_tmpz00_16255);
						}
						BgL_auxz00_16253 =
							((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16254);
					}
					BgL_tmpz00_16252 =
						(((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16253))->
						BgL_seenzf3zf3);
				}
				return BBOOL(BgL_tmpz00_16252);
			}
		}

	}



/* &<@anonymous:2274> */
	obj_t BGl_z62zc3z04anonymousza32274ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8598)
	{
		{	/* Cfa/cinfo2.scm 68 */
			return BNIL;
		}

	}



/* &lambda2273 */
	obj_t BGl_z62lambda2273z62zzcfa_info2z00(obj_t BgL_envz00_8599,
		obj_t BgL_oz00_8600, obj_t BgL_vz00_8601)
	{
		{	/* Cfa/cinfo2.scm 68 */
			{
				BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16262;

				{
					obj_t BgL_auxz00_16263;

					{	/* Cfa/cinfo2.scm 68 */
						BgL_objectz00_bglt BgL_tmpz00_16264;

						BgL_tmpz00_16264 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8600));
						BgL_auxz00_16263 = BGL_OBJECT_WIDENING(BgL_tmpz00_16264);
					}
					BgL_auxz00_16262 =
						((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16263);
				}
				return
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16262))->
						BgL_stackzd2stampzd2) = ((obj_t) BgL_vz00_8601), BUNSPEC);
			}
		}

	}



/* &lambda2272 */
	obj_t BGl_z62lambda2272z62zzcfa_info2z00(obj_t BgL_envz00_8602,
		obj_t BgL_oz00_8603)
	{
		{	/* Cfa/cinfo2.scm 68 */
			{
				BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16270;

				{
					obj_t BgL_auxz00_16271;

					{	/* Cfa/cinfo2.scm 68 */
						BgL_objectz00_bglt BgL_tmpz00_16272;

						BgL_tmpz00_16272 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8603));
						BgL_auxz00_16271 = BGL_OBJECT_WIDENING(BgL_tmpz00_16272);
					}
					BgL_auxz00_16270 =
						((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16271);
				}
				return
					(((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16270))->
					BgL_stackzd2stampzd2);
			}
		}

	}



/* &lambda2267 */
	obj_t BGl_z62lambda2267z62zzcfa_info2z00(obj_t BgL_envz00_8604,
		obj_t BgL_oz00_8605, obj_t BgL_vz00_8606)
	{
		{	/* Cfa/cinfo2.scm 68 */
			{
				BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16278;

				{
					obj_t BgL_auxz00_16279;

					{	/* Cfa/cinfo2.scm 68 */
						BgL_objectz00_bglt BgL_tmpz00_16280;

						BgL_tmpz00_16280 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8605));
						BgL_auxz00_16279 = BGL_OBJECT_WIDENING(BgL_tmpz00_16280);
					}
					BgL_auxz00_16278 =
						((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16279);
				}
				return
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16278))->
						BgL_ownerz00) =
					((BgL_variablez00_bglt) ((BgL_variablez00_bglt) BgL_vz00_8606)),
					BUNSPEC);
			}
		}

	}



/* &lambda2266 */
	BgL_variablez00_bglt BGl_z62lambda2266z62zzcfa_info2z00(obj_t BgL_envz00_8607,
		obj_t BgL_oz00_8608)
	{
		{	/* Cfa/cinfo2.scm 68 */
			{
				BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16287;

				{
					obj_t BgL_auxz00_16288;

					{	/* Cfa/cinfo2.scm 68 */
						BgL_objectz00_bglt BgL_tmpz00_16289;

						BgL_tmpz00_16289 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8608));
						BgL_auxz00_16288 = BGL_OBJECT_WIDENING(BgL_tmpz00_16289);
					}
					BgL_auxz00_16287 =
						((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16288);
				}
				return
					(((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16287))->
					BgL_ownerz00);
			}
		}

	}



/* &<@anonymous:2262> */
	obj_t BGl_z62zc3z04anonymousza32262ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8609)
	{
		{	/* Cfa/cinfo2.scm 68 */
			return BINT(-1L);
		}

	}



/* &lambda2261 */
	obj_t BGl_z62lambda2261z62zzcfa_info2z00(obj_t BgL_envz00_8610,
		obj_t BgL_oz00_8611, obj_t BgL_vz00_8612)
	{
		{	/* Cfa/cinfo2.scm 68 */
			{	/* Cfa/cinfo2.scm 68 */
				long BgL_vz00_9672;

				BgL_vz00_9672 = (long) CINT(BgL_vz00_8612);
				{
					BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16297;

					{
						obj_t BgL_auxz00_16298;

						{	/* Cfa/cinfo2.scm 68 */
							BgL_objectz00_bglt BgL_tmpz00_16299;

							BgL_tmpz00_16299 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8611));
							BgL_auxz00_16298 = BGL_OBJECT_WIDENING(BgL_tmpz00_16299);
						}
						BgL_auxz00_16297 =
							((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16298);
					}
					return
						((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16297))->
							BgL_lostzd2stampzd2) = ((long) BgL_vz00_9672), BUNSPEC);
		}}}

	}



/* &lambda2260 */
	obj_t BGl_z62lambda2260z62zzcfa_info2z00(obj_t BgL_envz00_8613,
		obj_t BgL_oz00_8614)
	{
		{	/* Cfa/cinfo2.scm 68 */
			{	/* Cfa/cinfo2.scm 68 */
				long BgL_tmpz00_16305;

				{
					BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16306;

					{
						obj_t BgL_auxz00_16307;

						{	/* Cfa/cinfo2.scm 68 */
							BgL_objectz00_bglt BgL_tmpz00_16308;

							BgL_tmpz00_16308 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8614));
							BgL_auxz00_16307 = BGL_OBJECT_WIDENING(BgL_tmpz00_16308);
						}
						BgL_auxz00_16306 =
							((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16307);
					}
					BgL_tmpz00_16305 =
						(((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16306))->
						BgL_lostzd2stampzd2);
				}
				return BINT(BgL_tmpz00_16305);
			}
		}

	}



/* &lambda2255 */
	obj_t BGl_z62lambda2255z62zzcfa_info2z00(obj_t BgL_envz00_8615,
		obj_t BgL_oz00_8616, obj_t BgL_vz00_8617)
	{
		{	/* Cfa/cinfo2.scm 68 */
			{
				BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16315;

				{
					obj_t BgL_auxz00_16316;

					{	/* Cfa/cinfo2.scm 68 */
						BgL_objectz00_bglt BgL_tmpz00_16317;

						BgL_tmpz00_16317 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8616));
						BgL_auxz00_16316 = BGL_OBJECT_WIDENING(BgL_tmpz00_16317);
					}
					BgL_auxz00_16315 =
						((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16316);
				}
				return
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16315))->
						BgL_valuezd2approxzd2) =
					((BgL_approxz00_bglt) ((BgL_approxz00_bglt) BgL_vz00_8617)), BUNSPEC);
			}
		}

	}



/* &lambda2254 */
	BgL_approxz00_bglt BGl_z62lambda2254z62zzcfa_info2z00(obj_t BgL_envz00_8618,
		obj_t BgL_oz00_8619)
	{
		{	/* Cfa/cinfo2.scm 68 */
			{
				BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16324;

				{
					obj_t BgL_auxz00_16325;

					{	/* Cfa/cinfo2.scm 68 */
						BgL_objectz00_bglt BgL_tmpz00_16326;

						BgL_tmpz00_16326 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8619));
						BgL_auxz00_16325 = BGL_OBJECT_WIDENING(BgL_tmpz00_16326);
					}
					BgL_auxz00_16324 =
						((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16325);
				}
				return
					(((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16324))->
					BgL_valuezd2approxzd2);
			}
		}

	}



/* &lambda2250 */
	obj_t BGl_z62lambda2250z62zzcfa_info2z00(obj_t BgL_envz00_8620,
		obj_t BgL_oz00_8621, obj_t BgL_vz00_8622)
	{
		{	/* Cfa/cinfo2.scm 68 */
			{
				BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16332;

				{
					obj_t BgL_auxz00_16333;

					{	/* Cfa/cinfo2.scm 68 */
						BgL_objectz00_bglt BgL_tmpz00_16334;

						BgL_tmpz00_16334 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8621));
						BgL_auxz00_16333 = BGL_OBJECT_WIDENING(BgL_tmpz00_16334);
					}
					BgL_auxz00_16332 =
						((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16333);
				}
				return
					((((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16332))->
						BgL_approxz00) =
					((BgL_approxz00_bglt) ((BgL_approxz00_bglt) BgL_vz00_8622)), BUNSPEC);
			}
		}

	}



/* &lambda2249 */
	BgL_approxz00_bglt BGl_z62lambda2249z62zzcfa_info2z00(obj_t BgL_envz00_8623,
		obj_t BgL_oz00_8624)
	{
		{	/* Cfa/cinfo2.scm 68 */
			{
				BgL_makezd2vectorzd2appz00_bglt BgL_auxz00_16341;

				{
					obj_t BgL_auxz00_16342;

					{	/* Cfa/cinfo2.scm 68 */
						BgL_objectz00_bglt BgL_tmpz00_16343;

						BgL_tmpz00_16343 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8624));
						BgL_auxz00_16342 = BGL_OBJECT_WIDENING(BgL_tmpz00_16343);
					}
					BgL_auxz00_16341 =
						((BgL_makezd2vectorzd2appz00_bglt) BgL_auxz00_16342);
				}
				return
					(((BgL_makezd2vectorzd2appz00_bglt) COBJECT(BgL_auxz00_16341))->
					BgL_approxz00);
			}
		}

	}



/* &lambda2221 */
	BgL_appz00_bglt BGl_z62lambda2221z62zzcfa_info2z00(obj_t BgL_envz00_8625,
		obj_t BgL_o1268z00_8626)
	{
		{	/* Cfa/cinfo2.scm 64 */
			{	/* Cfa/cinfo2.scm 64 */
				long BgL_arg2222z00_9681;

				{	/* Cfa/cinfo2.scm 64 */
					obj_t BgL_arg2223z00_9682;

					{	/* Cfa/cinfo2.scm 64 */
						obj_t BgL_arg2224z00_9683;

						{	/* Cfa/cinfo2.scm 64 */
							long BgL_arg1808z00_9684;

							{	/* Cfa/cinfo2.scm 64 */
								long BgL_arg1809z00_9685;

								BgL_arg1809z00_9685 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1268z00_8626)));
								BgL_arg1808z00_9684 = (BgL_arg1809z00_9685 - OBJECT_TYPE);
							}
							BgL_arg2224z00_9683 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9684);
						}
						BgL_arg2223z00_9682 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2224z00_9683);
					}
					{	/* Cfa/cinfo2.scm 64 */
						obj_t BgL_tmpz00_16355;

						BgL_tmpz00_16355 = ((obj_t) BgL_arg2223z00_9682);
						BgL_arg2222z00_9681 = BGL_CLASS_NUM(BgL_tmpz00_16355);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1268z00_8626)), BgL_arg2222z00_9681);
			}
			{	/* Cfa/cinfo2.scm 64 */
				BgL_objectz00_bglt BgL_tmpz00_16361;

				BgL_tmpz00_16361 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1268z00_8626));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_16361, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1268z00_8626));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1268z00_8626));
		}

	}



/* &<@anonymous:2220> */
	obj_t BGl_z62zc3z04anonymousza32220ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8627,
		obj_t BgL_new1267z00_8628)
	{
		{	/* Cfa/cinfo2.scm 64 */
			{
				BgL_appz00_bglt BgL_auxz00_16369;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1267z00_8628))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_16373;

					{	/* Cfa/cinfo2.scm 64 */
						obj_t BgL_classz00_9687;

						BgL_classz00_9687 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 64 */
							obj_t BgL__ortest_1117z00_9688;

							BgL__ortest_1117z00_9688 = BGL_CLASS_NIL(BgL_classz00_9687);
							if (CBOOL(BgL__ortest_1117z00_9688))
								{	/* Cfa/cinfo2.scm 64 */
									BgL_auxz00_16373 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9688);
								}
							else
								{	/* Cfa/cinfo2.scm 64 */
									BgL_auxz00_16373 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9687));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1267z00_8628))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_16373), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1267z00_8628))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1267z00_8628))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_16389;

					{	/* Cfa/cinfo2.scm 64 */
						obj_t BgL_classz00_9689;

						BgL_classz00_9689 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 64 */
							obj_t BgL__ortest_1117z00_9690;

							BgL__ortest_1117z00_9690 = BGL_CLASS_NIL(BgL_classz00_9689);
							if (CBOOL(BgL__ortest_1117z00_9690))
								{	/* Cfa/cinfo2.scm 64 */
									BgL_auxz00_16389 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9690);
								}
							else
								{	/* Cfa/cinfo2.scm 64 */
									BgL_auxz00_16389 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9689));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1267z00_8628))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_16389), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1267z00_8628))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1267z00_8628))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_variablez00_bglt BgL_auxz00_16412;
					BgL_prezd2makezd2vectorzd2appzd2_bglt BgL_auxz00_16405;

					{	/* Cfa/cinfo2.scm 64 */
						obj_t BgL_classz00_9691;

						BgL_classz00_9691 = BGl_variablez00zzast_varz00;
						{	/* Cfa/cinfo2.scm 64 */
							obj_t BgL__ortest_1117z00_9692;

							BgL__ortest_1117z00_9692 = BGL_CLASS_NIL(BgL_classz00_9691);
							if (CBOOL(BgL__ortest_1117z00_9692))
								{	/* Cfa/cinfo2.scm 64 */
									BgL_auxz00_16412 =
										((BgL_variablez00_bglt) BgL__ortest_1117z00_9692);
								}
							else
								{	/* Cfa/cinfo2.scm 64 */
									BgL_auxz00_16412 =
										((BgL_variablez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9691));
								}
						}
					}
					{
						obj_t BgL_auxz00_16406;

						{	/* Cfa/cinfo2.scm 64 */
							BgL_objectz00_bglt BgL_tmpz00_16407;

							BgL_tmpz00_16407 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1267z00_8628));
							BgL_auxz00_16406 = BGL_OBJECT_WIDENING(BgL_tmpz00_16407);
						}
						BgL_auxz00_16405 =
							((BgL_prezd2makezd2vectorzd2appzd2_bglt) BgL_auxz00_16406);
					}
					((((BgL_prezd2makezd2vectorzd2appzd2_bglt)
								COBJECT(BgL_auxz00_16405))->BgL_ownerz00) =
						((BgL_variablez00_bglt) BgL_auxz00_16412), BUNSPEC);
				}
				BgL_auxz00_16369 = ((BgL_appz00_bglt) BgL_new1267z00_8628);
				return ((obj_t) BgL_auxz00_16369);
			}
		}

	}



/* &lambda2218 */
	BgL_appz00_bglt BGl_z62lambda2218z62zzcfa_info2z00(obj_t BgL_envz00_8629,
		obj_t BgL_o1264z00_8630)
	{
		{	/* Cfa/cinfo2.scm 64 */
			{	/* Cfa/cinfo2.scm 64 */
				BgL_prezd2makezd2vectorzd2appzd2_bglt BgL_wide1266z00_9694;

				BgL_wide1266z00_9694 =
					((BgL_prezd2makezd2vectorzd2appzd2_bglt)
					BOBJECT(GC_MALLOC(sizeof(struct
								BgL_prezd2makezd2vectorzd2appzd2_bgl))));
				{	/* Cfa/cinfo2.scm 64 */
					obj_t BgL_auxz00_16427;
					BgL_objectz00_bglt BgL_tmpz00_16423;

					BgL_auxz00_16427 = ((obj_t) BgL_wide1266z00_9694);
					BgL_tmpz00_16423 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1264z00_8630)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_16423, BgL_auxz00_16427);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1264z00_8630)));
				{	/* Cfa/cinfo2.scm 64 */
					long BgL_arg2219z00_9695;

					BgL_arg2219z00_9695 =
						BGL_CLASS_NUM(BGl_prezd2makezd2vectorzd2appzd2zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1264z00_8630))), BgL_arg2219z00_9695);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1264z00_8630)));
			}
		}

	}



/* &lambda2215 */
	BgL_appz00_bglt BGl_z62lambda2215z62zzcfa_info2z00(obj_t BgL_envz00_8631,
		obj_t BgL_loc1256z00_8632, obj_t BgL_type1257z00_8633,
		obj_t BgL_sidezd2effect1258zd2_8634, obj_t BgL_key1259z00_8635,
		obj_t BgL_fun1260z00_8636, obj_t BgL_args1261z00_8637,
		obj_t BgL_stackable1262z00_8638, obj_t BgL_owner1263z00_8639)
	{
		{	/* Cfa/cinfo2.scm 64 */
			{	/* Cfa/cinfo2.scm 64 */
				BgL_appz00_bglt BgL_new1597z00_9699;

				{	/* Cfa/cinfo2.scm 64 */
					BgL_appz00_bglt BgL_tmp1595z00_9700;
					BgL_prezd2makezd2vectorzd2appzd2_bglt BgL_wide1596z00_9701;

					{
						BgL_appz00_bglt BgL_auxz00_16441;

						{	/* Cfa/cinfo2.scm 64 */
							BgL_appz00_bglt BgL_new1594z00_9702;

							BgL_new1594z00_9702 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.scm 64 */
								long BgL_arg2217z00_9703;

								BgL_arg2217z00_9703 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1594z00_9702),
									BgL_arg2217z00_9703);
							}
							{	/* Cfa/cinfo2.scm 64 */
								BgL_objectz00_bglt BgL_tmpz00_16446;

								BgL_tmpz00_16446 = ((BgL_objectz00_bglt) BgL_new1594z00_9702);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_16446, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1594z00_9702);
							BgL_auxz00_16441 = BgL_new1594z00_9702;
						}
						BgL_tmp1595z00_9700 = ((BgL_appz00_bglt) BgL_auxz00_16441);
					}
					BgL_wide1596z00_9701 =
						((BgL_prezd2makezd2vectorzd2appzd2_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2makezd2vectorzd2appzd2_bgl))));
					{	/* Cfa/cinfo2.scm 64 */
						obj_t BgL_auxz00_16454;
						BgL_objectz00_bglt BgL_tmpz00_16452;

						BgL_auxz00_16454 = ((obj_t) BgL_wide1596z00_9701);
						BgL_tmpz00_16452 = ((BgL_objectz00_bglt) BgL_tmp1595z00_9700);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_16452, BgL_auxz00_16454);
					}
					((BgL_objectz00_bglt) BgL_tmp1595z00_9700);
					{	/* Cfa/cinfo2.scm 64 */
						long BgL_arg2216z00_9704;

						BgL_arg2216z00_9704 =
							BGL_CLASS_NUM(BGl_prezd2makezd2vectorzd2appzd2zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1595z00_9700), BgL_arg2216z00_9704);
					}
					BgL_new1597z00_9699 = ((BgL_appz00_bglt) BgL_tmp1595z00_9700);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1597z00_9699)))->BgL_locz00) =
					((obj_t) BgL_loc1256z00_8632), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1597z00_9699)))->BgL_typez00) =
					((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1257z00_8633)),
					BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1597z00_9699)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1258zd2_8634), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1597z00_9699)))->BgL_keyz00) =
					((obj_t) BgL_key1259z00_8635), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1597z00_9699)))->
						BgL_funz00) =
					((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1260z00_8636)), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1597z00_9699)))->
						BgL_argsz00) = ((obj_t) BgL_args1261z00_8637), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1597z00_9699)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1262z00_8638), BUNSPEC);
				{
					BgL_prezd2makezd2vectorzd2appzd2_bglt BgL_auxz00_16478;

					{
						obj_t BgL_auxz00_16479;

						{	/* Cfa/cinfo2.scm 64 */
							BgL_objectz00_bglt BgL_tmpz00_16480;

							BgL_tmpz00_16480 = ((BgL_objectz00_bglt) BgL_new1597z00_9699);
							BgL_auxz00_16479 = BGL_OBJECT_WIDENING(BgL_tmpz00_16480);
						}
						BgL_auxz00_16478 =
							((BgL_prezd2makezd2vectorzd2appzd2_bglt) BgL_auxz00_16479);
					}
					((((BgL_prezd2makezd2vectorzd2appzd2_bglt)
								COBJECT(BgL_auxz00_16478))->BgL_ownerz00) =
						((BgL_variablez00_bglt) ((BgL_variablez00_bglt)
								BgL_owner1263z00_8639)), BUNSPEC);
				}
				return BgL_new1597z00_9699;
			}
		}

	}



/* &lambda2229 */
	obj_t BGl_z62lambda2229z62zzcfa_info2z00(obj_t BgL_envz00_8640,
		obj_t BgL_oz00_8641, obj_t BgL_vz00_8642)
	{
		{	/* Cfa/cinfo2.scm 64 */
			{
				BgL_prezd2makezd2vectorzd2appzd2_bglt BgL_auxz00_16486;

				{
					obj_t BgL_auxz00_16487;

					{	/* Cfa/cinfo2.scm 64 */
						BgL_objectz00_bglt BgL_tmpz00_16488;

						BgL_tmpz00_16488 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8641));
						BgL_auxz00_16487 = BGL_OBJECT_WIDENING(BgL_tmpz00_16488);
					}
					BgL_auxz00_16486 =
						((BgL_prezd2makezd2vectorzd2appzd2_bglt) BgL_auxz00_16487);
				}
				return
					((((BgL_prezd2makezd2vectorzd2appzd2_bglt)
							COBJECT(BgL_auxz00_16486))->BgL_ownerz00) =
					((BgL_variablez00_bglt) ((BgL_variablez00_bglt) BgL_vz00_8642)),
					BUNSPEC);
			}
		}

	}



/* &lambda2228 */
	BgL_variablez00_bglt BGl_z62lambda2228z62zzcfa_info2z00(obj_t BgL_envz00_8643,
		obj_t BgL_oz00_8644)
	{
		{	/* Cfa/cinfo2.scm 64 */
			{
				BgL_prezd2makezd2vectorzd2appzd2_bglt BgL_auxz00_16495;

				{
					obj_t BgL_auxz00_16496;

					{	/* Cfa/cinfo2.scm 64 */
						BgL_objectz00_bglt BgL_tmpz00_16497;

						BgL_tmpz00_16497 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8644));
						BgL_auxz00_16496 = BGL_OBJECT_WIDENING(BgL_tmpz00_16497);
					}
					BgL_auxz00_16495 =
						((BgL_prezd2makezd2vectorzd2appzd2_bglt) BgL_auxz00_16496);
				}
				return
					(((BgL_prezd2makezd2vectorzd2appzd2_bglt) COBJECT(BgL_auxz00_16495))->
					BgL_ownerz00);
			}
		}

	}



/* &lambda2194 */
	BgL_appz00_bglt BGl_z62lambda2194z62zzcfa_info2z00(obj_t BgL_envz00_8645,
		obj_t BgL_o1254z00_8646)
	{
		{	/* Cfa/cinfo2.scm 59 */
			{	/* Cfa/cinfo2.scm 59 */
				long BgL_arg2195z00_9709;

				{	/* Cfa/cinfo2.scm 59 */
					obj_t BgL_arg2196z00_9710;

					{	/* Cfa/cinfo2.scm 59 */
						obj_t BgL_arg2197z00_9711;

						{	/* Cfa/cinfo2.scm 59 */
							long BgL_arg1808z00_9712;

							{	/* Cfa/cinfo2.scm 59 */
								long BgL_arg1809z00_9713;

								BgL_arg1809z00_9713 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1254z00_8646)));
								BgL_arg1808z00_9712 = (BgL_arg1809z00_9713 - OBJECT_TYPE);
							}
							BgL_arg2197z00_9711 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9712);
						}
						BgL_arg2196z00_9710 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2197z00_9711);
					}
					{	/* Cfa/cinfo2.scm 59 */
						obj_t BgL_tmpz00_16509;

						BgL_tmpz00_16509 = ((obj_t) BgL_arg2196z00_9710);
						BgL_arg2195z00_9709 = BGL_CLASS_NUM(BgL_tmpz00_16509);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1254z00_8646)), BgL_arg2195z00_9709);
			}
			{	/* Cfa/cinfo2.scm 59 */
				BgL_objectz00_bglt BgL_tmpz00_16515;

				BgL_tmpz00_16515 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1254z00_8646));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_16515, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1254z00_8646));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1254z00_8646));
		}

	}



/* &<@anonymous:2193> */
	obj_t BGl_z62zc3z04anonymousza32193ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8647,
		obj_t BgL_new1253z00_8648)
	{
		{	/* Cfa/cinfo2.scm 59 */
			{
				BgL_appz00_bglt BgL_auxz00_16523;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1253z00_8648))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_16527;

					{	/* Cfa/cinfo2.scm 59 */
						obj_t BgL_classz00_9715;

						BgL_classz00_9715 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 59 */
							obj_t BgL__ortest_1117z00_9716;

							BgL__ortest_1117z00_9716 = BGL_CLASS_NIL(BgL_classz00_9715);
							if (CBOOL(BgL__ortest_1117z00_9716))
								{	/* Cfa/cinfo2.scm 59 */
									BgL_auxz00_16527 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9716);
								}
							else
								{	/* Cfa/cinfo2.scm 59 */
									BgL_auxz00_16527 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9715));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1253z00_8648))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_16527), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1253z00_8648))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1253z00_8648))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_16543;

					{	/* Cfa/cinfo2.scm 59 */
						obj_t BgL_classz00_9717;

						BgL_classz00_9717 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 59 */
							obj_t BgL__ortest_1117z00_9718;

							BgL__ortest_1117z00_9718 = BGL_CLASS_NIL(BgL_classz00_9717);
							if (CBOOL(BgL__ortest_1117z00_9718))
								{	/* Cfa/cinfo2.scm 59 */
									BgL_auxz00_16543 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9718);
								}
							else
								{	/* Cfa/cinfo2.scm 59 */
									BgL_auxz00_16543 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9717));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1253z00_8648))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_16543), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1253z00_8648))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1253z00_8648))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_approxz00_bglt BgL_auxz00_16566;
					BgL_procedurezd2setz12zd2appz12_bglt BgL_auxz00_16559;

					{	/* Cfa/cinfo2.scm 59 */
						obj_t BgL_classz00_9719;

						BgL_classz00_9719 = BGl_approxz00zzcfa_infoz00;
						{	/* Cfa/cinfo2.scm 59 */
							obj_t BgL__ortest_1117z00_9720;

							BgL__ortest_1117z00_9720 = BGL_CLASS_NIL(BgL_classz00_9719);
							if (CBOOL(BgL__ortest_1117z00_9720))
								{	/* Cfa/cinfo2.scm 59 */
									BgL_auxz00_16566 =
										((BgL_approxz00_bglt) BgL__ortest_1117z00_9720);
								}
							else
								{	/* Cfa/cinfo2.scm 59 */
									BgL_auxz00_16566 =
										((BgL_approxz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9719));
								}
						}
					}
					{
						obj_t BgL_auxz00_16560;

						{	/* Cfa/cinfo2.scm 59 */
							BgL_objectz00_bglt BgL_tmpz00_16561;

							BgL_tmpz00_16561 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1253z00_8648));
							BgL_auxz00_16560 = BGL_OBJECT_WIDENING(BgL_tmpz00_16561);
						}
						BgL_auxz00_16559 =
							((BgL_procedurezd2setz12zd2appz12_bglt) BgL_auxz00_16560);
					}
					((((BgL_procedurezd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_16559))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_auxz00_16566), BUNSPEC);
				}
				{
					BgL_procedurezd2setz12zd2appz12_bglt BgL_auxz00_16574;

					{
						obj_t BgL_auxz00_16575;

						{	/* Cfa/cinfo2.scm 59 */
							BgL_objectz00_bglt BgL_tmpz00_16576;

							BgL_tmpz00_16576 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1253z00_8648));
							BgL_auxz00_16575 = BGL_OBJECT_WIDENING(BgL_tmpz00_16576);
						}
						BgL_auxz00_16574 =
							((BgL_procedurezd2setz12zd2appz12_bglt) BgL_auxz00_16575);
					}
					((((BgL_procedurezd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_16574))->
							BgL_vapproxz00) = ((obj_t) BUNSPEC), BUNSPEC);
				}
				BgL_auxz00_16523 = ((BgL_appz00_bglt) BgL_new1253z00_8648);
				return ((obj_t) BgL_auxz00_16523);
			}
		}

	}



/* &lambda2191 */
	BgL_appz00_bglt BGl_z62lambda2191z62zzcfa_info2z00(obj_t BgL_envz00_8649,
		obj_t BgL_o1250z00_8650)
	{
		{	/* Cfa/cinfo2.scm 59 */
			{	/* Cfa/cinfo2.scm 59 */
				BgL_procedurezd2setz12zd2appz12_bglt BgL_wide1252z00_9722;

				BgL_wide1252z00_9722 =
					((BgL_procedurezd2setz12zd2appz12_bglt)
					BOBJECT(GC_MALLOC(sizeof(struct
								BgL_procedurezd2setz12zd2appz12_bgl))));
				{	/* Cfa/cinfo2.scm 59 */
					obj_t BgL_auxz00_16589;
					BgL_objectz00_bglt BgL_tmpz00_16585;

					BgL_auxz00_16589 = ((obj_t) BgL_wide1252z00_9722);
					BgL_tmpz00_16585 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1250z00_8650)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_16585, BgL_auxz00_16589);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1250z00_8650)));
				{	/* Cfa/cinfo2.scm 59 */
					long BgL_arg2192z00_9723;

					BgL_arg2192z00_9723 =
						BGL_CLASS_NUM(BGl_procedurezd2setz12zd2appz12zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1250z00_8650))), BgL_arg2192z00_9723);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1250z00_8650)));
			}
		}

	}



/* &lambda2188 */
	BgL_appz00_bglt BGl_z62lambda2188z62zzcfa_info2z00(obj_t BgL_envz00_8651,
		obj_t BgL_loc1241z00_8652, obj_t BgL_type1242z00_8653,
		obj_t BgL_sidezd2effect1243zd2_8654, obj_t BgL_key1244z00_8655,
		obj_t BgL_fun1245z00_8656, obj_t BgL_args1246z00_8657,
		obj_t BgL_stackable1247z00_8658, obj_t BgL_approx1248z00_8659,
		obj_t BgL_vapprox1249z00_8660)
	{
		{	/* Cfa/cinfo2.scm 59 */
			{	/* Cfa/cinfo2.scm 59 */
				BgL_appz00_bglt BgL_new1592z00_9727;

				{	/* Cfa/cinfo2.scm 59 */
					BgL_appz00_bglt BgL_tmp1590z00_9728;
					BgL_procedurezd2setz12zd2appz12_bglt BgL_wide1591z00_9729;

					{
						BgL_appz00_bglt BgL_auxz00_16603;

						{	/* Cfa/cinfo2.scm 59 */
							BgL_appz00_bglt BgL_new1589z00_9730;

							BgL_new1589z00_9730 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.scm 59 */
								long BgL_arg2190z00_9731;

								BgL_arg2190z00_9731 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1589z00_9730),
									BgL_arg2190z00_9731);
							}
							{	/* Cfa/cinfo2.scm 59 */
								BgL_objectz00_bglt BgL_tmpz00_16608;

								BgL_tmpz00_16608 = ((BgL_objectz00_bglt) BgL_new1589z00_9730);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_16608, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1589z00_9730);
							BgL_auxz00_16603 = BgL_new1589z00_9730;
						}
						BgL_tmp1590z00_9728 = ((BgL_appz00_bglt) BgL_auxz00_16603);
					}
					BgL_wide1591z00_9729 =
						((BgL_procedurezd2setz12zd2appz12_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_procedurezd2setz12zd2appz12_bgl))));
					{	/* Cfa/cinfo2.scm 59 */
						obj_t BgL_auxz00_16616;
						BgL_objectz00_bglt BgL_tmpz00_16614;

						BgL_auxz00_16616 = ((obj_t) BgL_wide1591z00_9729);
						BgL_tmpz00_16614 = ((BgL_objectz00_bglt) BgL_tmp1590z00_9728);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_16614, BgL_auxz00_16616);
					}
					((BgL_objectz00_bglt) BgL_tmp1590z00_9728);
					{	/* Cfa/cinfo2.scm 59 */
						long BgL_arg2189z00_9732;

						BgL_arg2189z00_9732 =
							BGL_CLASS_NUM(BGl_procedurezd2setz12zd2appz12zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1590z00_9728), BgL_arg2189z00_9732);
					}
					BgL_new1592z00_9727 = ((BgL_appz00_bglt) BgL_tmp1590z00_9728);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1592z00_9727)))->BgL_locz00) =
					((obj_t) BgL_loc1241z00_8652), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1592z00_9727)))->BgL_typez00) =
					((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1242z00_8653)),
					BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1592z00_9727)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1243zd2_8654), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1592z00_9727)))->BgL_keyz00) =
					((obj_t) BgL_key1244z00_8655), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1592z00_9727)))->
						BgL_funz00) =
					((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1245z00_8656)), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1592z00_9727)))->
						BgL_argsz00) = ((obj_t) BgL_args1246z00_8657), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1592z00_9727)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1247z00_8658), BUNSPEC);
				{
					BgL_procedurezd2setz12zd2appz12_bglt BgL_auxz00_16640;

					{
						obj_t BgL_auxz00_16641;

						{	/* Cfa/cinfo2.scm 59 */
							BgL_objectz00_bglt BgL_tmpz00_16642;

							BgL_tmpz00_16642 = ((BgL_objectz00_bglt) BgL_new1592z00_9727);
							BgL_auxz00_16641 = BGL_OBJECT_WIDENING(BgL_tmpz00_16642);
						}
						BgL_auxz00_16640 =
							((BgL_procedurezd2setz12zd2appz12_bglt) BgL_auxz00_16641);
					}
					((((BgL_procedurezd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_16640))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) ((BgL_approxz00_bglt)
								BgL_approx1248z00_8659)), BUNSPEC);
				}
				{
					BgL_procedurezd2setz12zd2appz12_bglt BgL_auxz00_16648;

					{
						obj_t BgL_auxz00_16649;

						{	/* Cfa/cinfo2.scm 59 */
							BgL_objectz00_bglt BgL_tmpz00_16650;

							BgL_tmpz00_16650 = ((BgL_objectz00_bglt) BgL_new1592z00_9727);
							BgL_auxz00_16649 = BGL_OBJECT_WIDENING(BgL_tmpz00_16650);
						}
						BgL_auxz00_16648 =
							((BgL_procedurezd2setz12zd2appz12_bglt) BgL_auxz00_16649);
					}
					((((BgL_procedurezd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_16648))->
							BgL_vapproxz00) = ((obj_t) BgL_vapprox1249z00_8660), BUNSPEC);
				}
				return BgL_new1592z00_9727;
			}
		}

	}



/* &lambda2208 */
	obj_t BGl_z62lambda2208z62zzcfa_info2z00(obj_t BgL_envz00_8661,
		obj_t BgL_oz00_8662, obj_t BgL_vz00_8663)
	{
		{	/* Cfa/cinfo2.scm 59 */
			{
				BgL_procedurezd2setz12zd2appz12_bglt BgL_auxz00_16655;

				{
					obj_t BgL_auxz00_16656;

					{	/* Cfa/cinfo2.scm 59 */
						BgL_objectz00_bglt BgL_tmpz00_16657;

						BgL_tmpz00_16657 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8662));
						BgL_auxz00_16656 = BGL_OBJECT_WIDENING(BgL_tmpz00_16657);
					}
					BgL_auxz00_16655 =
						((BgL_procedurezd2setz12zd2appz12_bglt) BgL_auxz00_16656);
				}
				return
					((((BgL_procedurezd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_16655))->
						BgL_vapproxz00) = ((obj_t) BgL_vz00_8663), BUNSPEC);
			}
		}

	}



/* &lambda2207 */
	obj_t BGl_z62lambda2207z62zzcfa_info2z00(obj_t BgL_envz00_8664,
		obj_t BgL_oz00_8665)
	{
		{	/* Cfa/cinfo2.scm 59 */
			{
				BgL_procedurezd2setz12zd2appz12_bglt BgL_auxz00_16663;

				{
					obj_t BgL_auxz00_16664;

					{	/* Cfa/cinfo2.scm 59 */
						BgL_objectz00_bglt BgL_tmpz00_16665;

						BgL_tmpz00_16665 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8665));
						BgL_auxz00_16664 = BGL_OBJECT_WIDENING(BgL_tmpz00_16665);
					}
					BgL_auxz00_16663 =
						((BgL_procedurezd2setz12zd2appz12_bglt) BgL_auxz00_16664);
				}
				return
					(((BgL_procedurezd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_16663))->
					BgL_vapproxz00);
			}
		}

	}



/* &lambda2203 */
	obj_t BGl_z62lambda2203z62zzcfa_info2z00(obj_t BgL_envz00_8666,
		obj_t BgL_oz00_8667, obj_t BgL_vz00_8668)
	{
		{	/* Cfa/cinfo2.scm 59 */
			{
				BgL_procedurezd2setz12zd2appz12_bglt BgL_auxz00_16671;

				{
					obj_t BgL_auxz00_16672;

					{	/* Cfa/cinfo2.scm 59 */
						BgL_objectz00_bglt BgL_tmpz00_16673;

						BgL_tmpz00_16673 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8667));
						BgL_auxz00_16672 = BGL_OBJECT_WIDENING(BgL_tmpz00_16673);
					}
					BgL_auxz00_16671 =
						((BgL_procedurezd2setz12zd2appz12_bglt) BgL_auxz00_16672);
				}
				return
					((((BgL_procedurezd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_16671))->
						BgL_approxz00) =
					((BgL_approxz00_bglt) ((BgL_approxz00_bglt) BgL_vz00_8668)), BUNSPEC);
			}
		}

	}



/* &lambda2202 */
	BgL_approxz00_bglt BGl_z62lambda2202z62zzcfa_info2z00(obj_t BgL_envz00_8669,
		obj_t BgL_oz00_8670)
	{
		{	/* Cfa/cinfo2.scm 59 */
			{
				BgL_procedurezd2setz12zd2appz12_bglt BgL_auxz00_16680;

				{
					obj_t BgL_auxz00_16681;

					{	/* Cfa/cinfo2.scm 59 */
						BgL_objectz00_bglt BgL_tmpz00_16682;

						BgL_tmpz00_16682 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8670));
						BgL_auxz00_16681 = BGL_OBJECT_WIDENING(BgL_tmpz00_16682);
					}
					BgL_auxz00_16680 =
						((BgL_procedurezd2setz12zd2appz12_bglt) BgL_auxz00_16681);
				}
				return
					(((BgL_procedurezd2setz12zd2appz12_bglt) COBJECT(BgL_auxz00_16680))->
					BgL_approxz00);
			}
		}

	}



/* &lambda2173 */
	BgL_appz00_bglt BGl_z62lambda2173z62zzcfa_info2z00(obj_t BgL_envz00_8671,
		obj_t BgL_o1239z00_8672)
	{
		{	/* Cfa/cinfo2.scm 57 */
			{	/* Cfa/cinfo2.scm 57 */
				long BgL_arg2174z00_9739;

				{	/* Cfa/cinfo2.scm 57 */
					obj_t BgL_arg2175z00_9740;

					{	/* Cfa/cinfo2.scm 57 */
						obj_t BgL_arg2176z00_9741;

						{	/* Cfa/cinfo2.scm 57 */
							long BgL_arg1808z00_9742;

							{	/* Cfa/cinfo2.scm 57 */
								long BgL_arg1809z00_9743;

								BgL_arg1809z00_9743 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1239z00_8672)));
								BgL_arg1808z00_9742 = (BgL_arg1809z00_9743 - OBJECT_TYPE);
							}
							BgL_arg2176z00_9741 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9742);
						}
						BgL_arg2175z00_9740 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2176z00_9741);
					}
					{	/* Cfa/cinfo2.scm 57 */
						obj_t BgL_tmpz00_16694;

						BgL_tmpz00_16694 = ((obj_t) BgL_arg2175z00_9740);
						BgL_arg2174z00_9739 = BGL_CLASS_NUM(BgL_tmpz00_16694);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1239z00_8672)), BgL_arg2174z00_9739);
			}
			{	/* Cfa/cinfo2.scm 57 */
				BgL_objectz00_bglt BgL_tmpz00_16700;

				BgL_tmpz00_16700 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1239z00_8672));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_16700, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1239z00_8672));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1239z00_8672));
		}

	}



/* &<@anonymous:2172> */
	obj_t BGl_z62zc3z04anonymousza32172ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8673,
		obj_t BgL_new1238z00_8674)
	{
		{	/* Cfa/cinfo2.scm 57 */
			{
				BgL_appz00_bglt BgL_auxz00_16708;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1238z00_8674))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_16712;

					{	/* Cfa/cinfo2.scm 57 */
						obj_t BgL_classz00_9745;

						BgL_classz00_9745 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 57 */
							obj_t BgL__ortest_1117z00_9746;

							BgL__ortest_1117z00_9746 = BGL_CLASS_NIL(BgL_classz00_9745);
							if (CBOOL(BgL__ortest_1117z00_9746))
								{	/* Cfa/cinfo2.scm 57 */
									BgL_auxz00_16712 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9746);
								}
							else
								{	/* Cfa/cinfo2.scm 57 */
									BgL_auxz00_16712 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9745));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1238z00_8674))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_16712), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1238z00_8674))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1238z00_8674))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_16728;

					{	/* Cfa/cinfo2.scm 57 */
						obj_t BgL_classz00_9747;

						BgL_classz00_9747 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 57 */
							obj_t BgL__ortest_1117z00_9748;

							BgL__ortest_1117z00_9748 = BGL_CLASS_NIL(BgL_classz00_9747);
							if (CBOOL(BgL__ortest_1117z00_9748))
								{	/* Cfa/cinfo2.scm 57 */
									BgL_auxz00_16728 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9748);
								}
							else
								{	/* Cfa/cinfo2.scm 57 */
									BgL_auxz00_16728 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9747));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1238z00_8674))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_16728), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1238z00_8674))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1238z00_8674))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_approxz00_bglt BgL_auxz00_16751;
					BgL_procedurezd2refzd2appz00_bglt BgL_auxz00_16744;

					{	/* Cfa/cinfo2.scm 57 */
						obj_t BgL_classz00_9749;

						BgL_classz00_9749 = BGl_approxz00zzcfa_infoz00;
						{	/* Cfa/cinfo2.scm 57 */
							obj_t BgL__ortest_1117z00_9750;

							BgL__ortest_1117z00_9750 = BGL_CLASS_NIL(BgL_classz00_9749);
							if (CBOOL(BgL__ortest_1117z00_9750))
								{	/* Cfa/cinfo2.scm 57 */
									BgL_auxz00_16751 =
										((BgL_approxz00_bglt) BgL__ortest_1117z00_9750);
								}
							else
								{	/* Cfa/cinfo2.scm 57 */
									BgL_auxz00_16751 =
										((BgL_approxz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9749));
								}
						}
					}
					{
						obj_t BgL_auxz00_16745;

						{	/* Cfa/cinfo2.scm 57 */
							BgL_objectz00_bglt BgL_tmpz00_16746;

							BgL_tmpz00_16746 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1238z00_8674));
							BgL_auxz00_16745 = BGL_OBJECT_WIDENING(BgL_tmpz00_16746);
						}
						BgL_auxz00_16744 =
							((BgL_procedurezd2refzd2appz00_bglt) BgL_auxz00_16745);
					}
					((((BgL_procedurezd2refzd2appz00_bglt) COBJECT(BgL_auxz00_16744))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_auxz00_16751), BUNSPEC);
				}
				BgL_auxz00_16708 = ((BgL_appz00_bglt) BgL_new1238z00_8674);
				return ((obj_t) BgL_auxz00_16708);
			}
		}

	}



/* &lambda2170 */
	BgL_appz00_bglt BGl_z62lambda2170z62zzcfa_info2z00(obj_t BgL_envz00_8675,
		obj_t BgL_o1235z00_8676)
	{
		{	/* Cfa/cinfo2.scm 57 */
			{	/* Cfa/cinfo2.scm 57 */
				BgL_procedurezd2refzd2appz00_bglt BgL_wide1237z00_9752;

				BgL_wide1237z00_9752 =
					((BgL_procedurezd2refzd2appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
								BgL_procedurezd2refzd2appz00_bgl))));
				{	/* Cfa/cinfo2.scm 57 */
					obj_t BgL_auxz00_16766;
					BgL_objectz00_bglt BgL_tmpz00_16762;

					BgL_auxz00_16766 = ((obj_t) BgL_wide1237z00_9752);
					BgL_tmpz00_16762 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1235z00_8676)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_16762, BgL_auxz00_16766);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1235z00_8676)));
				{	/* Cfa/cinfo2.scm 57 */
					long BgL_arg2171z00_9753;

					BgL_arg2171z00_9753 =
						BGL_CLASS_NUM(BGl_procedurezd2refzd2appz00zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1235z00_8676))), BgL_arg2171z00_9753);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1235z00_8676)));
			}
		}

	}



/* &lambda2167 */
	BgL_appz00_bglt BGl_z62lambda2167z62zzcfa_info2z00(obj_t BgL_envz00_8677,
		obj_t BgL_loc1227z00_8678, obj_t BgL_type1228z00_8679,
		obj_t BgL_sidezd2effect1229zd2_8680, obj_t BgL_key1230z00_8681,
		obj_t BgL_fun1231z00_8682, obj_t BgL_args1232z00_8683,
		obj_t BgL_stackable1233z00_8684, obj_t BgL_approx1234z00_8685)
	{
		{	/* Cfa/cinfo2.scm 57 */
			{	/* Cfa/cinfo2.scm 57 */
				BgL_appz00_bglt BgL_new1587z00_9757;

				{	/* Cfa/cinfo2.scm 57 */
					BgL_appz00_bglt BgL_tmp1585z00_9758;
					BgL_procedurezd2refzd2appz00_bglt BgL_wide1586z00_9759;

					{
						BgL_appz00_bglt BgL_auxz00_16780;

						{	/* Cfa/cinfo2.scm 57 */
							BgL_appz00_bglt BgL_new1584z00_9760;

							BgL_new1584z00_9760 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.scm 57 */
								long BgL_arg2169z00_9761;

								BgL_arg2169z00_9761 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1584z00_9760),
									BgL_arg2169z00_9761);
							}
							{	/* Cfa/cinfo2.scm 57 */
								BgL_objectz00_bglt BgL_tmpz00_16785;

								BgL_tmpz00_16785 = ((BgL_objectz00_bglt) BgL_new1584z00_9760);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_16785, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1584z00_9760);
							BgL_auxz00_16780 = BgL_new1584z00_9760;
						}
						BgL_tmp1585z00_9758 = ((BgL_appz00_bglt) BgL_auxz00_16780);
					}
					BgL_wide1586z00_9759 =
						((BgL_procedurezd2refzd2appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
									BgL_procedurezd2refzd2appz00_bgl))));
					{	/* Cfa/cinfo2.scm 57 */
						obj_t BgL_auxz00_16793;
						BgL_objectz00_bglt BgL_tmpz00_16791;

						BgL_auxz00_16793 = ((obj_t) BgL_wide1586z00_9759);
						BgL_tmpz00_16791 = ((BgL_objectz00_bglt) BgL_tmp1585z00_9758);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_16791, BgL_auxz00_16793);
					}
					((BgL_objectz00_bglt) BgL_tmp1585z00_9758);
					{	/* Cfa/cinfo2.scm 57 */
						long BgL_arg2168z00_9762;

						BgL_arg2168z00_9762 =
							BGL_CLASS_NUM(BGl_procedurezd2refzd2appz00zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1585z00_9758), BgL_arg2168z00_9762);
					}
					BgL_new1587z00_9757 = ((BgL_appz00_bglt) BgL_tmp1585z00_9758);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1587z00_9757)))->BgL_locz00) =
					((obj_t) BgL_loc1227z00_8678), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1587z00_9757)))->BgL_typez00) =
					((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1228z00_8679)),
					BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1587z00_9757)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1229zd2_8680), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1587z00_9757)))->BgL_keyz00) =
					((obj_t) BgL_key1230z00_8681), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1587z00_9757)))->
						BgL_funz00) =
					((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1231z00_8682)), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1587z00_9757)))->
						BgL_argsz00) = ((obj_t) BgL_args1232z00_8683), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1587z00_9757)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1233z00_8684), BUNSPEC);
				{
					BgL_procedurezd2refzd2appz00_bglt BgL_auxz00_16817;

					{
						obj_t BgL_auxz00_16818;

						{	/* Cfa/cinfo2.scm 57 */
							BgL_objectz00_bglt BgL_tmpz00_16819;

							BgL_tmpz00_16819 = ((BgL_objectz00_bglt) BgL_new1587z00_9757);
							BgL_auxz00_16818 = BGL_OBJECT_WIDENING(BgL_tmpz00_16819);
						}
						BgL_auxz00_16817 =
							((BgL_procedurezd2refzd2appz00_bglt) BgL_auxz00_16818);
					}
					((((BgL_procedurezd2refzd2appz00_bglt) COBJECT(BgL_auxz00_16817))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) ((BgL_approxz00_bglt)
								BgL_approx1234z00_8685)), BUNSPEC);
				}
				return BgL_new1587z00_9757;
			}
		}

	}



/* &lambda2181 */
	obj_t BGl_z62lambda2181z62zzcfa_info2z00(obj_t BgL_envz00_8686,
		obj_t BgL_oz00_8687, obj_t BgL_vz00_8688)
	{
		{	/* Cfa/cinfo2.scm 57 */
			{
				BgL_procedurezd2refzd2appz00_bglt BgL_auxz00_16825;

				{
					obj_t BgL_auxz00_16826;

					{	/* Cfa/cinfo2.scm 57 */
						BgL_objectz00_bglt BgL_tmpz00_16827;

						BgL_tmpz00_16827 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8687));
						BgL_auxz00_16826 = BGL_OBJECT_WIDENING(BgL_tmpz00_16827);
					}
					BgL_auxz00_16825 =
						((BgL_procedurezd2refzd2appz00_bglt) BgL_auxz00_16826);
				}
				return
					((((BgL_procedurezd2refzd2appz00_bglt) COBJECT(BgL_auxz00_16825))->
						BgL_approxz00) =
					((BgL_approxz00_bglt) ((BgL_approxz00_bglt) BgL_vz00_8688)), BUNSPEC);
			}
		}

	}



/* &lambda2180 */
	BgL_approxz00_bglt BGl_z62lambda2180z62zzcfa_info2z00(obj_t BgL_envz00_8689,
		obj_t BgL_oz00_8690)
	{
		{	/* Cfa/cinfo2.scm 57 */
			{
				BgL_procedurezd2refzd2appz00_bglt BgL_auxz00_16834;

				{
					obj_t BgL_auxz00_16835;

					{	/* Cfa/cinfo2.scm 57 */
						BgL_objectz00_bglt BgL_tmpz00_16836;

						BgL_tmpz00_16836 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8690));
						BgL_auxz00_16835 = BGL_OBJECT_WIDENING(BgL_tmpz00_16836);
					}
					BgL_auxz00_16834 =
						((BgL_procedurezd2refzd2appz00_bglt) BgL_auxz00_16835);
				}
				return
					(((BgL_procedurezd2refzd2appz00_bglt) COBJECT(BgL_auxz00_16834))->
					BgL_approxz00);
			}
		}

	}



/* &lambda2106 */
	BgL_appz00_bglt BGl_z62lambda2106z62zzcfa_info2z00(obj_t BgL_envz00_8691,
		obj_t BgL_o1225z00_8692)
	{
		{	/* Cfa/cinfo2.scm 40 */
			{	/* Cfa/cinfo2.scm 40 */
				long BgL_arg2107z00_9767;

				{	/* Cfa/cinfo2.scm 40 */
					obj_t BgL_arg2108z00_9768;

					{	/* Cfa/cinfo2.scm 40 */
						obj_t BgL_arg2109z00_9769;

						{	/* Cfa/cinfo2.scm 40 */
							long BgL_arg1808z00_9770;

							{	/* Cfa/cinfo2.scm 40 */
								long BgL_arg1809z00_9771;

								BgL_arg1809z00_9771 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1225z00_8692)));
								BgL_arg1808z00_9770 = (BgL_arg1809z00_9771 - OBJECT_TYPE);
							}
							BgL_arg2109z00_9769 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9770);
						}
						BgL_arg2108z00_9768 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2109z00_9769);
					}
					{	/* Cfa/cinfo2.scm 40 */
						obj_t BgL_tmpz00_16848;

						BgL_tmpz00_16848 = ((obj_t) BgL_arg2108z00_9768);
						BgL_arg2107z00_9767 = BGL_CLASS_NUM(BgL_tmpz00_16848);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1225z00_8692)), BgL_arg2107z00_9767);
			}
			{	/* Cfa/cinfo2.scm 40 */
				BgL_objectz00_bglt BgL_tmpz00_16854;

				BgL_tmpz00_16854 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1225z00_8692));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_16854, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1225z00_8692));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1225z00_8692));
		}

	}



/* &<@anonymous:2105> */
	obj_t BGl_z62zc3z04anonymousza32105ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8693,
		obj_t BgL_new1224z00_8694)
	{
		{	/* Cfa/cinfo2.scm 40 */
			{
				BgL_appz00_bglt BgL_auxz00_16862;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1224z00_8694))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_16866;

					{	/* Cfa/cinfo2.scm 40 */
						obj_t BgL_classz00_9773;

						BgL_classz00_9773 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 40 */
							obj_t BgL__ortest_1117z00_9774;

							BgL__ortest_1117z00_9774 = BGL_CLASS_NIL(BgL_classz00_9773);
							if (CBOOL(BgL__ortest_1117z00_9774))
								{	/* Cfa/cinfo2.scm 40 */
									BgL_auxz00_16866 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9774);
								}
							else
								{	/* Cfa/cinfo2.scm 40 */
									BgL_auxz00_16866 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9773));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1224z00_8694))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_16866), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1224z00_8694))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1224z00_8694))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_16882;

					{	/* Cfa/cinfo2.scm 40 */
						obj_t BgL_classz00_9775;

						BgL_classz00_9775 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 40 */
							obj_t BgL__ortest_1117z00_9776;

							BgL__ortest_1117z00_9776 = BGL_CLASS_NIL(BgL_classz00_9775);
							if (CBOOL(BgL__ortest_1117z00_9776))
								{	/* Cfa/cinfo2.scm 40 */
									BgL_auxz00_16882 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9776);
								}
							else
								{	/* Cfa/cinfo2.scm 40 */
									BgL_auxz00_16882 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9775));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1224z00_8694))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_16882), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1224z00_8694))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1224z00_8694))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_approxz00_bglt BgL_auxz00_16905;
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_16898;

					{	/* Cfa/cinfo2.scm 40 */
						obj_t BgL_classz00_9777;

						BgL_classz00_9777 = BGl_approxz00zzcfa_infoz00;
						{	/* Cfa/cinfo2.scm 40 */
							obj_t BgL__ortest_1117z00_9778;

							BgL__ortest_1117z00_9778 = BGL_CLASS_NIL(BgL_classz00_9777);
							if (CBOOL(BgL__ortest_1117z00_9778))
								{	/* Cfa/cinfo2.scm 40 */
									BgL_auxz00_16905 =
										((BgL_approxz00_bglt) BgL__ortest_1117z00_9778);
								}
							else
								{	/* Cfa/cinfo2.scm 40 */
									BgL_auxz00_16905 =
										((BgL_approxz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9777));
								}
						}
					}
					{
						obj_t BgL_auxz00_16899;

						{	/* Cfa/cinfo2.scm 40 */
							BgL_objectz00_bglt BgL_tmpz00_16900;

							BgL_tmpz00_16900 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1224z00_8694));
							BgL_auxz00_16899 = BGL_OBJECT_WIDENING(BgL_tmpz00_16900);
						}
						BgL_auxz00_16898 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_16899);
					}
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_16898))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_auxz00_16905), BUNSPEC);
				}
				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_16913;

					{
						obj_t BgL_auxz00_16914;

						{	/* Cfa/cinfo2.scm 40 */
							BgL_objectz00_bglt BgL_tmpz00_16915;

							BgL_tmpz00_16915 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1224z00_8694));
							BgL_auxz00_16914 = BGL_OBJECT_WIDENING(BgL_tmpz00_16915);
						}
						BgL_auxz00_16913 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_16914);
					}
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_16913))->
							BgL_valueszd2approxzd2) = ((obj_t) CNST_TABLE_REF(44L)), BUNSPEC);
				}
				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_16922;

					{
						obj_t BgL_auxz00_16923;

						{	/* Cfa/cinfo2.scm 40 */
							BgL_objectz00_bglt BgL_tmpz00_16924;

							BgL_tmpz00_16924 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1224z00_8694));
							BgL_auxz00_16923 = BGL_OBJECT_WIDENING(BgL_tmpz00_16924);
						}
						BgL_auxz00_16922 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_16923);
					}
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_16922))->
							BgL_lostzd2stampzd2) = ((long) 0L), BUNSPEC);
				}
				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_16930;

					{
						obj_t BgL_auxz00_16931;

						{	/* Cfa/cinfo2.scm 40 */
							BgL_objectz00_bglt BgL_tmpz00_16932;

							BgL_tmpz00_16932 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1224z00_8694));
							BgL_auxz00_16931 = BGL_OBJECT_WIDENING(BgL_tmpz00_16932);
						}
						BgL_auxz00_16930 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_16931);
					}
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_16930))->
							BgL_xzd2tzf3z21) = ((bool_t) ((bool_t) 0)), BUNSPEC);
				}
				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_16938;

					{
						obj_t BgL_auxz00_16939;

						{	/* Cfa/cinfo2.scm 40 */
							BgL_objectz00_bglt BgL_tmpz00_16940;

							BgL_tmpz00_16940 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1224z00_8694));
							BgL_auxz00_16939 = BGL_OBJECT_WIDENING(BgL_tmpz00_16940);
						}
						BgL_auxz00_16938 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_16939);
					}
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_16938))->
							BgL_xz00) = ((bool_t) ((bool_t) 0)), BUNSPEC);
				}
				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_16946;

					{
						obj_t BgL_auxz00_16947;

						{	/* Cfa/cinfo2.scm 40 */
							BgL_objectz00_bglt BgL_tmpz00_16948;

							BgL_tmpz00_16948 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1224z00_8694));
							BgL_auxz00_16947 = BGL_OBJECT_WIDENING(BgL_tmpz00_16948);
						}
						BgL_auxz00_16946 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_16947);
					}
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_16946))->
							BgL_tz00) = ((bool_t) ((bool_t) 0)), BUNSPEC);
				}
				{
					BgL_variablez00_bglt BgL_auxz00_16961;
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_16954;

					{	/* Cfa/cinfo2.scm 40 */
						obj_t BgL_classz00_9779;

						BgL_classz00_9779 = BGl_variablez00zzast_varz00;
						{	/* Cfa/cinfo2.scm 40 */
							obj_t BgL__ortest_1117z00_9780;

							BgL__ortest_1117z00_9780 = BGL_CLASS_NIL(BgL_classz00_9779);
							if (CBOOL(BgL__ortest_1117z00_9780))
								{	/* Cfa/cinfo2.scm 40 */
									BgL_auxz00_16961 =
										((BgL_variablez00_bglt) BgL__ortest_1117z00_9780);
								}
							else
								{	/* Cfa/cinfo2.scm 40 */
									BgL_auxz00_16961 =
										((BgL_variablez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9779));
								}
						}
					}
					{
						obj_t BgL_auxz00_16955;

						{	/* Cfa/cinfo2.scm 40 */
							BgL_objectz00_bglt BgL_tmpz00_16956;

							BgL_tmpz00_16956 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1224z00_8694));
							BgL_auxz00_16955 = BGL_OBJECT_WIDENING(BgL_tmpz00_16956);
						}
						BgL_auxz00_16954 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_16955);
					}
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_16954))->
							BgL_ownerz00) =
						((BgL_variablez00_bglt) BgL_auxz00_16961), BUNSPEC);
				}
				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_16969;

					{
						obj_t BgL_auxz00_16970;

						{	/* Cfa/cinfo2.scm 40 */
							BgL_objectz00_bglt BgL_tmpz00_16971;

							BgL_tmpz00_16971 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1224z00_8694));
							BgL_auxz00_16970 = BGL_OBJECT_WIDENING(BgL_tmpz00_16971);
						}
						BgL_auxz00_16969 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_16970);
					}
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_16969))->
							BgL_stackzd2stampzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				}
				BgL_auxz00_16862 = ((BgL_appz00_bglt) BgL_new1224z00_8694);
				return ((obj_t) BgL_auxz00_16862);
			}
		}

	}



/* &lambda2103 */
	BgL_appz00_bglt BGl_z62lambda2103z62zzcfa_info2z00(obj_t BgL_envz00_8695,
		obj_t BgL_o1221z00_8696)
	{
		{	/* Cfa/cinfo2.scm 40 */
			{	/* Cfa/cinfo2.scm 40 */
				BgL_makezd2procedurezd2appz00_bglt BgL_wide1223z00_9782;

				BgL_wide1223z00_9782 =
					((BgL_makezd2procedurezd2appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
								BgL_makezd2procedurezd2appz00_bgl))));
				{	/* Cfa/cinfo2.scm 40 */
					obj_t BgL_auxz00_16984;
					BgL_objectz00_bglt BgL_tmpz00_16980;

					BgL_auxz00_16984 = ((obj_t) BgL_wide1223z00_9782);
					BgL_tmpz00_16980 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1221z00_8696)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_16980, BgL_auxz00_16984);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1221z00_8696)));
				{	/* Cfa/cinfo2.scm 40 */
					long BgL_arg2104z00_9783;

					BgL_arg2104z00_9783 =
						BGL_CLASS_NUM(BGl_makezd2procedurezd2appz00zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1221z00_8696))), BgL_arg2104z00_9783);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1221z00_8696)));
			}
		}

	}



/* &lambda2100 */
	BgL_appz00_bglt BGl_z62lambda2100z62zzcfa_info2z00(obj_t BgL_envz00_8697,
		obj_t BgL_loc1205z00_8698, obj_t BgL_type1206z00_8699,
		obj_t BgL_sidezd2effect1207zd2_8700, obj_t BgL_key1208z00_8701,
		obj_t BgL_fun1210z00_8702, obj_t BgL_args1211z00_8703,
		obj_t BgL_stackable1212z00_8704, obj_t BgL_approx1213z00_8705,
		obj_t BgL_valueszd2approx1214zd2_8706, obj_t BgL_lostzd2stamp1215zd2_8707,
		obj_t BgL_xzd2tzf31216z21_8708, obj_t BgL_x1217z00_8709,
		obj_t BgL_t1218z00_8710, obj_t BgL_owner1219z00_8711,
		obj_t BgL_stackzd2stamp1220zd2_8712)
	{
		{	/* Cfa/cinfo2.scm 40 */
			{	/* Cfa/cinfo2.scm 40 */
				long BgL_lostzd2stamp1215zd2_9788;
				bool_t BgL_xzd2tzf31216z21_9789;
				bool_t BgL_x1217z00_9790;
				bool_t BgL_t1218z00_9791;

				BgL_lostzd2stamp1215zd2_9788 =
					(long) CINT(BgL_lostzd2stamp1215zd2_8707);
				BgL_xzd2tzf31216z21_9789 = CBOOL(BgL_xzd2tzf31216z21_8708);
				BgL_x1217z00_9790 = CBOOL(BgL_x1217z00_8709);
				BgL_t1218z00_9791 = CBOOL(BgL_t1218z00_8710);
				{	/* Cfa/cinfo2.scm 40 */
					BgL_appz00_bglt BgL_new1582z00_9793;

					{	/* Cfa/cinfo2.scm 40 */
						BgL_appz00_bglt BgL_tmp1580z00_9794;
						BgL_makezd2procedurezd2appz00_bglt BgL_wide1581z00_9795;

						{
							BgL_appz00_bglt BgL_auxz00_17002;

							{	/* Cfa/cinfo2.scm 40 */
								BgL_appz00_bglt BgL_new1579z00_9796;

								BgL_new1579z00_9796 =
									((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
												BgL_appz00_bgl))));
								{	/* Cfa/cinfo2.scm 40 */
									long BgL_arg2102z00_9797;

									BgL_arg2102z00_9797 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
									BGL_OBJECT_CLASS_NUM_SET(
										((BgL_objectz00_bglt) BgL_new1579z00_9796),
										BgL_arg2102z00_9797);
								}
								{	/* Cfa/cinfo2.scm 40 */
									BgL_objectz00_bglt BgL_tmpz00_17007;

									BgL_tmpz00_17007 = ((BgL_objectz00_bglt) BgL_new1579z00_9796);
									BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17007, BFALSE);
								}
								((BgL_objectz00_bglt) BgL_new1579z00_9796);
								BgL_auxz00_17002 = BgL_new1579z00_9796;
							}
							BgL_tmp1580z00_9794 = ((BgL_appz00_bglt) BgL_auxz00_17002);
						}
						BgL_wide1581z00_9795 =
							((BgL_makezd2procedurezd2appz00_bglt)
							BOBJECT(GC_MALLOC(sizeof(struct
										BgL_makezd2procedurezd2appz00_bgl))));
						{	/* Cfa/cinfo2.scm 40 */
							obj_t BgL_auxz00_17015;
							BgL_objectz00_bglt BgL_tmpz00_17013;

							BgL_auxz00_17015 = ((obj_t) BgL_wide1581z00_9795);
							BgL_tmpz00_17013 = ((BgL_objectz00_bglt) BgL_tmp1580z00_9794);
							BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17013, BgL_auxz00_17015);
						}
						((BgL_objectz00_bglt) BgL_tmp1580z00_9794);
						{	/* Cfa/cinfo2.scm 40 */
							long BgL_arg2101z00_9798;

							BgL_arg2101z00_9798 =
								BGL_CLASS_NUM(BGl_makezd2procedurezd2appz00zzcfa_info2z00);
							BGL_OBJECT_CLASS_NUM_SET(
								((BgL_objectz00_bglt) BgL_tmp1580z00_9794),
								BgL_arg2101z00_9798);
						}
						BgL_new1582z00_9793 = ((BgL_appz00_bglt) BgL_tmp1580z00_9794);
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt) BgL_new1582z00_9793)))->BgL_locz00) =
						((obj_t) BgL_loc1205z00_8698), BUNSPEC);
					((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
										BgL_new1582z00_9793)))->BgL_typez00) =
						((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1206z00_8699)),
						BUNSPEC);
					((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
										BgL_new1582z00_9793)))->BgL_sidezd2effectzd2) =
						((obj_t) BgL_sidezd2effect1207zd2_8700), BUNSPEC);
					((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
										BgL_new1582z00_9793)))->BgL_keyz00) =
						((obj_t) BgL_key1208z00_8701), BUNSPEC);
					((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt)
										BgL_new1582z00_9793)))->BgL_funz00) =
						((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1210z00_8702)),
						BUNSPEC);
					((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt)
										BgL_new1582z00_9793)))->BgL_argsz00) =
						((obj_t) BgL_args1211z00_8703), BUNSPEC);
					((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt)
										BgL_new1582z00_9793)))->BgL_stackablez00) =
						((obj_t) BgL_stackable1212z00_8704), BUNSPEC);
					{
						BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17039;

						{
							obj_t BgL_auxz00_17040;

							{	/* Cfa/cinfo2.scm 40 */
								BgL_objectz00_bglt BgL_tmpz00_17041;

								BgL_tmpz00_17041 = ((BgL_objectz00_bglt) BgL_new1582z00_9793);
								BgL_auxz00_17040 = BGL_OBJECT_WIDENING(BgL_tmpz00_17041);
							}
							BgL_auxz00_17039 =
								((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17040);
						}
						((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17039))->
								BgL_approxz00) =
							((BgL_approxz00_bglt) ((BgL_approxz00_bglt)
									BgL_approx1213z00_8705)), BUNSPEC);
					}
					{
						BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17047;

						{
							obj_t BgL_auxz00_17048;

							{	/* Cfa/cinfo2.scm 40 */
								BgL_objectz00_bglt BgL_tmpz00_17049;

								BgL_tmpz00_17049 = ((BgL_objectz00_bglt) BgL_new1582z00_9793);
								BgL_auxz00_17048 = BGL_OBJECT_WIDENING(BgL_tmpz00_17049);
							}
							BgL_auxz00_17047 =
								((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17048);
						}
						((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17047))->
								BgL_valueszd2approxzd2) =
							((obj_t) ((obj_t) BgL_valueszd2approx1214zd2_8706)), BUNSPEC);
					}
					{
						BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17055;

						{
							obj_t BgL_auxz00_17056;

							{	/* Cfa/cinfo2.scm 40 */
								BgL_objectz00_bglt BgL_tmpz00_17057;

								BgL_tmpz00_17057 = ((BgL_objectz00_bglt) BgL_new1582z00_9793);
								BgL_auxz00_17056 = BGL_OBJECT_WIDENING(BgL_tmpz00_17057);
							}
							BgL_auxz00_17055 =
								((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17056);
						}
						((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17055))->
								BgL_lostzd2stampzd2) =
							((long) BgL_lostzd2stamp1215zd2_9788), BUNSPEC);
					}
					{
						BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17062;

						{
							obj_t BgL_auxz00_17063;

							{	/* Cfa/cinfo2.scm 40 */
								BgL_objectz00_bglt BgL_tmpz00_17064;

								BgL_tmpz00_17064 = ((BgL_objectz00_bglt) BgL_new1582z00_9793);
								BgL_auxz00_17063 = BGL_OBJECT_WIDENING(BgL_tmpz00_17064);
							}
							BgL_auxz00_17062 =
								((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17063);
						}
						((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17062))->
								BgL_xzd2tzf3z21) =
							((bool_t) BgL_xzd2tzf31216z21_9789), BUNSPEC);
					}
					{
						BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17069;

						{
							obj_t BgL_auxz00_17070;

							{	/* Cfa/cinfo2.scm 40 */
								BgL_objectz00_bglt BgL_tmpz00_17071;

								BgL_tmpz00_17071 = ((BgL_objectz00_bglt) BgL_new1582z00_9793);
								BgL_auxz00_17070 = BGL_OBJECT_WIDENING(BgL_tmpz00_17071);
							}
							BgL_auxz00_17069 =
								((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17070);
						}
						((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17069))->
								BgL_xz00) = ((bool_t) BgL_x1217z00_9790), BUNSPEC);
					}
					{
						BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17076;

						{
							obj_t BgL_auxz00_17077;

							{	/* Cfa/cinfo2.scm 40 */
								BgL_objectz00_bglt BgL_tmpz00_17078;

								BgL_tmpz00_17078 = ((BgL_objectz00_bglt) BgL_new1582z00_9793);
								BgL_auxz00_17077 = BGL_OBJECT_WIDENING(BgL_tmpz00_17078);
							}
							BgL_auxz00_17076 =
								((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17077);
						}
						((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17076))->
								BgL_tz00) = ((bool_t) BgL_t1218z00_9791), BUNSPEC);
					}
					{
						BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17083;

						{
							obj_t BgL_auxz00_17084;

							{	/* Cfa/cinfo2.scm 40 */
								BgL_objectz00_bglt BgL_tmpz00_17085;

								BgL_tmpz00_17085 = ((BgL_objectz00_bglt) BgL_new1582z00_9793);
								BgL_auxz00_17084 = BGL_OBJECT_WIDENING(BgL_tmpz00_17085);
							}
							BgL_auxz00_17083 =
								((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17084);
						}
						((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17083))->
								BgL_ownerz00) =
							((BgL_variablez00_bglt) ((BgL_variablez00_bglt)
									BgL_owner1219z00_8711)), BUNSPEC);
					}
					{
						BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17091;

						{
							obj_t BgL_auxz00_17092;

							{	/* Cfa/cinfo2.scm 40 */
								BgL_objectz00_bglt BgL_tmpz00_17093;

								BgL_tmpz00_17093 = ((BgL_objectz00_bglt) BgL_new1582z00_9793);
								BgL_auxz00_17092 = BGL_OBJECT_WIDENING(BgL_tmpz00_17093);
							}
							BgL_auxz00_17091 =
								((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17092);
						}
						((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17091))->
								BgL_stackzd2stampzd2) =
							((obj_t) BgL_stackzd2stamp1220zd2_8712), BUNSPEC);
					}
					return BgL_new1582z00_9793;
				}
			}
		}

	}



/* &<@anonymous:2160> */
	obj_t BGl_z62zc3z04anonymousza32160ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8713)
	{
		{	/* Cfa/cinfo2.scm 40 */
			return BNIL;
		}

	}



/* &lambda2159 */
	obj_t BGl_z62lambda2159z62zzcfa_info2z00(obj_t BgL_envz00_8714,
		obj_t BgL_oz00_8715, obj_t BgL_vz00_8716)
	{
		{	/* Cfa/cinfo2.scm 40 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17098;

				{
					obj_t BgL_auxz00_17099;

					{	/* Cfa/cinfo2.scm 40 */
						BgL_objectz00_bglt BgL_tmpz00_17100;

						BgL_tmpz00_17100 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8715));
						BgL_auxz00_17099 = BGL_OBJECT_WIDENING(BgL_tmpz00_17100);
					}
					BgL_auxz00_17098 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17099);
				}
				return
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17098))->
						BgL_stackzd2stampzd2) = ((obj_t) BgL_vz00_8716), BUNSPEC);
			}
		}

	}



/* &lambda2158 */
	obj_t BGl_z62lambda2158z62zzcfa_info2z00(obj_t BgL_envz00_8717,
		obj_t BgL_oz00_8718)
	{
		{	/* Cfa/cinfo2.scm 40 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17106;

				{
					obj_t BgL_auxz00_17107;

					{	/* Cfa/cinfo2.scm 40 */
						BgL_objectz00_bglt BgL_tmpz00_17108;

						BgL_tmpz00_17108 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8718));
						BgL_auxz00_17107 = BGL_OBJECT_WIDENING(BgL_tmpz00_17108);
					}
					BgL_auxz00_17106 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17107);
				}
				return
					(((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17106))->
					BgL_stackzd2stampzd2);
			}
		}

	}



/* &lambda2153 */
	obj_t BGl_z62lambda2153z62zzcfa_info2z00(obj_t BgL_envz00_8719,
		obj_t BgL_oz00_8720, obj_t BgL_vz00_8721)
	{
		{	/* Cfa/cinfo2.scm 40 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17114;

				{
					obj_t BgL_auxz00_17115;

					{	/* Cfa/cinfo2.scm 40 */
						BgL_objectz00_bglt BgL_tmpz00_17116;

						BgL_tmpz00_17116 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8720));
						BgL_auxz00_17115 = BGL_OBJECT_WIDENING(BgL_tmpz00_17116);
					}
					BgL_auxz00_17114 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17115);
				}
				return
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17114))->
						BgL_ownerz00) =
					((BgL_variablez00_bglt) ((BgL_variablez00_bglt) BgL_vz00_8721)),
					BUNSPEC);
			}
		}

	}



/* &lambda2152 */
	BgL_variablez00_bglt BGl_z62lambda2152z62zzcfa_info2z00(obj_t BgL_envz00_8722,
		obj_t BgL_oz00_8723)
	{
		{	/* Cfa/cinfo2.scm 40 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17123;

				{
					obj_t BgL_auxz00_17124;

					{	/* Cfa/cinfo2.scm 40 */
						BgL_objectz00_bglt BgL_tmpz00_17125;

						BgL_tmpz00_17125 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8723));
						BgL_auxz00_17124 = BGL_OBJECT_WIDENING(BgL_tmpz00_17125);
					}
					BgL_auxz00_17123 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17124);
				}
				return
					(((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17123))->
					BgL_ownerz00);
			}
		}

	}



/* &<@anonymous:2148> */
	obj_t BGl_z62zc3z04anonymousza32148ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8724)
	{
		{	/* Cfa/cinfo2.scm 40 */
			return BBOOL(((bool_t) 0));
		}

	}



/* &lambda2147 */
	obj_t BGl_z62lambda2147z62zzcfa_info2z00(obj_t BgL_envz00_8725,
		obj_t BgL_oz00_8726, obj_t BgL_vz00_8727)
	{
		{	/* Cfa/cinfo2.scm 40 */
			{	/* Cfa/cinfo2.scm 40 */
				bool_t BgL_vz00_9805;

				BgL_vz00_9805 = CBOOL(BgL_vz00_8727);
				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17133;

					{
						obj_t BgL_auxz00_17134;

						{	/* Cfa/cinfo2.scm 40 */
							BgL_objectz00_bglt BgL_tmpz00_17135;

							BgL_tmpz00_17135 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8726));
							BgL_auxz00_17134 = BGL_OBJECT_WIDENING(BgL_tmpz00_17135);
						}
						BgL_auxz00_17133 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17134);
					}
					return
						((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17133))->
							BgL_tz00) = ((bool_t) BgL_vz00_9805), BUNSPEC);
				}
			}
		}

	}



/* &lambda2146 */
	obj_t BGl_z62lambda2146z62zzcfa_info2z00(obj_t BgL_envz00_8728,
		obj_t BgL_oz00_8729)
	{
		{	/* Cfa/cinfo2.scm 40 */
			{	/* Cfa/cinfo2.scm 40 */
				bool_t BgL_tmpz00_17141;

				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17142;

					{
						obj_t BgL_auxz00_17143;

						{	/* Cfa/cinfo2.scm 40 */
							BgL_objectz00_bglt BgL_tmpz00_17144;

							BgL_tmpz00_17144 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8729));
							BgL_auxz00_17143 = BGL_OBJECT_WIDENING(BgL_tmpz00_17144);
						}
						BgL_auxz00_17142 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17143);
					}
					BgL_tmpz00_17141 =
						(((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17142))->
						BgL_tz00);
				}
				return BBOOL(BgL_tmpz00_17141);
			}
		}

	}



/* &<@anonymous:2141> */
	obj_t BGl_z62zc3z04anonymousza32141ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8730)
	{
		{	/* Cfa/cinfo2.scm 40 */
			return BBOOL(((bool_t) 0));
		}

	}



/* &lambda2140 */
	obj_t BGl_z62lambda2140z62zzcfa_info2z00(obj_t BgL_envz00_8731,
		obj_t BgL_oz00_8732, obj_t BgL_vz00_8733)
	{
		{	/* Cfa/cinfo2.scm 40 */
			{	/* Cfa/cinfo2.scm 40 */
				bool_t BgL_vz00_9808;

				BgL_vz00_9808 = CBOOL(BgL_vz00_8733);
				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17153;

					{
						obj_t BgL_auxz00_17154;

						{	/* Cfa/cinfo2.scm 40 */
							BgL_objectz00_bglt BgL_tmpz00_17155;

							BgL_tmpz00_17155 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8732));
							BgL_auxz00_17154 = BGL_OBJECT_WIDENING(BgL_tmpz00_17155);
						}
						BgL_auxz00_17153 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17154);
					}
					return
						((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17153))->
							BgL_xz00) = ((bool_t) BgL_vz00_9808), BUNSPEC);
				}
			}
		}

	}



/* &lambda2139 */
	obj_t BGl_z62lambda2139z62zzcfa_info2z00(obj_t BgL_envz00_8734,
		obj_t BgL_oz00_8735)
	{
		{	/* Cfa/cinfo2.scm 40 */
			{	/* Cfa/cinfo2.scm 40 */
				bool_t BgL_tmpz00_17161;

				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17162;

					{
						obj_t BgL_auxz00_17163;

						{	/* Cfa/cinfo2.scm 40 */
							BgL_objectz00_bglt BgL_tmpz00_17164;

							BgL_tmpz00_17164 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8735));
							BgL_auxz00_17163 = BGL_OBJECT_WIDENING(BgL_tmpz00_17164);
						}
						BgL_auxz00_17162 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17163);
					}
					BgL_tmpz00_17161 =
						(((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17162))->
						BgL_xz00);
				}
				return BBOOL(BgL_tmpz00_17161);
			}
		}

	}



/* &<@anonymous:2134> */
	obj_t BGl_z62zc3z04anonymousza32134ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8736)
	{
		{	/* Cfa/cinfo2.scm 40 */
			return BBOOL(((bool_t) 1));
		}

	}



/* &lambda2133 */
	obj_t BGl_z62lambda2133z62zzcfa_info2z00(obj_t BgL_envz00_8737,
		obj_t BgL_oz00_8738, obj_t BgL_vz00_8739)
	{
		{	/* Cfa/cinfo2.scm 40 */
			{	/* Cfa/cinfo2.scm 40 */
				bool_t BgL_vz00_9811;

				BgL_vz00_9811 = CBOOL(BgL_vz00_8739);
				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17173;

					{
						obj_t BgL_auxz00_17174;

						{	/* Cfa/cinfo2.scm 40 */
							BgL_objectz00_bglt BgL_tmpz00_17175;

							BgL_tmpz00_17175 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8738));
							BgL_auxz00_17174 = BGL_OBJECT_WIDENING(BgL_tmpz00_17175);
						}
						BgL_auxz00_17173 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17174);
					}
					return
						((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17173))->
							BgL_xzd2tzf3z21) = ((bool_t) BgL_vz00_9811), BUNSPEC);
				}
			}
		}

	}



/* &lambda2132 */
	obj_t BGl_z62lambda2132z62zzcfa_info2z00(obj_t BgL_envz00_8740,
		obj_t BgL_oz00_8741)
	{
		{	/* Cfa/cinfo2.scm 40 */
			{	/* Cfa/cinfo2.scm 40 */
				bool_t BgL_tmpz00_17181;

				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17182;

					{
						obj_t BgL_auxz00_17183;

						{	/* Cfa/cinfo2.scm 40 */
							BgL_objectz00_bglt BgL_tmpz00_17184;

							BgL_tmpz00_17184 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8741));
							BgL_auxz00_17183 = BGL_OBJECT_WIDENING(BgL_tmpz00_17184);
						}
						BgL_auxz00_17182 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17183);
					}
					BgL_tmpz00_17181 =
						(((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17182))->
						BgL_xzd2tzf3z21);
				}
				return BBOOL(BgL_tmpz00_17181);
			}
		}

	}



/* &<@anonymous:2127> */
	obj_t BGl_z62zc3z04anonymousza32127ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8742)
	{
		{	/* Cfa/cinfo2.scm 40 */
			return BINT(-1L);
		}

	}



/* &lambda2126 */
	obj_t BGl_z62lambda2126z62zzcfa_info2z00(obj_t BgL_envz00_8743,
		obj_t BgL_oz00_8744, obj_t BgL_vz00_8745)
	{
		{	/* Cfa/cinfo2.scm 40 */
			{	/* Cfa/cinfo2.scm 40 */
				long BgL_vz00_9814;

				BgL_vz00_9814 = (long) CINT(BgL_vz00_8745);
				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17193;

					{
						obj_t BgL_auxz00_17194;

						{	/* Cfa/cinfo2.scm 40 */
							BgL_objectz00_bglt BgL_tmpz00_17195;

							BgL_tmpz00_17195 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8744));
							BgL_auxz00_17194 = BGL_OBJECT_WIDENING(BgL_tmpz00_17195);
						}
						BgL_auxz00_17193 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17194);
					}
					return
						((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17193))->
							BgL_lostzd2stampzd2) = ((long) BgL_vz00_9814), BUNSPEC);
		}}}

	}



/* &lambda2125 */
	obj_t BGl_z62lambda2125z62zzcfa_info2z00(obj_t BgL_envz00_8746,
		obj_t BgL_oz00_8747)
	{
		{	/* Cfa/cinfo2.scm 40 */
			{	/* Cfa/cinfo2.scm 40 */
				long BgL_tmpz00_17201;

				{
					BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17202;

					{
						obj_t BgL_auxz00_17203;

						{	/* Cfa/cinfo2.scm 40 */
							BgL_objectz00_bglt BgL_tmpz00_17204;

							BgL_tmpz00_17204 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8747));
							BgL_auxz00_17203 = BGL_OBJECT_WIDENING(BgL_tmpz00_17204);
						}
						BgL_auxz00_17202 =
							((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17203);
					}
					BgL_tmpz00_17201 =
						(((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17202))->
						BgL_lostzd2stampzd2);
				}
				return BINT(BgL_tmpz00_17201);
			}
		}

	}



/* &lambda2119 */
	obj_t BGl_z62lambda2119z62zzcfa_info2z00(obj_t BgL_envz00_8748,
		obj_t BgL_oz00_8749, obj_t BgL_vz00_8750)
	{
		{	/* Cfa/cinfo2.scm 40 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17211;

				{
					obj_t BgL_auxz00_17212;

					{	/* Cfa/cinfo2.scm 40 */
						BgL_objectz00_bglt BgL_tmpz00_17213;

						BgL_tmpz00_17213 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8749));
						BgL_auxz00_17212 = BGL_OBJECT_WIDENING(BgL_tmpz00_17213);
					}
					BgL_auxz00_17211 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17212);
				}
				return
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17211))->
						BgL_valueszd2approxzd2) =
					((obj_t) ((obj_t) BgL_vz00_8750)), BUNSPEC);
			}
		}

	}



/* &lambda2118 */
	obj_t BGl_z62lambda2118z62zzcfa_info2z00(obj_t BgL_envz00_8751,
		obj_t BgL_oz00_8752)
	{
		{	/* Cfa/cinfo2.scm 40 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17220;

				{
					obj_t BgL_auxz00_17221;

					{	/* Cfa/cinfo2.scm 40 */
						BgL_objectz00_bglt BgL_tmpz00_17222;

						BgL_tmpz00_17222 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8752));
						BgL_auxz00_17221 = BGL_OBJECT_WIDENING(BgL_tmpz00_17222);
					}
					BgL_auxz00_17220 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17221);
				}
				return
					(((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17220))->
					BgL_valueszd2approxzd2);
			}
		}

	}



/* &lambda2114 */
	obj_t BGl_z62lambda2114z62zzcfa_info2z00(obj_t BgL_envz00_8753,
		obj_t BgL_oz00_8754, obj_t BgL_vz00_8755)
	{
		{	/* Cfa/cinfo2.scm 40 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17228;

				{
					obj_t BgL_auxz00_17229;

					{	/* Cfa/cinfo2.scm 40 */
						BgL_objectz00_bglt BgL_tmpz00_17230;

						BgL_tmpz00_17230 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8754));
						BgL_auxz00_17229 = BGL_OBJECT_WIDENING(BgL_tmpz00_17230);
					}
					BgL_auxz00_17228 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17229);
				}
				return
					((((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17228))->
						BgL_approxz00) =
					((BgL_approxz00_bglt) ((BgL_approxz00_bglt) BgL_vz00_8755)), BUNSPEC);
			}
		}

	}



/* &lambda2113 */
	BgL_approxz00_bglt BGl_z62lambda2113z62zzcfa_info2z00(obj_t BgL_envz00_8756,
		obj_t BgL_oz00_8757)
	{
		{	/* Cfa/cinfo2.scm 40 */
			{
				BgL_makezd2procedurezd2appz00_bglt BgL_auxz00_17237;

				{
					obj_t BgL_auxz00_17238;

					{	/* Cfa/cinfo2.scm 40 */
						BgL_objectz00_bglt BgL_tmpz00_17239;

						BgL_tmpz00_17239 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8757));
						BgL_auxz00_17238 = BGL_OBJECT_WIDENING(BgL_tmpz00_17239);
					}
					BgL_auxz00_17237 =
						((BgL_makezd2procedurezd2appz00_bglt) BgL_auxz00_17238);
				}
				return
					(((BgL_makezd2procedurezd2appz00_bglt) COBJECT(BgL_auxz00_17237))->
					BgL_approxz00);
			}
		}

	}



/* &lambda2089 */
	BgL_appz00_bglt BGl_z62lambda2089z62zzcfa_info2z00(obj_t BgL_envz00_8758,
		obj_t BgL_o1203z00_8759)
	{
		{	/* Cfa/cinfo2.scm 38 */
			{	/* Cfa/cinfo2.scm 38 */
				long BgL_arg2090z00_9823;

				{	/* Cfa/cinfo2.scm 38 */
					obj_t BgL_arg2091z00_9824;

					{	/* Cfa/cinfo2.scm 38 */
						obj_t BgL_arg2093z00_9825;

						{	/* Cfa/cinfo2.scm 38 */
							long BgL_arg1808z00_9826;

							{	/* Cfa/cinfo2.scm 38 */
								long BgL_arg1809z00_9827;

								BgL_arg1809z00_9827 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1203z00_8759)));
								BgL_arg1808z00_9826 = (BgL_arg1809z00_9827 - OBJECT_TYPE);
							}
							BgL_arg2093z00_9825 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9826);
						}
						BgL_arg2091z00_9824 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2093z00_9825);
					}
					{	/* Cfa/cinfo2.scm 38 */
						obj_t BgL_tmpz00_17251;

						BgL_tmpz00_17251 = ((obj_t) BgL_arg2091z00_9824);
						BgL_arg2090z00_9823 = BGL_CLASS_NUM(BgL_tmpz00_17251);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1203z00_8759)), BgL_arg2090z00_9823);
			}
			{	/* Cfa/cinfo2.scm 38 */
				BgL_objectz00_bglt BgL_tmpz00_17257;

				BgL_tmpz00_17257 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1203z00_8759));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17257, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1203z00_8759));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1203z00_8759));
		}

	}



/* &<@anonymous:2088> */
	obj_t BGl_z62zc3z04anonymousza32088ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8760,
		obj_t BgL_new1202z00_8761)
	{
		{	/* Cfa/cinfo2.scm 38 */
			{
				BgL_appz00_bglt BgL_auxz00_17265;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1202z00_8761))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_17269;

					{	/* Cfa/cinfo2.scm 38 */
						obj_t BgL_classz00_9829;

						BgL_classz00_9829 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 38 */
							obj_t BgL__ortest_1117z00_9830;

							BgL__ortest_1117z00_9830 = BGL_CLASS_NIL(BgL_classz00_9829);
							if (CBOOL(BgL__ortest_1117z00_9830))
								{	/* Cfa/cinfo2.scm 38 */
									BgL_auxz00_17269 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9830);
								}
							else
								{	/* Cfa/cinfo2.scm 38 */
									BgL_auxz00_17269 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9829));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1202z00_8761))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_17269), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1202z00_8761))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1202z00_8761))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_17285;

					{	/* Cfa/cinfo2.scm 38 */
						obj_t BgL_classz00_9831;

						BgL_classz00_9831 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 38 */
							obj_t BgL__ortest_1117z00_9832;

							BgL__ortest_1117z00_9832 = BGL_CLASS_NIL(BgL_classz00_9831);
							if (CBOOL(BgL__ortest_1117z00_9832))
								{	/* Cfa/cinfo2.scm 38 */
									BgL_auxz00_17285 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9832);
								}
							else
								{	/* Cfa/cinfo2.scm 38 */
									BgL_auxz00_17285 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9831));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1202z00_8761))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_17285), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1202z00_8761))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1202z00_8761))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				BgL_auxz00_17265 = ((BgL_appz00_bglt) BgL_new1202z00_8761);
				return ((obj_t) BgL_auxz00_17265);
			}
		}

	}



/* &lambda2086 */
	BgL_appz00_bglt BGl_z62lambda2086z62zzcfa_info2z00(obj_t BgL_envz00_8762,
		obj_t BgL_o1197z00_8763)
	{
		{	/* Cfa/cinfo2.scm 38 */
			{	/* Cfa/cinfo2.scm 38 */
				BgL_prezd2procedurezd2setz12zd2appzc0_bglt BgL_wide1199z00_9834;

				BgL_wide1199z00_9834 =
					((BgL_prezd2procedurezd2setz12zd2appzc0_bglt)
					BOBJECT(GC_MALLOC(sizeof(struct
								BgL_prezd2procedurezd2setz12zd2appzc0_bgl))));
				{	/* Cfa/cinfo2.scm 38 */
					obj_t BgL_auxz00_17308;
					BgL_objectz00_bglt BgL_tmpz00_17304;

					BgL_auxz00_17308 = ((obj_t) BgL_wide1199z00_9834);
					BgL_tmpz00_17304 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1197z00_8763)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17304, BgL_auxz00_17308);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1197z00_8763)));
				{	/* Cfa/cinfo2.scm 38 */
					long BgL_arg2087z00_9835;

					BgL_arg2087z00_9835 =
						BGL_CLASS_NUM(BGl_prezd2procedurezd2setz12zd2appzc0zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1197z00_8763))), BgL_arg2087z00_9835);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1197z00_8763)));
			}
		}

	}



/* &lambda2082 */
	BgL_appz00_bglt BGl_z62lambda2082z62zzcfa_info2z00(obj_t BgL_envz00_8764,
		obj_t BgL_loc1190z00_8765, obj_t BgL_type1191z00_8766,
		obj_t BgL_sidezd2effect1192zd2_8767, obj_t BgL_key1193z00_8768,
		obj_t BgL_fun1194z00_8769, obj_t BgL_args1195z00_8770,
		obj_t BgL_stackable1196z00_8771)
	{
		{	/* Cfa/cinfo2.scm 38 */
			{	/* Cfa/cinfo2.scm 38 */
				BgL_appz00_bglt BgL_new1577z00_9838;

				{	/* Cfa/cinfo2.scm 38 */
					BgL_appz00_bglt BgL_tmp1575z00_9839;
					BgL_prezd2procedurezd2setz12zd2appzc0_bglt BgL_wide1576z00_9840;

					{
						BgL_appz00_bglt BgL_auxz00_17322;

						{	/* Cfa/cinfo2.scm 38 */
							BgL_appz00_bglt BgL_new1574z00_9841;

							BgL_new1574z00_9841 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.scm 38 */
								long BgL_arg2085z00_9842;

								BgL_arg2085z00_9842 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1574z00_9841),
									BgL_arg2085z00_9842);
							}
							{	/* Cfa/cinfo2.scm 38 */
								BgL_objectz00_bglt BgL_tmpz00_17327;

								BgL_tmpz00_17327 = ((BgL_objectz00_bglt) BgL_new1574z00_9841);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17327, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1574z00_9841);
							BgL_auxz00_17322 = BgL_new1574z00_9841;
						}
						BgL_tmp1575z00_9839 = ((BgL_appz00_bglt) BgL_auxz00_17322);
					}
					BgL_wide1576z00_9840 =
						((BgL_prezd2procedurezd2setz12zd2appzc0_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2procedurezd2setz12zd2appzc0_bgl))));
					{	/* Cfa/cinfo2.scm 38 */
						obj_t BgL_auxz00_17335;
						BgL_objectz00_bglt BgL_tmpz00_17333;

						BgL_auxz00_17335 = ((obj_t) BgL_wide1576z00_9840);
						BgL_tmpz00_17333 = ((BgL_objectz00_bglt) BgL_tmp1575z00_9839);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17333, BgL_auxz00_17335);
					}
					((BgL_objectz00_bglt) BgL_tmp1575z00_9839);
					{	/* Cfa/cinfo2.scm 38 */
						long BgL_arg2083z00_9843;

						BgL_arg2083z00_9843 =
							BGL_CLASS_NUM
							(BGl_prezd2procedurezd2setz12zd2appzc0zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(((BgL_objectz00_bglt) BgL_tmp1575z00_9839),
							BgL_arg2083z00_9843);
					}
					BgL_new1577z00_9838 = ((BgL_appz00_bglt) BgL_tmp1575z00_9839);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1577z00_9838)))->BgL_locz00) =
					((obj_t) BgL_loc1190z00_8765), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1577z00_9838)))->BgL_typez00) =
					((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1191z00_8766)),
					BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1577z00_9838)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1192zd2_8767), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1577z00_9838)))->BgL_keyz00) =
					((obj_t) BgL_key1193z00_8768), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1577z00_9838)))->
						BgL_funz00) =
					((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1194z00_8769)), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1577z00_9838)))->
						BgL_argsz00) = ((obj_t) BgL_args1195z00_8770), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1577z00_9838)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1196z00_8771), BUNSPEC);
				return BgL_new1577z00_9838;
			}
		}

	}



/* &lambda2071 */
	BgL_appz00_bglt BGl_z62lambda2071z62zzcfa_info2z00(obj_t BgL_envz00_8772,
		obj_t BgL_o1188z00_8773)
	{
		{	/* Cfa/cinfo2.scm 37 */
			{	/* Cfa/cinfo2.scm 37 */
				long BgL_arg2072z00_9845;

				{	/* Cfa/cinfo2.scm 37 */
					obj_t BgL_arg2073z00_9846;

					{	/* Cfa/cinfo2.scm 37 */
						obj_t BgL_arg2074z00_9847;

						{	/* Cfa/cinfo2.scm 37 */
							long BgL_arg1808z00_9848;

							{	/* Cfa/cinfo2.scm 37 */
								long BgL_arg1809z00_9849;

								BgL_arg1809z00_9849 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1188z00_8773)));
								BgL_arg1808z00_9848 = (BgL_arg1809z00_9849 - OBJECT_TYPE);
							}
							BgL_arg2074z00_9847 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9848);
						}
						BgL_arg2073z00_9846 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2074z00_9847);
					}
					{	/* Cfa/cinfo2.scm 37 */
						obj_t BgL_tmpz00_17365;

						BgL_tmpz00_17365 = ((obj_t) BgL_arg2073z00_9846);
						BgL_arg2072z00_9845 = BGL_CLASS_NUM(BgL_tmpz00_17365);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1188z00_8773)), BgL_arg2072z00_9845);
			}
			{	/* Cfa/cinfo2.scm 37 */
				BgL_objectz00_bglt BgL_tmpz00_17371;

				BgL_tmpz00_17371 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1188z00_8773));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17371, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1188z00_8773));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1188z00_8773));
		}

	}



/* &<@anonymous:2070> */
	obj_t BGl_z62zc3z04anonymousza32070ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8774,
		obj_t BgL_new1187z00_8775)
	{
		{	/* Cfa/cinfo2.scm 37 */
			{
				BgL_appz00_bglt BgL_auxz00_17379;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1187z00_8775))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_17383;

					{	/* Cfa/cinfo2.scm 37 */
						obj_t BgL_classz00_9851;

						BgL_classz00_9851 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 37 */
							obj_t BgL__ortest_1117z00_9852;

							BgL__ortest_1117z00_9852 = BGL_CLASS_NIL(BgL_classz00_9851);
							if (CBOOL(BgL__ortest_1117z00_9852))
								{	/* Cfa/cinfo2.scm 37 */
									BgL_auxz00_17383 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9852);
								}
							else
								{	/* Cfa/cinfo2.scm 37 */
									BgL_auxz00_17383 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9851));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1187z00_8775))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_17383), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1187z00_8775))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1187z00_8775))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_17399;

					{	/* Cfa/cinfo2.scm 37 */
						obj_t BgL_classz00_9853;

						BgL_classz00_9853 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 37 */
							obj_t BgL__ortest_1117z00_9854;

							BgL__ortest_1117z00_9854 = BGL_CLASS_NIL(BgL_classz00_9853);
							if (CBOOL(BgL__ortest_1117z00_9854))
								{	/* Cfa/cinfo2.scm 37 */
									BgL_auxz00_17399 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9854);
								}
							else
								{	/* Cfa/cinfo2.scm 37 */
									BgL_auxz00_17399 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9853));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1187z00_8775))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_17399), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1187z00_8775))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1187z00_8775))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				BgL_auxz00_17379 = ((BgL_appz00_bglt) BgL_new1187z00_8775);
				return ((obj_t) BgL_auxz00_17379);
			}
		}

	}



/* &lambda2068 */
	BgL_appz00_bglt BGl_z62lambda2068z62zzcfa_info2z00(obj_t BgL_envz00_8776,
		obj_t BgL_o1184z00_8777)
	{
		{	/* Cfa/cinfo2.scm 37 */
			{	/* Cfa/cinfo2.scm 37 */
				BgL_prezd2procedurezd2refzd2appzd2_bglt BgL_wide1186z00_9856;

				BgL_wide1186z00_9856 =
					((BgL_prezd2procedurezd2refzd2appzd2_bglt)
					BOBJECT(GC_MALLOC(sizeof(struct
								BgL_prezd2procedurezd2refzd2appzd2_bgl))));
				{	/* Cfa/cinfo2.scm 37 */
					obj_t BgL_auxz00_17422;
					BgL_objectz00_bglt BgL_tmpz00_17418;

					BgL_auxz00_17422 = ((obj_t) BgL_wide1186z00_9856);
					BgL_tmpz00_17418 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1184z00_8777)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17418, BgL_auxz00_17422);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1184z00_8777)));
				{	/* Cfa/cinfo2.scm 37 */
					long BgL_arg2069z00_9857;

					BgL_arg2069z00_9857 =
						BGL_CLASS_NUM(BGl_prezd2procedurezd2refzd2appzd2zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1184z00_8777))), BgL_arg2069z00_9857);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1184z00_8777)));
			}
		}

	}



/* &lambda2064 */
	BgL_appz00_bglt BGl_z62lambda2064z62zzcfa_info2z00(obj_t BgL_envz00_8778,
		obj_t BgL_loc1177z00_8779, obj_t BgL_type1178z00_8780,
		obj_t BgL_sidezd2effect1179zd2_8781, obj_t BgL_key1180z00_8782,
		obj_t BgL_fun1181z00_8783, obj_t BgL_args1182z00_8784,
		obj_t BgL_stackable1183z00_8785)
	{
		{	/* Cfa/cinfo2.scm 37 */
			{	/* Cfa/cinfo2.scm 37 */
				BgL_appz00_bglt BgL_new1572z00_9860;

				{	/* Cfa/cinfo2.scm 37 */
					BgL_appz00_bglt BgL_tmp1570z00_9861;
					BgL_prezd2procedurezd2refzd2appzd2_bglt BgL_wide1571z00_9862;

					{
						BgL_appz00_bglt BgL_auxz00_17436;

						{	/* Cfa/cinfo2.scm 37 */
							BgL_appz00_bglt BgL_new1569z00_9863;

							BgL_new1569z00_9863 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.scm 37 */
								long BgL_arg2067z00_9864;

								BgL_arg2067z00_9864 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1569z00_9863),
									BgL_arg2067z00_9864);
							}
							{	/* Cfa/cinfo2.scm 37 */
								BgL_objectz00_bglt BgL_tmpz00_17441;

								BgL_tmpz00_17441 = ((BgL_objectz00_bglt) BgL_new1569z00_9863);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17441, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1569z00_9863);
							BgL_auxz00_17436 = BgL_new1569z00_9863;
						}
						BgL_tmp1570z00_9861 = ((BgL_appz00_bglt) BgL_auxz00_17436);
					}
					BgL_wide1571z00_9862 =
						((BgL_prezd2procedurezd2refzd2appzd2_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2procedurezd2refzd2appzd2_bgl))));
					{	/* Cfa/cinfo2.scm 37 */
						obj_t BgL_auxz00_17449;
						BgL_objectz00_bglt BgL_tmpz00_17447;

						BgL_auxz00_17449 = ((obj_t) BgL_wide1571z00_9862);
						BgL_tmpz00_17447 = ((BgL_objectz00_bglt) BgL_tmp1570z00_9861);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17447, BgL_auxz00_17449);
					}
					((BgL_objectz00_bglt) BgL_tmp1570z00_9861);
					{	/* Cfa/cinfo2.scm 37 */
						long BgL_arg2066z00_9865;

						BgL_arg2066z00_9865 =
							BGL_CLASS_NUM(BGl_prezd2procedurezd2refzd2appzd2zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1570z00_9861), BgL_arg2066z00_9865);
					}
					BgL_new1572z00_9860 = ((BgL_appz00_bglt) BgL_tmp1570z00_9861);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1572z00_9860)))->BgL_locz00) =
					((obj_t) BgL_loc1177z00_8779), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1572z00_9860)))->BgL_typez00) =
					((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1178z00_8780)),
					BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1572z00_9860)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1179zd2_8781), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1572z00_9860)))->BgL_keyz00) =
					((obj_t) BgL_key1180z00_8782), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1572z00_9860)))->
						BgL_funz00) =
					((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1181z00_8783)), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1572z00_9860)))->
						BgL_argsz00) = ((obj_t) BgL_args1182z00_8784), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1572z00_9860)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1183z00_8785), BUNSPEC);
				return BgL_new1572z00_9860;
			}
		}

	}



/* &lambda2048 */
	BgL_appz00_bglt BGl_z62lambda2048z62zzcfa_info2z00(obj_t BgL_envz00_8786,
		obj_t BgL_o1175z00_8787)
	{
		{	/* Cfa/cinfo2.scm 34 */
			{	/* Cfa/cinfo2.scm 34 */
				long BgL_arg2049z00_9867;

				{	/* Cfa/cinfo2.scm 34 */
					obj_t BgL_arg2050z00_9868;

					{	/* Cfa/cinfo2.scm 34 */
						obj_t BgL_arg2051z00_9869;

						{	/* Cfa/cinfo2.scm 34 */
							long BgL_arg1808z00_9870;

							{	/* Cfa/cinfo2.scm 34 */
								long BgL_arg1809z00_9871;

								BgL_arg1809z00_9871 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1175z00_8787)));
								BgL_arg1808z00_9870 = (BgL_arg1809z00_9871 - OBJECT_TYPE);
							}
							BgL_arg2051z00_9869 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9870);
						}
						BgL_arg2050z00_9868 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2051z00_9869);
					}
					{	/* Cfa/cinfo2.scm 34 */
						obj_t BgL_tmpz00_17479;

						BgL_tmpz00_17479 = ((obj_t) BgL_arg2050z00_9868);
						BgL_arg2049z00_9867 = BGL_CLASS_NUM(BgL_tmpz00_17479);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1175z00_8787)), BgL_arg2049z00_9867);
			}
			{	/* Cfa/cinfo2.scm 34 */
				BgL_objectz00_bglt BgL_tmpz00_17485;

				BgL_tmpz00_17485 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1175z00_8787));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17485, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1175z00_8787));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1175z00_8787));
		}

	}



/* &<@anonymous:2047> */
	obj_t BGl_z62zc3z04anonymousza32047ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8788,
		obj_t BgL_new1174z00_8789)
	{
		{	/* Cfa/cinfo2.scm 34 */
			{
				BgL_appz00_bglt BgL_auxz00_17493;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1174z00_8789))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_17497;

					{	/* Cfa/cinfo2.scm 34 */
						obj_t BgL_classz00_9873;

						BgL_classz00_9873 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 34 */
							obj_t BgL__ortest_1117z00_9874;

							BgL__ortest_1117z00_9874 = BGL_CLASS_NIL(BgL_classz00_9873);
							if (CBOOL(BgL__ortest_1117z00_9874))
								{	/* Cfa/cinfo2.scm 34 */
									BgL_auxz00_17497 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9874);
								}
							else
								{	/* Cfa/cinfo2.scm 34 */
									BgL_auxz00_17497 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9873));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1174z00_8789))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_17497), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1174z00_8789))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1174z00_8789))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_17513;

					{	/* Cfa/cinfo2.scm 34 */
						obj_t BgL_classz00_9875;

						BgL_classz00_9875 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 34 */
							obj_t BgL__ortest_1117z00_9876;

							BgL__ortest_1117z00_9876 = BGL_CLASS_NIL(BgL_classz00_9875);
							if (CBOOL(BgL__ortest_1117z00_9876))
								{	/* Cfa/cinfo2.scm 34 */
									BgL_auxz00_17513 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9876);
								}
							else
								{	/* Cfa/cinfo2.scm 34 */
									BgL_auxz00_17513 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9875));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1174z00_8789))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_17513), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1174z00_8789))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1174z00_8789))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_variablez00_bglt BgL_auxz00_17536;
					BgL_prezd2makezd2procedurezd2appzd2_bglt BgL_auxz00_17529;

					{	/* Cfa/cinfo2.scm 34 */
						obj_t BgL_classz00_9877;

						BgL_classz00_9877 = BGl_variablez00zzast_varz00;
						{	/* Cfa/cinfo2.scm 34 */
							obj_t BgL__ortest_1117z00_9878;

							BgL__ortest_1117z00_9878 = BGL_CLASS_NIL(BgL_classz00_9877);
							if (CBOOL(BgL__ortest_1117z00_9878))
								{	/* Cfa/cinfo2.scm 34 */
									BgL_auxz00_17536 =
										((BgL_variablez00_bglt) BgL__ortest_1117z00_9878);
								}
							else
								{	/* Cfa/cinfo2.scm 34 */
									BgL_auxz00_17536 =
										((BgL_variablez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9877));
								}
						}
					}
					{
						obj_t BgL_auxz00_17530;

						{	/* Cfa/cinfo2.scm 34 */
							BgL_objectz00_bglt BgL_tmpz00_17531;

							BgL_tmpz00_17531 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1174z00_8789));
							BgL_auxz00_17530 = BGL_OBJECT_WIDENING(BgL_tmpz00_17531);
						}
						BgL_auxz00_17529 =
							((BgL_prezd2makezd2procedurezd2appzd2_bglt) BgL_auxz00_17530);
					}
					((((BgL_prezd2makezd2procedurezd2appzd2_bglt)
								COBJECT(BgL_auxz00_17529))->BgL_ownerz00) =
						((BgL_variablez00_bglt) BgL_auxz00_17536), BUNSPEC);
				}
				BgL_auxz00_17493 = ((BgL_appz00_bglt) BgL_new1174z00_8789);
				return ((obj_t) BgL_auxz00_17493);
			}
		}

	}



/* &lambda2044 */
	BgL_appz00_bglt BGl_z62lambda2044z62zzcfa_info2z00(obj_t BgL_envz00_8790,
		obj_t BgL_o1171z00_8791)
	{
		{	/* Cfa/cinfo2.scm 34 */
			{	/* Cfa/cinfo2.scm 34 */
				BgL_prezd2makezd2procedurezd2appzd2_bglt BgL_wide1173z00_9880;

				BgL_wide1173z00_9880 =
					((BgL_prezd2makezd2procedurezd2appzd2_bglt)
					BOBJECT(GC_MALLOC(sizeof(struct
								BgL_prezd2makezd2procedurezd2appzd2_bgl))));
				{	/* Cfa/cinfo2.scm 34 */
					obj_t BgL_auxz00_17551;
					BgL_objectz00_bglt BgL_tmpz00_17547;

					BgL_auxz00_17551 = ((obj_t) BgL_wide1173z00_9880);
					BgL_tmpz00_17547 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1171z00_8791)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17547, BgL_auxz00_17551);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1171z00_8791)));
				{	/* Cfa/cinfo2.scm 34 */
					long BgL_arg2046z00_9881;

					BgL_arg2046z00_9881 =
						BGL_CLASS_NUM(BGl_prezd2makezd2procedurezd2appzd2zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1171z00_8791))), BgL_arg2046z00_9881);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1171z00_8791)));
			}
		}

	}



/* &lambda2041 */
	BgL_appz00_bglt BGl_z62lambda2041z62zzcfa_info2z00(obj_t BgL_envz00_8792,
		obj_t BgL_loc1163z00_8793, obj_t BgL_type1164z00_8794,
		obj_t BgL_sidezd2effect1165zd2_8795, obj_t BgL_key1166z00_8796,
		obj_t BgL_fun1167z00_8797, obj_t BgL_args1168z00_8798,
		obj_t BgL_stackable1169z00_8799, obj_t BgL_owner1170z00_8800)
	{
		{	/* Cfa/cinfo2.scm 34 */
			{	/* Cfa/cinfo2.scm 34 */
				BgL_appz00_bglt BgL_new1567z00_9885;

				{	/* Cfa/cinfo2.scm 34 */
					BgL_appz00_bglt BgL_tmp1565z00_9886;
					BgL_prezd2makezd2procedurezd2appzd2_bglt BgL_wide1566z00_9887;

					{
						BgL_appz00_bglt BgL_auxz00_17565;

						{	/* Cfa/cinfo2.scm 34 */
							BgL_appz00_bglt BgL_new1564z00_9888;

							BgL_new1564z00_9888 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.scm 34 */
								long BgL_arg2043z00_9889;

								BgL_arg2043z00_9889 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1564z00_9888),
									BgL_arg2043z00_9889);
							}
							{	/* Cfa/cinfo2.scm 34 */
								BgL_objectz00_bglt BgL_tmpz00_17570;

								BgL_tmpz00_17570 = ((BgL_objectz00_bglt) BgL_new1564z00_9888);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17570, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1564z00_9888);
							BgL_auxz00_17565 = BgL_new1564z00_9888;
						}
						BgL_tmp1565z00_9886 = ((BgL_appz00_bglt) BgL_auxz00_17565);
					}
					BgL_wide1566z00_9887 =
						((BgL_prezd2makezd2procedurezd2appzd2_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2makezd2procedurezd2appzd2_bgl))));
					{	/* Cfa/cinfo2.scm 34 */
						obj_t BgL_auxz00_17578;
						BgL_objectz00_bglt BgL_tmpz00_17576;

						BgL_auxz00_17578 = ((obj_t) BgL_wide1566z00_9887);
						BgL_tmpz00_17576 = ((BgL_objectz00_bglt) BgL_tmp1565z00_9886);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17576, BgL_auxz00_17578);
					}
					((BgL_objectz00_bglt) BgL_tmp1565z00_9886);
					{	/* Cfa/cinfo2.scm 34 */
						long BgL_arg2042z00_9890;

						BgL_arg2042z00_9890 =
							BGL_CLASS_NUM(BGl_prezd2makezd2procedurezd2appzd2zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1565z00_9886), BgL_arg2042z00_9890);
					}
					BgL_new1567z00_9885 = ((BgL_appz00_bglt) BgL_tmp1565z00_9886);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1567z00_9885)))->BgL_locz00) =
					((obj_t) BgL_loc1163z00_8793), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1567z00_9885)))->BgL_typez00) =
					((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1164z00_8794)),
					BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1567z00_9885)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1165zd2_8795), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1567z00_9885)))->BgL_keyz00) =
					((obj_t) BgL_key1166z00_8796), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1567z00_9885)))->
						BgL_funz00) =
					((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1167z00_8797)), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1567z00_9885)))->
						BgL_argsz00) = ((obj_t) BgL_args1168z00_8798), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1567z00_9885)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1169z00_8799), BUNSPEC);
				{
					BgL_prezd2makezd2procedurezd2appzd2_bglt BgL_auxz00_17602;

					{
						obj_t BgL_auxz00_17603;

						{	/* Cfa/cinfo2.scm 34 */
							BgL_objectz00_bglt BgL_tmpz00_17604;

							BgL_tmpz00_17604 = ((BgL_objectz00_bglt) BgL_new1567z00_9885);
							BgL_auxz00_17603 = BGL_OBJECT_WIDENING(BgL_tmpz00_17604);
						}
						BgL_auxz00_17602 =
							((BgL_prezd2makezd2procedurezd2appzd2_bglt) BgL_auxz00_17603);
					}
					((((BgL_prezd2makezd2procedurezd2appzd2_bglt)
								COBJECT(BgL_auxz00_17602))->BgL_ownerz00) =
						((BgL_variablez00_bglt) ((BgL_variablez00_bglt)
								BgL_owner1170z00_8800)), BUNSPEC);
				}
				return BgL_new1567z00_9885;
			}
		}

	}



/* &lambda2057 */
	obj_t BGl_z62lambda2057z62zzcfa_info2z00(obj_t BgL_envz00_8801,
		obj_t BgL_oz00_8802, obj_t BgL_vz00_8803)
	{
		{	/* Cfa/cinfo2.scm 34 */
			{
				BgL_prezd2makezd2procedurezd2appzd2_bglt BgL_auxz00_17610;

				{
					obj_t BgL_auxz00_17611;

					{	/* Cfa/cinfo2.scm 34 */
						BgL_objectz00_bglt BgL_tmpz00_17612;

						BgL_tmpz00_17612 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8802));
						BgL_auxz00_17611 = BGL_OBJECT_WIDENING(BgL_tmpz00_17612);
					}
					BgL_auxz00_17610 =
						((BgL_prezd2makezd2procedurezd2appzd2_bglt) BgL_auxz00_17611);
				}
				return
					((((BgL_prezd2makezd2procedurezd2appzd2_bglt)
							COBJECT(BgL_auxz00_17610))->BgL_ownerz00) =
					((BgL_variablez00_bglt) ((BgL_variablez00_bglt) BgL_vz00_8803)),
					BUNSPEC);
			}
		}

	}



/* &lambda2056 */
	BgL_variablez00_bglt BGl_z62lambda2056z62zzcfa_info2z00(obj_t BgL_envz00_8804,
		obj_t BgL_oz00_8805)
	{
		{	/* Cfa/cinfo2.scm 34 */
			{
				BgL_prezd2makezd2procedurezd2appzd2_bglt BgL_auxz00_17619;

				{
					obj_t BgL_auxz00_17620;

					{	/* Cfa/cinfo2.scm 34 */
						BgL_objectz00_bglt BgL_tmpz00_17621;

						BgL_tmpz00_17621 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8805));
						BgL_auxz00_17620 = BGL_OBJECT_WIDENING(BgL_tmpz00_17621);
					}
					BgL_auxz00_17619 =
						((BgL_prezd2makezd2procedurezd2appzd2_bglt) BgL_auxz00_17620);
				}
				return
					(((BgL_prezd2makezd2procedurezd2appzd2_bglt)
						COBJECT(BgL_auxz00_17619))->BgL_ownerz00);
			}
		}

	}



/* &lambda2017 */
	BgL_appz00_bglt BGl_z62lambda2017z62zzcfa_info2z00(obj_t BgL_envz00_8806,
		obj_t BgL_o1161z00_8807)
	{
		{	/* Cfa/cinfo2.scm 29 */
			{	/* Cfa/cinfo2.scm 29 */
				long BgL_arg2018z00_9895;

				{	/* Cfa/cinfo2.scm 29 */
					obj_t BgL_arg2019z00_9896;

					{	/* Cfa/cinfo2.scm 29 */
						obj_t BgL_arg2020z00_9897;

						{	/* Cfa/cinfo2.scm 29 */
							long BgL_arg1808z00_9898;

							{	/* Cfa/cinfo2.scm 29 */
								long BgL_arg1809z00_9899;

								BgL_arg1809z00_9899 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1161z00_8807)));
								BgL_arg1808z00_9898 = (BgL_arg1809z00_9899 - OBJECT_TYPE);
							}
							BgL_arg2020z00_9897 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9898);
						}
						BgL_arg2019z00_9896 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg2020z00_9897);
					}
					{	/* Cfa/cinfo2.scm 29 */
						obj_t BgL_tmpz00_17633;

						BgL_tmpz00_17633 = ((obj_t) BgL_arg2019z00_9896);
						BgL_arg2018z00_9895 = BGL_CLASS_NUM(BgL_tmpz00_17633);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1161z00_8807)), BgL_arg2018z00_9895);
			}
			{	/* Cfa/cinfo2.scm 29 */
				BgL_objectz00_bglt BgL_tmpz00_17639;

				BgL_tmpz00_17639 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1161z00_8807));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17639, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1161z00_8807));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1161z00_8807));
		}

	}



/* &<@anonymous:2016> */
	obj_t BGl_z62zc3z04anonymousza32016ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8808,
		obj_t BgL_new1160z00_8809)
	{
		{	/* Cfa/cinfo2.scm 29 */
			{
				BgL_appz00_bglt BgL_auxz00_17647;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1160z00_8809))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_17651;

					{	/* Cfa/cinfo2.scm 29 */
						obj_t BgL_classz00_9901;

						BgL_classz00_9901 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 29 */
							obj_t BgL__ortest_1117z00_9902;

							BgL__ortest_1117z00_9902 = BGL_CLASS_NIL(BgL_classz00_9901);
							if (CBOOL(BgL__ortest_1117z00_9902))
								{	/* Cfa/cinfo2.scm 29 */
									BgL_auxz00_17651 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9902);
								}
							else
								{	/* Cfa/cinfo2.scm 29 */
									BgL_auxz00_17651 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9901));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1160z00_8809))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_17651), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1160z00_8809))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1160z00_8809))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_17667;

					{	/* Cfa/cinfo2.scm 29 */
						obj_t BgL_classz00_9903;

						BgL_classz00_9903 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 29 */
							obj_t BgL__ortest_1117z00_9904;

							BgL__ortest_1117z00_9904 = BGL_CLASS_NIL(BgL_classz00_9903);
							if (CBOOL(BgL__ortest_1117z00_9904))
								{	/* Cfa/cinfo2.scm 29 */
									BgL_auxz00_17667 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9904);
								}
							else
								{	/* Cfa/cinfo2.scm 29 */
									BgL_auxz00_17667 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9903));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1160z00_8809))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_17667), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1160z00_8809))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1160z00_8809))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_approxz00_bglt BgL_auxz00_17690;
					BgL_arithmeticzd2appzd2_bglt BgL_auxz00_17683;

					{	/* Cfa/cinfo2.scm 29 */
						obj_t BgL_classz00_9905;

						BgL_classz00_9905 = BGl_approxz00zzcfa_infoz00;
						{	/* Cfa/cinfo2.scm 29 */
							obj_t BgL__ortest_1117z00_9906;

							BgL__ortest_1117z00_9906 = BGL_CLASS_NIL(BgL_classz00_9905);
							if (CBOOL(BgL__ortest_1117z00_9906))
								{	/* Cfa/cinfo2.scm 29 */
									BgL_auxz00_17690 =
										((BgL_approxz00_bglt) BgL__ortest_1117z00_9906);
								}
							else
								{	/* Cfa/cinfo2.scm 29 */
									BgL_auxz00_17690 =
										((BgL_approxz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9905));
								}
						}
					}
					{
						obj_t BgL_auxz00_17684;

						{	/* Cfa/cinfo2.scm 29 */
							BgL_objectz00_bglt BgL_tmpz00_17685;

							BgL_tmpz00_17685 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1160z00_8809));
							BgL_auxz00_17684 = BGL_OBJECT_WIDENING(BgL_tmpz00_17685);
						}
						BgL_auxz00_17683 =
							((BgL_arithmeticzd2appzd2_bglt) BgL_auxz00_17684);
					}
					((((BgL_arithmeticzd2appzd2_bglt) COBJECT(BgL_auxz00_17683))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) BgL_auxz00_17690), BUNSPEC);
				}
				{
					BgL_arithmeticzd2appzd2_bglt BgL_auxz00_17698;

					{
						obj_t BgL_auxz00_17699;

						{	/* Cfa/cinfo2.scm 29 */
							BgL_objectz00_bglt BgL_tmpz00_17700;

							BgL_tmpz00_17700 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1160z00_8809));
							BgL_auxz00_17699 = BGL_OBJECT_WIDENING(BgL_tmpz00_17700);
						}
						BgL_auxz00_17698 =
							((BgL_arithmeticzd2appzd2_bglt) BgL_auxz00_17699);
					}
					((((BgL_arithmeticzd2appzd2_bglt) COBJECT(BgL_auxz00_17698))->
							BgL_speczd2typeszd2) =
						((obj_t) MAKE_YOUNG_PAIR(BFALSE, BFALSE)), BUNSPEC);
				}
				BgL_auxz00_17647 = ((BgL_appz00_bglt) BgL_new1160z00_8809);
				return ((obj_t) BgL_auxz00_17647);
			}
		}

	}



/* &lambda2014 */
	BgL_appz00_bglt BGl_z62lambda2014z62zzcfa_info2z00(obj_t BgL_envz00_8810,
		obj_t BgL_o1157z00_8811)
	{
		{	/* Cfa/cinfo2.scm 29 */
			{	/* Cfa/cinfo2.scm 29 */
				BgL_arithmeticzd2appzd2_bglt BgL_wide1159z00_9908;

				BgL_wide1159z00_9908 =
					((BgL_arithmeticzd2appzd2_bglt) BOBJECT(GC_MALLOC(sizeof(struct
								BgL_arithmeticzd2appzd2_bgl))));
				{	/* Cfa/cinfo2.scm 29 */
					obj_t BgL_auxz00_17714;
					BgL_objectz00_bglt BgL_tmpz00_17710;

					BgL_auxz00_17714 = ((obj_t) BgL_wide1159z00_9908);
					BgL_tmpz00_17710 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1157z00_8811)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17710, BgL_auxz00_17714);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1157z00_8811)));
				{	/* Cfa/cinfo2.scm 29 */
					long BgL_arg2015z00_9909;

					BgL_arg2015z00_9909 =
						BGL_CLASS_NUM(BGl_arithmeticzd2appzd2zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1157z00_8811))), BgL_arg2015z00_9909);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1157z00_8811)));
			}
		}

	}



/* &lambda2011 */
	BgL_appz00_bglt BGl_z62lambda2011z62zzcfa_info2z00(obj_t BgL_envz00_8812,
		obj_t BgL_loc1148z00_8813, obj_t BgL_type1149z00_8814,
		obj_t BgL_sidezd2effect1150zd2_8815, obj_t BgL_key1151z00_8816,
		obj_t BgL_fun1152z00_8817, obj_t BgL_args1153z00_8818,
		obj_t BgL_stackable1154z00_8819, obj_t BgL_approx1155z00_8820,
		obj_t BgL_speczd2types1156zd2_8821)
	{
		{	/* Cfa/cinfo2.scm 29 */
			{	/* Cfa/cinfo2.scm 29 */
				BgL_appz00_bglt BgL_new1562z00_9914;

				{	/* Cfa/cinfo2.scm 29 */
					BgL_appz00_bglt BgL_tmp1560z00_9915;
					BgL_arithmeticzd2appzd2_bglt BgL_wide1561z00_9916;

					{
						BgL_appz00_bglt BgL_auxz00_17728;

						{	/* Cfa/cinfo2.scm 29 */
							BgL_appz00_bglt BgL_new1559z00_9917;

							BgL_new1559z00_9917 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.scm 29 */
								long BgL_arg2013z00_9918;

								BgL_arg2013z00_9918 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1559z00_9917),
									BgL_arg2013z00_9918);
							}
							{	/* Cfa/cinfo2.scm 29 */
								BgL_objectz00_bglt BgL_tmpz00_17733;

								BgL_tmpz00_17733 = ((BgL_objectz00_bglt) BgL_new1559z00_9917);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17733, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1559z00_9917);
							BgL_auxz00_17728 = BgL_new1559z00_9917;
						}
						BgL_tmp1560z00_9915 = ((BgL_appz00_bglt) BgL_auxz00_17728);
					}
					BgL_wide1561z00_9916 =
						((BgL_arithmeticzd2appzd2_bglt) BOBJECT(GC_MALLOC(sizeof(struct
									BgL_arithmeticzd2appzd2_bgl))));
					{	/* Cfa/cinfo2.scm 29 */
						obj_t BgL_auxz00_17741;
						BgL_objectz00_bglt BgL_tmpz00_17739;

						BgL_auxz00_17741 = ((obj_t) BgL_wide1561z00_9916);
						BgL_tmpz00_17739 = ((BgL_objectz00_bglt) BgL_tmp1560z00_9915);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17739, BgL_auxz00_17741);
					}
					((BgL_objectz00_bglt) BgL_tmp1560z00_9915);
					{	/* Cfa/cinfo2.scm 29 */
						long BgL_arg2012z00_9919;

						BgL_arg2012z00_9919 =
							BGL_CLASS_NUM(BGl_arithmeticzd2appzd2zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1560z00_9915), BgL_arg2012z00_9919);
					}
					BgL_new1562z00_9914 = ((BgL_appz00_bglt) BgL_tmp1560z00_9915);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1562z00_9914)))->BgL_locz00) =
					((obj_t) BgL_loc1148z00_8813), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1562z00_9914)))->BgL_typez00) =
					((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1149z00_8814)),
					BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1562z00_9914)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1150zd2_8815), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1562z00_9914)))->BgL_keyz00) =
					((obj_t) BgL_key1151z00_8816), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1562z00_9914)))->
						BgL_funz00) =
					((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1152z00_8817)), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1562z00_9914)))->
						BgL_argsz00) = ((obj_t) BgL_args1153z00_8818), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1562z00_9914)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1154z00_8819), BUNSPEC);
				{
					BgL_arithmeticzd2appzd2_bglt BgL_auxz00_17765;

					{
						obj_t BgL_auxz00_17766;

						{	/* Cfa/cinfo2.scm 29 */
							BgL_objectz00_bglt BgL_tmpz00_17767;

							BgL_tmpz00_17767 = ((BgL_objectz00_bglt) BgL_new1562z00_9914);
							BgL_auxz00_17766 = BGL_OBJECT_WIDENING(BgL_tmpz00_17767);
						}
						BgL_auxz00_17765 =
							((BgL_arithmeticzd2appzd2_bglt) BgL_auxz00_17766);
					}
					((((BgL_arithmeticzd2appzd2_bglt) COBJECT(BgL_auxz00_17765))->
							BgL_approxz00) =
						((BgL_approxz00_bglt) ((BgL_approxz00_bglt)
								BgL_approx1155z00_8820)), BUNSPEC);
				}
				{
					BgL_arithmeticzd2appzd2_bglt BgL_auxz00_17773;

					{
						obj_t BgL_auxz00_17774;

						{	/* Cfa/cinfo2.scm 29 */
							BgL_objectz00_bglt BgL_tmpz00_17775;

							BgL_tmpz00_17775 = ((BgL_objectz00_bglt) BgL_new1562z00_9914);
							BgL_auxz00_17774 = BGL_OBJECT_WIDENING(BgL_tmpz00_17775);
						}
						BgL_auxz00_17773 =
							((BgL_arithmeticzd2appzd2_bglt) BgL_auxz00_17774);
					}
					((((BgL_arithmeticzd2appzd2_bglt) COBJECT(BgL_auxz00_17773))->
							BgL_speczd2typeszd2) =
						((obj_t) ((obj_t) BgL_speczd2types1156zd2_8821)), BUNSPEC);
				}
				return BgL_new1562z00_9914;
			}
		}

	}



/* &lambda2033 */
	obj_t BGl_z62lambda2033z62zzcfa_info2z00(obj_t BgL_envz00_8822,
		obj_t BgL_oz00_8823, obj_t BgL_vz00_8824)
	{
		{	/* Cfa/cinfo2.scm 29 */
			{
				BgL_arithmeticzd2appzd2_bglt BgL_auxz00_17781;

				{
					obj_t BgL_auxz00_17782;

					{	/* Cfa/cinfo2.scm 29 */
						BgL_objectz00_bglt BgL_tmpz00_17783;

						BgL_tmpz00_17783 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8823));
						BgL_auxz00_17782 = BGL_OBJECT_WIDENING(BgL_tmpz00_17783);
					}
					BgL_auxz00_17781 = ((BgL_arithmeticzd2appzd2_bglt) BgL_auxz00_17782);
				}
				return
					((((BgL_arithmeticzd2appzd2_bglt) COBJECT(BgL_auxz00_17781))->
						BgL_speczd2typeszd2) = ((obj_t) ((obj_t) BgL_vz00_8824)), BUNSPEC);
			}
		}

	}



/* &lambda2032 */
	obj_t BGl_z62lambda2032z62zzcfa_info2z00(obj_t BgL_envz00_8825,
		obj_t BgL_oz00_8826)
	{
		{	/* Cfa/cinfo2.scm 29 */
			{
				BgL_arithmeticzd2appzd2_bglt BgL_auxz00_17790;

				{
					obj_t BgL_auxz00_17791;

					{	/* Cfa/cinfo2.scm 29 */
						BgL_objectz00_bglt BgL_tmpz00_17792;

						BgL_tmpz00_17792 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8826));
						BgL_auxz00_17791 = BGL_OBJECT_WIDENING(BgL_tmpz00_17792);
					}
					BgL_auxz00_17790 = ((BgL_arithmeticzd2appzd2_bglt) BgL_auxz00_17791);
				}
				return
					(((BgL_arithmeticzd2appzd2_bglt) COBJECT(BgL_auxz00_17790))->
					BgL_speczd2typeszd2);
			}
		}

	}



/* &lambda2026 */
	obj_t BGl_z62lambda2026z62zzcfa_info2z00(obj_t BgL_envz00_8827,
		obj_t BgL_oz00_8828, obj_t BgL_vz00_8829)
	{
		{	/* Cfa/cinfo2.scm 29 */
			{
				BgL_arithmeticzd2appzd2_bglt BgL_auxz00_17798;

				{
					obj_t BgL_auxz00_17799;

					{	/* Cfa/cinfo2.scm 29 */
						BgL_objectz00_bglt BgL_tmpz00_17800;

						BgL_tmpz00_17800 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8828));
						BgL_auxz00_17799 = BGL_OBJECT_WIDENING(BgL_tmpz00_17800);
					}
					BgL_auxz00_17798 = ((BgL_arithmeticzd2appzd2_bglt) BgL_auxz00_17799);
				}
				return
					((((BgL_arithmeticzd2appzd2_bglt) COBJECT(BgL_auxz00_17798))->
						BgL_approxz00) =
					((BgL_approxz00_bglt) ((BgL_approxz00_bglt) BgL_vz00_8829)), BUNSPEC);
			}
		}

	}



/* &lambda2025 */
	BgL_approxz00_bglt BGl_z62lambda2025z62zzcfa_info2z00(obj_t BgL_envz00_8830,
		obj_t BgL_oz00_8831)
	{
		{	/* Cfa/cinfo2.scm 29 */
			{
				BgL_arithmeticzd2appzd2_bglt BgL_auxz00_17807;

				{
					obj_t BgL_auxz00_17808;

					{	/* Cfa/cinfo2.scm 29 */
						BgL_objectz00_bglt BgL_tmpz00_17809;

						BgL_tmpz00_17809 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8831));
						BgL_auxz00_17808 = BGL_OBJECT_WIDENING(BgL_tmpz00_17809);
					}
					BgL_auxz00_17807 = ((BgL_arithmeticzd2appzd2_bglt) BgL_auxz00_17808);
				}
				return
					(((BgL_arithmeticzd2appzd2_bglt) COBJECT(BgL_auxz00_17807))->
					BgL_approxz00);
			}
		}

	}



/* &lambda1995 */
	BgL_appz00_bglt BGl_z62lambda1995z62zzcfa_info2z00(obj_t BgL_envz00_8832,
		obj_t BgL_o1146z00_8833)
	{
		{	/* Cfa/cinfo2.scm 27 */
			{	/* Cfa/cinfo2.scm 27 */
				long BgL_arg1996z00_9927;

				{	/* Cfa/cinfo2.scm 27 */
					obj_t BgL_arg1997z00_9928;

					{	/* Cfa/cinfo2.scm 27 */
						obj_t BgL_arg1998z00_9929;

						{	/* Cfa/cinfo2.scm 27 */
							long BgL_arg1808z00_9930;

							{	/* Cfa/cinfo2.scm 27 */
								long BgL_arg1809z00_9931;

								BgL_arg1809z00_9931 =
									BGL_OBJECT_CLASS_NUM(
									((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1146z00_8833)));
								BgL_arg1808z00_9930 = (BgL_arg1809z00_9931 - OBJECT_TYPE);
							}
							BgL_arg1998z00_9929 =
								VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
								BgL_arg1808z00_9930);
						}
						BgL_arg1997z00_9928 =
							BGl_classzd2superzd2zz__objectz00(BgL_arg1998z00_9929);
					}
					{	/* Cfa/cinfo2.scm 27 */
						obj_t BgL_tmpz00_17821;

						BgL_tmpz00_17821 = ((obj_t) BgL_arg1997z00_9928);
						BgL_arg1996z00_9927 = BGL_CLASS_NUM(BgL_tmpz00_17821);
				}}
				BGL_OBJECT_CLASS_NUM_SET(
					((BgL_objectz00_bglt)
						((BgL_appz00_bglt) BgL_o1146z00_8833)), BgL_arg1996z00_9927);
			}
			{	/* Cfa/cinfo2.scm 27 */
				BgL_objectz00_bglt BgL_tmpz00_17827;

				BgL_tmpz00_17827 =
					((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1146z00_8833));
				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17827, BFALSE);
			}
			((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_o1146z00_8833));
			return ((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1146z00_8833));
		}

	}



/* &<@anonymous:1994> */
	obj_t BGl_z62zc3z04anonymousza31994ze3ze5zzcfa_info2z00(obj_t BgL_envz00_8834,
		obj_t BgL_new1145z00_8835)
	{
		{	/* Cfa/cinfo2.scm 27 */
			{
				BgL_appz00_bglt BgL_auxz00_17835;

				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt)
									((BgL_appz00_bglt) BgL_new1145z00_8835))))->BgL_locz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_typez00_bglt BgL_auxz00_17839;

					{	/* Cfa/cinfo2.scm 27 */
						obj_t BgL_classz00_9933;

						BgL_classz00_9933 = BGl_typez00zztype_typez00;
						{	/* Cfa/cinfo2.scm 27 */
							obj_t BgL__ortest_1117z00_9934;

							BgL__ortest_1117z00_9934 = BGL_CLASS_NIL(BgL_classz00_9933);
							if (CBOOL(BgL__ortest_1117z00_9934))
								{	/* Cfa/cinfo2.scm 27 */
									BgL_auxz00_17839 =
										((BgL_typez00_bglt) BgL__ortest_1117z00_9934);
								}
							else
								{	/* Cfa/cinfo2.scm 27 */
									BgL_auxz00_17839 =
										((BgL_typez00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9933));
								}
						}
					}
					((((BgL_nodez00_bglt) COBJECT(
									((BgL_nodez00_bglt)
										((BgL_appz00_bglt) BgL_new1145z00_8835))))->BgL_typez00) =
						((BgL_typez00_bglt) BgL_auxz00_17839), BUNSPEC);
				}
				((((BgL_nodezf2effectzf2_bglt) COBJECT(
								((BgL_nodezf2effectzf2_bglt)
									((BgL_appz00_bglt) BgL_new1145z00_8835))))->
						BgL_sidezd2effectzd2) = ((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt)
							COBJECT(((BgL_nodezf2effectzf2_bglt) ((BgL_appz00_bglt)
										BgL_new1145z00_8835))))->BgL_keyz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_varz00_bglt BgL_auxz00_17855;

					{	/* Cfa/cinfo2.scm 27 */
						obj_t BgL_classz00_9935;

						BgL_classz00_9935 = BGl_varz00zzast_nodez00;
						{	/* Cfa/cinfo2.scm 27 */
							obj_t BgL__ortest_1117z00_9936;

							BgL__ortest_1117z00_9936 = BGL_CLASS_NIL(BgL_classz00_9935);
							if (CBOOL(BgL__ortest_1117z00_9936))
								{	/* Cfa/cinfo2.scm 27 */
									BgL_auxz00_17855 =
										((BgL_varz00_bglt) BgL__ortest_1117z00_9936);
								}
							else
								{	/* Cfa/cinfo2.scm 27 */
									BgL_auxz00_17855 =
										((BgL_varz00_bglt)
										BGl_classzd2nilzd2initz12z12zz__objectz00
										(BgL_classz00_9935));
								}
						}
					}
					((((BgL_appz00_bglt) COBJECT(
									((BgL_appz00_bglt)
										((BgL_appz00_bglt) BgL_new1145z00_8835))))->BgL_funz00) =
						((BgL_varz00_bglt) BgL_auxz00_17855), BUNSPEC);
				}
				((((BgL_appz00_bglt) COBJECT(
								((BgL_appz00_bglt)
									((BgL_appz00_bglt) BgL_new1145z00_8835))))->BgL_argsz00) =
					((obj_t) BUNSPEC), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) ((BgL_appz00_bglt)
										BgL_new1145z00_8835))))->BgL_stackablez00) =
					((obj_t) BUNSPEC), BUNSPEC);
				{
					BgL_prezd2arithmeticzd2appz00_bglt BgL_auxz00_17871;

					{
						obj_t BgL_auxz00_17872;

						{	/* Cfa/cinfo2.scm 27 */
							BgL_objectz00_bglt BgL_tmpz00_17873;

							BgL_tmpz00_17873 =
								((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_new1145z00_8835));
							BgL_auxz00_17872 = BGL_OBJECT_WIDENING(BgL_tmpz00_17873);
						}
						BgL_auxz00_17871 =
							((BgL_prezd2arithmeticzd2appz00_bglt) BgL_auxz00_17872);
					}
					((((BgL_prezd2arithmeticzd2appz00_bglt) COBJECT(BgL_auxz00_17871))->
							BgL_speczd2typeszd2) =
						((obj_t) MAKE_YOUNG_PAIR(BFALSE, BFALSE)), BUNSPEC);
				}
				BgL_auxz00_17835 = ((BgL_appz00_bglt) BgL_new1145z00_8835);
				return ((obj_t) BgL_auxz00_17835);
			}
		}

	}



/* &lambda1992 */
	BgL_appz00_bglt BGl_z62lambda1992z62zzcfa_info2z00(obj_t BgL_envz00_8836,
		obj_t BgL_o1142z00_8837)
	{
		{	/* Cfa/cinfo2.scm 27 */
			{	/* Cfa/cinfo2.scm 27 */
				BgL_prezd2arithmeticzd2appz00_bglt BgL_wide1144z00_9938;

				BgL_wide1144z00_9938 =
					((BgL_prezd2arithmeticzd2appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
								BgL_prezd2arithmeticzd2appz00_bgl))));
				{	/* Cfa/cinfo2.scm 27 */
					obj_t BgL_auxz00_17887;
					BgL_objectz00_bglt BgL_tmpz00_17883;

					BgL_auxz00_17887 = ((obj_t) BgL_wide1144z00_9938);
					BgL_tmpz00_17883 =
						((BgL_objectz00_bglt)
						((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1142z00_8837)));
					BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17883, BgL_auxz00_17887);
				}
				((BgL_objectz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1142z00_8837)));
				{	/* Cfa/cinfo2.scm 27 */
					long BgL_arg1993z00_9939;

					BgL_arg1993z00_9939 =
						BGL_CLASS_NUM(BGl_prezd2arithmeticzd2appz00zzcfa_info2z00);
					BGL_OBJECT_CLASS_NUM_SET(
						((BgL_objectz00_bglt)
							((BgL_appz00_bglt)
								((BgL_appz00_bglt) BgL_o1142z00_8837))), BgL_arg1993z00_9939);
				}
				return
					((BgL_appz00_bglt)
					((BgL_appz00_bglt) ((BgL_appz00_bglt) BgL_o1142z00_8837)));
			}
		}

	}



/* &lambda1989 */
	BgL_appz00_bglt BGl_z62lambda1989z62zzcfa_info2z00(obj_t BgL_envz00_8838,
		obj_t BgL_loc1134z00_8839, obj_t BgL_type1135z00_8840,
		obj_t BgL_sidezd2effect1136zd2_8841, obj_t BgL_key1137z00_8842,
		obj_t BgL_fun1138z00_8843, obj_t BgL_args1139z00_8844,
		obj_t BgL_stackable1140z00_8845, obj_t BgL_speczd2types1141zd2_8846)
	{
		{	/* Cfa/cinfo2.scm 27 */
			{	/* Cfa/cinfo2.scm 27 */
				BgL_appz00_bglt BgL_new1557z00_9943;

				{	/* Cfa/cinfo2.scm 27 */
					BgL_appz00_bglt BgL_tmp1555z00_9944;
					BgL_prezd2arithmeticzd2appz00_bglt BgL_wide1556z00_9945;

					{
						BgL_appz00_bglt BgL_auxz00_17901;

						{	/* Cfa/cinfo2.scm 27 */
							BgL_appz00_bglt BgL_new1554z00_9946;

							BgL_new1554z00_9946 =
								((BgL_appz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_appz00_bgl))));
							{	/* Cfa/cinfo2.scm 27 */
								long BgL_arg1991z00_9947;

								BgL_arg1991z00_9947 = BGL_CLASS_NUM(BGl_appz00zzast_nodez00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1554z00_9946),
									BgL_arg1991z00_9947);
							}
							{	/* Cfa/cinfo2.scm 27 */
								BgL_objectz00_bglt BgL_tmpz00_17906;

								BgL_tmpz00_17906 = ((BgL_objectz00_bglt) BgL_new1554z00_9946);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17906, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1554z00_9946);
							BgL_auxz00_17901 = BgL_new1554z00_9946;
						}
						BgL_tmp1555z00_9944 = ((BgL_appz00_bglt) BgL_auxz00_17901);
					}
					BgL_wide1556z00_9945 =
						((BgL_prezd2arithmeticzd2appz00_bglt)
						BOBJECT(GC_MALLOC(sizeof(struct
									BgL_prezd2arithmeticzd2appz00_bgl))));
					{	/* Cfa/cinfo2.scm 27 */
						obj_t BgL_auxz00_17914;
						BgL_objectz00_bglt BgL_tmpz00_17912;

						BgL_auxz00_17914 = ((obj_t) BgL_wide1556z00_9945);
						BgL_tmpz00_17912 = ((BgL_objectz00_bglt) BgL_tmp1555z00_9944);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_17912, BgL_auxz00_17914);
					}
					((BgL_objectz00_bglt) BgL_tmp1555z00_9944);
					{	/* Cfa/cinfo2.scm 27 */
						long BgL_arg1990z00_9948;

						BgL_arg1990z00_9948 =
							BGL_CLASS_NUM(BGl_prezd2arithmeticzd2appz00zzcfa_info2z00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1555z00_9944), BgL_arg1990z00_9948);
					}
					BgL_new1557z00_9943 = ((BgL_appz00_bglt) BgL_tmp1555z00_9944);
				}
				((((BgL_nodez00_bglt) COBJECT(
								((BgL_nodez00_bglt) BgL_new1557z00_9943)))->BgL_locz00) =
					((obj_t) BgL_loc1134z00_8839), BUNSPEC);
				((((BgL_nodez00_bglt) COBJECT(((BgL_nodez00_bglt)
									BgL_new1557z00_9943)))->BgL_typez00) =
					((BgL_typez00_bglt) ((BgL_typez00_bglt) BgL_type1135z00_8840)),
					BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1557z00_9943)))->BgL_sidezd2effectzd2) =
					((obj_t) BgL_sidezd2effect1136zd2_8841), BUNSPEC);
				((((BgL_nodezf2effectzf2_bglt) COBJECT(((BgL_nodezf2effectzf2_bglt)
									BgL_new1557z00_9943)))->BgL_keyz00) =
					((obj_t) BgL_key1137z00_8842), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1557z00_9943)))->
						BgL_funz00) =
					((BgL_varz00_bglt) ((BgL_varz00_bglt) BgL_fun1138z00_8843)), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1557z00_9943)))->
						BgL_argsz00) = ((obj_t) BgL_args1139z00_8844), BUNSPEC);
				((((BgL_appz00_bglt) COBJECT(((BgL_appz00_bglt) BgL_new1557z00_9943)))->
						BgL_stackablez00) = ((obj_t) BgL_stackable1140z00_8845), BUNSPEC);
				{
					BgL_prezd2arithmeticzd2appz00_bglt BgL_auxz00_17938;

					{
						obj_t BgL_auxz00_17939;

						{	/* Cfa/cinfo2.scm 27 */
							BgL_objectz00_bglt BgL_tmpz00_17940;

							BgL_tmpz00_17940 = ((BgL_objectz00_bglt) BgL_new1557z00_9943);
							BgL_auxz00_17939 = BGL_OBJECT_WIDENING(BgL_tmpz00_17940);
						}
						BgL_auxz00_17938 =
							((BgL_prezd2arithmeticzd2appz00_bglt) BgL_auxz00_17939);
					}
					((((BgL_prezd2arithmeticzd2appz00_bglt) COBJECT(BgL_auxz00_17938))->
							BgL_speczd2typeszd2) =
						((obj_t) ((obj_t) BgL_speczd2types1141zd2_8846)), BUNSPEC);
				}
				return BgL_new1557z00_9943;
			}
		}

	}



/* &lambda2003 */
	obj_t BGl_z62lambda2003z62zzcfa_info2z00(obj_t BgL_envz00_8847,
		obj_t BgL_oz00_8848, obj_t BgL_vz00_8849)
	{
		{	/* Cfa/cinfo2.scm 27 */
			{
				BgL_prezd2arithmeticzd2appz00_bglt BgL_auxz00_17946;

				{
					obj_t BgL_auxz00_17947;

					{	/* Cfa/cinfo2.scm 27 */
						BgL_objectz00_bglt BgL_tmpz00_17948;

						BgL_tmpz00_17948 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8848));
						BgL_auxz00_17947 = BGL_OBJECT_WIDENING(BgL_tmpz00_17948);
					}
					BgL_auxz00_17946 =
						((BgL_prezd2arithmeticzd2appz00_bglt) BgL_auxz00_17947);
				}
				return
					((((BgL_prezd2arithmeticzd2appz00_bglt) COBJECT(BgL_auxz00_17946))->
						BgL_speczd2typeszd2) = ((obj_t) ((obj_t) BgL_vz00_8849)), BUNSPEC);
			}
		}

	}



/* &lambda2002 */
	obj_t BGl_z62lambda2002z62zzcfa_info2z00(obj_t BgL_envz00_8850,
		obj_t BgL_oz00_8851)
	{
		{	/* Cfa/cinfo2.scm 27 */
			{
				BgL_prezd2arithmeticzd2appz00_bglt BgL_auxz00_17955;

				{
					obj_t BgL_auxz00_17956;

					{	/* Cfa/cinfo2.scm 27 */
						BgL_objectz00_bglt BgL_tmpz00_17957;

						BgL_tmpz00_17957 =
							((BgL_objectz00_bglt) ((BgL_appz00_bglt) BgL_oz00_8851));
						BgL_auxz00_17956 = BGL_OBJECT_WIDENING(BgL_tmpz00_17957);
					}
					BgL_auxz00_17955 =
						((BgL_prezd2arithmeticzd2appz00_bglt) BgL_auxz00_17956);
				}
				return
					(((BgL_prezd2arithmeticzd2appz00_bglt) COBJECT(BgL_auxz00_17955))->
					BgL_speczd2typeszd2);
			}
		}

	}



/* generic-init */
	obj_t BGl_genericzd2initzd2zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.scm 16 */
			return BUNSPEC;
		}

	}



/* method-init */
	obj_t BGl_methodzd2initzd2zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.scm 16 */
			return BUNSPEC;
		}

	}



/* imported-modules-init */
	obj_t BGl_importedzd2moduleszd2initz00zzcfa_info2z00(void)
	{
		{	/* Cfa/cinfo2.scm 16 */
			BGl_modulezd2initializa7ationz75zztype_typez00(515343395L,
				BSTRING_TO_STRING(BGl_string3047z00zzcfa_info2z00));
			BGl_modulezd2initializa7ationz75zztype_cachez00(346491734L,
				BSTRING_TO_STRING(BGl_string3047z00zzcfa_info2z00));
			BGl_modulezd2initializa7ationz75zzast_varz00(90839984L,
				BSTRING_TO_STRING(BGl_string3047z00zzcfa_info2z00));
			BGl_modulezd2initializa7ationz75zzast_nodez00(469732712L,
				BSTRING_TO_STRING(BGl_string3047z00zzcfa_info2z00));
			return
				BGl_modulezd2initializa7ationz75zzcfa_infoz00(3788352L,
				BSTRING_TO_STRING(BGl_string3047z00zzcfa_info2z00));
		}

	}

#ifdef __cplusplus
}
#endif
