Ошибка в pdsolve

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

Модератор: Admin

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

Ошибка в pdsolve

Сообщение Markiyan Hirnyk » Ср ноя 28, 2018 10:39 am

Мэйпл кичится решателями ОДУ и ЧПДУ. Испытаем Мэйпл 2018.2 на следующем примере.

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

restart; pdsolve({diff(u(x, t), t, t) = (-x^2+1)*(diff(u(x, t), x, x))-2*x*(diff(u(x, t), x)), u(x, 0) = 21*x^2+7*x-4, (D[2](u))(x, 0) = 0});

u(x, t) = (1/90)*(-567*x^2-7*x+189)*t^6+(1/90)*(2835*x^2+105*x-945)*t^4+(1/90)*(-5670*x^2-630*x+1890)*t^2+21*x^2+7*x-4

Увы, проверка не подтверждает ответ.

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

pdetest(%, [diff(u(x, t), t, t) = (-x^2+1)*(diff(u(x, t), x, x))-2*x*(diff(u(x, t), x)), u(x, 0) = 21*x^2+7*x-4, (D[2](u))(x, 0) = 0]);

[-(189/5*(t^6))*x^2+63/5*(t^6)-(7/45*(t^6))*x, 0, 0]