method set_choices l = choices <- l