Упрощение символьных выражений

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

Модератор: Admin

nesta
Сообщения: 1
Зарегистрирован: Вт мар 29, 2011 11:52 am

Упрощение символьных выражений

Сообщение nesta » Вт мар 29, 2011 12:06 pm

Добрый день! Если кто-то сталкивался, подскажите, пожалуйста, по следующей проблеме:

Есть символьное выражение, для простоты допустим
(A*B*C)+A*(A*B*C) (*)
Известно, что A*B*C=D.
Я хочу упростить выражение (*) в терминах переменной D. Если написать:
(A*B*C)+A*(A*B*C)/.(A*B*C)->D
Mathematica дает следующий результат
D+A^2*B*C.
Мне бы хотелось получить D+A*D. Как этого можно добиться?

Спасибо за ответы!

abobroff
Сообщения: 105
Зарегистрирован: Ср янв 19, 2011 4:40 pm
Откуда: карелия

Re: Упрощение символьных выражений

Сообщение abobroff » Вт мар 29, 2011 2:45 pm

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

Factor[(A*B*C) + A*(A*B*C)] /. (A*B*C) -> D