Module Glt_common.User

type t =
| Player of string
| Character of string * Character.t
val initial : t
val get_name : t -> string
val fprintf : Stdlib.Format.formatter -> t -> unit