Definition Inv6 (s : StGlobal) :=
  match s with
  | ((st, x), ((sc, _), _)) =>
      st = Near /\ gt_Ck x kc1 \/ st = Inside -> sc = Sc3
  end.

(* Specifications: *)
Lemma lema_Inv6 : ForAll TrGlobal SiniTCG Inv6.