val check_hash: unit -> bool
val create_hash: string list -> unit