| Entry |
Value |
|
Name |
probability_15 |
|
Conclusion |
!n r.
random_geometric_loop n r =
(let r1,r2 = split_random r in
if random_bit r1 then n else random_geometric_loop (SUC n) r2) |
|
Constructive Proof |
Yes |
|
Axiom |
N|A |
|
Classical Lemmas |
N|A |
|
Constructive Lemmas |
T!x. x = x!t. (!x. t) <=> t!f y. (\x. f x) y = f y!n r.
random_geometric_loop n r =
(let r1,r2 = split_random r in
if random_bit r1 then n else random_geometric_loop (SUC n) r2)T <=> (\p. p) = (\p. p)LET_END = (\t. t)(/\) = (\p q. (\f. f p q) = (\f. f T T))(==>) = (\p q. p /\ q <=> p)LET = (\f. f)(!) = (\p. p = (\x. T)) |
|
Contained Package |
probability |
|
Comment |
Probability package from OpenTheory. |
