Мне нужно доказать неравенство (или найти контрпример), учитывая несколько предположений (также неравенств). К сожалению, неравенство для доказательства является довольно длинным и сложным выражением. Имеется около 15 переменных, и вывод FullSimplify
заполняет несколько страниц формата A4. Для примеров с меньшим количеством переменных FindInstance
помогает найти контрпример или дает результат {}, если неравенство истинно. Я также пытался использовать Reduce
таким образом:
Reduce[
Implies[
assumtion1 && assumtion2,
inequality
],
Reals
]
Для простых примеров это выдает «True», если выполняется неравенство. Но в моем случае после нескольких часов работы Mathematica потребовалось 5-6 ГБ ОЗУ (и подкачка), поэтому мне пришлось прервать процесс.
Могу ли я что-нибудь сделать с Mathematica для улучшения производительности?