R/print.petrinet.R

Defines functions print.petrinet

Documented in print.petrinet

#' @title Generic print function for petrinet
#' @description Generic print function for petrinet
#' @param x petrinet object
#' @param ... Additional Arguments
#' @method print petrinet
#' @export

print.petrinet <- function(x, ...) {
	cat("Marking: ",marking(x), "\n")
	cat("Enabled transition\n")
	print(enabled(x))
	render_PN(x)

}
gertjanssenswillen/petrinetR documentation built on Aug. 1, 2019, 12:55 p.m.