---

Step * 1 1 2 2 of Lemma det-transpose


1. r : CRng
2. n : ℕ
3. M : Matrix(n;n;r)
4. |M|
= Σ{r} f ∈ permutations-list(n). let k = Π(r) 0 
                                              ≤ i 
                                              < n
                                          M[i,inv(f) i] in
                                     if permutation-sign(n;inv(f))=1 then k else (-r k)
∈ |r|
5. f : ℕn →⟶ ℕn
6. (Π(r) 0 ≤ i < n. M[i,inv(f) i]) = (Π(r) 0 ≤ i < n. M'[i,f i]) ∈ |r|
⊢ let k = Π(r) 0 
               ≤ i 
               < n
           M[i,inv(f) i] in
      if permutation-sign(n;f)=1 then k else (-r k)
= let k = Π(r) 0 
               ≤ i 
               < n
           M'[i,f i] in
      if permutation-sign(n;f)=1 then k else (-r k)
∈ |r|
BY
{ (DupHyp (-1)
   THEN MoveToConcl (-1)
   THEN GenConclTerms Auto [⌜Π(r) 0 
                                  ≤ i 
                                  < n
                              M[i,inv(f) i]⌝;⌜Π(r) 0 
                                                   ≤ i 
                                                   < n
                                               M'[i,f i]⌝]⋅
   THEN RepUR ``let`` 0
   THEN (D 0 THENA Auto)
   THEN RWO "-1" 0
   THEN Auto) }

---

Latex:

---

Latex:

1.  r  :  CRng
2.  n  :  \mBbbN{}
3.  M  :  Matrix(n;n;r)
4.  |M|
=  \mSigma{}\{r\}  f  \mmember{}  permutations-list(n).  let  k  =  \mPi{}(r)  0 
                                                                                            \mleq{}  i 
                                                                                            <  n
                                                                                    M[i,inv(f)  i]  in
                                                                          if  permutation-sign(n;inv(f))=1  then  k  else  (-r  k)
5.  f  :  \mBbbN{}n  \mrightarrow{}{}\mrightarrow{}  \mBbbN{}n
6.  (\mPi{}(r)  0  \mleq{}  i  <  n.  M[i,inv(f)  i])  =  (\mPi{}(r)  0  \mleq{}  i  <  n.  M'[i,f  i])
\mvdash{}  let  k  =  \mPi{}(r)  0 
                              \mleq{}  i 
                              <  n
                      M[i,inv(f)  i]  in
            if  permutation-sign(n;f)=1  then  k  else  (-r  k)
=  let  k  =  \mPi{}(r)  0 
                              \mleq{}  i 
                              <  n
                      M'[i,f  i]  in
            if  permutation-sign(n;f)=1  then  k  else  (-r  k)


By

---

Latex:
(DupHyp  (-1)
  THEN  MoveToConcl  (-1)
  THEN  GenConclTerms  Auto  [\mkleeneopen{}\mPi{}(r)  0 
                                                                \mleq{}  i 
                                                                <  n
                                                        M[i,inv(f)  i]\mkleeneclose{};\mkleeneopen{}\mPi{}(r)  0 
                                                                                                  \mleq{}  i 
                                                                                                  <  n
                                                                                          M'[i,f  i]\mkleeneclose{}]\mcdot{}
  THEN  RepUR  ``let``  0
  THEN  (D  0  THENA  Auto)
  THEN  RWO  "-1"  0
  THEN  Auto)

---

Home Index