Ошибка в RealDomain:-solve

Форум пользователей пакета Maple

Модератор: Admin

Markiyan Hirnyk
Сообщения: 1248
Зарегистрирован: Вс дек 04, 2011 11:07 pm

Ошибка в RealDomain:-solve

Сообщение Markiyan Hirnyk » Чт дек 06, 2018 8:11 pm

Ярким примером халтуры Мэйплсофта является пакет RealDomain. В частности, команда solve указанного пакета не документирована вообще: пользователя отсылают к обычной команде solve. Один из результатов налицо.

Код: Выделить всё

with(RealDomain):ыolve(log[x](sqrt(x^2+2*x-3)+2)*log[5](x^2+2*x-2) = log[x](4), x);
-1-sqrt(3+exp(RootOf(-625^(ln(2)/_Z)+4*25^(ln(2)/_Z)+exp(_Z)-5, 1.609437912))), -1+sqrt(3+exp(RootOf(-625^(ln(2)/_Z)+4*25^(ln(2)/_Z)+exp(_Z)-5, 1.609437912)))
evalf(%);
                   -3.828427124, 1.828427124

Markiyan Hirnyk
Сообщения: 1248
Зарегистрирован: Вс дек 04, 2011 11:07 pm

Re: Ошибка в RealDomain:-solve

Сообщение Markiyan Hirnyk » Чт дек 06, 2018 9:20 pm

Та же ошибка в

Код: Выделить всё

restart; Student[Calculus1]:-Roots(log[x](sqrt(x^2+2*x-3)+2)*log[5](x^2+2*x-2) = log[x](4));
Warning, some roots are returned as numeric approximations
                  [-3.828427124, 1.828427125]

Markiyan Hirnyk
Сообщения: 1248
Зарегистрирован: Вс дек 04, 2011 11:07 pm

Re: Ошибка в RealDomain:-solve

Сообщение Markiyan Hirnyk » Вс дек 09, 2018 4:07 pm

Еще одна жемчужина в короне:

Код: Выделить всё

with(RealDomain):
solve((x^2-4)*sqrt(x+1) = 0, x);
                           -1, 2, -2