---

Step * 2 of Lemma mul-associates


1. ∀x,y,z:ℤ.  (((x * y) * z) = (x * y * z) ∈ ℤ)
⊢ ∀[x,y,z:Top].  ((x * y) * z ~ x * y * z)
BY
{ TACTIC:(SqReasoning
          THEN Try (((InstHyp [⌜x⌝;⌜y⌝;⌜z⌝] 1⋅ THENA Trivial) THEN HypSubst' (-1) 0 THEN Auto))
          THEN OnMaybeHyp 8 (\h. (ExceptionSqequal h⋅
                                  THEN HypSubst' (-1) 0
                                  THEN (Reduce 0
                                        THEN (RWW "int-mul-exception int-add-exception" 0 THENA Auto)
                                        THEN Reduce 0)
                                  THEN Auto))) }

---

Latex:

---

Latex:

1.  \mforall{}x,y,z:\mBbbZ{}.    (((x  *  y)  *  z)  =  (x  *  y  *  z))
\mvdash{}  \mforall{}[x,y,z:Top].    ((x  *  y)  *  z  \msim{}  x  *  y  *  z)


By

---

Latex:
TACTIC:(SqReasoning
                THEN  Try  (((InstHyp  [\mkleeneopen{}x\mkleeneclose{};\mkleeneopen{}y\mkleeneclose{};\mkleeneopen{}z\mkleeneclose{}]  1\mcdot{}  THENA  Trivial)  THEN  HypSubst'  (-1)  0  THEN  Auto))
                THEN  OnMaybeHyp  8  (\mbackslash{}h.  (ExceptionSqequal  h\mcdot{}
                                                                THEN  HypSubst'  (-1)  0
                                                                THEN  (Reduce  0
                                                                            THEN  (RWW  "int-mul-exception  int-add-exception"  0  THENA  Auto)
                                                                            THEN  Reduce  0)
                                                                THEN  Auto)))

---

Home Index