Gloss of Lemma enabling rewrite of
p = a
q
q)
q = a
p'
p')
a:
.
Thm* prime(a) ![]()
(
p:
, q:![]()
. p
p = a
q
q ![]()
(
p':![]()
. p'<p & q
q = a
p'
p'))
Since
p
Thm* a:
. prime(a)
(
x:
. a | x
x
a | x)
so let
p'
Note that
since
q
q>0
p>0
p'>0
So these are equal:
a ,q
q
p ,p
a ,p'
a
p'
a a
p'
p'
and
q = a
p'
p'
And
p'
QED
About: