Commit 37ce94b1 authored by Stephane Glondu's avatar Stephane Glondu
Browse files

Fix indentation

parent 6ea9a10d
...@@ -97,10 +97,10 @@ module GetParams (X : sig end) : PARAMS = struct ...@@ -97,10 +97,10 @@ module GetParams (X : sig end) : PARAMS = struct
let group = {g; p; q} let group = {g; p; q}
let () = assert (Election.check_finite_field group) let () = assert (Election.check_finite_field group)
end end
module RunTool (G : Election.FF_GROUP) (P : PARAMS) = struct module RunTool (G : Election.FF_GROUP) (P : PARAMS) = struct
open P open P
module M = Election.MakeSimpleMonad(G) module M = Election.MakeSimpleMonad(G)
......
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