Attention une mise à jour du service Gitlab va être effectuée le mardi 30 novembre entre 17h30 et 18h00. Cette mise à jour va générer une interruption du service dont nous ne maîtrisons pas complètement la durée mais qui ne devrait pas excéder quelques minutes. Cette mise à jour intermédiaire en version 14.0.12 nous permettra de rapidement pouvoir mettre à votre disposition une version plus récente.

Commit 8e2cc671 authored by Andrei Paskevich's avatar Andrei Paskevich
Browse files

minor

parent da67461f
......@@ -156,14 +156,14 @@ module MatrixArithmetic
fun x y -> get a x y + get b x y
function add (a b: mat int) : mat int =
create (rows a) a.cols (add2f a b)
create a.rows a.cols (add2f a b)
(* Matrix additive inverse *)
function opp2f (a: mat int) : int -> int -> int =
fun x y -> - get a x y
function opp (a: mat int) : mat int =
create (rows a) a.cols (opp2f a)
create a.rows a.cols (opp2f a)
function sub (a b: mat int) : mat int =
add a (opp b)
......@@ -176,7 +176,7 @@ module MatrixArithmetic
fun i j -> sum (mul_atom a b i j) 0 a.cols
function mul (a b: mat int) : mat int =
create (rows a) b.cols (mul_cell a b)
create a.rows b.cols (mul_cell a b)
lemma zero_neutral:
forall a. add a (zero a.rows a.cols) = a
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment