octachron: in the .mli I have: module Make(IO:IO) : S with type +'a io = 'a IO.t module Make2(IO:IO)(DATE:Wm_util.Date_sig) : S with type +'a io = 'a IO.t