R/is_transition.R

Defines functions is_transition

Documented in is_transition

#' @title Is transition
#'
#' @description Check if a transition is part of a petri net
#'
#' @param transition A transition
#' @param PN A Petri Net
#'
#' @export is_transition


is_transition <- function(transition, PN) {
	if(transition %in% transitions(PN)$id)
		return(T)
	else
		return(F)
}
gertjanssenswillen/petrinetR documentation built on Aug. 1, 2019, 12:55 p.m.