functor (Init : GettextTypes.INIT_TYPE->
  sig
    val init : GettextTypes.dependencies
    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