method
set_role a = role <- a