At:
div rem unique1
1.
a:
2.
n:
3.
q:
4.
r:
5.
a = qn+r
6.
|r| < |n|
7.
r < 0 a < 0
8.
r > 0 a > 0
9.
a = (a n)n+(a rem n)
10.
|a rem n| < |n|
11.
(a rem n) < 0 a < 0
12.
(a rem n) > 0 a > 0
q = (a n) & r = (a rem n)
By:
RepeatFor 4 (MoveToConcl -1)
THEN
GenConcl ((a n) = q')
THEN
Thin -1
THEN
GenConcl ((a rem n) = r')
THEN
Thin -1
THEN
Unfold `guard` 0
Generated subgoal: