/* ------- code automatically created by ../scripts/adms_build_object.pl -------------- */
#include <admsObject/objectMapply_ternary.h>
#include <admsObject/objectAdmsmain.h>

inline void adms_mapply_ternary_free(p_mapply_ternary mymapply_ternary)
{
  if(!mymapply_ternary)
    return;
  adms_enumeration_free(mymapply_ternary->_subexpression._math._dependency);
  free(mymapply_ternary->_subexpression._math._value);
  adms_enumeration_free(mymapply_ternary->_name);
  if(mymapply_ternary->_arg1)
    if(adms_adms(mymapply_ternary->_arg1)->_datatypename==adms_adms_enumeration_datatypename_quark)
      adms_quark_free(adms_quark(mymapply_ternary->_arg1));
  if(mymapply_ternary->_arg2)
    if(adms_adms(mymapply_ternary->_arg2)->_datatypename==adms_adms_enumeration_datatypename_quark)
      adms_quark_free(adms_quark(mymapply_ternary->_arg2));
  if(mymapply_ternary->_arg3)
    if(adms_adms(mymapply_ternary->_arg3)->_datatypename==adms_adms_enumeration_datatypename_quark)
      adms_quark_free(adms_quark(mymapply_ternary->_arg3));
  adms_global_increment_nbmapply_ternarydestroy();
  free(mymapply_ternary);
}
int adms_mapply_ternary_cmp (p_mapply_ternary mymapply_ternary,p_mapply_ternary refmapply_ternary)
{
  int status;
  status =
  (
    (adms_mapply_ternary_valueof_name (mymapply_ternary) != adms_mapply_ternary_valueof_name (refmapply_ternary))
    ||
    (adms_mapply_ternary_valueof_arg1 (mymapply_ternary) != adms_mapply_ternary_valueof_arg1 (refmapply_ternary))
    ||
    (adms_mapply_ternary_valueof_arg2 (mymapply_ternary) != adms_mapply_ternary_valueof_arg2 (refmapply_ternary))
    ||
    (adms_mapply_ternary_valueof_arg3 (mymapply_ternary) != adms_mapply_ternary_valueof_arg3 (refmapply_ternary))
  );
  return status;
}
p_mapply_ternary adms_mapply_ternary_new(p_enumeration myname,p_adms myarg1,p_adms myarg2,p_adms myarg3)
{
  p_mapply_ternary mynewmapply_ternary=(p_mapply_ternary) calloc(1,(size_t)sizeof(t_mapply_ternary));
  adms_global_increment_nbmapply_ternarynew();
  mynewmapply_ternary->_subexpression._math._adms._datatypename=adms_adms_enumeration_datatypename_mapply_ternary;
  mynewmapply_ternary->_subexpression._math._adms._seen=adms_adms_enumeration_seen_no;
  (mynewmapply_ternary->_subexpression._math)._value=adms_real_new(adms_NAN);
  (mynewmapply_ternary->_subexpression._math)._static=adms_enumeration_new(adms_math_enumeration_static_no,adms_math_fromstring_static_impl,adms_math_tostring_static_impl);
  (mynewmapply_ternary->_subexpression._math)._dynamic=adms_enumeration_new(adms_math_enumeration_dynamic_no,adms_math_fromstring_dynamic_impl,adms_math_tostring_dynamic_impl);
  (mynewmapply_ternary->_subexpression._math)._dependency=adms_enumeration_new(adms_math_enumeration_dependency_constant,adms_math_fromstring_dependency_impl,adms_math_tostring_dependency_impl);
  mynewmapply_ternary->_name_isdefault=-1;
  adms_mapply_ternary_valueto_name (mynewmapply_ternary,myname);
  mynewmapply_ternary->_name_isdefault=1;
  mynewmapply_ternary->_arg1_isdefault=-1;
  adms_mapply_ternary_valueto_arg1 (mynewmapply_ternary,myarg1);
  mynewmapply_ternary->_arg1_isdefault=1;
  mynewmapply_ternary->_arg2_isdefault=-1;
  adms_mapply_ternary_valueto_arg2 (mynewmapply_ternary,myarg2);
  mynewmapply_ternary->_arg2_isdefault=1;
  mynewmapply_ternary->_arg3_isdefault=-1;
  adms_mapply_ternary_valueto_arg3 (mynewmapply_ternary,myarg3);
  mynewmapply_ternary->_arg3_isdefault=1;
  return mynewmapply_ternary;
}
p_adms adms_mapply_ternary_new_impl (p_adms arguments[])
{
  p_mapply_ternary mynewmapply_ternary;
  p_enumeration myname=(p_enumeration)arguments[0];
  p_adms myarg1=(p_adms)arguments[1];
  p_adms myarg2=(p_adms)arguments[2];
  p_adms myarg3=(p_adms)arguments[3];
  mynewmapply_ternary=adms_mapply_ternary_new(myname,myarg1,myarg2,myarg3);
  return adms_adms(mynewmapply_ternary);
}
/*$1($2,$3,$4)*/
char*adms_mapply_ternary_uid (p_mapply_ternary mynewmapply_ternary)
{
  char*myuid=NULL;
  char*myuid0=adms_constclone(adms_mapply_ternary_tostring_name_impl(NULL,mynewmapply_ternary->_name));
  char*myuid1=adms_admsxml_uid(mynewmapply_ternary->_arg1);
  char*myuid2=adms_admsxml_uid(mynewmapply_ternary->_arg2);
  char*myuid3=adms_admsxml_uid(mynewmapply_ternary->_arg3);
  adms_strconcat(&myuid,myuid0);
  adms_strconcat2(&myuid,"(");
  adms_strconcat(&myuid,myuid1);
  adms_strconcat2(&myuid,",");
  adms_strconcat(&myuid,myuid2);
  adms_strconcat2(&myuid,",");
  adms_strconcat(&myuid,myuid3);
  adms_strconcat2(&myuid,")");
  return myuid;
}

inline void
adms_mapply_ternary_valueto_name (p_mapply_ternary mymapply_ternary,p_enumeration _name)
{
  mymapply_ternary->_name=_name;
  mymapply_ternary->_name_isdefault=0;
}

inline void
adms_mapply_ternary_valueto_arg1 (p_mapply_ternary mymapply_ternary,p_adms _arg1)
{
  mymapply_ternary->_arg1=_arg1;
  mymapply_ternary->_arg1_isdefault=0;
}

inline void
adms_mapply_ternary_valueto_arg2 (p_mapply_ternary mymapply_ternary,p_adms _arg2)
{
  mymapply_ternary->_arg2=_arg2;
  mymapply_ternary->_arg2_isdefault=0;
}

inline void
adms_mapply_ternary_valueto_arg3 (p_mapply_ternary mymapply_ternary,p_adms _arg3)
{
  mymapply_ternary->_arg3=_arg3;
  mymapply_ternary->_arg3_isdefault=0;
}
e_mapply_ternary_name
adms_mapply_ternary_fromstring_name_impl (p_admsttransform myadmsttransform,char*token)
{
  if(!strcmp(token,"conditional"))
    return adms_mapply_ternary_enumeration_name_conditional;
  adms_message_fatal_continue(("select='mapply_ternary/name': possible values:\n"))
  adms_message_fatal_continue(("conditional\n"))
  adms_message_fatal(("see %s\n",adms_admsttransform_uid(myadmsttransform)))
  return 0;
}
char*
adms_mapply_ternary_tostring_name_impl (p_admsttransform myadmsttransform,p_enumeration myenumeration)
{
  e_mapply_ternary_name e=myenumeration->_value;
  if(e==adms_mapply_ternary_enumeration_name_conditional)
    return "conditional";
  adms_message_fatal_continue(("select='mapply_ternary/name': possible values:\n"))
  adms_message_fatal_continue(("conditional\n"))
  adms_message_fatal(("see %s\n",adms_admsttransform_uid(myadmsttransform)))
  return NULL;
}