(28steps total) PfGloss PrintForm Definitions Lemmas HanoiTowers Sections NuprlLIB Doc
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At: hanoi sol2 via permshift 2

1. n : 
2. 0<n
3. p,q:Peg.
3. p  q
3. 
3. (z:{1...}, s:({1...z}{1...n-1}Peg).
3. (s is a Hanoi(n-1 disk) seq on 1..z & s(1) = (i.p) & s(z) = (i.q))
4. p : Peg
5. q : Peg
6. p  q
  z:{1...}, s:({1...z}{1...n}Peg).
  s is a Hanoi(n disk) seq on 1..z & s(1) = (i.p) & s(z) = (i.q)


By: z:{1...}, m:{1...z-1}, s1:({1...m}{1...n}Peg),
s2:({m+1...z}{1...n}Peg).
(s1 @(ms2) is a Hanoi(n disk) seq on 1..z & s1(1) = (i.p) & s2(z) = (i.q)
Asserted


Generated subgoals:

1   z:{1...}, m:{1...z-1}, s1:({1...m}{1...n}Peg),
  s2:({m+1...z}{1...n}Peg).
  (s1 @(ms2) is a Hanoi(n disk) seq on 1..z & s1(1) = (i.p) & s2(z) = (i.q)

18 steps
2 7. z:{1...}, m:{1...z-1}, s1:({1...m}{1...n}Peg),
7. s2:({m+1...z}{1...n}Peg).
7. (s1 @(ms2) is a Hanoi(n disk) seq on 1..z & s1(1) = (i.p) & s2(z) = (i.q)
  z:{1...}, s:({1...z}{1...n}Peg).
  s is a Hanoi(n disk) seq on 1..z & s(1) = (i.p) & s(z) = (i.q)

4 steps

About:
intnatural_numberaddsubtractless_thanlambdaapply
functionequalimpliesandall
exists
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html

(28steps total) PfGloss PrintForm Definitions Lemmas HanoiTowers Sections NuprlLIB Doc