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]) X;(Y.G[Y]) Y))
BY
(Auto
   THEN RepeatFor (ParallelLast)
   THEN Try ((Fold `random-variable` THEN Auto))
   THEN (Try ((Fold `p-outcome` THEN Auto)) THEN RepeatFor (ParallelLast))
   THEN Try ((RepUR ``rv-compose`` 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