Step
*
of Lemma
two-implies-quotient-true
∀[P,Q,R:ℙ].  ((P 
⇒ Q 
⇒ R) 
⇒ {⇃(P) 
⇒ ⇃(Q) 
⇒ ⇃(R)})
BY
{ (Unfold `guard` 0
   THEN Auto
   THEN RenameVar `f' (-3)
   THEN RenameVar `x' (-2)
   THEN RenameVar `y' (-1)
   THEN UseWitness ⌜f x y⌝⋅
   THEN DVar `x'
   THEN DVar `y'
   THEN EqTypeCD
   THEN Auto) }
Latex:
Latex:
\mforall{}[P,Q,R:\mBbbP{}].    ((P  {}\mRightarrow{}  Q  {}\mRightarrow{}  R)  {}\mRightarrow{}  \{\00D9(P)  {}\mRightarrow{}  \00D9(Q)  {}\mRightarrow{}  \00D9(R)\})
By
Latex:
(Unfold  `guard`  0
  THEN  Auto
  THEN  RenameVar  `f'  (-3)
  THEN  RenameVar  `x'  (-2)
  THEN  RenameVar  `y'  (-1)
  THEN  UseWitness  \mkleeneopen{}f  x  y\mkleeneclose{}\mcdot{}
  THEN  DVar  `x'
  THEN  DVar  `y'
  THEN  EqTypeCD
  THEN  Auto)
Home
Index