aboutsummaryrefslogtreecommitdiff
path: root/mathcomp/algebra/matrix.v
diff options
context:
space:
mode:
authorCyril Cohen2018-10-26 04:35:34 +0200
committerGitHub2018-10-26 04:35:34 +0200
commit311c23124e258647075f703b0f759f1ad5051c60 (patch)
treedeb09d0b341008596781f2ceafa69bc84fc5b86f /mathcomp/algebra/matrix.v
parent76fb3c00580488f75362153f6ea252f9b4d4084b (diff)
parentbccc54dc85e2d9cd7248c24a576d6092630fb51d (diff)
Merge pull request #209 from CohenCyril/closed_field
Moving countalg and closed_field around
Diffstat (limited to 'mathcomp/algebra/matrix.v')
-rw-r--r--mathcomp/algebra/matrix.v9
1 files changed, 8 insertions, 1 deletions
diff --git a/mathcomp/algebra/matrix.v b/mathcomp/algebra/matrix.v
index fca25a9..2a701a2 100644
--- a/mathcomp/algebra/matrix.v
+++ b/mathcomp/algebra/matrix.v
@@ -6,7 +6,7 @@ Require Import ssrbool ssrfun eqtype ssrnat seq div choice fintype.
From mathcomp
Require Import finfun bigop prime binomial ssralg finset fingroup finalg.
From mathcomp
-Require Import perm zmodp.
+Require Import perm zmodp countalg.
(******************************************************************************)
(* Basic concrete linear algebra : definition of type for matrices, and all *)
@@ -2071,6 +2071,10 @@ Proof.
by apply/matrixP=> k i; rewrite !mxE; apply: eq_bigr => j _; rewrite !mxE.
Qed.
+Canonical matrix_countZmodType (M : countZmodType) m n :=
+ [countZmodType of 'M[M]_(m, n)].
+Canonical matrix_countRingType (R : countRingType) n :=
+ [countRingType of 'M[R]_n.+1].
Canonical matrix_finLmodType (R : finRingType) m n :=
[finLmodType R of 'M[R]_(m, n)].
Canonical matrix_finRingType (R : finRingType) n' :=
@@ -2644,6 +2648,9 @@ End MatrixInv.
Prenex Implicits unitmx invmx.
+Canonical matrix_countUnitRingType (R : countComUnitRingType) n :=
+ [countUnitRingType of 'M[R]_n.+1].
+
(* Finite inversible matrices and the general linear group. *)
Section FinUnitMatrix.