string_to_id = (Hashtbl.create 50: ((string * int),int) Hashtbl.t)