Возможная ошибка в branch_cuts

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

Модератор: Admin

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

Возможная ошибка в branch_cuts

Сообщение Markiyan Hirnyk » Пн окт 07, 2019 10:17 pm

Результат команды Мэйпла 2019.1

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

FunctionAdvisor(branch_cuts, hypergeom([1, 3], [2], r^2 + 1), r, plot = 2*D)
[hypergeom([1, 3], [2], r^2 + 1), 0 < r, r < 0]

не согласуется с результатами команд

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

eval(hypergeom([1, 3], [2], r^2 + 1), r = 1 + 0.0001*I);
                           -8                     
              -3.4999999 10   - 0.00009999999200 I
eval(hypergeom([1, 3], [2], r^2 + 1), r = 1 - 0.0001*I);
                           -8                     
              -3.4999999 10   + 0.00009999999200 I
plots:-complexplot3d(hypergeom([1, 3], [2], r^2 + 1), r = -1 - I .. 1 + I);