functor (Init : GettextTypes.INIT_TYPE) ->
  functor (Realize : GettextTypes.REALIZE_TYPE) ->
    sig
      val init : (Arg.key * Arg.spec * Arg.doc) list * string
      val s_ : string -> string
      val f_ : string -> ('a, 'b, 'c, 'd) format4
      val sn_ : string -> string -> int -> string
      val fn_ : string -> string -> int -> ('a, 'b, 'c, 'd) format4
    end