Step
*
of Lemma
matrix-transpose-twice
∀[n,m:ℤ]. ∀[r:RngSig]. ∀[M:Matrix(n;m;r)].  (M'' = M ∈ Matrix(n;m;r))
BY
{ (Auto
   THEN Unfold `matrix` 0
   THEN RepeatFor 2 ((FunExt THENA Auto))
   THEN RepUR ``matrix-transpose mx matrix-ap`` 0
   THEN Fold `matrix-ap` 0
   THEN Auto) }
Latex:
Latex:
\mforall{}[n,m:\mBbbZ{}].  \mforall{}[r:RngSig].  \mforall{}[M:Matrix(n;m;r)].    (M''  =  M)
By
Latex:
(Auto
  THEN  Unfold  `matrix`  0
  THEN  RepeatFor  2  ((FunExt  THENA  Auto))
  THEN  RepUR  ``matrix-transpose  mx  matrix-ap``  0
  THEN  Fold  `matrix-ap`  0
  THEN  Auto)
Home
Index