undo_S

digraph petrinet {
	"t2([I*pir*rir]) = [0.063*I]" [shape=box]
	I -> "t2([I*pir*rir]) = [0.063*I]"
	"t3([I*pih*rih]) = [0.007*I]" [shape=box]
	I -> "t3([I*pih*rih]) = [0.007*I]"
	"t4([H*phd*rhd]) = [0.039*H]" [shape=box]
	"t5([H*phr*rhr]) = [0.0609*H]" [shape=box]
	"t1___to___vac__to([I*S*agg_beta/N]) = [0]" [shape=box]
	I -> "t1___to___vac__to([I*S*agg_beta/N]) = [0]"
	"t1___to___vac__to([I*S*agg_beta/N]) = [0]" -> I [label=1.0]
	"t1___to___vac__to([I*S*agg_beta/N]) = [0]" -> I [label=1.0]
	"t2([I*pir*rir]) = [0.063*I]" [shape=box]
	"t2([I*pir*rir]) = [0.063*I]" -> R [label=1.0]
	"t3([I*pih*rih]) = [0.007*I]" [shape=box]
	"t4([H*phd*rhd]) = [0.039*H]" [shape=box]
	"t5([H*phr*rhr]) = [0.0609*H]" [shape=box]
	"t5([H*phr*rhr]) = [0.0609*H]" -> R [label=1.0]
	"t1___to___vac__to([I*S*agg_beta/N]) = [0]" [shape=box]
	"t2([I*pir*rir]) = [0.063*I]" [shape=box]
	"t3([I*pih*rih]) = [0.007*I]" [shape=box]
	"t3([I*pih*rih]) = [0.007*I]" -> H [label=1.0]
	"t4([H*phd*rhd]) = [0.039*H]" [shape=box]
	H -> "t4([H*phd*rhd]) = [0.039*H]"
	"t5([H*phr*rhr]) = [0.0609*H]" [shape=box]
	H -> "t5([H*phr*rhr]) = [0.0609*H]"
	"t1___to___vac__to([I*S*agg_beta/N]) = [0]" [shape=box]
	"t2([I*pir*rir]) = [0.063*I]" [shape=box]
	"t3([I*pih*rih]) = [0.007*I]" [shape=box]
	"t4([H*phd*rhd]) = [0.039*H]" [shape=box]
	"t4([H*phd*rhd]) = [0.039*H]" -> D [label=1.0]
	"t5([H*phr*rhr]) = [0.0609*H]" [shape=box]
	"t1___to___vac__to([I*S*agg_beta/N]) = [0]" [shape=box]
	"t2([I*pir*rir]) = [0.063*I]" [shape=box]
	"t3([I*pih*rih]) = [0.007*I]" [shape=box]
	"t4([H*phd*rhd]) = [0.039*H]" [shape=box]
	"t5([H*phr*rhr]) = [0.0609*H]" [shape=box]
	"t1___to___vac__to([I*S*agg_beta/N]) = [0]" [shape=box]
	S -> "t1___to___vac__to([I*S*agg_beta/N]) = [0]"
}