maxima - 在wxMaxima中获得多项式方程的实数和正解

Question

我想在 wxMaxima 中求解以下方程:

k*A*((T_2-T_1)/L)=ε*σ*A*(T_1^4-T_a^4)

对于 T_1。问题是，使用常规 Solve 和 Solve_to_poly 我会得到非常长的输出，但不是我所期望的。我需要一个真正的正解，因为 T_1 是开氏温度。我可以替换这些值，但我更愿意获得一个符号公式作为输出。有没有办法在 wxMaxima 中得到这样的解决方案？

Answer 1

显然，不可能通过获得 T1 公式形式的符号解的方式求解该方程。因此，我不得不替换这些值，然后求解未知的 T1。要么使用 float(solve([...],[T1])) 给出 4 个解决方案(只有一个是真实的和积极的 - 感兴趣的那个)或使用 find_root(. ..,T1,0,1000)。 T1 (0 K - 1000 K) 的下限和上限可以根据问题的物理性质来选择。