Step * of Lemma function-eq_wf

[A:Type]. ∀[B:Base].  ∀[f,g:Base].  (function-eq(A;a.B[a];f;g) ∈ Type) supposing base-type-family{i:l}(A;a.B[a])
BY
(Auto THEN Unfold `function-eq` THEN InstLemma `base-type-family-implies` [⌜A⌝;⌜B⌝]⋅ THEN Auto) }


Latex:


Latex:
\mforall{}[A:Type].  \mforall{}[B:Base].
    \mforall{}[f,g:Base].    (function-eq(A;a.B[a];f;g)  \mmember{}  Type)  supposing  base-type-family\{i:l\}(A;a.B[a])


By


Latex:
(Auto  THEN  Unfold  `function-eq`  0  THEN  InstLemma  `base-type-family-implies`  [\mkleeneopen{}A\mkleeneclose{};\mkleeneopen{}B\mkleeneclose{}]\mcdot{}  THEN  Auto)




Home Index