R/allfaces.R

Defines functions allfaces

Documented in allfaces

allfaces <- function(hrep) {

    stopifnot(is.character(hrep) || is.numeric(hrep))
    validcdd(hrep, representation = "H")

    if (is.character(hrep)) {
        .Call(C_allfaces, hrep)
    } else {
        storage.mode(hrep) <- "double"
        .Call(C_allfaces_f, hrep)
    }
}

Try the rcdd package in your browser

Any scripts or data that you put into this service are public.

rcdd documentation built on May 29, 2024, 2:21 a.m.