(* The safety property of the system TCG *)

Lemma InvC' :
forall s : S_Ck SC,
match s with
| (sc, y) =>
sc = Sc1 \/
sc = Sc2 /\ le_Ck y kc1 \/ sc = Sc3 \/ sc = Sc4 /\ lt_Ck y kc2 ->
InvC s
end.