let
role_position = (
Hashtbl
.create 600 : (string, float)
Hashtbl
.t)