method
set_scheme sopt =
scheme <- sopt;