R/marking.R

In gertjanssenswillen/petrinetR: Building, Visualizing, Exporting and Replaying Petri Nets

Defines functions marking

Documented in marking

#' @title Marking
#'
#' @description Get the current marking of a Petri Net
#'
#' @param PN A Petri Net
#'
#' @export marking


marking <- function(PN) {
	return(PN$marking)
}