type snowflake <ocaml from="Snowflake" t="t"> = abstract
type user <ocaml from="User" t="t"> = abstract
type partial_user <ocaml from="User" t="partial_user"> = abstract
type activity <ocaml from="Activity" t="t"> = abstract

type t = {
    user: partial_user;
    roles: snowflake list;
    ?game: activity option;
    guild_id: snowflake;
    status: string;
    activities: activity list;
}