[SAVer] Small change in SVM theory name.

src/language.ml

@@ -53,7 +53,7 @@ let register_svm_as_array nb_inputs nb_classes filename env =
   let svm_type =
     Ty.ty_app Theory.(ns_find_ts svm.mod_theory.th_export [ "svm" ]) []
   in
-  let id_as_array = Ident.id_fresh "SVMAsArray" in
+  let id_as_array = Ident.id_fresh "SVMasArray" in
   let th_uc = Pmodule.create_module env id_as_array in
   let th_uc = Pmodule.use_export th_uc svm in
   let ls_svm_apply =
@@ -64,7 +64,7 @@ let register_svm_as_array nb_inputs nb_classes filename env =
     Pmodule.add_pdecl ~vc:false th_uc
       (Pdecl.create_pure_decl (Decl.create_param_decl ls_svm_apply))
   in
-  Wstdlib.Mstr.singleton "SVMAsArray" (Pmodule.close_module th_uc)
+  Wstdlib.Mstr.singleton "SVMasArray" (Pmodule.close_module th_uc)
 
 let nnet_parser env _ filename _ =
   let model = Nnet.parse filename in

tests/simple_ovo.t

@@ -27,7 +27,7 @@ Test verify
 
   $ caisar verify -L . --format whyml --prover=SAVer --dataset-csv=test_data.csv - 2>&1 <<EOF | sed 's/\/tmp\/[a-z0-9_./]*/$TMPFILE/'
   > theory T
-  >     use TestSVM.SVMAsArray
+  >     use TestSVM.SVMasArray
   >     use ieee_float.Float64
   >     use caisar.IOShape
   >     use caisar.SVM