Пример #1
0
/**
 * Resets this model after a simulation run.
 *
 * @param self the model.
 */
void
reset (struct ergadm_model_t_ *self)
{
    local_data_t *local_data;
    unsigned int n, i;

#if DEBUG
    g_log (G_LOG_DOMAIN, G_LOG_LEVEL_DEBUG, "----- ENTER reset (%s)", MODEL_NAME);
#endif

    local_data = (local_data_t *) (self->model_data);
    local_data->first_detection = TRUE;
    RPT_reporting_reset (local_data->detections);
    RPT_reporting_reset (local_data->day_1st_detection);
    RPT_reporting_zero (local_data->nherds_detected);
    RPT_reporting_zero (local_data->cumul_nherds_detected);
    RPT_reporting_reset (local_data->nherds_detected_by_prodtype);
    RPT_reporting_reset (local_data->cumul_nherds_detected_by_prodtype);
    n = local_data->production_types->len;
    for (i = 0; i < n; i++)
    {
        RPT_reporting_set_integer1 (local_data->nherds_detected_by_prodtype, 0,
                                    (char *) g_ptr_array_index (local_data->production_types, i));
        RPT_reporting_set_integer1 (local_data->cumul_nherds_detected_by_prodtype, 0,
                                    (char *) g_ptr_array_index (local_data->production_types, i));
    }

#if DEBUG
    g_log (G_LOG_DOMAIN, G_LOG_LEVEL_DEBUG, "----- EXIT reset (%s)", MODEL_NAME);
#endif
}
Пример #2
0
/**
 * On each new day, zero the daily counts of exposures.
 *
 * @param self the model.
 */
void
handle_new_day_event (struct naadsm_model_t_ *self)
{
  local_data_t *local_data;

#if DEBUG
  g_debug ("----- ENTER handle_new_day_event (%s)", MODEL_NAME);
#endif

  local_data = (local_data_t *) (self->model_data);

  /* Zero the daily counts. */
  RPT_reporting_zero (local_data->exposures);
  RPT_reporting_zero (local_data->num_units_exposed);
  RPT_reporting_zero (local_data->num_units_exposed_by_cause);
  RPT_reporting_zero (local_data->num_units_exposed_by_prodtype);
  RPT_reporting_zero (local_data->num_units_exposed_by_cause_and_prodtype);
  RPT_reporting_zero (local_data->num_animals_exposed);
  RPT_reporting_zero (local_data->num_animals_exposed_by_cause);
  RPT_reporting_zero (local_data->num_animals_exposed_by_prodtype);
  RPT_reporting_zero (local_data->num_animals_exposed_by_cause_and_prodtype);
  RPT_reporting_zero (local_data->num_adequate_exposures);

#if DEBUG
  g_debug ("----- EXIT handle_new_day_event (%s)", MODEL_NAME);
#endif
}
Пример #3
0
/**
 * Resets this model after a simulation run.
 *
 * @param self the model.
 */
void
reset (struct ergadm_model_t_ *self)
{
  local_data_t *local_data;
  int i;

  local_data = (local_data_t *) (self->model_data);
#if DEBUG
  g_log (G_LOG_DOMAIN, G_LOG_LEVEL_DEBUG, "----- ENTER reset (%s)", MODEL_NAME);
#endif

  local_data = (local_data_t *) (self->model_data);

  for (i = 0; i < local_data->nherds; i++)
    local_data->status[i] = NOT_ON_WAITING_LIST;

  RPT_reporting_zero (local_data->nherds_awaiting_vaccination);
  RPT_reporting_zero (local_data->nherds_awaiting_vaccination_by_prodtype);
  RPT_reporting_zero (local_data->nanimals_awaiting_vaccination);
  RPT_reporting_zero (local_data->nherds_awaiting_vaccination_by_prodtype);
  RPT_reporting_zero (local_data->peak_nherds_awaiting_vaccination);
  RPT_reporting_zero (local_data->peak_nanimals_awaiting_vaccination);
  RPT_reporting_zero (local_data->peak_wait_time);
  RPT_reporting_zero (local_data->average_wait_time);

  local_data->peak_nherds = local_data->peak_nanimals = 0;
  local_data->peak_wait = 0;
  local_data->sum_for_average = local_data->count_for_average = 0;

#if DEBUG
  g_log (G_LOG_DOMAIN, G_LOG_LEVEL_DEBUG, "----- EXIT reset (%s)", MODEL_NAME);
#endif
}
Пример #4
0
/**
 * Resets this model after a simulation run.
 *
 * @param self the model.
 */
void
reset (struct ergadm_model_t_ *self)
{
    local_data_t *local_data;

#if DEBUG
    g_log (G_LOG_DOMAIN, G_LOG_LEVEL_DEBUG, "----- ENTER reset (%s)", MODEL_NAME);
#endif

    local_data = (local_data_t *) (self->model_data);
    RPT_reporting_zero (local_data->shape);
    RPT_reporting_zero (local_data->area);
    RPT_reporting_zero (local_data->num_separate_areas);
    RPT_reporting_zero (local_data->num_units);
    RPT_reporting_zero (local_data->num_animal_days_by_prodtype);

#if DEBUG
    g_log (G_LOG_DOMAIN, G_LOG_LEVEL_DEBUG, "----- EXIT reset (%s)", MODEL_NAME);
#endif
}
Пример #5
0
/**
 * Resets this model after a simulation run.
 *
 * @param self the model.
 */
void
reset (struct naadsm_model_t_ *self)
{
  local_data_t *local_data;

#if DEBUG
  g_debug ("----- ENTER reset (%s)", MODEL_NAME);
#endif

  local_data = (local_data_t *) (self->model_data);
  RPT_reporting_zero (local_data->cumul_num_units_exposed);
  RPT_reporting_zero (local_data->cumul_num_units_exposed_by_cause);
  RPT_reporting_zero (local_data->cumul_num_units_exposed_by_prodtype);
  RPT_reporting_zero (local_data->cumul_num_units_exposed_by_cause_and_prodtype);
  RPT_reporting_zero (local_data->cumul_num_animals_exposed);
  RPT_reporting_zero (local_data->cumul_num_animals_exposed_by_cause);
  RPT_reporting_zero (local_data->cumul_num_animals_exposed_by_prodtype);
  RPT_reporting_zero (local_data->cumul_num_animals_exposed_by_cause_and_prodtype);
  RPT_reporting_zero (local_data->cumul_num_adequate_exposures);

#if DEBUG
  g_debug ("----- EXIT reset (%s)", MODEL_NAME);
#endif
}
Пример #6
0
/**
 * Resets this model after a simulation run.
 *
 * @param self the model.
 */
void
reset (struct naadsm_model_t_ *self)
{
  local_data_t *local_data = (local_data_t *) (self->model_data);
  unsigned int nprod_types = local_data->production_types->len;
  unsigned int i;

#if DEBUG
  g_log (G_LOG_DOMAIN, G_LOG_LEVEL_DEBUG, "----- ENTER reset (%s)", MODEL_NAME);
#endif

  /*
  RPT_reporting_zero (local_data->total_cost);
  RPT_reporting_zero (local_data->appraisal_cost);
  RPT_reporting_zero (local_data->euthanasia_cost);
  RPT_reporting_zero (local_data->indemnification_cost);
  RPT_reporting_zero (local_data->carcass_disposal_cost);
  RPT_reporting_zero (local_data->cleaning_disinfecting_cost);
  RPT_reporting_zero (local_data->vaccination_cost);
  RPT_reporting_zero (local_data->surveillance_cost);
  */
  RPT_reporting_zero (local_data->cumul_total_cost);
  RPT_reporting_zero (local_data->cumul_appraisal_cost);
  RPT_reporting_zero (local_data->cumul_euthanasia_cost);
  RPT_reporting_zero (local_data->cumul_indemnification_cost);
  RPT_reporting_zero (local_data->cumul_carcass_disposal_cost);
  RPT_reporting_zero (local_data->cumul_cleaning_disinfecting_cost);
  RPT_reporting_zero (local_data->cumul_destruction_subtotal);
  RPT_reporting_zero (local_data->cumul_vaccination_setup_cost);
  RPT_reporting_zero (local_data->cumul_vaccination_cost);
  RPT_reporting_zero (local_data->cumul_vaccination_subtotal);
  RPT_reporting_zero (local_data->cumul_surveillance_cost);

  if (local_data->vaccination_cost_params)
    {
      for (i = 0; i < nprod_types; i++)
        {
          if (local_data->vaccination_cost_params[i])
            {
              local_data->vaccination_cost_params[i]->capacity_used = 0;
            }
        }
    }

#if DEBUG
  g_log (G_LOG_DOMAIN, G_LOG_LEVEL_DEBUG, "----- EXIT reset (%s)", MODEL_NAME);
#endif
}