Module Common.Ipa

type ('a, 'b) compute_sg := 'a challenge -> 'b * 'b
module Wrap : sig ... end
module Step : sig ... end