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

inline void adms_instanceparameter_free(p_instanceparameter myinstanceparameter)
{
  if(!myinstanceparameter)
    return;
  adms_enumeration_free(myinstanceparameter->_math._dependency);
  free(myinstanceparameter->_math._value);
  adms_global_increment_nbinstanceparameterdestroy();
  free(myinstanceparameter);
}
int adms_instanceparameter_cmp (p_instanceparameter myinstanceparameter,p_instanceparameter refinstanceparameter)
{
  int status;
  status =
  (
    (adms_instanceparameter_valueof_parameter (myinstanceparameter) != adms_instanceparameter_valueof_parameter (refinstanceparameter))
  );
  return status;
}
p_instanceparameter adms_instanceparameter_new(p_variable myparameter)
{
  p_instanceparameter mynewinstanceparameter=(p_instanceparameter) calloc(1,(size_t)sizeof(t_instanceparameter));
  adms_global_increment_nbinstanceparameternew();
  mynewinstanceparameter->_math._adms._datatypename=adms_adms_enumeration_datatypename_instanceparameter;
  mynewinstanceparameter->_math._adms._seen=adms_adms_enumeration_seen_no;
  (mynewinstanceparameter->_math)._value=adms_real_new(adms_NAN);
  (mynewinstanceparameter->_math)._static=adms_enumeration_new(adms_math_enumeration_static_no,adms_math_fromstring_static_impl,adms_math_tostring_static_impl);
  (mynewinstanceparameter->_math)._dynamic=adms_enumeration_new(adms_math_enumeration_dynamic_no,adms_math_fromstring_dynamic_impl,adms_math_tostring_dynamic_impl);
  (mynewinstanceparameter->_math)._dependency=adms_enumeration_new(adms_math_enumeration_dependency_constant,adms_math_fromstring_dependency_impl,adms_math_tostring_dependency_impl);
  mynewinstanceparameter->_parameter_isdefault=-1;
  adms_instanceparameter_valueto_parameter (mynewinstanceparameter,myparameter);
  mynewinstanceparameter->_parameter_isdefault=1;
  mynewinstanceparameter->_value_isdefault=-1;
  return mynewinstanceparameter;
}
p_adms adms_instanceparameter_new_impl (p_adms arguments[])
{
  p_instanceparameter mynewinstanceparameter;
  p_variable myparameter=(p_variable)arguments[0];
  mynewinstanceparameter=adms_instanceparameter_new(myparameter);
  return adms_adms(mynewinstanceparameter);
}
/*$1#$2*/
char*adms_instanceparameter_uid (p_instanceparameter mynewinstanceparameter)
{
  char*myuid=NULL;
  char*myuid0=adms_variable_uid(mynewinstanceparameter->_parameter);
  adms_strconcat(&myuid,myuid0);
  adms_strconcat2(&myuid,"#$2");
  return myuid;
}

inline void
adms_instanceparameter_valueto_parameter (p_instanceparameter myinstanceparameter,p_variable _parameter)
{
  myinstanceparameter->_parameter=_parameter;
  myinstanceparameter->_parameter_isdefault=0;
}

inline void
adms_instanceparameter_valueto_value (p_instanceparameter myinstanceparameter,p_expression _value)
{
  myinstanceparameter->_value=_value;
  myinstanceparameter->_value_isdefault=0;
}