---

Step * 1 1 of Lemma oal_neg_keys_invar


1. a : PosetSig@i'
2. b : GrpSig@i'
3. ps : (|a| × |b|) List@i
⊢ map((λz.(fst(z))) o (λkv.<fst(kv), ~ (snd(kv))>);ps) = map(λz.(fst(z));ps) ∈ (|a| List)
BY
{ ((Eval ``compose`` 0) THEN Auto) }

---

Latex:

---

Latex:

1.  a  :  PosetSig@i'
2.  b  :  GrpSig@i'
3.  ps  :  (|a|  \mtimes{}  |b|)  List@i
\mvdash{}  map((\mlambda{}z.(fst(z)))  o  (\mlambda{}kv.<fst(kv),  \msim{}  (snd(kv))>);ps)  =  map(\mlambda{}z.(fst(z));ps)


By

---

Latex:
((Eval  ``compose``  0)  THEN  Auto)

---

Home Index