method set_rhs r = rhs <- r