{ [T:Id  Type]. [tab:secret-table(T)]. [n:||tab|| ].
    (st-atom(tab;n)  Atom1) }

{ Proof }



Definitions occuring in Statement :  st-atom: st-atom(tab;n) st-length: ||tab||  secret-table: secret-table(T) Id: Id int_seg: {i..j} uall: [x:A]. B[x] member: t  T function: x:A  B[x] natural_number: $n universe: Type atom: Atom$n
Definitions :  uall: [x:A]. B[x] secret-table: secret-table(T) st-length: ||tab||  member: t  T st-atom: st-atom(tab;n) top: Top so_lambda: x.t[x] all: x:A. B[x] subtype: S  T nat: so_apply: x[s]
Lemmas :  pi1_wf_top pi2_wf nat_wf int_seg_wf data_wf Id_wf

\mforall{}[T:Id  {}\mrightarrow{}  Type].  \mforall{}[tab:secret-table(T)].  \mforall{}[n:\mBbbN{}||tab||  ].    (st-atom(tab;n)  \mmember{}  Atom1)


Date html generated: 2011_08_16-AM-10_59_05
Last ObjectModification: 2011_06_18-AM-09_33_01

Home Index