1
# Exported for testing
2

3
divmod <- function(x, y) {
4 1
  .Call(warp_divmod, x, y)
5
}
6

7
div <- function(x, y) {
8 1
  .Call(warp_div, x, y)
9
}

Read our documentation on viewing source code .

Loading