Nuprl Lemma : ma-ring-property1
R:Id List. 
s:{i:Id| (i 
 R)}  
 {i:Id| (i 
 R)} . 
i:Id.
  (ma-ring(R;s) 
 (i 
 R) 
 (
R':Id List. (rotate-ring(Id;R;R') 
 (i = hd(R')) 
 ma-ring(R';s))))
Proof not projected
Definitions occuring in Statement : 
ma-ring: ma-ring(R;s), 
rotate-ring: rotate-ring(T;L1;L2), 
Id: Id, 
hd: hd(l), 
all:
x:A. B[x], 
exists:
x:A. B[x], 
implies: P 
 Q, 
and: P 
 Q, 
set: {x:A| B[x]} , 
function: x:A 
 B[x], 
list: type List, 
equal: s = t, 
l_member: (x 
 l)
Definitions : 
all:
x:A. B[x], 
implies: P 
 Q, 
exists:
x:A. B[x], 
member: t 
 T, 
prop:
, 
and: P 
 Q, 
cand: A c
 B, 
so_lambda: 
x.t[x], 
l_member: (x 
 l), 
nat:
, 
uall:
[x:A]. B[x], 
uimplies: b supposing a, 
rev_implies: P 
 Q, 
iff: P 

 Q, 
so_apply: x[s], 
guard: {T}
Lemmas : 
append_wf, 
nth_tl_wf, 
firstn_wf, 
l_member_wf, 
Id_wf, 
ma-ring_wf, 
rotate-ring_wf, 
hd_wf, 
pos_length, 
rotate-ring-property1, 
subtype_rel_self, 
subtype_rel_sets, 
subtype_rel_function
\mforall{}R:Id  List.  \mforall{}s:\{i:Id|  (i  \mmember{}  R)\}    {}\mrightarrow{}  \{i:Id|  (i  \mmember{}  R)\}  .  \mforall{}i:Id.
    (ma-ring(R;s)  {}\mRightarrow{}  (i  \mmember{}  R)  {}\mRightarrow{}  (\mexists{}R':Id  List.  (rotate-ring(Id;R;R')  \mwedge{}  (i  =  hd(R'))  \mwedge{}  ma-ring(R';s))))
Date html generated:
2012_02_20-PM-05_55_50
Last ObjectModification:
2012_02_02-PM-02_29_44
Home
Index