#include "run-time.h"

/* Typedefs for referenced classes */

#define  define__KLsimple_object_vectorGVKd(nrepeated) \
  typedef struct { \
    D wrapper; \
    D size_; \
    D vector_element_[nrepeated+1]; \
  } _KLsimple_object_vectorGVKd_##nrepeated;
define__KLsimple_object_vectorGVKd(1);
define__KLsimple_object_vectorGVKd(4);
define__KLsimple_object_vectorGVKd(0);

typedef struct {
  D wrapper;
  D instanceQ_iep_;
  D debug_name_;
  D class_implementation_class_;
  D class_subtype_bit_;
  D class_module_;
} _KLclassGVKd;

#define  define__KLmm_wrapperGVKi(nrepeated) \
  typedef struct { \
    D wrapper; \
    D mm_wrapper_implementation_class_; \
    D mm_wrapper_subtype_mask_; \
    DWORD mm_wrapper_fixed_part_; \
    DWORD mm_wrapper_variable_part_; \
    D mm_wrapper_number_patterns_; \
    DWORD mm_wrapper_pattern_element_[nrepeated+1]; \
  } _KLmm_wrapperGVKi_##nrepeated;
define__KLmm_wrapperGVKi(1);
define__KLmm_wrapperGVKi(0);

typedef struct {
  D wrapper;
} _KLunboundGVKe;

typedef struct {
  D wrapper;
} _KLbooleanGVKd;

typedef struct {
  D wrapper;
} _KLobjectGVKd;

typedef struct {
  D wrapper;
  D xep_;
  D function_signature_;
  D Pgf_cache_;
  D debug_name_;
  D generic_function_methods_;
  D discriminator_;
} _KLsealed_generic_functionGVKe;

typedef struct {
  D wrapper;
  D properties_;
  D engine_node_callback_;
  D engine_node_entry_point_;
  D cache_header_engine_node_next_;
  D cache_header_engine_node_parent_;
} _KLsimple_typechecked_cache_header_engine_nodeGVKg;

typedef struct {
  D wrapper;
  D properties_;
  D engine_node_callback_;
  D engine_node_entry_point_;
} _KLabsent_engine_nodeGVKg;

typedef struct {
  D wrapper;
  D instanceQ_iep_;
  D union_type1_;
  D union_type2_;
} _KLunionGVKe;

#define  define__KLsimple_closure_methodGVKi(nrepeated) \
  typedef struct { \
    D wrapper; \
    D xep_; \
    D function_signature_; \
    D mep_; \
    D environment_size_; \
    D environment_element_[nrepeated+1]; \
  } _KLsimple_closure_methodGVKi_##nrepeated;
define__KLsimple_closure_methodGVKi(0);

typedef struct {
  D wrapper;
  D instanceQ_iep_;
  D debug_name_;
  D class_implementation_class_;
  D class_subtype_bit_;
  D class_module_;
} _KLfunction_classGVKi;

typedef struct {
  D wrapper;
  D signature_properties_;
  D signature_required_;
} _KLsignatureGVKe;

typedef struct {
  D wrapper;
  D mangler_;
  D cg_variables_;
  D registers_;
  D variables_;
} _KLharp_x86_back_endGVharp_x86;

typedef struct {
  D wrapper;
  D op_name_;
  D op_properties_;
  D op_disallow_fn_;
  D op_prefer_fn_;
  D op_clash_fn_;
  D op_destroys_fn_;
  D op_c_preserved_destroys_fn_;
  D op_implicit_uses_;
  D op_spread_;
  D op_code_gen_fn_;
  D op_reverse_op_;
  D op_constant_fold_op_;
  D op_info_;
} _KLopGYharp_opVharp;

typedef struct {
  D wrapper;
} _KLintegerGVKd;

typedef struct {
  D wrapper;
  D head_;
  D tail_;
} _KLempty_listGVKd;

#define  define__KLbyte_stringGVKd(nrepeated) \
  typedef struct { \
    D wrapper; \
    D size_; \
    char string_element_[nrepeated+1]; \
  } _KLbyte_stringGVKd_##nrepeated;
define__KLbyte_stringGVKd(32);


/* Typedefs for defined classes */


/* Referenced object declarations */

D Kmodify_opYharp_opVharpMM0I (D, D, D, D, D, D, D, D, D, D, D, D, D, D, D, D, D, D, D, D, D, D, D, D, D, D);
extern _KLsimple_object_vectorGVKd_0 KPempty_vectorVKi;
extern _KLclassGVKd KLsimple_object_vectorGVKd;
extern _KLclassGVKd KLclassGVKd;
extern _KLmm_wrapperGVKi_0 KLclassGVKdW;
extern _KLclassGVKd KLmm_wrapperGVKi;
extern _KLmm_wrapperGVKi_1 KLmm_wrapperGVKiW;
extern _KLmm_wrapperGVKi_0 KLsimple_object_vectorGVKdW;
extern _KLunboundGVKe KPunboundVKi;
extern _KLclassGVKd KLunboundGVKe;
extern _KLmm_wrapperGVKi_0 KLunboundGVKeW;
extern _KLbooleanGVKd KPfalseVKi;
extern _KLclassGVKd KLbooleanGVKd;
extern _KLmm_wrapperGVKi_0 KLbooleanGVKdW;
extern _KLbooleanGVKd KPtrueVKi;
extern _KLclassGVKd KLobjectGVKd;
extern _KLmm_wrapperGVKi_0 KLobjectGVKdW;
extern _KLsealed_generic_functionGVKe Kpop_doubleVharp_x86;
extern _KLclassGVKd KLsealed_generic_functionGVKe;
extern _KLmm_wrapperGVKi_0 KLsealed_generic_functionGVKeW;
extern _KLsealed_generic_functionGVKe Kpop_singleVharp_x86;
extern _KLclassGVKd KLsimple_typechecked_cache_header_engine_nodeGVKg;
extern _KLmm_wrapperGVKi_0 KLsimple_typechecked_cache_header_engine_nodeGVKgW;
extern _KLabsent_engine_nodeGVKg RSINGULAR_Labsent_engine_nodeG;
extern _KLclassGVKd KLabsent_engine_nodeGVKg;
extern _KLmm_wrapperGVKi_0 KLabsent_engine_nodeGVKgW;
D Kpush_doubleVharp_x86MM0I (D, D);
D Kpush_singleVharp_x86MM0I (D, D);
extern _KLsealed_generic_functionGVKe KcolourYbase_harpVharp;
extern _KLunionGVKe KLf_icSspill_refGYharp_templatesVharp;
extern _KLclassGVKd KLunionGVKe;
extern _KLmm_wrapperGVKi_0 KLunionGVKeW;
D Kpattern_errorYbase_harpVharpMM0I (D);
D Kemit_1Ybase_harpVharpMM0I (D, D, D, D);
extern _KLfunction_classGVKi KLsimple_closure_methodGVKi;
extern _KLclassGVKd KLfunction_classGVKi;
extern _KLmm_wrapperGVKi_0 KLfunction_classGVKiW;
extern _KLmm_wrapperGVKi_0 KLsimple_closure_methodGVKiW;
extern _KLclassGVKd KLsignatureGVKe;
extern _KLmm_wrapperGVKi_0 KLsignatureGVKeW;
extern _KLclassGVKd KLharp_x86_back_endGVharp_x86;
extern _KLmm_wrapperGVKi_0 KLharp_x86_back_endGVharp_x86W;
extern _KLclassGVKd KLopGYharp_opVharp;
extern _KLmm_wrapperGVKi_0 KLopGYharp_opVharpW;
extern _KLunionGVKe KLdf_icSspill_refGYharp_templatesVharp;
extern _KLunionGVKe KLsf_icSspill_refGYharp_templatesVharp;
extern _KLclassGVKd KLintegerGVKd;
extern _KLmm_wrapperGVKi_0 KLintegerGVKdW;
D Kemit_fpu_resetVharp_x86MM0I (D);
D KerrorVKdMM1I (D, D);
extern _KLempty_listGVKd KPempty_listVKi;
extern _KLclassGVKd KLempty_listGVKd;
extern _KLmm_wrapperGVKi_0 KLempty_listGVKdW;
extern _KLclassGVKd KLbyte_stringGVKd;
extern _KLmm_wrapperGVKi_0 KLbyte_stringGVKdW;
extern D pentium_instructionsVharp_x86;

/* Defined object declarations */

static D Kdo_opF198I (D);
static D Kdo_opF197I (D);
static D Kdo_opF196I (D);
static D Kdo_opF195I (D);
static D Kdo_opF194I (D);
static D Kdo_opF193I (D);
static D Kdo_opF192I (D);
static D Kdo_opF191I (D);
static D Kdo_opF190I (D);
static D Kdo_opF189I (D);
static D Kdo_opF188I (D);
static D Kdo_opF187I (D);
static D Kdo_opF186I (D);
static D Kdo_opF185I (D);
static D Kdo_opF184I (D);
static D Kdo_opF183I (D);
static _KLsimple_closure_methodGVKi_0 K181;
static D K181I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K179;
static D K179I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K177;
static D K177I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K173;
static D K173I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K171;
static D K171I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K167;
static D K167I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K165;
static D K165I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K163;
static D K163I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K161;
static D K161I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K159;
static D K159I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K157;
static D K157I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K154;
static D K154I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K152;
static D K152I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K151;
static D K151I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K147;
static D K147I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K146;
static D K146I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K145;
static D K145I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K142;
static D K142I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K140;
static D K140I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K137;
static D K137I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K125;
static D K125I (D, D, D, D);
static _KLsimple_closure_methodGVKi_0 K110;
static D K110I (D, D, D, D);
D Kpush_floatVharp_x86MM0I (D, D, D);
D Kpop_floatVharp_x86MM0I (D, D, D);
static _KLsimple_typechecked_cache_header_engine_nodeGVKg K108;
static _KLsimple_typechecked_cache_header_engine_nodeGVKg K109;
D Kfpu_atanhVharp_x86MM0I (D);
D Kfpu_duplicateVharp_x86MM0I (D);
D Kfpu_push_1Vharp_x86MM0I (D);
D Kfpu_addVharp_x86MM0I (D);
D Kfpu_exchVharp_x86MM0I (D);
D Kfpu_subrVharp_x86MM0I (D);
D Kfpu_divVharp_x86MM0I (D);
D Kfpu_log_eVharp_x86MM0I (D);
D Kfpu_halveVharp_x86MM0I (D);
D Kfpu_push_2Vharp_x86MM0I (D);
D Kfpu_push_loge_2Vharp_x86MM0I (D);
D Kfpu_logarithmVharp_x86MM0I (D);
static _KLsignatureGVKe K123;
static _KLsimple_object_vectorGVKd_4 K124;
D Kfpu_tanhVharp_x86MM0I (D);
D Kfpu_raise_eVharp_x86MM0I (D);
D Kfpu_subVharp_x86MM0I (D);
D Kfpu_push_log2_eVharp_x86MM0I (D);
D Kfpu_mulVharp_x86MM0I (D);
D Kfpu_raiseVharp_x86MM0I (D);
D Kfpu_roundVharp_x86MM0I (D);
D Kfpu_exch2Vharp_x86MM0I (D);
D Kfpu_raise_mantVharp_x86MM0I (D);
D Kfpu_scaleVharp_x86MM0I (D);
D Kfpu_pop_downVharp_x86MM0I (D);
D Kfpu_coshVharp_x86MM0I (D);
D Kfpu_divrVharp_x86MM0I (D);
D Kfpu_sinhVharp_x86MM0I (D);
D Kfpu_extractVharp_x86MM0I (D);
D Kfpu_discardVharp_x86MM0I (D);
D Kfpu_one_minus_sqVharp_x86MM0I (D);
D Kfpu_raw_arctanVharp_x86MM0I (D);
D Kfpu_sqrtVharp_x86MM0I (D);
D Kfpu_atanVharp_x86MM0I (D);
D Kpush_constVharp_x86MM0I (D, D);
static _KLsimple_typechecked_cache_header_engine_nodeGVKg K156;
static _KLsimple_typechecked_cache_header_engine_nodeGVKg K158;
static _KLsimple_typechecked_cache_header_engine_nodeGVKg K160;
static _KLsimple_typechecked_cache_header_engine_nodeGVKg K162;
static _KLsimple_typechecked_cache_header_engine_nodeGVKg K164;
static _KLsimple_typechecked_cache_header_engine_nodeGVKg K166;
D Ki387_trans_codeVharp_x86MM0I (D);
static _KLsimple_typechecked_cache_header_engine_nodeGVKg K169;
static _KLbyte_stringGVKd_32 K170;
static _KLsimple_typechecked_cache_header_engine_nodeGVKg K172;
D Kfpu_tanVharp_x86MM0I (D);
static _KLsimple_typechecked_cache_header_engine_nodeGVKg K175;
D Kfpu_raw_tanVharp_x86MM0I (D);
static _KLsimple_typechecked_cache_header_engine_nodeGVKg K178;
static _KLsimple_typechecked_cache_header_engine_nodeGVKg K180;
static _KLsimple_typechecked_cache_header_engine_nodeGVKg K182;

/* Indirection variables */


/* Variables */


/* Objects */

static _KLsimple_closure_methodGVKi_0 K181 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K181I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K179 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K179I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K177 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K177I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K173 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K173I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K171 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K171I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K167 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K167I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K165 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K165I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K163 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K163I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K161 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K161I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K159 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K159I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K157 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K157I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K154 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K154I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K152 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K152I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K151 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K151I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K147 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K147I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K146 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K146I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K145 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K145I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K142 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K142I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K140 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K140I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K137 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K137I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K125 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K125I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 K110 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_4,
  &K123,
  &K110I,
  (D) 1
};

static _KLsimple_typechecked_cache_header_engine_nodeGVKg K108 = {
  &KLsimple_typechecked_cache_header_engine_nodeGVKgW /* wrapper */,
  (D) 65593,
  &KPfalseVKi,
  &cache_header_engine_2,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kpop_doubleVharp_x86
};

static _KLsimple_typechecked_cache_header_engine_nodeGVKg K109 = {
  &KLsimple_typechecked_cache_header_engine_nodeGVKgW /* wrapper */,
  (D) 65593,
  &KPfalseVKi,
  &cache_header_engine_2,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kpop_singleVharp_x86
};

static _KLsignatureGVKe K123 = {
  &KLsignatureGVKeW /* wrapper */,
  (D) 44040209,
  &K124
};

static _KLsimple_object_vectorGVKd_4 K124 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 17,
  &KLharp_x86_back_endGVharp_x86,
  &KLopGYharp_opVharp,
  &KLobjectGVKd,
  &KLobjectGVKd
};

static _KLsimple_typechecked_cache_header_engine_nodeGVKg K156 = {
  &KLsimple_typechecked_cache_header_engine_nodeGVKgW /* wrapper */,
  (D) 65593,
  &KPfalseVKi,
  &cache_header_engine_2,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kpop_doubleVharp_x86
};

static _KLsimple_typechecked_cache_header_engine_nodeGVKg K158 = {
  &KLsimple_typechecked_cache_header_engine_nodeGVKgW /* wrapper */,
  (D) 65593,
  &KPfalseVKi,
  &cache_header_engine_2,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kpop_singleVharp_x86
};

static _KLsimple_typechecked_cache_header_engine_nodeGVKg K160 = {
  &KLsimple_typechecked_cache_header_engine_nodeGVKgW /* wrapper */,
  (D) 65593,
  &KPfalseVKi,
  &cache_header_engine_2,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kpop_doubleVharp_x86
};

static _KLsimple_typechecked_cache_header_engine_nodeGVKg K162 = {
  &KLsimple_typechecked_cache_header_engine_nodeGVKgW /* wrapper */,
  (D) 65593,
  &KPfalseVKi,
  &cache_header_engine_2,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kpop_singleVharp_x86
};

static _KLsimple_typechecked_cache_header_engine_nodeGVKg K164 = {
  &KLsimple_typechecked_cache_header_engine_nodeGVKgW /* wrapper */,
  (D) 65593,
  &KPfalseVKi,
  &cache_header_engine_2,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kpop_doubleVharp_x86
};

static _KLsimple_typechecked_cache_header_engine_nodeGVKg K166 = {
  &KLsimple_typechecked_cache_header_engine_nodeGVKgW /* wrapper */,
  (D) 65593,
  &KPfalseVKi,
  &cache_header_engine_2,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kpop_singleVharp_x86
};

static _KLsimple_typechecked_cache_header_engine_nodeGVKg K169 = {
  &KLsimple_typechecked_cache_header_engine_nodeGVKgW /* wrapper */,
  (D) 65593,
  &KPfalseVKi,
  &cache_header_engine_2,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kpop_doubleVharp_x86
};

static _KLbyte_stringGVKd_32 K170 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 129,
  "Fell through select cases on %=."
};

static _KLsimple_typechecked_cache_header_engine_nodeGVKg K172 = {
  &KLsimple_typechecked_cache_header_engine_nodeGVKgW /* wrapper */,
  (D) 65593,
  &KPfalseVKi,
  &cache_header_engine_2,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kpop_singleVharp_x86
};

static _KLsimple_typechecked_cache_header_engine_nodeGVKg K175 = {
  &KLsimple_typechecked_cache_header_engine_nodeGVKgW /* wrapper */,
  (D) 65593,
  &KPfalseVKi,
  &cache_header_engine_2,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kpop_doubleVharp_x86
};

static _KLsimple_typechecked_cache_header_engine_nodeGVKg K178 = {
  &KLsimple_typechecked_cache_header_engine_nodeGVKgW /* wrapper */,
  (D) 65593,
  &KPfalseVKi,
  &cache_header_engine_2,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kpop_singleVharp_x86
};

static _KLsimple_typechecked_cache_header_engine_nodeGVKg K180 = {
  &KLsimple_typechecked_cache_header_engine_nodeGVKgW /* wrapper */,
  (D) 65593,
  &KPfalseVKi,
  &cache_header_engine_2,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kpop_doubleVharp_x86
};

static _KLsimple_typechecked_cache_header_engine_nodeGVKg K182 = {
  &KLsimple_typechecked_cache_header_engine_nodeGVKgW /* wrapper */,
  (D) 65593,
  &KPfalseVKi,
  &cache_header_engine_2,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kpop_singleVharp_x86
};

/* Code */

static D Kdo_opF198I (D op_) {
  D T1;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:185
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:185
  T1 = Kmodify_opYharp_opVharpMM0I(op_, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, (D) 901);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:185
  MV_SET_COUNT(0);
  return(T1);
}

static D Kdo_opF197I (D op_) {
  D T1;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:190
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:190
  T1 = Kmodify_opYharp_opVharpMM0I(op_, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, (D) 897);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:190
  MV_SET_COUNT(0);
  return(T1);
}

static D Kdo_opF196I (D op_) {
  D T1;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:195
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:195
  T1 = Kmodify_opYharp_opVharpMM0I(op_, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, (D) 1021);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:195
  MV_SET_COUNT(0);
  return(T1);
}

static D Kdo_opF195I (D op_) {
  D T1;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:200
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:200
  T1 = Kmodify_opYharp_opVharpMM0I(op_, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, (D) 1017);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:200
  MV_SET_COUNT(0);
  return(T1);
}

static D Kdo_opF194I (D op_) {
  D T1;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:205
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:205
  T1 = Kmodify_opYharp_opVharpMM0I(op_, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, (D) 1001);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:205
  MV_SET_COUNT(0);
  return(T1);
}

static D Kdo_opF193I (D op_) {
  D T1;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:210
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:210
  T1 = Kmodify_opYharp_opVharpMM0I(op_, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, (D) 969);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:210
  MV_SET_COUNT(0);
  return(T1);
}

static D Kdo_opF192I (D op_) {
  D T1;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:229
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:229
  T1 = Kmodify_opYharp_opVharpMM0I(op_, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, (D) 929);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:229
  MV_SET_COUNT(0);
  return(T1);
}

static D Kdo_opF191I (D op_) {
  D T1;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:234
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:234
  T1 = Kmodify_opYharp_opVharpMM0I(op_, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, (D) 945);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:234
  MV_SET_COUNT(0);
  return(T1);
}

static D Kdo_opF190I (D op_) {
  D T1;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:239
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:239
  T1 = Kmodify_opYharp_opVharpMM0I(op_, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, (D) 949);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:239
  MV_SET_COUNT(0);
  return(T1);
}

static D Kdo_opF189I (D op_) {
  D T1;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:244
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:244
  T1 = Kmodify_opYharp_opVharpMM0I(op_, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, (D) 949);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:244
  MV_SET_COUNT(0);
  return(T1);
}

static D Kdo_opF188I (D op_) {
  D T1;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:249
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:249
  T1 = Kmodify_opYharp_opVharpMM0I(op_, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, (D) 929);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:249
  MV_SET_COUNT(0);
  return(T1);
}

static D Kdo_opF187I (D op_) {
  D T1;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:254
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:254
  T1 = Kmodify_opYharp_opVharpMM0I(op_, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, (D) 933);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:254
  MV_SET_COUNT(0);
  return(T1);
}

static D Kdo_opF186I (D op_) {
  D T1;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:259
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:259
  T1 = Kmodify_opYharp_opVharpMM0I(op_, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, (D) 937);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:259
  MV_SET_COUNT(0);
  return(T1);
}

static D Kdo_opF185I (D op_) {
  D T1;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:264
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:264
  T1 = Kmodify_opYharp_opVharpMM0I(op_, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, (D) 937);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:264
  MV_SET_COUNT(0);
  return(T1);
}

static D Kdo_opF184I (D op_) {
  D T1;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:291
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:291
  T1 = Kmodify_opYharp_opVharpMM0I(op_, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPfalseVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:291
  MV_SET_COUNT(0);
  return(T1);
}

static D Kdo_opF183I (D op_) {
  D T1;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:295
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:295
  T1 = Kmodify_opYharp_opVharpMM0I(op_, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPtrueVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:295
  MV_SET_COUNT(0);
  return(T1);
}

static D K181I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  D T16;
  D T17;
  D T18;
  D T19;
  _KLsimple_object_vectorGVKd_4 T20 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:306
  T16 = SLOT_VALUE_INITD(a2D_, 12);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
  T17 = primitive_instanceQ(T16,&KLintegerGVKd);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
  if (T17 != &KPfalseVKi) {
    T13 = T16;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:306
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    d_ = CONGRUENT_CALL1(a3D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
    T18 = primitive_instanceQ(d_,&KLsf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
    if (T18 != &KPfalseVKi) {
      T14 = d_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:306
      CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
      s_ = CONGRUENT_CALL1(a4D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
      T19 = primitive_instanceQ(s_,&KLsf_icSspill_refGYharp_templatesVharp);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
      if (T19 != &KPfalseVKi) {
        T15 = s_;
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:307
        Kpush_singleVharp_x86MM0I(a1D_, T15);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:308
        Kemit_1Ybase_harpVharpMM0I(a1D_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:308
        Kemit_1Ybase_harpVharpMM0I(a1D_, T13, &KPempty_vectorVKi, &KPunboundVKi);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:309
        ENGINE_NODE_CALL_PROLOG(&Kpop_singleVharp_x86, &K182, 2);
        ENGINE_NODE_CALL2(&K182, a1D_, T14);
        T7 = &KPtrueVKi;
      } else {
        T7 = &KPfalseVKi;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
      T8 = T7;
    } else {
      T8 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
    T9 = T8;
  } else {
    T9 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
  if (T9 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
    T11 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T12 = T11;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
    T20.vector_element_[0] = a1D_;
    T20.vector_element_[1] = a2D_;
    T20.vector_element_[2] = a3D_;
    T20.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
    T10 = Kpattern_errorYbase_harpVharpMM0I(&T20);
    T12 = T10;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
  return(T12);
}

static D K179I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  D T16;
  D T17;
  D T18;
  D T19;
  _KLsimple_object_vectorGVKd_4 T20 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:317
  T16 = SLOT_VALUE_INITD(a2D_, 12);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
  T17 = primitive_instanceQ(T16,&KLintegerGVKd);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
  if (T17 != &KPfalseVKi) {
    T13 = T16;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:317
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    d_ = CONGRUENT_CALL1(a3D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
    T18 = primitive_instanceQ(d_,&KLdf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
    if (T18 != &KPfalseVKi) {
      T14 = d_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:317
      CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
      s_ = CONGRUENT_CALL1(a4D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
      T19 = primitive_instanceQ(s_,&KLdf_icSspill_refGYharp_templatesVharp);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
      if (T19 != &KPfalseVKi) {
        T15 = s_;
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:318
        Kpush_doubleVharp_x86MM0I(a1D_, T15);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:319
        Kemit_1Ybase_harpVharpMM0I(a1D_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:319
        Kemit_1Ybase_harpVharpMM0I(a1D_, T13, &KPempty_vectorVKi, &KPunboundVKi);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:320
        ENGINE_NODE_CALL_PROLOG(&Kpop_doubleVharp_x86, &K180, 2);
        ENGINE_NODE_CALL2(&K180, a1D_, T14);
        T7 = &KPtrueVKi;
      } else {
        T7 = &KPfalseVKi;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
      T8 = T7;
    } else {
      T8 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
    T9 = T8;
  } else {
    T9 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
  if (T9 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
    T11 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T12 = T11;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
    T20.vector_element_[0] = a1D_;
    T20.vector_element_[1] = a2D_;
    T20.vector_element_[2] = a3D_;
    T20.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
    T10 = Kpattern_errorYbase_harpVharpMM0I(&T20);
    T12 = T10;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
  return(T12);
}

static D K177I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  _KLsimple_object_vectorGVKd_4 T16 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:332
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:333
  CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
  d_ = CONGRUENT_CALL1(a3D_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:332
  T14 = primitive_instanceQ(d_,&KLsf_icSspill_refGYharp_templatesVharp);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:332
  if (T14 != &KPfalseVKi) {
    T12 = d_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:333
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    s_ = CONGRUENT_CALL1(a4D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:332
    T15 = primitive_instanceQ(s_,&KLsf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:332
    if (T15 != &KPfalseVKi) {
      T13 = s_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:334
      Kpush_singleVharp_x86MM0I(a1D_, T13);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:335
      Kfpu_tanVharp_x86MM0I(a1D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:336
      ENGINE_NODE_CALL_PROLOG(&Kpop_singleVharp_x86, &K178, 2);
      ENGINE_NODE_CALL2(&K178, a1D_, T12);
      T7 = &KPtrueVKi;
    } else {
      T7 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:332
    T8 = T7;
  } else {
    T8 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:332
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:332
  if (T8 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:332
    T10 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T11 = T10;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:332
    T16.vector_element_[0] = a1D_;
    T16.vector_element_[1] = a2D_;
    T16.vector_element_[2] = a3D_;
    T16.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:332
    T9 = Kpattern_errorYbase_harpVharpMM0I(&T16);
    T11 = T9;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:332
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:332
  return(T11);
}

static D K173I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  _KLsimple_object_vectorGVKd_4 T16 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:340
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:341
  CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
  d_ = CONGRUENT_CALL1(a3D_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:340
  T14 = primitive_instanceQ(d_,&KLdf_icSspill_refGYharp_templatesVharp);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:340
  if (T14 != &KPfalseVKi) {
    T12 = d_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:341
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    s_ = CONGRUENT_CALL1(a4D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:340
    T15 = primitive_instanceQ(s_,&KLdf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:340
    if (T15 != &KPfalseVKi) {
      T13 = s_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:342
      Kpush_doubleVharp_x86MM0I(a1D_, T13);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:343
      Kfpu_tanVharp_x86MM0I(a1D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:344
      ENGINE_NODE_CALL_PROLOG(&Kpop_doubleVharp_x86, &K175, 2);
      ENGINE_NODE_CALL2(&K175, a1D_, T12);
      T7 = &KPtrueVKi;
    } else {
      T7 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:340
    T8 = T7;
  } else {
    T8 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:340
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:340
  if (T8 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:340
    T10 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T11 = T10;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:340
    T16.vector_element_[0] = a1D_;
    T16.vector_element_[1] = a2D_;
    T16.vector_element_[2] = a3D_;
    T16.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:340
    T9 = Kpattern_errorYbase_harpVharpMM0I(&T16);
    T11 = T9;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:340
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:340
  return(T11);
}

static D K171I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  D T16;
  D T17;
  D T18;
  D T19;
  D T20;
  _KLsimple_object_vectorGVKd_4 T21 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:365
  T17 = SLOT_VALUE_INITD(a2D_, 12);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
  T18 = primitive_instanceQ(T17,&KLintegerGVKd);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
  if (T18 != &KPfalseVKi) {
    T14 = T17;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:365
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    d_ = CONGRUENT_CALL1(a3D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
    T19 = primitive_instanceQ(d_,&KLsf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
    if (T19 != &KPfalseVKi) {
      T15 = d_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:365
      CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
      s_ = CONGRUENT_CALL1(a4D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
      T20 = primitive_instanceQ(s_,&KLsf_icSspill_refGYharp_templatesVharp);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
      if (T20 != &KPfalseVKi) {
        T16 = s_;
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:366
        Kpush_constVharp_x86MM0I(a1D_, T14);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:367
        Kpush_singleVharp_x86MM0I(a1D_, T16);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:368
        Kemit_1Ybase_harpVharpMM0I(a1D_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:368
        T7 = Ki387_trans_codeVharp_x86MM0I(T14);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:368
        Kemit_1Ybase_harpVharpMM0I(a1D_, T7, &KPempty_vectorVKi, &KPunboundVKi);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:369
        ENGINE_NODE_CALL_PROLOG(&Kpop_singleVharp_x86, &K172, 2);
        ENGINE_NODE_CALL2(&K172, a1D_, T15);
        T8 = &KPtrueVKi;
      } else {
        T8 = &KPfalseVKi;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
      T9 = T8;
    } else {
      T9 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
    T10 = T9;
  } else {
    T10 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
  if (T10 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
    T12 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T13 = T12;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
    T21.vector_element_[0] = a1D_;
    T21.vector_element_[1] = a2D_;
    T21.vector_element_[2] = a3D_;
    T21.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
    T11 = Kpattern_errorYbase_harpVharpMM0I(&T21);
    T13 = T11;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
  return(T13);
}

static D K167I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  D T16;
  D T17;
  D T18;
  D T19;
  D T20;
  _KLsimple_object_vectorGVKd_4 T21 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:378
  T17 = SLOT_VALUE_INITD(a2D_, 12);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
  T18 = primitive_instanceQ(T17,&KLintegerGVKd);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
  if (T18 != &KPfalseVKi) {
    T14 = T17;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:378
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    d_ = CONGRUENT_CALL1(a3D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
    T19 = primitive_instanceQ(d_,&KLdf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
    if (T19 != &KPfalseVKi) {
      T15 = d_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:378
      CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
      s_ = CONGRUENT_CALL1(a4D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
      T20 = primitive_instanceQ(s_,&KLdf_icSspill_refGYharp_templatesVharp);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
      if (T20 != &KPfalseVKi) {
        T16 = s_;
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:379
        Kpush_constVharp_x86MM0I(a1D_, T14);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:380
        Kpush_doubleVharp_x86MM0I(a1D_, T16);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:381
        Kemit_1Ybase_harpVharpMM0I(a1D_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:381
        T7 = Ki387_trans_codeVharp_x86MM0I(T14);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:381
        Kemit_1Ybase_harpVharpMM0I(a1D_, T7, &KPempty_vectorVKi, &KPunboundVKi);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:382
        ENGINE_NODE_CALL_PROLOG(&Kpop_doubleVharp_x86, &K169, 2);
        ENGINE_NODE_CALL2(&K169, a1D_, T15);
        T8 = &KPtrueVKi;
      } else {
        T8 = &KPfalseVKi;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
      T9 = T8;
    } else {
      T9 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
    T10 = T9;
  } else {
    T10 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
  if (T10 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
    T12 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T13 = T12;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
    T21.vector_element_[0] = a1D_;
    T21.vector_element_[1] = a2D_;
    T21.vector_element_[2] = a3D_;
    T21.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
    T11 = Kpattern_errorYbase_harpVharpMM0I(&T21);
    T13 = T11;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
  return(T13);
}

static D K165I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  _KLsimple_object_vectorGVKd_4 T16 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:388
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:389
  CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
  d_ = CONGRUENT_CALL1(a3D_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:388
  T14 = primitive_instanceQ(d_,&KLsf_icSspill_refGYharp_templatesVharp);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:388
  if (T14 != &KPfalseVKi) {
    T12 = d_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:389
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    s_ = CONGRUENT_CALL1(a4D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:388
    T15 = primitive_instanceQ(s_,&KLsf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:388
    if (T15 != &KPfalseVKi) {
      T13 = s_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:390
      Kpush_constVharp_x86MM0I(a1D_, (D) 949);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:391
      Kpush_singleVharp_x86MM0I(a1D_, T13);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:392
      Kemit_1Ybase_harpVharpMM0I(a1D_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:392
      Kemit_1Ybase_harpVharpMM0I(a1D_, (D) 997, &KPempty_vectorVKi, &KPunboundVKi);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:393
      ENGINE_NODE_CALL_PROLOG(&Kpop_singleVharp_x86, &K166, 2);
      ENGINE_NODE_CALL2(&K166, a1D_, T12);
      T7 = &KPtrueVKi;
    } else {
      T7 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:388
    T8 = T7;
  } else {
    T8 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:388
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:388
  if (T8 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:388
    T10 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T11 = T10;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:388
    T16.vector_element_[0] = a1D_;
    T16.vector_element_[1] = a2D_;
    T16.vector_element_[2] = a3D_;
    T16.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:388
    T9 = Kpattern_errorYbase_harpVharpMM0I(&T16);
    T11 = T9;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:388
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:388
  return(T11);
}

static D K163I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  _KLsimple_object_vectorGVKd_4 T16 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:397
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:398
  CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
  d_ = CONGRUENT_CALL1(a3D_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:397
  T14 = primitive_instanceQ(d_,&KLdf_icSspill_refGYharp_templatesVharp);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:397
  if (T14 != &KPfalseVKi) {
    T12 = d_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:398
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    s_ = CONGRUENT_CALL1(a4D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:397
    T15 = primitive_instanceQ(s_,&KLdf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:397
    if (T15 != &KPfalseVKi) {
      T13 = s_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:399
      Kpush_constVharp_x86MM0I(a1D_, (D) 949);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:400
      Kpush_doubleVharp_x86MM0I(a1D_, T13);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:401
      Kemit_1Ybase_harpVharpMM0I(a1D_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:401
      Kemit_1Ybase_harpVharpMM0I(a1D_, (D) 997, &KPempty_vectorVKi, &KPunboundVKi);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:402
      ENGINE_NODE_CALL_PROLOG(&Kpop_doubleVharp_x86, &K164, 2);
      ENGINE_NODE_CALL2(&K164, a1D_, T12);
      T7 = &KPtrueVKi;
    } else {
      T7 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:397
    T8 = T7;
  } else {
    T8 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:397
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:397
  if (T8 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:397
    T10 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T11 = T10;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:397
    T16.vector_element_[0] = a1D_;
    T16.vector_element_[1] = a2D_;
    T16.vector_element_[2] = a3D_;
    T16.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:397
    T9 = Kpattern_errorYbase_harpVharpMM0I(&T16);
    T11 = T9;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:397
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:397
  return(T11);
}

static D K161I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  D T16;
  D T17;
  D T18;
  D T19;
  _KLsimple_object_vectorGVKd_4 T20 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:417
  T16 = SLOT_VALUE_INITD(a2D_, 12);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
  T17 = primitive_instanceQ(T16,&KLintegerGVKd);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
  if (T17 != &KPfalseVKi) {
    T13 = T16;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:417
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    d_ = CONGRUENT_CALL1(a3D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
    T18 = primitive_instanceQ(d_,&KLsf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
    if (T18 != &KPfalseVKi) {
      T14 = d_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:417
      CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
      s_ = CONGRUENT_CALL1(a4D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
      T19 = primitive_instanceQ(s_,&KLsf_icSspill_refGYharp_templatesVharp);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
      if (T19 != &KPfalseVKi) {
        T15 = s_;
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:418
        Kemit_fpu_resetVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:420
        Kpush_singleVharp_x86MM0I(a1D_, T15);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:421
        Kpush_constVharp_x86MM0I(a1D_, T13);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:422
        Kfpu_mulVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:423
        Kfpu_raiseVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:424
        ENGINE_NODE_CALL_PROLOG(&Kpop_singleVharp_x86, &K162, 2);
        ENGINE_NODE_CALL2(&K162, a1D_, T14);
        T7 = &KPtrueVKi;
      } else {
        T7 = &KPfalseVKi;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
      T8 = T7;
    } else {
      T8 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
    T9 = T8;
  } else {
    T9 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
  if (T9 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
    T11 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T12 = T11;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
    T20.vector_element_[0] = a1D_;
    T20.vector_element_[1] = a2D_;
    T20.vector_element_[2] = a3D_;
    T20.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
    T10 = Kpattern_errorYbase_harpVharpMM0I(&T20);
    T12 = T10;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
  return(T12);
}

static D K159I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  D T16;
  D T17;
  D T18;
  D T19;
  _KLsimple_object_vectorGVKd_4 T20 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:433
  T16 = SLOT_VALUE_INITD(a2D_, 12);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
  T17 = primitive_instanceQ(T16,&KLintegerGVKd);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
  if (T17 != &KPfalseVKi) {
    T13 = T16;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:433
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    d_ = CONGRUENT_CALL1(a3D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
    T18 = primitive_instanceQ(d_,&KLdf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
    if (T18 != &KPfalseVKi) {
      T14 = d_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:433
      CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
      s_ = CONGRUENT_CALL1(a4D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
      T19 = primitive_instanceQ(s_,&KLdf_icSspill_refGYharp_templatesVharp);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
      if (T19 != &KPfalseVKi) {
        T15 = s_;
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:434
        Kemit_fpu_resetVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:436
        Kpush_doubleVharp_x86MM0I(a1D_, T15);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:437
        Kpush_constVharp_x86MM0I(a1D_, T13);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:438
        Kfpu_mulVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:439
        Kfpu_raiseVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:440
        ENGINE_NODE_CALL_PROLOG(&Kpop_doubleVharp_x86, &K160, 2);
        ENGINE_NODE_CALL2(&K160, a1D_, T14);
        T7 = &KPtrueVKi;
      } else {
        T7 = &KPfalseVKi;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
      T8 = T7;
    } else {
      T8 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
    T9 = T8;
  } else {
    T9 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
  if (T9 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
    T11 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T12 = T11;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
    T20.vector_element_[0] = a1D_;
    T20.vector_element_[1] = a2D_;
    T20.vector_element_[2] = a3D_;
    T20.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
    T10 = Kpattern_errorYbase_harpVharpMM0I(&T20);
    T12 = T10;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
  return(T12);
}

static D K157I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  _KLsimple_object_vectorGVKd_4 T16 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:446
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:447
  CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
  d_ = CONGRUENT_CALL1(a3D_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:446
  T14 = primitive_instanceQ(d_,&KLsf_icSspill_refGYharp_templatesVharp);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:446
  if (T14 != &KPfalseVKi) {
    T12 = d_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:447
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    s_ = CONGRUENT_CALL1(a4D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:446
    T15 = primitive_instanceQ(s_,&KLsf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:446
    if (T15 != &KPfalseVKi) {
      T13 = s_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:448
      Kpush_singleVharp_x86MM0I(a1D_, T13);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:449
      Kpush_constVharp_x86MM0I(a1D_, (D) 937);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:450
      Kfpu_mulVharp_x86MM0I(a1D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:451
      Kfpu_raise_mantVharp_x86MM0I(a1D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:452
      ENGINE_NODE_CALL_PROLOG(&Kpop_singleVharp_x86, &K158, 2);
      ENGINE_NODE_CALL2(&K158, a1D_, T12);
      T7 = &KPtrueVKi;
    } else {
      T7 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:446
    T8 = T7;
  } else {
    T8 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:446
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:446
  if (T8 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:446
    T10 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T11 = T10;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:446
    T16.vector_element_[0] = a1D_;
    T16.vector_element_[1] = a2D_;
    T16.vector_element_[2] = a3D_;
    T16.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:446
    T9 = Kpattern_errorYbase_harpVharpMM0I(&T16);
    T11 = T9;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:446
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:446
  return(T11);
}

static D K154I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  _KLsimple_object_vectorGVKd_4 T16 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:456
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:457
  CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
  d_ = CONGRUENT_CALL1(a3D_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:456
  T14 = primitive_instanceQ(d_,&KLdf_icSspill_refGYharp_templatesVharp);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:456
  if (T14 != &KPfalseVKi) {
    T12 = d_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:457
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    s_ = CONGRUENT_CALL1(a4D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:456
    T15 = primitive_instanceQ(s_,&KLdf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:456
    if (T15 != &KPfalseVKi) {
      T13 = s_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:458
      Kpush_doubleVharp_x86MM0I(a1D_, T13);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:459
      Kpush_constVharp_x86MM0I(a1D_, (D) 937);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:460
      Kfpu_mulVharp_x86MM0I(a1D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:461
      Kfpu_raise_mantVharp_x86MM0I(a1D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:462
      ENGINE_NODE_CALL_PROLOG(&Kpop_doubleVharp_x86, &K156, 2);
      ENGINE_NODE_CALL2(&K156, a1D_, T12);
      T7 = &KPtrueVKi;
    } else {
      T7 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:456
    T8 = T7;
  } else {
    T8 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:456
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:456
  if (T8 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:456
    T10 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T11 = T10;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:456
    T16.vector_element_[0] = a1D_;
    T16.vector_element_[1] = a2D_;
    T16.vector_element_[2] = a3D_;
    T16.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:456
    T9 = Kpattern_errorYbase_harpVharpMM0I(&T16);
    T11 = T9;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:456
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:456
  return(T11);
}

static D K152I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  D T16;
  D T17;
  D T18;
  D T19;
  _KLsimple_object_vectorGVKd_4 T20 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:470
  T16 = SLOT_VALUE_INITD(a2D_, 12);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
  T17 = primitive_instanceQ(T16,&KLbooleanGVKd);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
  if (T17 != &KPfalseVKi) {
    T13 = T16;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:470
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    d_ = CONGRUENT_CALL1(a3D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
    T18 = primitive_instanceQ(d_,&KLf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
    if (T18 != &KPfalseVKi) {
      T14 = d_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:470
      CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
      s_ = CONGRUENT_CALL1(a4D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
      T19 = primitive_instanceQ(s_,&KLf_icSspill_refGYharp_templatesVharp);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
      if (T19 != &KPfalseVKi) {
        T15 = s_;
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:471
        Kpush_floatVharp_x86MM0I(a1D_, T13, T15);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:472
        Kfpu_atanVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:473
        Kpop_floatVharp_x86MM0I(a1D_, T13, T14);
        T7 = &KPtrueVKi;
      } else {
        T7 = &KPfalseVKi;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
      T8 = T7;
    } else {
      T8 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
    T9 = T8;
  } else {
    T9 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
  if (T9 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
    T11 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T12 = T11;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
    T20.vector_element_[0] = a1D_;
    T20.vector_element_[1] = a2D_;
    T20.vector_element_[2] = a3D_;
    T20.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
    T10 = Kpattern_errorYbase_harpVharpMM0I(&T20);
    T12 = T10;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
  return(T12);
}

static D K151I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  D T16;
  D T17;
  D T18;
  D T19;
  _KLsimple_object_vectorGVKd_4 T20 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:482
  T16 = SLOT_VALUE_INITD(a2D_, 12);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
  T17 = primitive_instanceQ(T16,&KLbooleanGVKd);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
  if (T17 != &KPfalseVKi) {
    T13 = T16;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:482
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    d_ = CONGRUENT_CALL1(a3D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
    T18 = primitive_instanceQ(d_,&KLf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
    if (T18 != &KPfalseVKi) {
      T14 = d_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:482
      CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
      s_ = CONGRUENT_CALL1(a4D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
      T19 = primitive_instanceQ(s_,&KLf_icSspill_refGYharp_templatesVharp);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
      if (T19 != &KPfalseVKi) {
        T15 = s_;
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:483
        Kpush_floatVharp_x86MM0I(a1D_, T13, T15);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:484
        Kfpu_duplicateVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:485
        Kfpu_one_minus_sqVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:486
        Kfpu_raw_arctanVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:487
        Kpop_floatVharp_x86MM0I(a1D_, T13, T14);
        T7 = &KPtrueVKi;
      } else {
        T7 = &KPfalseVKi;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
      T8 = T7;
    } else {
      T8 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
    T9 = T8;
  } else {
    T9 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
  if (T9 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
    T11 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T12 = T11;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
    T20.vector_element_[0] = a1D_;
    T20.vector_element_[1] = a2D_;
    T20.vector_element_[2] = a3D_;
    T20.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
    T10 = Kpattern_errorYbase_harpVharpMM0I(&T20);
    T12 = T10;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
  return(T12);
}

static D K147I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  D T16;
  D T17;
  D T18;
  D T19;
  _KLsimple_object_vectorGVKd_4 T20 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:496
  T16 = SLOT_VALUE_INITD(a2D_, 12);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
  T17 = primitive_instanceQ(T16,&KLbooleanGVKd);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
  if (T17 != &KPfalseVKi) {
    T13 = T16;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:496
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    d_ = CONGRUENT_CALL1(a3D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
    T18 = primitive_instanceQ(d_,&KLf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
    if (T18 != &KPfalseVKi) {
      T14 = d_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:496
      CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
      s_ = CONGRUENT_CALL1(a4D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
      T19 = primitive_instanceQ(s_,&KLf_icSspill_refGYharp_templatesVharp);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
      if (T19 != &KPfalseVKi) {
        T15 = s_;
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:497
        Kpush_floatVharp_x86MM0I(a1D_, T13, T15);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:498
        Kfpu_duplicateVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:499
        Kfpu_one_minus_sqVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:500
        Kfpu_exchVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:501
        Kfpu_raw_arctanVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:502
        Kpop_floatVharp_x86MM0I(a1D_, T13, T14);
        T7 = &KPtrueVKi;
      } else {
        T7 = &KPfalseVKi;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
      T8 = T7;
    } else {
      T8 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
    T9 = T8;
  } else {
    T9 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
  if (T9 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
    T11 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T12 = T11;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
    T20.vector_element_[0] = a1D_;
    T20.vector_element_[1] = a2D_;
    T20.vector_element_[2] = a3D_;
    T20.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
    T10 = Kpattern_errorYbase_harpVharpMM0I(&T20);
    T12 = T10;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
  return(T12);
}

static D K146I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  D T16;
  D T17;
  D T18;
  D T19;
  _KLsimple_object_vectorGVKd_4 T20 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:512
  T16 = SLOT_VALUE_INITD(a2D_, 12);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
  T17 = primitive_instanceQ(T16,&KLbooleanGVKd);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
  if (T17 != &KPfalseVKi) {
    T13 = T16;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:512
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    d_ = CONGRUENT_CALL1(a3D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
    T18 = primitive_instanceQ(d_,&KLf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
    if (T18 != &KPfalseVKi) {
      T14 = d_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:512
      CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
      s_ = CONGRUENT_CALL1(a4D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
      T19 = primitive_instanceQ(s_,&KLf_icSspill_refGYharp_templatesVharp);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
      if (T19 != &KPfalseVKi) {
        T15 = s_;
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:513
        Kpush_floatVharp_x86MM0I(a1D_, T13, T15);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:514
        Kfpu_roundVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:515
        Kpop_floatVharp_x86MM0I(a1D_, T13, T14);
        T7 = &KPtrueVKi;
      } else {
        T7 = &KPfalseVKi;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
      T8 = T7;
    } else {
      T8 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
    T9 = T8;
  } else {
    T9 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
  if (T9 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
    T11 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T12 = T11;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
    T20.vector_element_[0] = a1D_;
    T20.vector_element_[1] = a2D_;
    T20.vector_element_[2] = a3D_;
    T20.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
    T10 = Kpattern_errorYbase_harpVharpMM0I(&T20);
    T12 = T10;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
  return(T12);
}

static D K145I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  D T16;
  D T17;
  D T18;
  D T19;
  _KLsimple_object_vectorGVKd_4 T20 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:524
  T16 = SLOT_VALUE_INITD(a2D_, 12);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
  T17 = primitive_instanceQ(T16,&KLbooleanGVKd);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
  if (T17 != &KPfalseVKi) {
    T13 = T16;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:524
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    d_ = CONGRUENT_CALL1(a3D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
    T18 = primitive_instanceQ(d_,&KLf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
    if (T18 != &KPfalseVKi) {
      T14 = d_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:524
      CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
      s_ = CONGRUENT_CALL1(a4D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
      T19 = primitive_instanceQ(s_,&KLf_icSspill_refGYharp_templatesVharp);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
      if (T19 != &KPfalseVKi) {
        T15 = s_;
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:525
        Kpush_floatVharp_x86MM0I(a1D_, T13, T15);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:526
        Kfpu_extractVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:527
        Kpop_floatVharp_x86MM0I(a1D_, T13, T14);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:528
        Kfpu_discardVharp_x86MM0I(a1D_);
        T7 = &KPtrueVKi;
      } else {
        T7 = &KPfalseVKi;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
      T8 = T7;
    } else {
      T8 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
    T9 = T8;
  } else {
    T9 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
  if (T9 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
    T11 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T12 = T11;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
    T20.vector_element_[0] = a1D_;
    T20.vector_element_[1] = a2D_;
    T20.vector_element_[2] = a3D_;
    T20.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
    T10 = Kpattern_errorYbase_harpVharpMM0I(&T20);
    T12 = T10;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
  return(T12);
}

static D K142I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  D T16;
  D T17;
  D T18;
  D T19;
  _KLsimple_object_vectorGVKd_4 T20 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:537
  T16 = SLOT_VALUE_INITD(a2D_, 12);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
  T17 = primitive_instanceQ(T16,&KLbooleanGVKd);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
  if (T17 != &KPfalseVKi) {
    T13 = T16;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:537
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    d_ = CONGRUENT_CALL1(a3D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
    T18 = primitive_instanceQ(d_,&KLf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
    if (T18 != &KPfalseVKi) {
      T14 = d_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:537
      CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
      s_ = CONGRUENT_CALL1(a4D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
      T19 = primitive_instanceQ(s_,&KLf_icSspill_refGYharp_templatesVharp);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
      if (T19 != &KPfalseVKi) {
        T15 = s_;
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:538
        Kpush_floatVharp_x86MM0I(a1D_, T13, T15);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:539
        Kfpu_extractVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:540
        Kfpu_discardVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:541
        Kpop_floatVharp_x86MM0I(a1D_, T13, T14);
        T7 = &KPtrueVKi;
      } else {
        T7 = &KPfalseVKi;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
      T8 = T7;
    } else {
      T8 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
    T9 = T8;
  } else {
    T9 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
  if (T9 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
    T11 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T12 = T11;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
    T20.vector_element_[0] = a1D_;
    T20.vector_element_[1] = a2D_;
    T20.vector_element_[2] = a3D_;
    T20.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
    T10 = Kpattern_errorYbase_harpVharpMM0I(&T20);
    T12 = T10;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
  return(T12);
}

static D K140I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  D T16;
  D T17;
  D T18;
  D T19;
  _KLsimple_object_vectorGVKd_4 T20 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:550
  T16 = SLOT_VALUE_INITD(a2D_, 12);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
  T17 = primitive_instanceQ(T16,&KLbooleanGVKd);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
  if (T17 != &KPfalseVKi) {
    T13 = T16;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:550
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    d_ = CONGRUENT_CALL1(a3D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
    T18 = primitive_instanceQ(d_,&KLf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
    if (T18 != &KPfalseVKi) {
      T14 = d_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:550
      CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
      s_ = CONGRUENT_CALL1(a4D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
      T19 = primitive_instanceQ(s_,&KLf_icSspill_refGYharp_templatesVharp);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
      if (T19 != &KPfalseVKi) {
        T15 = s_;
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:551
        Kpush_floatVharp_x86MM0I(a1D_, T13, T15);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:552
        Kfpu_sinhVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:553
        Kpop_floatVharp_x86MM0I(a1D_, T13, T14);
        T7 = &KPtrueVKi;
      } else {
        T7 = &KPfalseVKi;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
      T8 = T7;
    } else {
      T8 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
    T9 = T8;
  } else {
    T9 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
  if (T9 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
    T11 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T12 = T11;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
    T20.vector_element_[0] = a1D_;
    T20.vector_element_[1] = a2D_;
    T20.vector_element_[2] = a3D_;
    T20.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
    T10 = Kpattern_errorYbase_harpVharpMM0I(&T20);
    T12 = T10;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
  return(T12);
}

static D K137I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  D T16;
  D T17;
  D T18;
  D T19;
  _KLsimple_object_vectorGVKd_4 T20 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:562
  T16 = SLOT_VALUE_INITD(a2D_, 12);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
  T17 = primitive_instanceQ(T16,&KLbooleanGVKd);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
  if (T17 != &KPfalseVKi) {
    T13 = T16;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:562
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    d_ = CONGRUENT_CALL1(a3D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
    T18 = primitive_instanceQ(d_,&KLf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
    if (T18 != &KPfalseVKi) {
      T14 = d_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:562
      CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
      s_ = CONGRUENT_CALL1(a4D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
      T19 = primitive_instanceQ(s_,&KLf_icSspill_refGYharp_templatesVharp);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
      if (T19 != &KPfalseVKi) {
        T15 = s_;
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:563
        Kpush_floatVharp_x86MM0I(a1D_, T13, T15);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:564
        Kfpu_coshVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:565
        Kpop_floatVharp_x86MM0I(a1D_, T13, T14);
        T7 = &KPtrueVKi;
      } else {
        T7 = &KPfalseVKi;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
      T8 = T7;
    } else {
      T8 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
    T9 = T8;
  } else {
    T9 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
  if (T9 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
    T11 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T12 = T11;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
    T20.vector_element_[0] = a1D_;
    T20.vector_element_[1] = a2D_;
    T20.vector_element_[2] = a3D_;
    T20.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
    T10 = Kpattern_errorYbase_harpVharpMM0I(&T20);
    T12 = T10;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
  return(T12);
}

static D K125I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  D T16;
  D T17;
  D T18;
  D T19;
  _KLsimple_object_vectorGVKd_4 T20 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:574
  T16 = SLOT_VALUE_INITD(a2D_, 12);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
  T17 = primitive_instanceQ(T16,&KLbooleanGVKd);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
  if (T17 != &KPfalseVKi) {
    T13 = T16;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:574
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    d_ = CONGRUENT_CALL1(a3D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
    T18 = primitive_instanceQ(d_,&KLf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
    if (T18 != &KPfalseVKi) {
      T14 = d_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:574
      CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
      s_ = CONGRUENT_CALL1(a4D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
      T19 = primitive_instanceQ(s_,&KLf_icSspill_refGYharp_templatesVharp);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
      if (T19 != &KPfalseVKi) {
        T15 = s_;
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:575
        Kpush_floatVharp_x86MM0I(a1D_, T13, T15);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:576
        Kfpu_tanhVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:577
        Kpop_floatVharp_x86MM0I(a1D_, T13, T14);
        T7 = &KPtrueVKi;
      } else {
        T7 = &KPfalseVKi;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
      T8 = T7;
    } else {
      T8 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
    T9 = T8;
  } else {
    T9 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
  if (T9 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
    T11 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T12 = T11;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
    T20.vector_element_[0] = a1D_;
    T20.vector_element_[1] = a2D_;
    T20.vector_element_[2] = a3D_;
    T20.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
    T10 = Kpattern_errorYbase_harpVharpMM0I(&T20);
    T12 = T10;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
  return(T12);
}

static D K110I (D a1D_, D a2D_, D a3D_, D a4D_) {
  D d_;
  D s_;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  D T16;
  D T17;
  D T18;
  D T19;
  _KLsimple_object_vectorGVKd_4 T20 = {&KLsimple_object_vectorGVKdW, (D) 17};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:586
  T16 = SLOT_VALUE_INITD(a2D_, 12);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
  T17 = primitive_instanceQ(T16,&KLbooleanGVKd);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
  if (T17 != &KPfalseVKi) {
    T13 = T16;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:586
    CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
    d_ = CONGRUENT_CALL1(a3D_);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
    T18 = primitive_instanceQ(d_,&KLf_icSspill_refGYharp_templatesVharp);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
    if (T18 != &KPfalseVKi) {
      T14 = d_;
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:586
      CONGRUENT_CALL_PROLOG(&KcolourYbase_harpVharp, 1);
      s_ = CONGRUENT_CALL1(a4D_);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
      T19 = primitive_instanceQ(s_,&KLf_icSspill_refGYharp_templatesVharp);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
      if (T19 != &KPfalseVKi) {
        T15 = s_;
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:587
        Kpush_floatVharp_x86MM0I(a1D_, T13, T15);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:588
        Kfpu_atanhVharp_x86MM0I(a1D_);
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:589
        Kpop_floatVharp_x86MM0I(a1D_, T13, T14);
        T7 = &KPtrueVKi;
      } else {
        T7 = &KPfalseVKi;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
      T8 = T7;
    } else {
      T8 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
    T9 = T8;
  } else {
    T9 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
  if (T9 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
    T11 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T12 = T11;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
    T20.vector_element_[0] = a1D_;
    T20.vector_element_[1] = a2D_;
    T20.vector_element_[2] = a3D_;
    T20.vector_element_[3] = a4D_;
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
    T10 = Kpattern_errorYbase_harpVharpMM0I(&T20);
    T12 = T10;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
  return(T12);
}

D Kpush_floatVharp_x86MM0I (D be_, D d_, D s_) {
  D T4;
  D T5;
  D T6;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:173
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:174
  if (d_ != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:174
    T4 = Kpush_doubleVharp_x86MM0I(be_, s_);
    T6 = T4;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:174
    T5 = Kpush_singleVharp_x86MM0I(be_, s_);
    T6 = T5;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:174
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:173
  return(T6);
}

D Kpop_floatVharp_x86MM0I (D be_, D d_, D s_) {
  D T4;
  D T5;
  D T6;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:177
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:178
  if (d_ != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:178
    ENGINE_NODE_CALL_PROLOG(&Kpop_doubleVharp_x86, &K108, 2);
    T5 = ENGINE_NODE_CALL2(&K108, be_, s_);
    T4 = T5;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:178
    ENGINE_NODE_CALL_PROLOG(&Kpop_singleVharp_x86, &K109, 2);
    T6 = ENGINE_NODE_CALL2(&K109, be_, s_);
    T4 = T6;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:178
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:177
  return(T4);
}

D Kfpu_atanhVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:166
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:167
  Kfpu_duplicateVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:167
  Kfpu_push_1Vharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:167
  Kfpu_addVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:168
  Kfpu_exchVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:168
  Kfpu_push_1Vharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:168
  Kfpu_subrVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:168
  Kfpu_divVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:169
  Kfpu_log_eVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:169
  T2 = Kfpu_halveVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:166
  return(T2);
}

D Kfpu_duplicateVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:10
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:11
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:11
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 769, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:10
  return(T2);
}

D Kfpu_push_1Vharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:18
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:19
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:19
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 929, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:18
  return(T2);
}

D Kfpu_addVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:46
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:47
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 889, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:47
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 773, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:46
  return(T2);
}

D Kfpu_exchVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:86
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:87
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:87
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 805, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:86
  return(T2);
}

D Kfpu_subrVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:54
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:55
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 889, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:55
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 901, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:54
  return(T2);
}

D Kfpu_divVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:62
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:63
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 889, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:63
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 997, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:62
  return(T2);
}

D Kfpu_log_eVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:141
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:142
  Kfpu_push_loge_2Vharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:142
  Kfpu_exchVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:142
  T2 = Kfpu_logarithmVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:141
  return(T2);
}

D Kfpu_halveVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:70
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:71
  Kfpu_push_2Vharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:71
  T2 = Kfpu_divVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:70
  return(T2);
}

D Kfpu_push_2Vharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:42
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:43
  Kfpu_push_1Vharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:43
  Kfpu_duplicateVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:43
  T2 = Kfpu_addVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:42
  return(T2);
}

D Kfpu_push_loge_2Vharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:38
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:39
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:39
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 949, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:38
  return(T2);
}

D Kfpu_logarithmVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:110
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:111
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:111
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 965, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:110
  return(T2);
}

D Kfpu_tanhVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:160
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:161
  Kfpu_duplicateVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:161
  Kfpu_addVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:161
  Kfpu_raise_eVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:162
  Kfpu_duplicateVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:162
  Kfpu_push_1Vharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:162
  Kfpu_subVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:163
  Kfpu_exchVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:163
  Kfpu_push_1Vharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:163
  Kfpu_addVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:163
  T2 = Kfpu_divVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:160
  return(T2);
}

D Kfpu_raise_eVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:137
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:138
  Kfpu_push_log2_eVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:138
  Kfpu_mulVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:138
  T2 = Kfpu_raiseVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:137
  return(T2);
}

D Kfpu_subVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:50
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:51
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 889, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:51
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 933, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:50
  return(T2);
}

D Kfpu_push_log2_eVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:30
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:31
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:31
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 937, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:30
  return(T2);
}

D Kfpu_mulVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:58
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:59
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 889, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:59
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 805, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:58
  return(T2);
}

D Kfpu_raiseVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:130
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:131
  Kfpu_duplicateVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:131
  Kfpu_roundVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:131
  Kfpu_duplicateVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:132
  Kfpu_exch2Vharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:132
  Kfpu_subrVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:132
  Kfpu_raise_mantVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:133
  Kfpu_push_1Vharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:133
  Kfpu_addVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:133
  Kfpu_scaleVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:134
  T2 = Kfpu_pop_downVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:130
  return(T2);
}

D Kfpu_roundVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:94
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:95
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:95
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 1009, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:94
  return(T2);
}

D Kfpu_exch2Vharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:90
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:91
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:91
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 809, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:90
  return(T2);
}

D Kfpu_raise_mantVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:106
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:107
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:107
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 961, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:106
  return(T2);
}

D Kfpu_scaleVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:102
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:103
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:103
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 1013, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:102
  return(T2);
}

D Kfpu_pop_downVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:82
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:83
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 885, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:83
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:82
  return(T2);
}

D Kfpu_coshVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:155
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:156
  Kfpu_raise_eVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:156
  Kfpu_duplicateVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:156
  Kfpu_push_1Vharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:157
  Kfpu_divrVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:157
  Kfpu_addVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:157
  T2 = Kfpu_halveVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:155
  return(T2);
}

D Kfpu_divrVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:66
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:67
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 889, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:67
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 965, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:66
  return(T2);
}

D Kfpu_sinhVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:150
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:151
  Kfpu_raise_eVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:151
  Kfpu_duplicateVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:151
  Kfpu_push_1Vharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:152
  Kfpu_divrVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:152
  Kfpu_subVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:152
  T2 = Kfpu_halveVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:150
  return(T2);
}

D Kfpu_extractVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:98
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:99
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:99
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 977, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:98
  return(T2);
}

D Kfpu_discardVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:78
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:79
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 885, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:79
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 865, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:78
  return(T2);
}

D Kfpu_one_minus_sqVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:145
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:146
  Kfpu_duplicateVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:146
  Kfpu_mulVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:146
  Kfpu_push_1Vharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:147
  Kfpu_subrVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:147
  T2 = Kfpu_sqrtVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:145
  return(T2);
}

D Kfpu_raw_arctanVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:118
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:119
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:119
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 973, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:118
  return(T2);
}

D Kfpu_sqrtVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:74
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:75
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:75
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 1001, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:74
  return(T2);
}

D Kfpu_atanVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:126
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:127
  Kfpu_push_1Vharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:127
  T2 = Kfpu_raw_arctanVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:126
  return(T2);
}

D Kpush_constVharp_x86MM0I (D be_, D i387_bits_) {
  D T3;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:348
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:349
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:349
  T3 = Kemit_1Ybase_harpVharpMM0I(be_, i387_bits_, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:348
  return(T3);
}

D Ki387_trans_codeVharp_x86MM0I (D opinfo_) {
  D T2_0;
  D T3_0;
  D T4_0;
  D T5_0;
  D T6_0;
  D T7_0;
  D T8;
  D T9;
  D T10;
  _KLsimple_object_vectorGVKd_1 T11 = {&KLsimple_object_vectorGVKdW, (D) 5};
  D T12_0;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:352
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:353
  T8 = primitive_idQ(opinfo_,(D) 929);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:353
  if (T8 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:354
    T2_0 = (D) 965;
    T7_0 = T2_0;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:353
    T9 = primitive_idQ(opinfo_,(D) 945);
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:353
    if (T9 != &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:355
      T3_0 = (D) 965;
      T6_0 = T3_0;
    } else {
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:353
      T10 = primitive_idQ(opinfo_,(D) 949);
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:353
      if (T10 != &KPfalseVKi) {
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:356
        T4_0 = (D) 965;
        T5_0 = T4_0;
      } else {
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:353
        T11.vector_element_[0] = opinfo_;
        // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:353
        T12_0 = KerrorVKdMM1I(&K170, &T11);
        T5_0 = T12_0;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:353
      T6_0 = T5_0;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:353
    T7_0 = T6_0;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:353
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:352
  MV_SET_COUNT(1);
  return(T7_0);
}

D Kfpu_tanVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:122
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:123
  Kfpu_raw_tanVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:123
  T2 = Kfpu_discardVharp_x86MM0I(be_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:122
  return(T2);
}

D Kfpu_raw_tanVharp_x86MM0I (D be_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:114
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:115
  Kemit_1Ybase_harpVharpMM0I(be_, (D) 869, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:115
  T2 = Kemit_1Ybase_harpVharpMM0I(be_, (D) 969, &KPempty_vectorVKi, &KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:114
  return(T2);
}


/* SYSTEM INIT CODE */

void _Init_harp_x86__X_flt_transcendentals_for_system () {
  extern D KPresolve_symbolVKiI(D);
  return;
}

/* USER INIT CODE */

void _Init_harp_x86__X_flt_transcendentals_for_user () {
{
  D inst_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:185
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:185
  T3 = SLOT_VALUE(inst_set_, 188);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:185
  Kdo_opF198I(T3);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:185
  T4 = SLOT_VALUE(inst_set_, 163);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:185
  T2 = Kdo_opF198I(T4);
  goto I0;
}
I0:

{
  D inst_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:190
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:190
  T3 = SLOT_VALUE(inst_set_, 205);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:190
  Kdo_opF197I(T3);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:190
  T4 = SLOT_VALUE(inst_set_, 180);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:190
  T2 = Kdo_opF197I(T4);
  goto I2;
}
I2:

{
  D inst_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:195
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:195
  T3 = SLOT_VALUE(inst_set_, 193);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:195
  Kdo_opF196I(T3);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:195
  T4 = SLOT_VALUE(inst_set_, 168);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:195
  T2 = Kdo_opF196I(T4);
  goto I4;
}
I4:

{
  D inst_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:200
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:200
  T3 = SLOT_VALUE(inst_set_, 206);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:200
  Kdo_opF195I(T3);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:200
  T4 = SLOT_VALUE(inst_set_, 181);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:200
  T2 = Kdo_opF195I(T4);
  goto I6;
}
I6:

{
  D inst_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:205
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:205
  T3 = SLOT_VALUE(inst_set_, 208);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:205
  Kdo_opF194I(T3);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:205
  T4 = SLOT_VALUE(inst_set_, 183);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:205
  T2 = Kdo_opF194I(T4);
  goto I8;
}
I8:

{
  D inst_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:210
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:210
  T3 = SLOT_VALUE(inst_set_, 209);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:210
  Kdo_opF193I(T3);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:210
  T4 = SLOT_VALUE(inst_set_, 184);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:210
  T2 = Kdo_opF193I(T4);
  goto I10;
}
I10:

{
  D inst_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:229
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:229
  T3 = SLOT_VALUE(inst_set_, 201);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:229
  Kdo_opF192I(T3);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:229
  T4 = SLOT_VALUE(inst_set_, 176);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:229
  T2 = Kdo_opF192I(T4);
  goto I12;
}
I12:

{
  D inst_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:234
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:234
  T3 = SLOT_VALUE(inst_set_, 200);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:234
  Kdo_opF191I(T3);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:234
  T4 = SLOT_VALUE(inst_set_, 175);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:234
  T2 = Kdo_opF191I(T4);
  goto I14;
}
I14:

{
  D inst_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:239
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:239
  T3 = SLOT_VALUE(inst_set_, 202);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:239
  Kdo_opF190I(T3);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:239
  T4 = SLOT_VALUE(inst_set_, 177);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:239
  T2 = Kdo_opF190I(T4);
  goto I16;
}
I16:

{
  D inst_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:244
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:244
  T3 = SLOT_VALUE(inst_set_, 203);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:244
  Kdo_opF189I(T3);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:244
  T4 = SLOT_VALUE(inst_set_, 178);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:244
  T2 = Kdo_opF189I(T4);
  goto I18;
}
I18:

{
  D inst_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:249
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:249
  T3 = SLOT_VALUE(inst_set_, 187);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:249
  Kdo_opF188I(T3);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:249
  T4 = SLOT_VALUE(inst_set_, 162);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:249
  T2 = Kdo_opF188I(T4);
  goto I20;
}
I20:

{
  D inst_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:254
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:254
  T3 = SLOT_VALUE(inst_set_, 186);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:254
  Kdo_opF187I(T3);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:254
  T4 = SLOT_VALUE(inst_set_, 161);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:254
  T2 = Kdo_opF187I(T4);
  goto I22;
}
I22:

{
  D inst_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:259
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:259
  T3 = SLOT_VALUE(inst_set_, 195);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:259
  Kdo_opF186I(T3);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:259
  T4 = SLOT_VALUE(inst_set_, 170);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:259
  T2 = Kdo_opF186I(T4);
  goto I24;
}
I24:

{
  D inst_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:264
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:264
  T3 = SLOT_VALUE(inst_set_, 196);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:264
  Kdo_opF185I(T3);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:264
  T4 = SLOT_VALUE(inst_set_, 171);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:264
  T2 = Kdo_opF185I(T4);
  goto I26;
}
I26:

{
  D inst_set_;
  D T2;
  D T3;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:275
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:275
  T2 = SLOT_VALUE(inst_set_, 166);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:275
  T3 = Kmodify_opYharp_opVharpMM0I(T2, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPfalseVKi);
  goto I28;
}
I28:

{
  D inst_set_;
  D T2;
  D T3;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:276
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:276
  T2 = SLOT_VALUE(inst_set_, 191);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:276
  T3 = Kmodify_opYharp_opVharpMM0I(T2, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPtrueVKi);
  goto I29;
}
I29:

{
  D inst_set_;
  D T2;
  D T3;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:279
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:279
  T2 = SLOT_VALUE(inst_set_, 198);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:279
  T3 = Kmodify_opYharp_opVharpMM0I(T2, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPfalseVKi);
  goto I30;
}
I30:

{
  D inst_set_;
  D T2;
  D T3;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:280
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:280
  T2 = SLOT_VALUE(inst_set_, 173);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:280
  T3 = Kmodify_opYharp_opVharpMM0I(T2, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPtrueVKi);
  goto I31;
}
I31:

{
  D inst_set_;
  D T2;
  D T3;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:283
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:283
  T2 = SLOT_VALUE(inst_set_, 197);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:283
  T3 = Kmodify_opYharp_opVharpMM0I(T2, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPfalseVKi);
  goto I32;
}
I32:

{
  D inst_set_;
  D T2;
  D T3;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:284
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:284
  T2 = SLOT_VALUE(inst_set_, 172);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:284
  T3 = Kmodify_opYharp_opVharpMM0I(T2, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPtrueVKi);
  goto I33;
}
I33:

{
  D inst_set_;
  D T2;
  D T3;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:287
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:287
  T2 = SLOT_VALUE(inst_set_, 199);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:287
  T3 = Kmodify_opYharp_opVharpMM0I(T2, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPfalseVKi);
  goto I34;
}
I34:

{
  D inst_set_;
  D T2;
  D T3;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:288
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:288
  T2 = SLOT_VALUE(inst_set_, 174);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:288
  T3 = Kmodify_opYharp_opVharpMM0I(T2, &KPempty_vectorVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPunboundVKi, &KPtrueVKi);
  goto I35;
}
I35:

{
  D inst_set_;
  D T2;
  D T3;
  D T4;
  D T5;
  D T6;
  D T7;
  D T8;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:291
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:291
  T3 = SLOT_VALUE(inst_set_, 165);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:291
  Kdo_opF184I(T3);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:291
  T4 = SLOT_VALUE(inst_set_, 164);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:291
  Kdo_opF184I(T4);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:291
  T5 = SLOT_VALUE(inst_set_, 182);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:291
  Kdo_opF184I(T5);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:291
  T6 = SLOT_VALUE(inst_set_, 169);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:291
  Kdo_opF184I(T6);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:291
  T7 = SLOT_VALUE(inst_set_, 185);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:291
  Kdo_opF184I(T7);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:291
  T8 = SLOT_VALUE(inst_set_, 167);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:291
  T2 = Kdo_opF184I(T8);
  goto I36;
}
I36:

{
  D inst_set_;
  D T2;
  D T3;
  D T4;
  D T5;
  D T6;
  D T7;
  D T8;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:295
  inst_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:295
  T3 = SLOT_VALUE(inst_set_, 190);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:295
  Kdo_opF183I(T3);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:295
  T4 = SLOT_VALUE(inst_set_, 189);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:295
  Kdo_opF183I(T4);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:295
  T5 = SLOT_VALUE(inst_set_, 207);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:295
  Kdo_opF183I(T5);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:295
  T6 = SLOT_VALUE(inst_set_, 194);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:295
  Kdo_opF183I(T6);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:295
  T7 = SLOT_VALUE(inst_set_, 210);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:295
  Kdo_opF183I(T7);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:295
  T8 = SLOT_VALUE(inst_set_, 192);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:295
  T2 = Kdo_opF183I(T8);
  goto I38;
}
I38:

{
  D instruction_set_;
  D T2;
  D T3;
  D T4;
  D T5;
  D T6;
  D T7;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
  T3 = SLOT_VALUE(instruction_set_, 180);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
  SLOT_VALUE_SETTER(&K181, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
  T4 = SLOT_VALUE(instruction_set_, 163);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
  SLOT_VALUE_SETTER(&K181, T4, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
  T5 = SLOT_VALUE(instruction_set_, 168);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
  SLOT_VALUE_SETTER(&K181, T5, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
  T6 = SLOT_VALUE(instruction_set_, 181);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
  SLOT_VALUE_SETTER(&K181, T6, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
  T7 = SLOT_VALUE(instruction_set_, 183);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
  SLOT_VALUE_SETTER(&K181, T7, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:303
  T2 = &KPfalseVKi;
  goto I40;
}
I40:

{
  D instruction_set_;
  D T2;
  D T3;
  D T4;
  D T5;
  D T6;
  D T7;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
  T3 = SLOT_VALUE(instruction_set_, 205);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
  SLOT_VALUE_SETTER(&K179, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
  T4 = SLOT_VALUE(instruction_set_, 188);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
  SLOT_VALUE_SETTER(&K179, T4, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
  T5 = SLOT_VALUE(instruction_set_, 193);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
  SLOT_VALUE_SETTER(&K179, T5, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
  T6 = SLOT_VALUE(instruction_set_, 206);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
  SLOT_VALUE_SETTER(&K179, T6, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
  T7 = SLOT_VALUE(instruction_set_, 208);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
  SLOT_VALUE_SETTER(&K179, T7, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:314
  T2 = &KPfalseVKi;
  goto I43;
}
I43:

{
  D instruction_set_;
  D T2;
  D T3;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:332
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:332
  T3 = SLOT_VALUE(instruction_set_, 184);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:332
  SLOT_VALUE_SETTER(&K177, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:332
  T2 = &KPfalseVKi;
  goto I46;
}
I46:

{
  D instruction_set_;
  D T2;
  D T3;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:340
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:340
  T3 = SLOT_VALUE(instruction_set_, 209);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:340
  SLOT_VALUE_SETTER(&K173, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:340
  T2 = &KPfalseVKi;
  goto I49;
}
I49:

{
  D instruction_set_;
  D T2;
  D T3;
  D T4;
  D T5;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
  T3 = SLOT_VALUE(instruction_set_, 176);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
  SLOT_VALUE_SETTER(&K171, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
  T4 = SLOT_VALUE(instruction_set_, 175);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
  SLOT_VALUE_SETTER(&K171, T4, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
  T5 = SLOT_VALUE(instruction_set_, 177);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
  SLOT_VALUE_SETTER(&K171, T5, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:361
  T2 = &KPfalseVKi;
  goto I52;
}
I52:

{
  D instruction_set_;
  D T2;
  D T3;
  D T4;
  D T5;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
  T3 = SLOT_VALUE(instruction_set_, 201);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
  SLOT_VALUE_SETTER(&K167, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
  T4 = SLOT_VALUE(instruction_set_, 200);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
  SLOT_VALUE_SETTER(&K167, T4, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
  T5 = SLOT_VALUE(instruction_set_, 202);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
  SLOT_VALUE_SETTER(&K167, T5, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:374
  T2 = &KPfalseVKi;
  goto I55;
}
I55:

{
  D instruction_set_;
  D T2;
  D T3;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:388
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:388
  T3 = SLOT_VALUE(instruction_set_, 178);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:388
  SLOT_VALUE_SETTER(&K165, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:388
  T2 = &KPfalseVKi;
  goto I58;
}
I58:

{
  D instruction_set_;
  D T2;
  D T3;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:397
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:397
  T3 = SLOT_VALUE(instruction_set_, 203);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:397
  SLOT_VALUE_SETTER(&K163, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:397
  T2 = &KPfalseVKi;
  goto I61;
}
I61:

{
  D instruction_set_;
  D T2;
  D T3;
  D T4;
  D T5;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
  T3 = SLOT_VALUE(instruction_set_, 162);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
  SLOT_VALUE_SETTER(&K161, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
  T4 = SLOT_VALUE(instruction_set_, 161);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
  SLOT_VALUE_SETTER(&K161, T4, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
  T5 = SLOT_VALUE(instruction_set_, 170);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
  SLOT_VALUE_SETTER(&K161, T5, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:413
  T2 = &KPfalseVKi;
  goto I64;
}
I64:

{
  D instruction_set_;
  D T2;
  D T3;
  D T4;
  D T5;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
  T3 = SLOT_VALUE(instruction_set_, 187);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
  SLOT_VALUE_SETTER(&K159, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
  T4 = SLOT_VALUE(instruction_set_, 186);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
  SLOT_VALUE_SETTER(&K159, T4, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
  T5 = SLOT_VALUE(instruction_set_, 195);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
  SLOT_VALUE_SETTER(&K159, T5, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:429
  T2 = &KPfalseVKi;
  goto I67;
}
I67:

{
  D instruction_set_;
  D T2;
  D T3;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:446
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:446
  T3 = SLOT_VALUE(instruction_set_, 171);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:446
  SLOT_VALUE_SETTER(&K157, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:446
  T2 = &KPfalseVKi;
  goto I70;
}
I70:

{
  D instruction_set_;
  D T2;
  D T3;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:456
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:456
  T3 = SLOT_VALUE(instruction_set_, 196);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:456
  SLOT_VALUE_SETTER(&K154, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:456
  T2 = &KPfalseVKi;
  goto I73;
}
I73:

{
  D instruction_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
  T3 = SLOT_VALUE(instruction_set_, 191);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
  SLOT_VALUE_SETTER(&K152, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
  T4 = SLOT_VALUE(instruction_set_, 166);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
  SLOT_VALUE_SETTER(&K152, T4, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:466
  T2 = &KPfalseVKi;
  goto I76;
}
I76:

{
  D instruction_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
  T3 = SLOT_VALUE(instruction_set_, 190);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
  SLOT_VALUE_SETTER(&K151, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
  T4 = SLOT_VALUE(instruction_set_, 165);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
  SLOT_VALUE_SETTER(&K151, T4, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:478
  T2 = &KPfalseVKi;
  goto I79;
}
I79:

{
  D instruction_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
  T3 = SLOT_VALUE(instruction_set_, 189);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
  SLOT_VALUE_SETTER(&K147, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
  T4 = SLOT_VALUE(instruction_set_, 164);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
  SLOT_VALUE_SETTER(&K147, T4, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:492
  T2 = &KPfalseVKi;
  goto I82;
}
I82:

{
  D instruction_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
  T3 = SLOT_VALUE(instruction_set_, 174);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
  SLOT_VALUE_SETTER(&K146, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
  T4 = SLOT_VALUE(instruction_set_, 199);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
  SLOT_VALUE_SETTER(&K146, T4, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:508
  T2 = &KPfalseVKi;
  goto I85;
}
I85:

{
  D instruction_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
  T3 = SLOT_VALUE(instruction_set_, 173);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
  SLOT_VALUE_SETTER(&K145, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
  T4 = SLOT_VALUE(instruction_set_, 198);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
  SLOT_VALUE_SETTER(&K145, T4, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:520
  T2 = &KPfalseVKi;
  goto I88;
}
I88:

{
  D instruction_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
  T3 = SLOT_VALUE(instruction_set_, 172);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
  SLOT_VALUE_SETTER(&K142, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
  T4 = SLOT_VALUE(instruction_set_, 197);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
  SLOT_VALUE_SETTER(&K142, T4, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:533
  T2 = &KPfalseVKi;
  goto I91;
}
I91:

{
  D instruction_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
  T3 = SLOT_VALUE(instruction_set_, 182);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
  SLOT_VALUE_SETTER(&K140, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
  T4 = SLOT_VALUE(instruction_set_, 207);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
  SLOT_VALUE_SETTER(&K140, T4, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:546
  T2 = &KPfalseVKi;
  goto I94;
}
I94:

{
  D instruction_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
  T3 = SLOT_VALUE(instruction_set_, 169);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
  SLOT_VALUE_SETTER(&K137, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
  T4 = SLOT_VALUE(instruction_set_, 194);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
  SLOT_VALUE_SETTER(&K137, T4, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:558
  T2 = &KPfalseVKi;
  goto I97;
}
I97:

{
  D instruction_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
  T3 = SLOT_VALUE(instruction_set_, 185);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
  SLOT_VALUE_SETTER(&K125, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
  T4 = SLOT_VALUE(instruction_set_, 210);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
  SLOT_VALUE_SETTER(&K125, T4, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:570
  T2 = &KPfalseVKi;
  goto I100;
}
I100:

{
  D instruction_set_;
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
  instruction_set_ = pentium_instructionsVharp_x86;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
  T3 = SLOT_VALUE(instruction_set_, 167);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
  SLOT_VALUE_SETTER(&K110, T3, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
  T4 = SLOT_VALUE(instruction_set_, 192);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
  SLOT_VALUE_SETTER(&K110, T4, 9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/flt-transcendentals.dylan:582
  T2 = &KPfalseVKi;
  goto I103;
}
I103:

  return;
}


/* eof */
