Step
*
of Lemma
st-encrypt_wf
∀[T:Id ─→ Type]. ∀[tab:secret-table(T)]. ∀[keyv:ℕ + Atom1 × data(T)].  (encrypt(tab;keyv) ∈ secret-table(T))
BY
{ (Auto
   THEN DVar `tab'
   THEN DVar `t1'
   THEN DVar `keyv'
   THEN RepUR ``st-encrypt secret-table`` 0
   THEN SplitOnConclITE
   THEN Auto) }
Latex:
\mforall{}[T:Id  {}\mrightarrow{}  Type].  \mforall{}[tab:secret-table(T)].  \mforall{}[keyv:\mBbbN{}  +  Atom1  \mtimes{}  data(T)].
    (encrypt(tab;keyv)  \mmember{}  secret-table(T))
By
(Auto
  THEN  DVar  `tab'
  THEN  DVar  `t1'
  THEN  DVar  `keyv'
  THEN  RepUR  ``st-encrypt  secret-table``  0
  THEN  SplitOnConclITE
  THEN  Auto)
Home
Index