fact: Fixpoint hash_r (x : string) := match x with | [] => [] | a :: x => a :: # :: hash_r x end.
imports: Bool List Undecidability.PCP.PCP Undecidability.PCP.Util.Facts Undecidability.PCP.Util.PCP_facts Undecidability.Synthetic.Definitions