AFTN.Client
val read_from_server : Unix.file_descr -> 'a
val write_to_server : Unix.file_descr -> unit
val start_client : string -> int -> unit