:: deftheorem defines *' PETRI:def 7 :
for PTN being Petri_net
for T0 being Subset of the carrier' of PTN holds T0 *' = { s where s is place of PTN : ex f being T-S_arc of PTN ex t being transition of PTN st
( t in T0 & f = [t,s] ) } ;