method set_role a = role <- a