R/RcppExports.R

Defines functions print_vector test_pull_elem_a pull_time_varying_parameters do_expand_population_character do_expand_population do_marginal_sums_general do_marginal_sums_hiv_negative do_marginal_sums_hiv_positive test dx_function do_get_access_indices

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

do_get_access_indices <- function(dims, to_access) {
    .Call(`_jheem_do_get_access_indices`, dims, to_access)
}

dx_function <- function(hiv_positive, hiv_negative, DIMS_HIV, DIMS_NONHIV, AGING_RATES_HIV, AGING_RATES_NONHIV, FERTILITY_RATES_HIV, FERTILITY_RATES_NONHIV, FRACTION_BIRTHS_INFECTED, BIRTHS_DIMMASK_NONHIV, BIRTH_PROPORTIONS_NONHIV, BIRTHS_DIMMASK_HIV_TO_NONHIV, BIRTH_PROPORTIONS_HIV_TO_NONHIV, BIRTHS_DIMMASK_HIV_TO_HIV, BIRTH_PROPORTIONS_HIV_TO_HIV, NUM_TRANSMISSION_ROUTES, CONTACT_MATRICES, TRANSMISSIBILITIES, SUSCEPTIBILITIES, GLOBAL_TRANSMISSION_RATES, CONTACT_DIMMASKS, NEW_INFECTION_PROPORTIONS, COLLAPSE_INCIDENCE_INDICES, HIV_TRANSITION_ARRAYS, HIV_TRANSITION_DIMENSIONS, NONHIV_TRANSITION_ARRAYS, NONHIV_TRANSITION_DIMENSIONS, TRACKED_HIV_TRANSITION_INDICES, TRACKED_HIV_TRANSITION_FROM, TRACKED_HIV_TRANSITION_ARRAY_INDICES, TRACKED_HIV_TRANSITION_COLLAPSE_INDICES, TRACKED_NONHIV_TRANSITION_INDICES, TRACKED_NONHIV_TRANSITION_FROM, TRACKED_NONHIV_TRANSITION_ARRAY_INDICES, TRACKED_NONHIV_TRANSITION_COLLAPSE_INDICES, HIV_SPECIFIC_MORTALITY_RATES, GENERAL_MORTALITY_RATES_HIV, GENERAL_MORTALITY_RATES_NONHIV, FIXED_SIZE, FIXED_SIZE_STRATA_DIMMASK, MODEL_BIRTHS, MODEL_MATERNAL_TRANSMISSION, TRACK_HIV_SPECIFIC_MORTALITY, COLLAPSE_DIMMASK_HIV_SPECIFIC_MORTALITY, TRACK_HIV_OVERALL_MORTALITY, COLLAPSE_DIMMASK_HIV_OVERALL_MORTALITY, TRACK_NONHIV_MORTALITY, COLLAPSE_DIMMASK_NONHIV_MORTALITY) {
    .Call(`_jheem_dx_function`, hiv_positive, hiv_negative, DIMS_HIV, DIMS_NONHIV, AGING_RATES_HIV, AGING_RATES_NONHIV, FERTILITY_RATES_HIV, FERTILITY_RATES_NONHIV, FRACTION_BIRTHS_INFECTED, BIRTHS_DIMMASK_NONHIV, BIRTH_PROPORTIONS_NONHIV, BIRTHS_DIMMASK_HIV_TO_NONHIV, BIRTH_PROPORTIONS_HIV_TO_NONHIV, BIRTHS_DIMMASK_HIV_TO_HIV, BIRTH_PROPORTIONS_HIV_TO_HIV, NUM_TRANSMISSION_ROUTES, CONTACT_MATRICES, TRANSMISSIBILITIES, SUSCEPTIBILITIES, GLOBAL_TRANSMISSION_RATES, CONTACT_DIMMASKS, NEW_INFECTION_PROPORTIONS, COLLAPSE_INCIDENCE_INDICES, HIV_TRANSITION_ARRAYS, HIV_TRANSITION_DIMENSIONS, NONHIV_TRANSITION_ARRAYS, NONHIV_TRANSITION_DIMENSIONS, TRACKED_HIV_TRANSITION_INDICES, TRACKED_HIV_TRANSITION_FROM, TRACKED_HIV_TRANSITION_ARRAY_INDICES, TRACKED_HIV_TRANSITION_COLLAPSE_INDICES, TRACKED_NONHIV_TRANSITION_INDICES, TRACKED_NONHIV_TRANSITION_FROM, TRACKED_NONHIV_TRANSITION_ARRAY_INDICES, TRACKED_NONHIV_TRANSITION_COLLAPSE_INDICES, HIV_SPECIFIC_MORTALITY_RATES, GENERAL_MORTALITY_RATES_HIV, GENERAL_MORTALITY_RATES_NONHIV, FIXED_SIZE, FIXED_SIZE_STRATA_DIMMASK, MODEL_BIRTHS, MODEL_MATERNAL_TRANSMISSION, TRACK_HIV_SPECIFIC_MORTALITY, COLLAPSE_DIMMASK_HIV_SPECIFIC_MORTALITY, TRACK_HIV_OVERALL_MORTALITY, COLLAPSE_DIMMASK_HIV_OVERALL_MORTALITY, TRACK_NONHIV_MORTALITY, COLLAPSE_DIMMASK_NONHIV_MORTALITY)
}

test <- function(l) {
    .Call(`_jheem_test`, l)
}

do_marginal_sums_hiv_positive <- function(arr, dims, keep_mask) {
    .Call(`_jheem_do_marginal_sums_hiv_positive`, arr, dims, keep_mask)
}

do_marginal_sums_hiv_negative <- function(arr, dims, keep_mask) {
    .Call(`_jheem_do_marginal_sums_hiv_negative`, arr, dims, keep_mask)
}

do_marginal_sums_general <- function(arr, dims, keep_mask) {
    .Call(`_jheem_do_marginal_sums_general`, arr, dims, keep_mask)
}

do_expand_population <- function(src, target_dims, src_to_target_dim_map) {
    .Call(`_jheem_do_expand_population`, src, target_dims, src_to_target_dim_map)
}

do_expand_population_character <- function(src, target_dims, src_to_target_dim_map) {
    .Call(`_jheem_do_expand_population_character`, src, target_dims, src_to_target_dim_map)
}

pull_time_varying_parameters <- function(param_sets, time) {
    .Call(`_jheem_pull_time_varying_parameters`, param_sets, time)
}

test_pull_elem_a <- function(l) {
    .Call(`_jheem_test_pull_elem_a`, l)
}

print_vector <- function(v) {
    invisible(.Call(`_jheem_print_vector`, v))
}
tfojo1/jheem documentation built on Oct. 7, 2022, 1:24 p.m.