R/1-duration-.R

In flujoo/gm: Create Music with Ease

Defines functions print.Duration Duration

Documented in print.Duration

Duration <- function(duration) {
  structure(duration, class = "Duration")
}


#' @keywords internal
#' @export
print.Duration <- function(x, ...) {
  cat(to_string(x), "\n")
}