Definitions
HanoiTowers
Sections
NuprlLIB
Doc
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
Some definitions of interest.
hanoi_seq
Def
s
is a Hanoi(
n
disk) seq on
a
..
z
Def
==
x
,
x'
:{
a
...
z
}.
Def ==
x
+1 =
x'
(
k
:{1...
n
}. Moving disk
k
of
n
takes
s
(
x
) to
s
(
x'
))
Thm*
n
:
,
a
,
z
:
,
s
:({
a
...
z
}
{1...
n
}
Peg).
Thm*
s
is a Hanoi(
n
disk) seq on
a
..
z
Prop
hanoi_PEG
Def
Peg == {1...3}
Thm*
Peg
Type
int_iseg
Def
{
i
...
j
} == {
k
:
|
i
k
&
k
j
}
Thm*
i
,
j
:
. {
i
...
j
}
Type
nat
Def
== {
i
:
| 0
i
}
Thm*
Type
About:
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
Definitions
HanoiTowers
Sections
NuprlLIB
Doc