sig
  type lang = En | Ja
  val say : GoogleTTS.lang -> string -> unit
  val say_ja : string -> unit
end