type t = { auditor_pub: Crypto.EddsaPublicKey.t; auditor_url: string; auditor_name: string; last_change: Timestamp.t; is_active: bool; } let of_setup_message Api.AuditorSetupMessage. { auditor_url; auditor_name; auditor_pub; master_sig= _; validity_start } = { auditor_url; auditor_name; auditor_pub; last_change= validity_start; is_active= true; }