let get_role_signature (role_name : string) : string list = let t = Hashtbl.find_all role_signature role_name in if(t<>[]) then (car t) else []