Modulo_adder_subtractor_pipe.With_interfacemodule M : sig ... endmodule I : sig ... endmodule O : sig ... endval create : 
  stages:int ->
  ops:[ `Add | `Sub ] list ->
  rhs_constant_overrides:Hardcaml.Bits.t option list ->
  Hardcaml.Scope.t ->
  Hardcaml.Signal.t I.t ->
  Hardcaml.Signal.t O.t