enrich
RGn
with
axioms seq-sat-rg-total : GInv(S), Pr(m)(S) ⊦ ⟨:S, Out | Ry(m)(S', S''), (Gr(m)(S, S') ∧ ¬ blocked), GInv(S), SEQ#(m, Inp; S, Out)⟩ Po(m)(S);
used for: tl;
end enrich