diff --git a/Code.ml b/Code.ml index 66e4583..c40f407 100644 --- a/Code.ml +++ b/Code.ml @@ -36,6 +36,7 @@ open Math;; module CLineaire = struct +;; (* La bonne structure *) type t = {k : int; n : int; g : Math.matrice; h : Math.matrice};; diff --git a/Test.ml b/Test.ml index 439b43b..8afcf66 100644 --- a/Test.ml +++ b/Test.ml @@ -76,4 +76,4 @@ print_polynome (poldiv ((deux_puissance 7) +1) cocycl.pol);; let cocylined = cycliqueVersLineaire cocycl;; print_matrice 7 cocylined.g;; print_matrice 4 cocylined.h;; -CLineaire.distance_minimale cocylined;; +CLineaire.distance_minimale cocylined;; \ No newline at end of file