(7steps total)
PrintForm
Definitions
hol
pair
Sections
HOLlib
Doc
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At:
hcomma
def
1
'a
,
'b
:S,
x
:
'a
,
y
:
'b
.
<
x
,
y
> = (@
x@0
:hprod(
'a
;
'b
). ((rep_prod(
x@0
)) =
(mk_pair(
x
,
y
))))
By:
Unfold `bchoose` 0
Generated subgoal:
1
'a
,
'b
:S,
x
:
'a
,
y
:
'b
.
<
x
,
y
> = (@
x@0
:hprod(
'a
;
'b
). ((rep_prod(
x@0
)) =
(mk_pair(
x
,
y
))))
5
steps
About:
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
(7steps total)
PrintForm
Definitions
hol
pair
Sections
HOLlib
Doc