R/RcppExports.R

In broadcast: Broadcasted Array Operations Like 'NumPy'

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

#' @keywords internal
#' @noRd
.rcpp_factor_count <- function(grp, j) {
    .Call(`_broadcast_rcpp_factor_count`, grp, j)
}

#' @keywords internal
#' @noRd
.rcpp_factor_which <- function(grp, j, size) {
    .Call(`_broadcast_rcpp_factor_which`, grp, j, size)
}

#' @keywords internal
#' @noRd
.rcpp_acast <- function(out, y, starts, lens, subs, out_dim, dcp_out, dcp_y, grp, grp_n, margin, newdim) {
    invisible(.Call(`_broadcast_rcpp_acast`, out, y, starts, lens, subs, out_dim, dcp_out, dcp_y, grp, grp_n, margin, newdim))
}

#' @keywords internal
#' @noRd
.rcpp_address <- function(x) {
    .Call(`_broadcast_rcpp_address`, x)
}

#' @keywords internal
#' @noRd
rcpp_str_dist_led <- function(x, y) {
    .Call(`_broadcast_rcpp_str_dist_led`, x, y)
}

#' @keywords internal
#' @noRd
.rcpp_bcDist_str_v <- function(x, y, nout, op) {
    .Call(`_broadcast_rcpp_bcDist_str_v`, x, y, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bcDist_str_ov <- function(x, y, RxC, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bcDist_str_ov`, x, y, RxC, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bcDist_str_d <- function(x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bcDist_str_d`, x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bcRel_cplx_v <- function(x, y, nout, op) {
    .Call(`_broadcast_rcpp_bcRel_cplx_v`, x, y, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bcRel_cplx_ov <- function(x, y, RxC, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bcRel_cplx_ov`, x, y, RxC, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bcRel_cplx_d <- function(x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bcRel_cplx_d`, x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bcRel_dec_v <- function(x, y, nout, op, prec) {
    .Call(`_broadcast_rcpp_bcRel_dec_v`, x, y, nout, op, prec)
}

#' @keywords internal
#' @noRd
.rcpp_bcRel_dec_ov <- function(x, y, RxC, out_dim, nout, op, prec) {
    .Call(`_broadcast_rcpp_bcRel_dec_ov`, x, y, RxC, out_dim, nout, op, prec)
}

#' @keywords internal
#' @noRd
.rcpp_bcRel_dec_d <- function(x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op, prec) {
    .Call(`_broadcast_rcpp_bcRel_dec_d`, x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op, prec)
}

#' @keywords internal
#' @noRd
.rcpp_bcRel_int_v <- function(x, y, nout, op) {
    .Call(`_broadcast_rcpp_bcRel_int_v`, x, y, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bcRel_int_ov <- function(x, y, RxC, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bcRel_int_ov`, x, y, RxC, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bcRel_int_d <- function(x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bcRel_int_d`, x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bcRel_raw_v <- function(x, y, nout, op) {
    .Call(`_broadcast_rcpp_bcRel_raw_v`, x, y, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bcRel_raw_ov <- function(x, y, RxC, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bcRel_raw_ov`, x, y, RxC, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bcRel_raw_d <- function(x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bcRel_raw_d`, x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bcRel_str_v <- function(x, y, nout, op) {
    .Call(`_broadcast_rcpp_bcRel_str_v`, x, y, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bcRel_str_ov <- function(x, y, RxC, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bcRel_str_ov`, x, y, RxC, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bcRel_str_d <- function(x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bcRel_str_d`, x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bc_b_v <- function(x, y, nout, op) {
    .Call(`_broadcast_rcpp_bc_b_v`, x, y, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bc_b_ov <- function(x, y, RxC, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bc_b_ov`, x, y, RxC, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bc_b_d <- function(x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bc_b_d`, x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bc_bind <- function(out, x, starts, ends, by_x, dcp_out, dcp_x, out_dim) {
    invisible(.Call(`_broadcast_rcpp_bc_bind`, out, x, starts, ends, by_x, dcp_out, dcp_x, out_dim))
}

#' @keywords internal
#' @noRd
.rcpp_bc_bit_v <- function(x, y, nout, op) {
    .Call(`_broadcast_rcpp_bc_bit_v`, x, y, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bc_bit_ov <- function(x, y, RxC, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bc_bit_ov`, x, y, RxC, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bc_bit_d <- function(x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bc_bit_d`, x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bc_cplx_v <- function(x, y, nout, op) {
    .Call(`_broadcast_rcpp_bc_cplx_v`, x, y, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bc_cplx_ov <- function(x, y, RxC, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bc_cplx_ov`, x, y, RxC, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bc_cplx_d <- function(x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bc_cplx_d`, x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bc_dec_v <- function(x, y, nout, op) {
    .Call(`_broadcast_rcpp_bc_dec_v`, x, y, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bc_dec_ov <- function(x, y, RxC, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bc_dec_ov`, x, y, RxC, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bc_dec_d <- function(x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bc_dec_d`, x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bc_ifelse_v <- function(cond, x, y, nout) {
    .Call(`_broadcast_rcpp_bc_ifelse_v`, cond, x, y, nout)
}

#' @keywords internal
#' @noRd
.rcpp_bc_ifelse_ov <- function(cond, x, y, RxC, out_dim, nout) {
    .Call(`_broadcast_rcpp_bc_ifelse_ov`, cond, x, y, RxC, out_dim, nout)
}

#' @keywords internal
#' @noRd
.rcpp_bc_ifelse_d <- function(cond, x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout) {
    .Call(`_broadcast_rcpp_bc_ifelse_d`, cond, x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout)
}

#' @keywords internal
#' @noRd
.rcpp_int53_gcd_rec <- function(x, y) {
    .Call(`_broadcast_rcpp_int53_gcd_rec`, x, y)
}

#' @keywords internal
#' @noRd
.rcpp_int53_gcd <- function(x, y) {
    .Call(`_broadcast_rcpp_int53_gcd`, x, y)
}

#' @keywords internal
#' @noRd
.rcpp_bc_int_v <- function(x, y, nout, op) {
    .Call(`_broadcast_rcpp_bc_int_v`, x, y, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bc_int_ov <- function(x, y, RxC, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bc_int_ov`, x, y, RxC, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bc_int_d <- function(x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bc_int_d`, x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bc_list_v <- function(x, y, nout, f) {
    .Call(`_broadcast_rcpp_bc_list_v`, x, y, nout, f)
}

#' @keywords internal
#' @noRd
.rcpp_bc_list_ov <- function(x, y, RxC, out_dim, nout, f) {
    .Call(`_broadcast_rcpp_bc_list_ov`, x, y, RxC, out_dim, nout, f)
}

#' @keywords internal
#' @noRd
.rcpp_bc_list_d <- function(x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, f) {
    .Call(`_broadcast_rcpp_bc_list_d`, x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, f)
}

#' @keywords internal
#' @noRd
.rcpp_bc_raw_v <- function(x, y, nout, op) {
    .Call(`_broadcast_rcpp_bc_raw_v`, x, y, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bc_raw_ov <- function(x, y, RxC, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bc_raw_ov`, x, y, RxC, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bc_raw_d <- function(x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bc_raw_d`, x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_string_plus <- function(x, y) {
    .Call(`_broadcast_rcpp_string_plus`, x, y)
}

#' @keywords internal
#' @noRd
.rcpp_bc_str_v <- function(x, y, nout, op) {
    .Call(`_broadcast_rcpp_bc_str_v`, x, y, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bc_str_ov <- function(x, y, RxC, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bc_str_ov`, x, y, RxC, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bc_str_d <- function(x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op) {
    .Call(`_broadcast_rcpp_bc_str_d`, x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, op)
}

#' @keywords internal
#' @noRd
.rcpp_bcapply_v <- function(out, x, y, nout, f) {
    invisible(.Call(`_broadcast_rcpp_bcapply_v`, out, x, y, nout, f))
}

#' @keywords internal
#' @noRd
.rcpp_bcapply_ov <- function(out, x, y, RxC, out_dim, nout, f) {
    invisible(.Call(`_broadcast_rcpp_bcapply_ov`, out, x, y, RxC, out_dim, nout, f))
}

#' @keywords internal
#' @noRd
.rcpp_bcapply_d <- function(out, x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, f) {
    invisible(.Call(`_broadcast_rcpp_bcapply_d`, out, x, y, by_x, by_y, dcp_x, dcp_y, out_dim, nout, f))
}

#' @keywords internal
#' @noRd
.rcpp_bindhelper_max_type <- function(x) {
    .Call(`_broadcast_rcpp_bindhelper_max_type`, x)
}

#' @keywords internal
#' @noRd
.rcpp_bindhelper_vdims <- function(x) {
    .Call(`_broadcast_rcpp_bindhelper_vdims`, x)
}

#' @keywords internal
#' @noRd
.rcpp_bindhelper_sum_along <- function(lst_dims, along) {
    .Call(`_broadcast_rcpp_bindhelper_sum_along`, lst_dims, along)
}

#' @keywords internal
#' @noRd
.rcpp_bindhelper_conf_dims_2 <- function(x, y, along, max_bc) {
    .Call(`_broadcast_rcpp_bindhelper_conf_dims_2`, x, y, along, max_bc)
}

#' @keywords internal
#' @noRd
.rcpp_bindhelper_conf_dims_all <- function(lst_dims, target, along, max_bc) {
    .Call(`_broadcast_rcpp_bindhelper_conf_dims_all`, lst_dims, target, along, max_bc)
}

#' @keywords internal
#' @noRd
.rcpp_bindhelper_get_dimnames <- function(x, along) {
    .Call(`_broadcast_rcpp_bindhelper_get_dimnames`, x, along)
}

#' @keywords internal
#' @noRd
.rcpp_allocate_nestedlist <- function(lens, depth) {
    .Call(`_broadcast_rcpp_allocate_nestedlist`, lens, depth)
}

#' @keywords internal
#' @noRd
.rcpp_rec_dim2hier <- function(x, out, dcp, dimpart_prev, depth, depth_target) {
    invisible(.Call(`_broadcast_rcpp_rec_dim2hier`, x, out, dcp, dimpart_prev, depth, depth_target))
}

#' @keywords internal
#' @noRd
.rcpp_rec_dim2hier_names <- function(out, dimnames, depth, depth_target) {
    invisible(.Call(`_broadcast_rcpp_rec_dim2hier_names`, out, dimnames, depth, depth_target))
}

#' @keywords internal
#' @noRd
.rcpp_rec_cast_hier2dim <- function(x, out, dcp, dimpart_prev, depth, depth_target) {
    invisible(.Call(`_broadcast_rcpp_rec_cast_hier2dim`, x, out, dcp, dimpart_prev, depth, depth_target))
}

#' @keywords internal
#' @noRd
.rcpp_serial <- function(x) {
    .Call(`_broadcast_rcpp_serial`, x)
}

#' @keywords internal
#' @noRd
.rcpp_is_ma <- function(x) {
    .Call(`_broadcast_rcpp_is_ma`, x)
}

#' @keywords internal
#' @noRd
.rcpp_set_ma <- function(x, newclass) {
    invisible(.Call(`_broadcast_rcpp_set_ma`, x, newclass))
}

#' @keywords internal
#' @noRd
.rcpp_set_class <- function(x, newclass) {
    invisible(.Call(`_broadcast_rcpp_set_class`, x, newclass))
}

#' @keywords internal
#' @noRd
.rcpp_clone <- function(x) {
    .Call(`_broadcast_rcpp_clone`, x)
}

#' @keywords internal
#' @noRd
.rcpp_depth_range <- function(x, depth_limit, recurse_classed) {
    .Call(`_broadcast_rcpp_depth_range`, x, depth_limit, recurse_classed)
}

#' @keywords internal
#' @noRd
.rcpp_lenrange_atdepth <- function(x, depth_target, recurse_classed) {
    .Call(`_broadcast_rcpp_lenrange_atdepth`, x, depth_target, recurse_classed)
}

#' @keywords internal
#' @noRd
.rcpp_hier2dim_surface_OK <- function(x, recurse_classed) {
    .Call(`_broadcast_rcpp_hier2dim_surface_OK`, x, recurse_classed)
}

#' @keywords internal
#' @noRd
.rcpp_dropnests <- function(x, maxdepth, recurse_classed) {
    .Call(`_broadcast_rcpp_dropnests`, x, maxdepth, recurse_classed)
}

#' @keywords internal
#' @noRd
.rcpp_make_dimnames2 <- function(xdimnames, ydimnames, outdim, pref) {
    .Call(`_broadcast_rcpp_make_dimnames2`, xdimnames, ydimnames, outdim, pref)
}

#' @keywords internal
#' @noRd
.rcpp_make_dimnames_between <- function(adimnames, vnames, outdim) {
    .Call(`_broadcast_rcpp_make_dimnames_between`, adimnames, vnames, outdim)
}

#' @keywords internal
#' @noRd
.rcpp_make_dimnames1 <- function(y_dimnames, ydim, outdim) {
    .Call(`_broadcast_rcpp_make_dimnames1`, y_dimnames, ydim, outdim)
}

#' @keywords internal
#' @noRd
.rcpp_mergedims_output <- function(x, y, len) {
    .Call(`_broadcast_rcpp_mergedims_output`, x, y, len)
}

#' @keywords internal
#' @noRd
.rcpp_mergedims_prod <- function(x, mergeable, pos) {
    .Call(`_broadcast_rcpp_mergedims_prod`, x, mergeable, pos)
}

#' @keywords internal
#' @noRd
.rcpp_is_mergeable_with_prev <- function(xB, yB) {
    .Call(`_broadcast_rcpp_is_mergeable_with_prev`, xB, yB)
}

#' @keywords internal
#' @noRd
.rcpp_mergedims <- function(xD, yD, mergeable) {
    .Call(`_broadcast_rcpp_mergedims`, xD, yD, mergeable)
}

#' @keywords internal
#' @noRd
.rcpp_rep_new_int <- function(n, val) {
    .Call(`_broadcast_rcpp_rep_new_int`, n, val)
}

#' @keywords internal
#' @noRd
.rcpp_normalize_dims <- function(dims_old, start, max_ndim) {
    .Call(`_broadcast_rcpp_normalize_dims_regular`, dims_old, start, max_ndim)
}

#' @keywords internal
#' @noRd
.rcpp_set_attr <- function(x, name, value) {
    invisible(.Call(`_broadcast_rcpp_set_attr`, x, name, value))
}

#' @keywords internal
#' @noRd
.rcpp_set_vind_32 <- function(x, ind, rp) {
    invisible(.Call(`_broadcast_rcpp_set_vind_32_atomic`, x, ind, rp))
}

#' @keywords internal
#' @noRd
.rcpp_set_vind_64 <- function(x, ind, rp) {
    invisible(.Call(`_broadcast_rcpp_set_vind_64_atomic`, x, ind, rp))
}