reserve PTN for Petri_net;
reserve S0 for Subset of the carrier of PTN;
reserve T0 for Subset of the carrier' of PTN;

theorem
  PTN.:.: = the PT_net_Str of PTN;
