Step * of Lemma rv-disjoint-compose

∀F,G:ℚ ─→ ℚ. ∀p:FinProbSpace. ∀n:ℕ. ∀X,Y:RandomVariable(p;n).
  (rv-disjoint(p;n;X;Y) ⇒ rv-disjoint(p;n;(X.F[X]) o X;(Y.G[Y]) o Y))
BY
{ (Auto
   THEN RepeatFor 3 (ParallelLast)
   THEN Try ((Fold `random-variable` 0 THEN Auto))
   THEN (Try ((Fold `p-outcome` 0 THEN Auto)) THEN RepeatFor 3 (ParallelLast))
   THEN Try ((RepUR ``rv-compose`` 0 THEN EqCD THEN Auto))) }


Latex:


\mforall{}F,G:\mBbbQ{}  {}\mrightarrow{}  \mBbbQ{}.  \mforall{}p:FinProbSpace.  \mforall{}n:\mBbbN{}.  \mforall{}X,Y:RandomVariable(p;n).
    (rv-disjoint(p;n;X;Y)  {}\mRightarrow{}  rv-disjoint(p;n;(X.F[X])  o  X;(Y.G[Y])  o  Y))


By

(Auto
  THEN  RepeatFor  3  (ParallelLast)
  THEN  Try  ((Fold  `random-variable`  0  THEN  Auto))
  THEN  (Try  ((Fold  `p-outcome`  0  THEN  Auto))  THEN  RepeatFor  3  (ParallelLast))
  THEN  Try  ((RepUR  ``rv-compose``  0  THEN  EqCD  THEN  Auto)))




Home Index