Inductive Gamma := emb (x : Gamma') | StartG.Inductive Gamma := emb (x : Gamma') | StartG.Inductive Gamma := emb (x : Gamma') | StartG.Global Instance eq_dec_gamma : eq_dec Gamma.Global Instance fin_gamma : finTypeC (EqType Gamma).Definition emb_string := map emb.

Lemma emb_Start x : ~ StartG el emb_string x.