Step
*
of Lemma
memory-class3-functional
∀[Info,A1,A2,A3,B:Type]. ∀[init:Id ─→ B]. ∀[tr1:Id ─→ A1 ─→ B ─→ B]. ∀[X1:EClass(A1)]. ∀[tr2:Id ─→ A2 ─→ B ─→ B].
∀[X2:EClass(A2)]. ∀[tr3:Id ─→ A3 ─→ B ─→ B]. ∀[X3:EClass(A3)]. ∀[es:EO+(Info)].
  (memory-class3(init;tr1;X1;tr2;X2;tr3;X3) is functional) supposing 
     (single-valued-classrel(es;X1;A1) and 
     single-valued-classrel(es;X2;A2) and 
     single-valued-classrel(es;X3;A3) and 
     disjoint-classrel(es;A1;X1;A2;X2) and 
     disjoint-classrel(es;A1;X1;A3;X3) and 
     disjoint-classrel(es;A2;X2;A3;X3))
BY
{ ((UnivCD THENA Auto)
   THEN Unfold `memory-class3` 0
   THEN (BLemma `loop-class-memory-functional` THENA Auto)
   THEN Try (Complete ((Reduce 0 THEN Auto)))
   THEN ProveSingleVal) }
Latex:
Latex:
\mforall{}[Info,A1,A2,A3,B:Type].  \mforall{}[init:Id  {}\mrightarrow{}  B].  \mforall{}[tr1:Id  {}\mrightarrow{}  A1  {}\mrightarrow{}  B  {}\mrightarrow{}  B].  \mforall{}[X1:EClass(A1)].  \mforall{}[tr2:Id
                                                                                                                                                                                          {}\mrightarrow{}  A2
                                                                                                                                                                                          {}\mrightarrow{}  B
                                                                                                                                                                                          {}\mrightarrow{}  B].
\mforall{}[X2:EClass(A2)].  \mforall{}[tr3:Id  {}\mrightarrow{}  A3  {}\mrightarrow{}  B  {}\mrightarrow{}  B].  \mforall{}[X3:EClass(A3)].  \mforall{}[es:EO+(Info)].
    (memory-class3(init;tr1;X1;tr2;X2;tr3;X3)  is  functional)  supposing 
          (single-valued-classrel(es;X1;A1)  and 
          single-valued-classrel(es;X2;A2)  and 
          single-valued-classrel(es;X3;A3)  and 
          disjoint-classrel(es;A1;X1;A2;X2)  and 
          disjoint-classrel(es;A1;X1;A3;X3)  and 
          disjoint-classrel(es;A2;X2;A3;X3))
By
Latex:
((UnivCD  THENA  Auto)
  THEN  Unfold  `memory-class3`  0
  THEN  (BLemma  `loop-class-memory-functional`  THENA  Auto)
  THEN  Try  (Complete  ((Reduce  0  THEN  Auto)))
  THEN  ProveSingleVal)
Home
Index