---

Step * of Lemma funinv-unique

∀[n:ℕ]. ∀[f:{f:ℕn ⟶ ℕn| Inj(ℕn;ℕn;f)} ]. ∀[g:ℕn ⟶ ℕn].
  inv(f) = g ∈ {f:ℕn ⟶ ℕn| Inj(ℕn;ℕn;f)}  supposing (f o g) = (λx.x) ∈ (ℕn ⟶ ℕn)
BY
{ (Auto
   THEN ((Assert inv(f) ∈ {f:ℕn ⟶ ℕn| Inj(ℕn;ℕn;f)}  BY Auto) THEN DupHyp (-1) THEN MemTypeHD (-1) THEN Auto THEN Thin \000C(-2))
   THEN (Assert f ∈ {f:ℕn ⟶ ℕn| Inj(ℕn;ℕn;f)}  BY
               Auto)
   THEN MemTypeHD (-1)
   THEN Auto
   THEN Thin (-2)
   THEN EqTypeCD
   THEN Auto
   THEN Ext
   THEN Auto) }

1
1. n : ℕ
2. f : {f:ℕn ⟶ ℕn| Inj(ℕn;ℕn;f)} 
3. g : ℕn ⟶ ℕn
4. (f o g) = (λx.x) ∈ (ℕn ⟶ ℕn)
5. inv(f) ∈ {f:ℕn ⟶ ℕn| Inj(ℕn;ℕn;f)} 
6. Inj(ℕn;ℕn;inv(f))
7. Inj(ℕn;ℕn;f)
8. x : ℕn
⊢ (inv(f) x) = (g x) ∈ ℕn

---

Latex:

---

Latex:
\mforall{}[n:\mBbbN{}].  \mforall{}[f:\{f:\mBbbN{}n  {}\mrightarrow{}  \mBbbN{}n|  Inj(\mBbbN{}n;\mBbbN{}n;f)\}  ].  \mforall{}[g:\mBbbN{}n  {}\mrightarrow{}  \mBbbN{}n].    inv(f)  =  g  supposing  (f  o  g)  =  (\mlambda{}x.x)


By

---

Latex:
(Auto
  THEN  ((Assert  inv(f)  \mmember{}  \{f:\mBbbN{}n  {}\mrightarrow{}  \mBbbN{}n|  Inj(\mBbbN{}n;\mBbbN{}n;f)\}    BY
                            Auto)
              THEN  DupHyp  (-1)
              THEN  MemTypeHD  (-1)
              THEN  Auto
              THEN  Thin  (-2))
  THEN  (Assert  f  \mmember{}  \{f:\mBbbN{}n  {}\mrightarrow{}  \mBbbN{}n|  Inj(\mBbbN{}n;\mBbbN{}n;f)\}    BY
                          Auto)
  THEN  MemTypeHD  (-1)
  THEN  Auto
  THEN  Thin  (-2)
  THEN  EqTypeCD
  THEN  Auto
  THEN  Ext
  THEN  Auto)

---

Home Index