(35steps total)
PrintForm
Definitions
mb
nat
Sections
MarkB
generic
Doc
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
increasing
split
2
2
1
1.
m
:
2. 0<
m
3.
P
:(
(
m
-1)
Prop).
3.
(
i
:
(
m
-1). Dec(
P
(
i
)))
3.
3.
(
n
,
k
:
,
f
:(
n
(
m
-1)),
g
:(
k
(
m
-1)).
3. (
increasing(
f
;
n
)
3. (
& increasing(
g
;
k
)
3. (
& (
i
:
n
.
P
(
f
(
i
)))
3. (
& (
j
:
k
.
P
(
g
(
j
)))
3. (
& (
i
:
(
m
-1). (
j
:
n
.
i
=
f
(
j
))
(
j
:
k
.
i
=
g
(
j
))))
4.
P
:
m
Prop
5.
i
:
m
. Dec(
P
(
i
))
6.
n
:
7.
k
:
8.
f
:
n
(
m
-1)
9.
g
:
k
(
m
-1)
10. increasing(
f
;
n
)
11. increasing(
g
;
k
)
12.
i
:
n
.
P
(
f
(
i
))
13.
j
:
k
.
P
(
g
(
j
))
14.
i
:
(
m
-1). (
j
:
n
.
i
=
f
(
j
))
(
j
:
k
.
i
=
g
(
j
))
15.
P
(
m
-1)
n
,
k
:
,
f
:(
n
m
),
g
:(
k
m
).
increasing(
f
;
n
)
& increasing(
g
;
k
)
& (
i
:
n
.
P
(
f
(
i
)))
& (
j
:
k
.
P
(
g
(
j
)))
& (
i
:
m
. (
j
:
n
.
i
=
f
(
j
))
(
j
:
k
.
i
=
g
(
j
)))
By:
InstConcl [
n
+1;
k
;
f
[
n
:=
m
-1];
g
] THENA Try (Complete Auto)
Generated subgoals:
1
increasing(
f
[
n
:=
m
-1];
n
+1)
& increasing(
g
;
k
)
& (
i
:
(
n
+1).
P
(
f
[
n
:=
m
-1](
i
)))
& (
j
:
k
.
P
(
g
(
j
)))
& (
i
:
m
. (
j
:
(
n
+1).
i
=
f
[
n
:=
m
-1](
j
))
(
j
:
k
.
i
=
g
(
j
)))
14
steps
2
16.
g1
:
k
m
(increasing(
f
[
n
:=
m
-1];
n
+1)
(
& increasing(
g1
;
k
)
(
& (
i
:
(
n
+1).
P
(
f
[
n
:=
m
-1](
i
)))
(
& (
j
:
k
.
P
(
g1
(
j
)))
(
& (
i
:
m
. (
j
:
(
n
+1).
i
=
f
[
n
:=
m
-1](
j
))
(
j
:
k
.
i
=
g1
(
j
))))
Prop
1
step
About:
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
(35steps total)
PrintForm
Definitions
mb
nat
Sections
MarkB
generic
Doc