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 []