Skip to content
Snippets Groups Projects
Commit 509d9420 authored by Michele Alberti's avatar Michele Alberti
Browse files

Some renaming.

parent 044fb4aa
No related branches found
No related tags found
No related merge requests found
(**************************************************************************) (**************************************************************************)
(* *) (* *)
(* This file is part of Caisar. *) (* This file is part of CAISAR. *)
(* *) (* *)
(**************************************************************************) (**************************************************************************)
......
(**************************************************************************) (**************************************************************************)
(* *) (* *)
(* This file is part of Caisar. *) (* This file is part of CAISAR. *)
(* *) (* *)
(**************************************************************************) (**************************************************************************)
......
(**************************************************************************) (**************************************************************************)
(* *) (* *)
(* This file is part of Caisar. *) (* This file is part of CAISAR. *)
(* *) (* *)
(**************************************************************************) (**************************************************************************)
......
(**************************************************************************) (**************************************************************************)
(* *) (* *)
(* This file is part of Caisar. *) (* This file is part of CAISAR. *)
(* *) (* *)
(**************************************************************************) (**************************************************************************)
...@@ -30,7 +30,6 @@ let nnet_parser env _ filename _ = ...@@ -30,7 +30,6 @@ let nnet_parser env _ filename _ =
(List.init header.n_inputs ~f) (List.init header.n_inputs ~f)
(Ty.ty_tuple (List.init header.n_outputs ~f)) (Ty.ty_tuple (List.init header.n_outputs ~f))
in in
let th_uc = let th_uc =
Pmodule.add_pdecl ~vc:false th_uc Pmodule.add_pdecl ~vc:false th_uc
(Pdecl.create_pure_decl @@ Decl.create_param_decl ls_nnet_apply) (Pdecl.create_pure_decl @@ Decl.create_param_decl ls_nnet_apply)
......
(**************************************************************************) (**************************************************************************)
(* *) (* *)
(* This file is part of Caisar. *) (* This file is part of CAISAR. *)
(* *) (* *)
(**************************************************************************) (**************************************************************************)
......
(**************************************************************************) (**************************************************************************)
(* *) (* *)
(* This file is part of Caisar. *) (* This file is part of CAISAR. *)
(* *) (* *)
(**************************************************************************) (**************************************************************************)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment