val dev : 'a -> 'a -> string -> 'ainclude sig ... end
val xor_device : string -> stringval xor_device_ref : (string -> string) Stdlib.refval xor : int32 -> int32 -> int32include sig ... end
val logical_and_device : string -> stringval logical_and_device_ref : (string -> string) Stdlib.refval logical_and : int32 -> int32 -> int32include sig ... end
val pow_device : string -> stringval pow_device_ref : (string -> string) Stdlib.refval pow : int32 -> int32 -> int32