R/RcppExports.R

In individual: Framework for Specifying and Simulating Individual Based Models

# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393

create_bitset <- function(size) {
    .Call(`_individual_create_bitset`, size)
}

bitset_copy <- function(b) {
    .Call(`_individual_bitset_copy`, b)
}

bitset_insert <- function(b, v) {
    invisible(.Call(`_individual_bitset_insert`, b, v))
}

bitset_remove <- function(b, v) {
    invisible(.Call(`_individual_bitset_remove`, b, v))
}

bitset_clear <- function(b) {
    invisible(.Call(`_individual_bitset_clear`, b))
}

bitset_size <- function(b) {
    .Call(`_individual_bitset_size`, b)
}

bitset_max_size <- function(b) {
    .Call(`_individual_bitset_max_size`, b)
}

bitset_and <- function(a, b) {
    invisible(.Call(`_individual_bitset_and`, a, b))
}

bitset_not <- function(b, inplace) {
    .Call(`_individual_bitset_not`, b, inplace)
}

bitset_or <- function(a, b) {
    invisible(.Call(`_individual_bitset_or`, a, b))
}

bitset_xor <- function(a, b) {
    invisible(.Call(`_individual_bitset_xor`, a, b))
}

bitset_set_difference <- function(a, b) {
    invisible(.Call(`_individual_bitset_set_difference`, a, b))
}

bitset_sample <- function(b, rate) {
    invisible(.Call(`_individual_bitset_sample`, b, rate))
}

bitset_sample_vector <- function(b, rate) {
    invisible(.Call(`_individual_bitset_sample_vector`, b, rate))
}

bitset_to_vector <- function(b) {
    .Call(`_individual_bitset_to_vector`, b)
}

filter_bitset_vector <- function(b, other) {
    .Call(`_individual_filter_bitset_vector`, b, other)
}

filter_bitset_bitset <- function(b, other) {
    .Call(`_individual_filter_bitset_bitset`, b, other)
}

bitset_choose <- function(b, k) {
    invisible(.Call(`_individual_bitset_choose`, b, k))
}

create_categorical_variable <- function(categories, values) {
    .Call(`_individual_create_categorical_variable`, categories, values)
}

categorical_variable_get_size <- function(variable) {
    .Call(`_individual_categorical_variable_get_size`, variable)
}

categorical_variable_queue_update <- function(variable, value, index) {
    invisible(.Call(`_individual_categorical_variable_queue_update`, variable, value, index))
}

categorical_variable_get_index_of <- function(variable, values) {
    .Call(`_individual_categorical_variable_get_index_of`, variable, values)
}

categorical_variable_get_size_of <- function(variable, values) {
    .Call(`_individual_categorical_variable_get_size_of`, variable, values)
}

categorical_variable_get_categories <- function(variable) {
    .Call(`_individual_categorical_variable_get_categories`, variable)
}

categorical_variable_queue_update_vector <- function(variable, value, index) {
    invisible(.Call(`_individual_categorical_variable_queue_update_vector`, variable, value, index))
}

categorical_variable_update <- function(variable) {
    invisible(.Call(`_individual_categorical_variable_update`, variable))
}

categorical_variable_queue_extend <- function(variable, values) {
    invisible(.Call(`_individual_categorical_variable_queue_extend`, variable, values))
}

categorical_variable_queue_shrink <- function(variable, index) {
    invisible(.Call(`_individual_categorical_variable_queue_shrink`, variable, index))
}

categorical_variable_queue_shrink_bitset <- function(variable, index) {
    invisible(.Call(`_individual_categorical_variable_queue_shrink_bitset`, variable, index))
}

create_double_variable <- function(values) {
    .Call(`_individual_create_double_variable`, values)
}

double_variable_get_values <- function(variable) {
    .Call(`_individual_double_variable_get_values`, variable)
}

double_variable_get_values_at_index <- function(variable, index) {
    .Call(`_individual_double_variable_get_values_at_index`, variable, index)
}

double_variable_get_values_at_index_vector <- function(variable, index) {
    .Call(`_individual_double_variable_get_values_at_index_vector`, variable, index)
}

double_variable_get_index_of_range <- function(variable, a, b) {
    .Call(`_individual_double_variable_get_index_of_range`, variable, a, b)
}

double_variable_get_size_of_range <- function(variable, a, b) {
    .Call(`_individual_double_variable_get_size_of_range`, variable, a, b)
}

double_variable_queue_fill <- function(variable, value) {
    invisible(.Call(`_individual_double_variable_queue_fill`, variable, value))
}

double_variable_queue_update <- function(variable, value, index) {
    invisible(.Call(`_individual_double_variable_queue_update`, variable, value, index))
}

double_variable_queue_update_bitset <- function(variable, value, index) {
    invisible(.Call(`_individual_double_variable_queue_update_bitset`, variable, value, index))
}

double_variable_queue_extend <- function(variable, values) {
    invisible(.Call(`_individual_double_variable_queue_extend`, variable, values))
}

double_variable_queue_shrink <- function(variable, index) {
    invisible(.Call(`_individual_double_variable_queue_shrink`, variable, index))
}

double_variable_queue_shrink_bitset <- function(variable, index) {
    invisible(.Call(`_individual_double_variable_queue_shrink_bitset`, variable, index))
}

create_event <- function() {
    .Call(`_individual_create_event`)
}

create_targeted_event <- function(size) {
    .Call(`_individual_create_targeted_event`, size)
}

event_tick <- function(event) {
    invisible(.Call(`_individual_event_tick`, event))
}

event_schedule <- function(event, delays) {
    invisible(.Call(`_individual_event_schedule`, event, delays))
}

event_clear_schedule <- function(event) {
    invisible(.Call(`_individual_event_clear_schedule`, event))
}

targeted_event_clear_schedule_vector <- function(event, target) {
    invisible(.Call(`_individual_targeted_event_clear_schedule_vector`, event, target))
}

targeted_event_clear_schedule <- function(event, target) {
    invisible(.Call(`_individual_targeted_event_clear_schedule`, event, target))
}

targeted_event_get_scheduled <- function(event) {
    .Call(`_individual_targeted_event_get_scheduled`, event)
}

targeted_event_schedule <- function(event, target, delay) {
    invisible(.Call(`_individual_targeted_event_schedule`, event, target, delay))
}

targeted_event_queue_shrink_bitset <- function(event, index) {
    invisible(.Call(`_individual_targeted_event_queue_shrink_bitset`, event, index))
}

targeted_event_queue_shrink <- function(event, index) {
    invisible(.Call(`_individual_targeted_event_queue_shrink`, event, index))
}

targeted_event_queue_extend <- function(event, n) {
    invisible(.Call(`_individual_targeted_event_queue_extend`, event, n))
}

targeted_event_queue_extend_with_schedule <- function(event, delays) {
    invisible(.Call(`_individual_targeted_event_queue_extend_with_schedule`, event, delays))
}

targeted_event_schedule_vector <- function(event, target, delay) {
    invisible(.Call(`_individual_targeted_event_schedule_vector`, event, target, delay))
}

targeted_event_schedule_multi_delay <- function(event, target, delay) {
    invisible(.Call(`_individual_targeted_event_schedule_multi_delay`, event, target, delay))
}

targeted_event_schedule_multi_delay_vector <- function(event, target, delay) {
    invisible(.Call(`_individual_targeted_event_schedule_multi_delay_vector`, event, target, delay))
}

event_get_timestep <- function(event) {
    .Call(`_individual_event_get_timestep`, event)
}

event_should_trigger <- function(event) {
    .Call(`_individual_event_should_trigger`, event)
}

targeted_event_get_target <- function(event) {
    .Call(`_individual_targeted_event_get_target`, event)
}

targeted_event_resize <- function(event) {
    invisible(.Call(`_individual_targeted_event_resize`, event))
}

process_listener <- function(event, listener) {
    invisible(.Call(`_individual_process_listener`, event, listener))
}

process_targeted_listener <- function(event, listener, target) {
    invisible(.Call(`_individual_process_targeted_listener`, event, listener, target))
}

create_integer_variable <- function(values) {
    .Call(`_individual_create_integer_variable`, values)
}

integer_variable_get_values <- function(variable) {
    .Call(`_individual_integer_variable_get_values`, variable)
}

integer_variable_get_values_at_index <- function(variable, index) {
    .Call(`_individual_integer_variable_get_values_at_index`, variable, index)
}

integer_variable_get_values_at_index_vector <- function(variable, index) {
    .Call(`_individual_integer_variable_get_values_at_index_vector`, variable, index)
}

integer_variable_get_index_of_set_vector <- function(variable, values_set) {
    .Call(`_individual_integer_variable_get_index_of_set_vector`, variable, values_set)
}

integer_variable_get_index_of_set_scalar <- function(variable, values_set) {
    .Call(`_individual_integer_variable_get_index_of_set_scalar`, variable, values_set)
}

integer_variable_get_index_of_range <- function(variable, a, b) {
    .Call(`_individual_integer_variable_get_index_of_range`, variable, a, b)
}

integer_variable_get_size_of_set_vector <- function(variable, values_set) {
    .Call(`_individual_integer_variable_get_size_of_set_vector`, variable, values_set)
}

integer_variable_get_size_of_set_scalar <- function(variable, value) {
    .Call(`_individual_integer_variable_get_size_of_set_scalar`, variable, value)
}

integer_variable_get_size_of_range <- function(variable, a, b) {
    .Call(`_individual_integer_variable_get_size_of_range`, variable, a, b)
}

integer_variable_queue_fill <- function(variable, value) {
    invisible(.Call(`_individual_integer_variable_queue_fill`, variable, value))
}

integer_variable_queue_update <- function(variable, value, index) {
    invisible(.Call(`_individual_integer_variable_queue_update`, variable, value, index))
}

integer_variable_queue_update_bitset <- function(variable, value, index) {
    invisible(.Call(`_individual_integer_variable_queue_update_bitset`, variable, value, index))
}

integer_variable_queue_extend <- function(variable, values) {
    invisible(.Call(`_individual_integer_variable_queue_extend`, variable, values))
}

integer_variable_queue_shrink <- function(variable, index) {
    invisible(.Call(`_individual_integer_variable_queue_shrink`, variable, index))
}

integer_variable_queue_shrink_bitset <- function(variable, index) {
    invisible(.Call(`_individual_integer_variable_queue_shrink_bitset`, variable, index))
}

fixed_probability_multinomial_process_internal <- function(variable, source_state, destination_states, rate, destination_probabilities) {
    .Call(`_individual_fixed_probability_multinomial_process_internal`, variable, source_state, destination_states, rate, destination_probabilities)
}

multi_probability_multinomial_process_internal <- function(variable, source_state, destination_states, rate_variable, destination_probabilities) {
    .Call(`_individual_multi_probability_multinomial_process_internal`, variable, source_state, destination_states, rate_variable, destination_probabilities)
}

multi_probability_bernoulli_process_internal <- function(variable, from, to, rate_variable) {
    .Call(`_individual_multi_probability_bernoulli_process_internal`, variable, from, to, rate_variable)
}

infection_age_process_internal <- function(state, susceptible, exposed, infectious, age, age_bins, p, dt, mixing) {
    .Call(`_individual_infection_age_process_internal`, state, susceptible, exposed, infectious, age, age_bins, p, dt, mixing)
}

create_double_ragged_variable <- function(values) {
    .Call(`_individual_create_double_ragged_variable`, values)
}

double_ragged_variable_get_values <- function(variable) {
    .Call(`_individual_double_ragged_variable_get_values`, variable)
}

double_ragged_variable_get_values_at_index_bitset <- function(variable, index) {
    .Call(`_individual_double_ragged_variable_get_values_at_index_bitset`, variable, index)
}

double_ragged_variable_get_values_at_index_vector <- function(variable, index) {
    .Call(`_individual_double_ragged_variable_get_values_at_index_vector`, variable, index)
}

double_ragged_variable_get_length <- function(variable) {
    .Call(`_individual_double_ragged_variable_get_length`, variable)
}

double_ragged_variable_get_length_at_index_bitset <- function(variable, index) {
    .Call(`_individual_double_ragged_variable_get_length_at_index_bitset`, variable, index)
}

double_ragged_variable_get_length_at_index_vector <- function(variable, index) {
    .Call(`_individual_double_ragged_variable_get_length_at_index_vector`, variable, index)
}

double_ragged_variable_queue_fill <- function(variable, value) {
    invisible(.Call(`_individual_double_ragged_variable_queue_fill`, variable, value))
}

double_ragged_variable_queue_update <- function(variable, value, index) {
    invisible(.Call(`_individual_double_ragged_variable_queue_update`, variable, value, index))
}

double_ragged_variable_queue_update_bitset <- function(variable, value, index) {
    invisible(.Call(`_individual_double_ragged_variable_queue_update_bitset`, variable, value, index))
}

double_ragged_variable_queue_extend <- function(variable, values) {
    invisible(.Call(`_individual_double_ragged_variable_queue_extend`, variable, values))
}

double_ragged_variable_queue_shrink <- function(variable, index) {
    invisible(.Call(`_individual_double_ragged_variable_queue_shrink`, variable, index))
}

double_ragged_variable_queue_shrink_bitset <- function(variable, index) {
    invisible(.Call(`_individual_double_ragged_variable_queue_shrink_bitset`, variable, index))
}

create_integer_ragged_variable <- function(values) {
    .Call(`_individual_create_integer_ragged_variable`, values)
}

integer_ragged_variable_get_values <- function(variable) {
    .Call(`_individual_integer_ragged_variable_get_values`, variable)
}

integer_ragged_variable_get_values_at_index_bitset <- function(variable, index) {
    .Call(`_individual_integer_ragged_variable_get_values_at_index_bitset`, variable, index)
}

integer_ragged_variable_get_values_at_index_vector <- function(variable, index) {
    .Call(`_individual_integer_ragged_variable_get_values_at_index_vector`, variable, index)
}

integer_ragged_variable_get_length <- function(variable) {
    .Call(`_individual_integer_ragged_variable_get_length`, variable)
}

integer_ragged_variable_get_length_at_index_bitset <- function(variable, index) {
    .Call(`_individual_integer_ragged_variable_get_length_at_index_bitset`, variable, index)
}

integer_ragged_variable_get_length_at_index_vector <- function(variable, index) {
    .Call(`_individual_integer_ragged_variable_get_length_at_index_vector`, variable, index)
}

integer_ragged_variable_queue_fill <- function(variable, value) {
    invisible(.Call(`_individual_integer_ragged_variable_queue_fill`, variable, value))
}

integer_ragged_variable_queue_update <- function(variable, value, index) {
    invisible(.Call(`_individual_integer_ragged_variable_queue_update`, variable, value, index))
}

integer_ragged_variable_queue_update_bitset <- function(variable, value, index) {
    invisible(.Call(`_individual_integer_ragged_variable_queue_update_bitset`, variable, value, index))
}

integer_ragged_variable_queue_extend <- function(variable, values) {
    invisible(.Call(`_individual_integer_ragged_variable_queue_extend`, variable, values))
}

integer_ragged_variable_queue_shrink <- function(variable, index) {
    invisible(.Call(`_individual_integer_ragged_variable_queue_shrink`, variable, index))
}

integer_ragged_variable_queue_shrink_bitset <- function(variable, index) {
    invisible(.Call(`_individual_integer_ragged_variable_queue_shrink_bitset`, variable, index))
}

execute_process <- function(process, timestep) {
    invisible(.Call(`_individual_execute_process`, process, timestep))
}

variable_get_size <- function(variable) {
    .Call(`_individual_variable_get_size`, variable)
}

variable_update <- function(variable) {
    invisible(.Call(`_individual_variable_update`, variable))
}

variable_resize <- function(variable) {
    invisible(.Call(`_individual_variable_resize`, variable))
}

# Register entry points for exported C++ functions
methods::setLoadAction(function(ns) {
    .Call('_individual_RcppExport_registerCCallable', PACKAGE = 'individual')
})