#include "opendylan/run-time.h"

/* Generated by Open Dylan 2014.1 for x86_64-linux */

/* Typedefs for referenced classes */

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

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

typedef struct {
  dylan_value wrapper;
} _KLobjectGVKd;

typedef struct {
  dylan_value wrapper;
} _KLunboundGVKe;

typedef struct {
  dylan_value wrapper;
} _KLbooleanGVKd;

typedef struct {
  dylan_value wrapper;
  dylan_value xep_;
  dylan_value function_signature_;
  dylan_value mep_;
} _KLsimple_methodGVKe;

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

typedef struct {
  dylan_value wrapper;
  dylan_value signature_properties_;
  dylan_value signature_required_;
  dylan_value signature_values_;
} _KLsignatureAvaluesGVKi;

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

typedef struct {
  dylan_value wrapper;
  dylan_value emitted_name_;
  dylan_value private_model_definition_;
  dylan_value private_model_creator_;
  dylan_value PinstanceQ_iep_;
  dylan_value CinstanceQ_function_;
  dylan_value private_Cdebug_name_;
  dylan_value Cclass_implementation_class_;
  dylan_value Cclass_subtype_bit_;
  dylan_value Pclass_module_;
} _KLBclassGVdfmc_modeling;

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

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

typedef struct {
  dylan_value wrapper;
  dylan_value xep_;
  dylan_value function_signature_;
  dylan_value Pgf_cache_;
  dylan_value debug_name_;
  dylan_value generic_function_methods_;
  dylan_value discriminator_;
  dylan_value incremental_gf_module_;
  dylan_value incremental_gf_domain_info_;
  dylan_value incremental_gf_method_libraries_;
  dylan_value incremental_gf_properties_;
} _KLincremental_generic_functionGVKe;

typedef struct {
  dylan_value wrapper;
  dylan_value head_;
  dylan_value tail_;
} _KLpairGVKd;

typedef struct {
  dylan_value wrapper;
  dylan_value head_;
  dylan_value tail_;
} _KLlistGVKd;

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

typedef struct {
  dylan_value wrapper;
  dylan_value signature_properties_;
  dylan_value signature_required_;
} _KLobject_signatureGVKe;

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

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

typedef struct {
  dylan_value wrapper;
  dylan_value instanceQ_iep_;
  dylan_value singleton_object_;
} _KLsingletonGVKd;


/* Typedefs for defined classes */


/* Referenced object declarations */

extern _KLclassGVKd KLclassGVKd;
extern _KLmm_wrapperGVKi_0 KLclassGVKdW;
extern _KLclassGVKd KLmm_wrapperGVKi;
extern _KLmm_wrapperGVKi_1 KLmm_wrapperGVKiW;
extern _KLclassGVKd KLobjectGVKd;
extern _KLmm_wrapperGVKi_0 KLobjectGVKdW;
extern _KLunboundGVKe KPunboundVKi;
extern _KLclassGVKd KLunboundGVKe;
extern _KLmm_wrapperGVKi_0 KLunboundGVKeW;
extern _KLbooleanGVKd KPtrueVKi;
extern _KLclassGVKd KLbooleanGVKd;
extern _KLmm_wrapperGVKi_0 KLbooleanGVKdW;
extern _KLbooleanGVKd KPfalseVKi;
extern _KLfunction_classGVKi KLsimple_methodGVKe;
extern _KLclassGVKd KLfunction_classGVKi;
extern _KLmm_wrapperGVKi_0 KLfunction_classGVKiW;
extern _KLmm_wrapperGVKi_0 KLsimple_methodGVKeW;
extern _KLclassGVKd KLsignatureAvaluesGVKi;
extern _KLmm_wrapperGVKi_0 KLsignatureAvaluesGVKiW;
extern _KLclassGVKd KLsimple_object_vectorGVKd;
extern _KLmm_wrapperGVKi_0 KLsimple_object_vectorGVKdW;
extern _KLclassGVKd KLBclassGVdfmc_modeling;
extern _KLmm_wrapperGVKi_0 KLBclassGVdfmc_modelingW;
extern _KLsimple_object_vectorGVKd_16 KDsignature_LbooleanG_typesVKi;
dylan_value KCall_superclassesVdfmc_modelingMM0I (dylan_value);
extern _KLempty_listGVKd KPempty_listVKi;
extern _KLclassGVKd KLempty_listGVKd;
extern _KLmm_wrapperGVKi_0 KLempty_listGVKdW;
dylan_value KmemberQVKdMM4I (dylan_value, dylan_value, dylan_value, dylan_value);
extern _KLsimple_object_vectorGVKd_0 KPempty_vectorVKi;
extern _KLsimple_methodGVKe KEEVKd;
extern _KLsealed_generic_functionGVKe KCall_superclassesVdfmc_modeling;
extern _KLclassGVKd KLsealed_generic_functionGVKe;
extern _KLmm_wrapperGVKi_0 KLsealed_generic_functionGVKeW;
extern _KLincremental_generic_functionGVKe KmemberQVKd;
extern _KLfunction_classGVKi KLincremental_generic_functionGVKe;
extern _KLmm_wrapperGVKi_0 KLincremental_generic_functionGVKeW;
extern _KLsealed_generic_functionGVKe KCclass_sealedQVdfmc_modeling;
dylan_value Kmodel_libraryVdfmc_commonI (dylan_value);
extern _KLsealed_generic_functionGVKe Kcurrent_library_descriptionQVdfmc_common;
extern _KLsealed_generic_functionGVKe KCdirect_subclassesVdfmc_modeling;
extern _KLsealed_generic_functionGVKe KanyQVKd;
dylan_value Kmodel_variable_bindingVdfmc_namespaceMM0I (dylan_value);
extern _KLsimple_methodGVKe Kbinding_direct_subclass_definitionsVdfmc_definitionsMM0;
extern _KLmm_wrapperGVKi_0 KLpairGVKdW;
extern _KLincremental_generic_functionGVKe Kforward_iteration_protocolVKd;
extern _KLsimple_methodGVKe Kform_model_objectVdfmc_definitionsMM0;
extern _KLclassGVKd KLpairGVKd;
extern _KLclassGVKd KLlistGVKd;
extern _KLmm_wrapperGVKi_0 KLlistGVKdW;
extern _KLsimple_object_vectorGVKd_2 KDsignature_LsequenceG_typesVKi;
extern _KLfunction_classGVKi KLsimple_closure_methodGVKi;
extern _KLmm_wrapperGVKi_0 KLsimple_closure_methodGVKiW;
extern _KLobject_signatureGVKe KDsignature_LobjectG_object_rest_value_1VKi;
extern _KLclassGVKd KLobject_signatureGVKe;
extern _KLmm_wrapperGVKi_0 KLobject_signatureGVKeW;
extern _KLsealed_generic_functionGVKe Kmodel_definitionVdfmc_common;
dylan_value Kdo_with_dependent_contextVdfmc_namespaceI (dylan_value, dylan_value, dylan_value);
dylan_value KPdirect_subclasses_initializedQ_setterVdfmc_modelingMM0I (dylan_value, dylan_value);
dylan_value KCdirect_subclassesVdfmc_modelingMM0I (dylan_value);
extern _KLsealed_generic_functionGVKe Kmapped_modelVdfmc_common;
extern _KLsimple_methodGVKe KPdirect_subclasses_setterVdfmc_modelingMM0;
extern _KLclassGVKd KLsignatureGVKe;
extern _KLmm_wrapperGVKi_0 KLsignatureGVKeW;
extern _KLsealed_generic_functionGVKe KCclass_primaryQVdfmc_modeling;
extern _KLclassGVKd KLunionGVKe;
extern _KLmm_wrapperGVKi_0 KLunionGVKeW;
dylan_value Kunion_instanceQVKiI (dylan_value, dylan_value);
extern _KLclassGVKd KLsingletonGVKd;
extern _KLmm_wrapperGVKi_0 KLsingletonGVKdW;
dylan_value Ksingleton_pointer_idQ_instanceQVKiI (dylan_value, dylan_value);
extern _KLsealed_generic_functionGVKe KeveryQVKd;
extern _KLsealed_generic_functionGVKe Kform_dynamicQVdfmc_common;
extern _KLsimple_methodGVKe Klanguage_definitionVdfmc_namespaceMM0;
extern _KLsimple_methodGVKe Klibrary_contains_wildcard_subclassesQVdfmc_namespaceMM0;
extern _KLincremental_generic_functionGVKe KemptyQVKd;

/* Defined object declarations */

extern _KLsimple_methodGVKe KCdirect_subclassesVdfmc_modelingMM1;
dylan_value KCdirect_subclassesVdfmc_modelingMM1I (dylan_value);
extern _KLsimple_methodGVKe KCsubtypeQVdfmc_modelingMM13;
dylan_value KCsubtypeQVdfmc_modelingMM13I (dylan_value, dylan_value);
dylan_value KCknown_disjointQVdfmc_modelingMM3I (dylan_value, dylan_value);
extern _KLsimple_methodGVKe KCknown_disjointQVdfmc_modelingMM3;
extern _KLsimple_methodGVKe KCbase_typeVdfmc_modelingMM0;
dylan_value KCbase_typeVdfmc_modelingMM0I (dylan_value);
static _KLsignatureAvaluesGVKi K8;
static _KLsimple_object_vectorGVKd_1 K9;
static _KLsignatureAvaluesGVKi K10;
static _KLsimple_object_vectorGVKd_2 K11;
static _KLsimple_closure_methodGVKi_0 Kguaranteed_joint_2QF14;
static dylan_value Kguaranteed_joint_2QF14I (dylan_value);
extern _KLsimple_methodGVKe KCdirect_subclasses_knownVdfmc_modelingMM0;
dylan_value KCdirect_subclasses_knownVdfmc_modelingMM0I (dylan_value);
static _KLsignatureAvaluesGVKi K17;
static _KLsimple_closure_methodGVKi_0 Kanonymous_of_Cdirect_subclassesF20;
static dylan_value Kanonymous_of_Cdirect_subclassesF20I ();
static _KLsignatureGVKe K21;
extern _KLsimple_methodGVKe KCleast_primary_superclassVdfmc_modeling;
dylan_value KCleast_primary_superclassVdfmc_modelingI (dylan_value);
static _KLunionGVKe K24;
static _KLsingletonGVKd K25;
static _KLsignatureAvaluesGVKi K26;
static _KLsimple_object_vectorGVKd_1 K27;
extern _KLsimple_methodGVKe KCall_subclasses_if_sealedVdfmc_modeling;
dylan_value KCall_subclasses_if_sealedVdfmc_modelingI (dylan_value);
static _KLsimple_closure_methodGVKi_0 Kadd_ifF32;
static dylan_value Kadd_ifF32I (dylan_value);
extern _KLsimple_methodGVKe KCall_direct_subclasses_knownQVdfmc_modelingMM0;
dylan_value KCall_direct_subclasses_knownQVdfmc_modelingMM0I (dylan_value);
static _KLsignatureAvaluesGVKi K35;
static _KLsignatureAvaluesGVKi K36;
static _KLsimple_object_vectorGVKd_1 K37;
static _KLunionGVKe K38;
extern _KLsimple_methodGVKe KCsealed_with_no_subclassesQVdfmc_modelingMM0;
dylan_value KCsealed_with_no_subclassesQVdfmc_modelingMM0I (dylan_value);
static _KLsignatureGVKe K41;

/* Indirection variables */


/* Variables */

dylan_value Csealed_with_no_subclassesQVdfmc_modeling = &KCsealed_with_no_subclassesQVdfmc_modelingMM0;
dylan_value Call_subclasses_if_sealedVdfmc_modeling = &KCall_subclasses_if_sealedVdfmc_modeling;
dylan_value Cleast_primary_superclassVdfmc_modeling = &KCleast_primary_superclassVdfmc_modeling;

/* Objects */

_KLsimple_methodGVKe KCdirect_subclassesVdfmc_modelingMM1 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K17,
  &KCdirect_subclassesVdfmc_modelingMM1I
};

_KLsimple_methodGVKe KCsubtypeQVdfmc_modelingMM13 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K10,
  &KCsubtypeQVdfmc_modelingMM13I
};

_KLsimple_methodGVKe KCknown_disjointQVdfmc_modelingMM3 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K10,
  &KCknown_disjointQVdfmc_modelingMM3I
};

_KLsimple_methodGVKe KCbase_typeVdfmc_modelingMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K8,
  &KCbase_typeVdfmc_modelingMM0I
};

static _KLsignatureAvaluesGVKi K8 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (dylan_value) 33555461,
  &K9,
  &K9
};

static _KLsimple_object_vectorGVKd_1 K9 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 5,
  &KLBclassGVdfmc_modeling
};

static _KLsignatureAvaluesGVKi K10 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (dylan_value) 33555465,
  &K11,
  &KDsignature_LbooleanG_typesVKi
};

static _KLsimple_object_vectorGVKd_2 K11 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 9,
  &KLBclassGVdfmc_modeling,
  &KLBclassGVdfmc_modeling
};

static _KLsimple_closure_methodGVKi_0 Kguaranteed_joint_2QF14 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_1,
  &KDsignature_LobjectG_object_rest_value_1VKi,
  &Kguaranteed_joint_2QF14I,
  (dylan_value) 1
};

_KLsimple_methodGVKe KCdirect_subclasses_knownVdfmc_modelingMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K17,
  &KCdirect_subclasses_knownVdfmc_modelingMM0I
};

static _KLsignatureAvaluesGVKi K17 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (dylan_value) 33555461,
  &K9,
  &KDsignature_LsequenceG_typesVKi
};

static _KLsimple_closure_methodGVKi_0 Kanonymous_of_Cdirect_subclassesF20 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_0,
  &K21,
  &Kanonymous_of_Cdirect_subclassesF20I,
  (dylan_value) 1
};

static _KLsignatureGVKe K21 = {
  &KLsignatureGVKeW /* wrapper */,
  (dylan_value) 44040193,
  &KPempty_vectorVKi
};

_KLsimple_methodGVKe KCleast_primary_superclassVdfmc_modeling = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K26,
  &KCleast_primary_superclassVdfmc_modelingI
};

static _KLunionGVKe K24 = {
  &KLunionGVKeW /* wrapper */,
  &Kunion_instanceQVKiI,
  &K25,
  &KLBclassGVdfmc_modeling
};

static _KLsingletonGVKd K25 = {
  &KLsingletonGVKdW /* wrapper */,
  &Ksingleton_pointer_idQ_instanceQVKiI,
  &KPfalseVKi
};

static _KLsignatureAvaluesGVKi K26 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (dylan_value) 33555461,
  &K9,
  &K27
};

static _KLsimple_object_vectorGVKd_1 K27 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 5,
  &K24
};

_KLsimple_methodGVKe KCall_subclasses_if_sealedVdfmc_modeling = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K36,
  &KCall_subclasses_if_sealedVdfmc_modelingI
};

static _KLsimple_closure_methodGVKi_0 Kadd_ifF32 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_1,
  &KDsignature_LobjectG_object_rest_value_1VKi,
  &Kadd_ifF32I,
  (dylan_value) 1
};

_KLsimple_methodGVKe KCall_direct_subclasses_knownQVdfmc_modelingMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K35,
  &KCall_direct_subclasses_knownQVdfmc_modelingMM0I
};

static _KLsignatureAvaluesGVKi K35 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (dylan_value) 33555461,
  &K9,
  &KDsignature_LbooleanG_typesVKi
};

static _KLsignatureAvaluesGVKi K36 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (dylan_value) 33555461,
  &K9,
  &K37
};

static _KLsimple_object_vectorGVKd_1 K37 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 5,
  &K38
};

static _KLunionGVKe K38 = {
  &KLunionGVKeW /* wrapper */,
  &Kunion_instanceQVKiI,
  &K25,
  &KLlistGVKd
};

_KLsimple_methodGVKe KCsealed_with_no_subclassesQVdfmc_modelingMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K41,
  &KCsealed_with_no_subclassesQVdfmc_modelingMM0I
};

static _KLsignatureGVKe K41 = {
  &KLsignatureGVKeW /* wrapper */,
  (dylan_value) 41944069,
  &K9
};

/* Code */

dylan_value KCdirect_subclassesVdfmc_modelingMM1I (dylan_value class_) {
  dylan_value form_;
  dylan_value T3;
  dylan_value T4;
  dylan_value T5;
  DWORD T6;
  dylan_value T7;
  dylan_value T8;
  dylan_value T9;
  dylan_value T10_0;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:48
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:50
  T4 = SLOT_VALUE(class_, 6);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:50
  T5 = SLOT_VALUE_INITD(T4, 3);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:50
  T6 = primitive_cast_integer_as_raw(T5);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:50
  T7 = primitive_machine_word_logbitQ(28,T6);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:50
  if (T7 == &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:51
    CONGRUENT_CALL_PROLOG(&Kmodel_definitionVdfmc_common, 1);
    form_ = CONGRUENT_CALL1(class_);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:52
    if (form_ != &KPfalseVKi) {
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:53
      T3 = MAKE_CLOSURE_INITD(&Kanonymous_of_Cdirect_subclassesF20, 1, class_);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:53
      Kdo_with_dependent_contextVdfmc_namespaceI((dylan_value) 37, form_, T3);
    }
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:52
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:58
    T8 = SLOT_VALUE(class_, 6);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:58
    KPdirect_subclasses_initializedQ_setterVdfmc_modelingMM0I(&KPtrueVKi, T8);
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:50
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:60
  T9 = SLOT_VALUE(class_, 6);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:60
  T10_0 = KCdirect_subclassesVdfmc_modelingMM0I(T9);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:48
  MV_SET_COUNT(1);
  return(T10_0);
}

dylan_value KCsubtypeQVdfmc_modelingMM13I (dylan_value c1_, dylan_value c2_) {
  dylan_value T3;
  dylan_value T4_0;
  dylan_value T5;
  dylan_value T6_0;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:105
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:107
  T3 = SLOT_VALUE(c1_, 6);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:107
  T4_0 = KCall_superclassesVdfmc_modelingMM0I(T3);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:107
  T5 = T4_0;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:107
  T6_0 = KmemberQVKdMM4I(c2_, T5, &KPempty_vectorVKi, &KEEVKd);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:105
  MV_SET_COUNT(1);
  return(T6_0);
}

dylan_value KCknown_disjointQVdfmc_modelingMM3I (dylan_value class1_, dylan_value class2_) {
  dylan_value T3;
  dylan_value T4;
  dylan_value T5;
  dylan_value T6_0;
  dylan_value T7_0;
  dylan_value T8;
  dylan_value T9_0;
  dylan_value T10;
  dylan_value T11;
  dylan_value T12;
  dylan_value T13_0;
  dylan_value T14;
  dylan_value T15;
  dylan_value T16;
  dylan_value T17;
  dylan_value T18_0;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:132
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:134
  T3 = MAKE_CLOSURE(&Kguaranteed_joint_2QF14, 2);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:134
  INIT_CLOSURE(T3, 2, T3, class2_);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:149
  T8 = SLOT_VALUE(class2_, 6);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:149
  T9_0 = KCall_superclassesVdfmc_modelingMM0I(T8);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:149
  T10 = T9_0;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:149
  T11 = KmemberQVKdMM4I(class1_, T10, &KPempty_vectorVKi, &KEEVKd);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:149
  if (T11 != &KPfalseVKi) {
    T4 = &KPfalseVKi;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:150
    T12 = SLOT_VALUE(class1_, 6);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:150
    T13_0 = KCall_superclassesVdfmc_modelingMM0I(T12);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:150
    T14 = T13_0;
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:150
    T15 = KmemberQVKdMM4I(class2_, T14, &KPempty_vectorVKi, &KEEVKd);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:150
    T16 = primitive_not(T15);
    T4 = T16;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:149
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:149
  if (T4 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:151
    get_teb()->function = T3;
    T5 = Kguaranteed_joint_2QF14I(class1_);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:151
    T17 = primitive_not(T5);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:151
    T18_0 = T17;
    T7_0 = T18_0;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:149
    T6_0 = &KPfalseVKi;
    T7_0 = T6_0;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:149
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:132
  MV_SET_COUNT(1);
  return(T7_0);
}

dylan_value KCbase_typeVdfmc_modelingMM0I (dylan_value type_) {
  dylan_value T2_0;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:99
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:100
  T2_0 = type_;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:99
  MV_SET_COUNT(1);
  return(T2_0);
}

static dylan_value Kguaranteed_joint_2QF14I (dylan_value class_) {
  dylan_value T1;
  dylan_value UtmpF2;
  dylan_value T3;
  dylan_value UtmpF4;
  dylan_value T5;
  dylan_value T6;
  dylan_value T7;
  dylan_value T8;
  dylan_value T9;
  dylan_value T10;
  dylan_value T11;
  dylan_value T12;
  CAPTURE_ENVIRONMENT

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:134
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:135
  CONGRUENT_CALL_PROLOG(&KCall_superclassesVdfmc_modeling, 1);
  T1 = CONGRUENT_CALL1(class_);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:135
  UtmpF2 = CALL2(&KmemberQVKd, CREF(1), T1);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:135
  if (UtmpF2 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:135
    T3 = UtmpF2;
    MV_SET_ELT(0, UtmpF2);
    MV_SET_COUNT(1);
    T12 = T3;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:137
    CONGRUENT_CALL_PROLOG(&KCclass_sealedQVdfmc_modeling, 1);
    UtmpF4 = CONGRUENT_CALL1(class_);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:137
    if (UtmpF4 != &KPfalseVKi) {
      T7 = UtmpF4;
    } else {
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:138
      T5 = Kmodel_libraryVdfmc_commonI(class_);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:138
      CONGRUENT_CALL_PROLOG(&Kcurrent_library_descriptionQVdfmc_common, 1);
      T6 = CONGRUENT_CALL1(T5);
      T7 = T6;
    }
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:137
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:137
    if (T7 != &KPfalseVKi) {
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:139
      CONGRUENT_CALL_PROLOG(&KCdirect_subclassesVdfmc_modeling, 1);
      T8 = CONGRUENT_CALL1(class_);
      T10 = T8;
    } else {
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:141
      T9 = CALL1(&KCdirect_subclasses_knownVdfmc_modelingMM0, class_);
      T10 = T9;
    }
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:137
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:136
    T11 = CALL2(&KanyQVKd, CREF(0), T10);
    T12 = T11;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:135
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:134
  return(T12);
}

dylan_value KCdirect_subclasses_knownVdfmc_modelingMM0I (dylan_value class_) {
  dylan_value binding_;
  dylan_value definitions_;
  dylan_value T4_0;
  dylan_value T5_0;
  dylan_value T6;
  dylan_value T7;
  dylan_value T8;
  dylan_value T9;
  dylan_value T10;
  dylan_value T11;
  dylan_value T12T, T12;
  dylan_value T13;
  dylan_value T14;
  dylan_value result_;
  dylan_value T16;
  dylan_value T17_0;
  dylan_value T18;
  dylan_value T19;
  dylan_value T20;
  dylan_value c_head_;
  dylan_value T22;
  dylan_value T23;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:32
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:34
  binding_ = Kmodel_variable_bindingVdfmc_namespaceMM0I(class_);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:35
  if (binding_ != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:36
    definitions_ = CALL1(&Kbinding_direct_subclass_definitionsVdfmc_definitionsMM0, binding_);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
    T18 = primitive_object_allocate_filled(3,&KLpairGVKdW,2,&KPunboundVKi,0,0,&KPunboundVKi);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
    SLOT_VALUE_SETTER(&KPfalseVKi, T18, 0);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
    SLOT_VALUE_SETTER(&KPempty_listVKi, T18, 1);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
    SLOT_VALUE_SETTER(T18, T18, 0);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
    CONGRUENT_CALL_PROLOG(&Kforward_iteration_protocolVKd, 1);
    T6 = CONGRUENT_CALL1(definitions_);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
    T7 = T6;
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
    T8 = MV_GET_ELT(1);
;
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
    T9 = MV_GET_ELT(2);
;
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
    T10 = MV_GET_ELT(3);
;
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
    T11 = MV_GET_ELT(5);
;
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
    T12T = T7;
  L0: ;
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
      T12 = T12T;
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
      T13 = CALL3(T10, definitions_, T12, T8);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
      if (T13 == &KPfalseVKi) {
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
        T14 = CALL2(T11, definitions_, T12);
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
        result_ = CALL1(&Kform_model_objectVdfmc_definitionsMM0, T14);
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
        if (result_ != &KPfalseVKi) {
          // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
          T19 = primitive_object_allocate_filled(3,&KLpairGVKdW,2,&KPunboundVKi,0,0,&KPunboundVKi);
          // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
          SLOT_VALUE_SETTER(result_, T19, 0);
          // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
          SLOT_VALUE_SETTER(&KPempty_listVKi, T19, 1);
          // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
          T20 = SLOT_VALUE_INITD(T18, 0);
          // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
          primitive_type_check(T20, &KLpairGVKd);
          c_head_ = T20;
          // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
          SLOT_VALUE_SETTER(T19, c_head_, 1);
          // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
          SLOT_VALUE_SETTER(T19, T18, 0);
        }
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
        T16 = CALL2(T9, definitions_, T12);
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
        T12T = T16;
        goto L0;
      }
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
    T22 = SLOT_VALUE_INITD(T18, 1);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
    T23 = T22;
    MV_SET_ELT(0, T22);
    MV_SET_COUNT(1);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:37
    T17_0 = T23;
    {
      MV_CHECK_TYPE_PROLOGUE(T23);
      primitive_type_check(T17_0, &KLlistGVKd);
      MV_CHECK_TYPE_EPILOGUE();
    }
    T5_0 = T17_0;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:39
    T4_0 = &KPempty_listVKi;
    T5_0 = T4_0;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:35
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:32
  MV_SET_COUNT(1);
  return(T5_0);
}

static dylan_value Kanonymous_of_Cdirect_subclassesF20I () {
  dylan_value T0;
  dylan_value T1;
  dylan_value T2;
  CAPTURE_ENVIRONMENT

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:53
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:55
  T0 = KCdirect_subclasses_knownVdfmc_modelingMM0I(CREF(0));
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:55
  CONGRUENT_CALL_PROLOG(&Kmapped_modelVdfmc_common, 1);
  T1 = CONGRUENT_CALL1(T0);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:54
  CALL2(&KPdirect_subclasses_setterVdfmc_modelingMM0, T1, CREF(0));
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:54
  T2 = T1;
  MV_SET_ELT(0, T1);
  MV_SET_COUNT(1);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:53
  return(T2);
}

dylan_value KCleast_primary_superclassVdfmc_modelingI (dylan_value cl_) {
  dylan_value T1_0;
  dylan_value T2;
  dylan_value T3_0;
  dylan_value T4;
  dylan_value T5_0;
  dylan_value T6T, T6;
  dylan_value result_T, result_;
  dylan_value T8;
  dylan_value T9;
  dylan_value T10;
  dylan_value T11_0;
  dylan_value T12_0;
  dylan_value T13;
  dylan_value T14;
  dylan_value T15;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:85
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
  T2 = SLOT_VALUE(cl_, 6);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
  T3_0 = KCall_superclassesVdfmc_modelingMM0I(T2);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
  T4 = T3_0;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
  T6T = T4;
  result_T = &KPfalseVKi;
L0: ;
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
    T6 = T6T;
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
    result_ = result_T;
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
    T8 = primitive_idQ(T6,&KPempty_listVKi);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
    if (T8 == &KPfalseVKi) {
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
      T9 = SLOT_VALUE_INITD(T6, 0);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
      if (result_ == &KPfalseVKi) {
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
        T10 = SLOT_VALUE_INITD(T6, 1);
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
        T11_0 = T10;
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
        T12_0 = T11_0;
        {
          MV_CHECK_TYPE_PROLOGUE(T11_0);
          primitive_type_check(T12_0, &KLlistGVKd);
          MV_CHECK_TYPE_EPILOGUE();
        }
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
        T13 = T12_0;
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
        CONGRUENT_CALL_PROLOG(&KCclass_primaryQVdfmc_modeling, 1);
        T15 = CONGRUENT_CALL1(T9);
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
        if (T15 != &KPfalseVKi) {
          T14 = T9;
        } else {
          T14 = &KPfalseVKi;
        }
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
        T6T = T13;
        result_T = T14;
        goto L0;
      }
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
    }
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:92
  T5_0 = result_;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:85
  T1_0 = T5_0;
  {
    MV_CHECK_TYPE_PROLOGUE(T5_0);
    primitive_type_check(T1_0, &K24);
    MV_CHECK_TYPE_EPILOGUE();
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:85
  MV_SET_COUNT(1);
  return(T1_0);
}

dylan_value KCall_subclasses_if_sealedVdfmc_modelingI (dylan_value class_) {
  dylan_value T1;
  dylan_value T2;
  dylan_value T3_0;
  dylan_value T4_0;
  dylan_value T5_0;
  dylan_value subclasses_;
  dylan_value T7;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:68
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:70
  subclasses_ = MAKE_DYLAN_VALUE_CELL(&KPempty_listVKi);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:71
  T1 = MAKE_CLOSURE(&Kadd_ifF32, 2);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:71
  INIT_CLOSURE(T1, 2, subclasses_, T1);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:80
  get_teb()->function = T1;
  T2 = Kadd_ifF32I(class_);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:80
  if (T2 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:80
    T7 = GET_DYLAN_VALUE_CELL_VAL(subclasses_);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:80
    T3_0 = T7;
    T5_0 = T3_0;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:80
    T4_0 = &KPfalseVKi;
    T5_0 = T4_0;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:80
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:68
  MV_SET_COUNT(1);
  return(T5_0);
}

static dylan_value Kadd_ifF32I (dylan_value class_) {
  dylan_value T1;
  dylan_value T2;
  dylan_value T3;
  dylan_value T4;
  dylan_value T5;
  dylan_value T6;
  dylan_value T7;
  dylan_value T8;
  dylan_value T9;
  dylan_value T10;
  dylan_value T11;
  dylan_value T12;
  dylan_value T13;
  dylan_value T14;
  dylan_value T15;
  dylan_value T16;
  dylan_value Utmp_;
  dylan_value T18;
  CAPTURE_ENVIRONMENT

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:71
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:72
  T1 = CALL1(&KCall_direct_subclasses_knownQVdfmc_modelingMM0, class_);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:72
  if (T1 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:73
    T16 = GET_DYLAN_VALUE_CELL_VAL(CREF(0));
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:73
    Utmp_ = KmemberQVKdMM4I(class_, T16, &KPempty_vectorVKi, &KEEVKd);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:73
    if (Utmp_ != &KPfalseVKi) {
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:73
      T2 = Utmp_;
      MV_SET_ELT(0, Utmp_);
      MV_SET_COUNT(1);
      T12 = T2;
    } else {
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:74
      CONGRUENT_CALL_PROLOG(&KCdirect_subclassesVdfmc_modeling, 1);
      T3 = CONGRUENT_CALL1(class_);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:74
      T4 = CALL2(&KmemberQVKd, class_, T3);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:74
      if (T4 != &KPfalseVKi) {
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:74
        T10 = &KPfalseVKi;
        MV_SET_ELT(0, &KPfalseVKi);
        MV_SET_COUNT(1);
        T11 = T10;
      } else {
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:75
        CONGRUENT_CALL_PROLOG(&KCdirect_subclassesVdfmc_modeling, 1);
        T5 = CONGRUENT_CALL1(class_);
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:75
        T6 = CALL2(&KeveryQVKd, CREF(1), T5);
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:75
        if (T6 != &KPfalseVKi) {
          // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:76
          T15 = GET_DYLAN_VALUE_CELL_VAL(CREF(0));
          // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:76
          T18 = primitive_object_allocate_filled(3,&KLpairGVKdW,2,&KPunboundVKi,0,0,&KPunboundVKi);
          // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:76
          SLOT_VALUE_SETTER(class_, T18, 0);
          // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:76
          SLOT_VALUE_SETTER(T15, T18, 1);
          // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:76
          SET_DYLAN_VALUE_CELL_VAL(CREF(0), T18);
          // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:76
          T7 = T18;
          MV_SET_ELT(0, T18);
          MV_SET_COUNT(1);
          T9 = T7;
        } else {
          // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:75
          T8 = &KPfalseVKi;
          MV_SET_ELT(0, &KPfalseVKi);
          MV_SET_COUNT(1);
          T9 = T8;
        }
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:75
        T11 = T9;
      }
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:74
      T12 = T11;
    }
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:73
    T14 = T12;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:72
    T13 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T14 = T13;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:72
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:71
  return(T14);
}

dylan_value KCall_direct_subclasses_knownQVdfmc_modelingMM0I (dylan_value class_) {
  dylan_value T2;
  dylan_value T3;
  dylan_value T4;
  dylan_value T5;
  dylan_value T6;
  dylan_value T7;
  dylan_value T8_0;
  dylan_value T9_0;
  dylan_value T10;
  dylan_value T11;
  DWORD T12;
  dylan_value T13;
  dylan_value T14;
  dylan_value T15;
  dylan_value T16_0;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:13
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:15
  T10 = SLOT_VALUE(class_, 6);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:15
  T11 = SLOT_VALUE_INITD(T10, 3);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:15
  T12 = primitive_cast_integer_as_raw(T11);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:15
  T13 = primitive_machine_word_logbitQ(20,T12);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:15
  if (T13 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:17
    CONGRUENT_CALL_PROLOG(&Kmodel_definitionVdfmc_common, 1);
    T2 = CONGRUENT_CALL1(class_);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:17
    T3 = CALL1(&Kform_dynamicQVdfmc_common, T2);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:17
    T14 = primitive_not(T3);
    T4 = T14;
  } else {
    T4 = &KPfalseVKi;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:15
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:15
  if (T4 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:19
    T5 = Kmodel_libraryVdfmc_commonI(class_);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:19
    T6 = CALL1(&Klanguage_definitionVdfmc_namespaceMM0, T5);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:18
    T7 = CALL1(&Klibrary_contains_wildcard_subclassesQVdfmc_namespaceMM0, T6);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:18
    T15 = primitive_not(T7);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:18
    T16_0 = T15;
    T9_0 = T16_0;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:15
    T8_0 = &KPfalseVKi;
    T9_0 = T8_0;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:15
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:13
  MV_SET_COUNT(1);
  return(T9_0);
}

dylan_value KCsealed_with_no_subclassesQVdfmc_modelingMM0I (dylan_value class_) {
  dylan_value T2;
  dylan_value T3_0;
  dylan_value T4_0;
  dylan_value T5_0;
  dylan_value T6;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:43
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:44
  T2 = KCall_direct_subclasses_knownQVdfmc_modelingMM0I(class_);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:44
  if (T2 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:44
    T6 = KCdirect_subclassesVdfmc_modelingMM1I(class_);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:44
    CONGRUENT_CALL_PROLOG(&KemptyQVKd, 1);
    T3_0 = CONGRUENT_CALL1(T6);
    T5_0 = T3_0;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:44
    T4_0 = &KPfalseVKi;
    T5_0 = T4_0;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:44
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/classes.dylan:43
  MV_SET_COUNT(1);
  return(T5_0);
}


/* SYSTEM INIT CODE */

void _Init_dfmc_modeling__X_classes_for_system () {
  extern dylan_value KPresolve_symbolVKiI(dylan_value);
  return;
}

/* USER INIT CODE */

void _Init_dfmc_modeling__X_classes_for_user () {
  return;
}


/* eof */
