Squarer.Input
type t =
| Multiply_by_constant of Hardcaml.Signal.t * Hardcaml.Bits.t
| Multiply of Hardcaml.Signal.t * Hardcaml.Signal.t
| Square of Hardcaml.Signal.t