求解具有最大值的方程

Solving equations with maxima

下面的方程我能正常解

sin(b1*(x-c1)) = sin(b2*(x-c2))
b1*(x-c1)      =  b2*(x-c2)
c2             = x-(b1*(x-c1))/b2

for c1 = 0, b1 = 1, b2 = 1.5, x = pi/2

c2 = (x-(b1*(x-c1))/b2) = 0.523598775598299

但是当我尝试在 Maxima 中执行此操作时,看到下面的答案完全不同,我做错了什么?

kill(all)$
numer:true$
phase1:0; freq1:1; freq2:1.5; x:pi/2; solve(sin(freq1*(x-phase1))=sin(freq2*(x-phase2)),phase2);

我在下面得到的答案

solve 通常只适用于简单的方程式,试试 Solver.

此外,pi(变量)与 %pi(常量)不同。

kill(all)$
load(solver)$
numer:true;
f:sin(freq2*(x-phase2))=sin(freq1*(x-phase1));
phase1:0; freq1:1; freq2:1.5; x:%pi/2; a:Solver([f],[phase2]);
rhs(a[1][1]),numer;

答案:0.5235987755982978

你的第二个问题:

kill(all);
f:sin(b1*(x-c1)) - sin(b2*(x-c2))=0;
triginverses:all;
solve(f,c2);