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