val modContact : contact -> unit
val deleteContact : int -> unit
val listUserContacts : int * priv -> (kind * contact) list
+ val listContactsByKind : int * priv -> (string * contact) list
val format : kind * contact -> string
end
\ No newline at end of file