24小时热门版块排行榜

返回列表

当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

Kevin1987s

新虫 (初入文坛)

应助: 0 (幼儿园)
金币: 7
帖子: 15
在线: 7.3小时
虫号: 1405380
注册: 2011-09-17
专业: 机械动力学

[求助] matlab求解非线性方程组，求助！

θ1-4未知，用已知表示未知，怎么编程呢？
这是我编的程序，方程中用l代替l1,m代替l2
>> syms \alpha x y z R r l m \theta_1 \theta_2 \theta_3 \theta_4
eq1=[2^1/2*r*sin(\pi/4-\alpha)*cos\alpha+x-R-l*sin\theta_1]^2+[2^1/2*r*sin(\pi/4-\alpha)*sin\alpha+y]^2+(z+l*cos\theta_1)^2-m^2;
eq2=[-2^1/2*r*cos(\pi/4-\alpha)*sin\alpha+x]^2+[2^1/2*r*cos(\pi/4-\alpha)*cos\alpha+y-R-l*sin\theta_2]^2+(z+l*cos\theta_2)^2-m^2;
eq3=[-2^1/2*r*sin(\pi/4-\alpha)*cos\alpha+x+R+l*sin\theta_3]^2+[-2^1/2*r*sin(\pi/4-\alpha)*sin\alpha+y]^2+(z+l*cos\theta_3)^2-m^2;
eq4=[2^1/2*r*cos(\pi/4-\alpha)*sin\alpha+x]^2+[-2^1/2*r*cos(\pi/4-\alpha)*cos\alpha+y+R+l*sin\theta_4]^2+(z+l*cos\theta_4)^2-m^2;
d=solve(eq1,eq2,eq3,eq4)
d.\theta_1 \theta_2 \theta_3 \theta_4
??? Error using ==> syms at 61
Not a valid variable name.
应该怎么改啊？十分感谢！

方程组

回复此楼

» 猜你喜欢

天津大学招2026.09的博士生，欢迎大家推荐交流（博导是本人）已经有3人回复
有时候真觉得大城市人没有县城人甚至个体户幸福已经有6人回复
面上项目申报已经有3人回复
酰胺脱乙酰基已经有9人回复
CSC & MSCA 博洛尼亚大学能源材料课题组博士/博士后招生｜MSCA经费充足、排名优已经有5人回复
博士延得我，科研能力直往上蹿已经有7人回复
退学或坚持读已经有27人回复
面上基金申报没有其他的参与者成吗已经有5人回复
遇见不省心的家人很难过已经有22人回复

» 本主题相关价值贴推荐，对您同样有帮助:

求助！matlab用fsolve函数求解非线性方程组的问题！已经有19人回复
Matlab求解偏微分方程组已经有22人回复
matlab求解非线性方程组已经有16人回复
求高人指点用matlab求解非线性方程组，解决了追加100金币；已经有11人回复
matlab的fsove 命令求解非线性方程组已经有6人回复
【求助】向各位大侠求助matlab求解微分方程组遇到的一个问题已经有21人回复
【求助】matlab求解非线性方程组，并画图处理。要求y,z是实数解！已经有18人回复
【求助】MATLAB 有限差分法（FDM）求解偏微分方程已经有22人回复
【求助】如何求解下列偏微分方程已经有13人回复
【求助】matlab怎么求解偏微分方程组啊，先谢谢了已经有13人回复
【求助】求MAtlab求解程序！！！已经有20人回复
【求助】100金币求助高人一个程序解方程已经有15人回复
【求助】求教matlab解非线性方程组已经有9人回复

1楼 2012-05-21 12:21:08

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

csgt0

荣誉版主 (著名写手)

彩色挂图

专家经验: +2
应助: 367 (硕士)
贵宾: 0.457
金币: 7807
散金: 8897
红花: 20
沙发: 7
帖子: 2809
在线: 515.8小时
虫号: 449046
注册: 2007-11-02
专业: 金属非晶态、准晶和纳米晶
管辖: 计算模拟

【答案】应助回帖

d=solve(eq1,'theta_1')
d =

2*atan((2*(2*l*x - 2*R*l + ((4*l*x - 4*R*l + 2*2^(1/2)*l*r - 8*R*l*tan(alpha/2)^2 - 4*R*l*tan(alpha/2)^4 + 8*l*x*tan(alpha/2)^2 + 4*l*x*tan(alpha/2)^4 - 4*2^(1/2)*l*r*tan(alpha/2)^2 + 4*2^(1/2)*l*r*tan(alpha/2)^3 + 2*2^(1/2)*l*r*tan(alpha/2)^4 - 4*2^(1/2)*l*r*tan(alpha/2))^2/4 - ((r^2*cos(alpha)^4)/2 - 2*l*z - 2*R*x + 2*R^2*tan(alpha/2)^2 + R^2*tan(alpha/2)^4 + R^2 + 2*l^2*tan(alpha/2)^2 + l^2*tan(alpha/2)^4 - 2*m^2*tan(alpha/2)^2 - m^2*tan(alpha/2)^4 + l^2 + 2*x^2*tan(alpha/2)^2 + x^2*tan(alpha/2)^4 - m^2 + 2*y^2*tan(alpha/2)^2 + y^2*tan(alpha/2)^4 + 2*z^2*tan(alpha/2)^2 + z^2*tan(alpha/2)^4 + x^2 + y^2 + z^2 - r^2*cos(alpha)^3*sin(alpha) + (r^2*cos(alpha)^2*sin(alpha)^2)/2 + r^2*sin(alpha)^2*sin(alpha - pi/4)^2 - 4*R*x*tan(alpha/2)^2 - 2*R*x*tan(alpha/2)^4 - 4*l*z*tan(alpha/2)^2 - 2*l*z*tan(alpha/2)^4 + r^2*tan(alpha/2)^2*cos(alpha)^4 + (r^2*tan(alpha/2)^4*cos(alpha)^4)/2 - 2*r*y*sin(alpha)*sin(alpha - pi/4) + r^2*tan(alpha/2)^2*cos(alpha)^2*sin(alpha)^2 + (r^2*tan(alpha/2)^4*cos(alpha)^2*sin(alpha)^2)/2 + 2*r^2*tan(alpha/2)^2*sin(alpha)^2*sin(alpha - pi/4)^2 + r^2*tan(alpha/2)^4*sin(alpha)^2*sin(alpha - pi/4)^2 - 2^(1/2)*R*r*cos(alpha)^2 - 2*r^2*tan(alpha/2)^2*cos(alpha)^3*sin(alpha) - r^2*tan(alpha/2)^4*cos(alpha)^3*sin(alpha) + 2^(1/2)*r*x*cos(alpha)^2 + 2^(1/2)*R*r*cos(alpha)*sin(alpha) - 2*2^(1/2)*R*r*tan(alpha/2)^2*cos(alpha)^2 - 2^(1/2)*R*r*tan(alpha/2)^4*cos(alpha)^2 - 2^(1/2)*r*x*cos(alpha)*sin(alpha) + 2*2^(1/2)*r*x*tan(alpha/2)^2*cos(alpha)^2 + 2^(1/2)*r*x*tan(alpha/2)^4*cos(alpha)^2 - 4*r*y*tan(alpha/2)^2*sin(alpha)*sin(alpha - pi/4) - 2*r*y*tan(alpha/2)^4*sin(alpha)*sin(alpha - pi/4) + 2*2^(1/2)*R*r*tan(alpha/2)^2*cos(alpha)*sin(alpha) + 2^(1/2)*R*r*tan(alpha/2)^4*cos(alpha)*sin(alpha) - 2*2^(1/2)*r*x*tan(alpha/2)^2*cos(alpha)*sin(alpha) - 2^(1/2)*r*x*tan(alpha/2)^4*cos(alpha)*sin(alpha))*(2*l*z - 2*R*x + (r^2*cos(alpha)^4)/2 + 2*R^2*tan(alpha/2)^2 + R^2*tan(alpha/2)^4 + R^2 + 2*l^2*tan(alpha/2)^2 + l^2*tan(alpha/2)^4 - 2*m^2*tan(alpha/2)^2 - m^2*tan(alpha/2)^4 + l^2 + 2*x^2*tan(alpha/2)^2 + x^2*tan(alpha/2)^4 - m^2 + 2*y^2*tan(alpha/2)^2 + y^2*tan(alpha/2)^4 + 2*z^2*tan(alpha/2)^2 + z^2*tan(alpha/2)^4 + x^2 + y^2 + z^2 - r^2*cos(alpha)^3*sin(alpha) + (r^2*cos(alpha)^2*sin(alpha)^2)/2 + r^2*sin(alpha)^2*sin(alpha - pi/4)^2 - 4*R*x*tan(alpha/2)^2 - 2*R*x*tan(alpha/2)^4 + 4*l*z*tan(alpha/2)^2 + 2*l*z*tan(alpha/2)^4 + r^2*tan(alpha/2)^2*cos(alpha)^4 + (r^2*tan(alpha/2)^4*cos(alpha)^4)/2 - 2*r*y*sin(alpha)*sin(alpha - pi/4) + r^2*tan(alpha/2)^2*cos(alpha)^2*sin(alpha)^2 + (r^2*tan(alpha/2)^4*cos(alpha)^2*sin(alpha)^2)/2 + 2*r^2*tan(alpha/2)^2*sin(alpha)^2*sin(alpha - pi/4)^2 + r^2*tan(alpha/2)^4*sin(alpha)^2*sin(alpha - pi/4)^2 - 2^(1/2)*R*r*cos(alpha)^2 - 2*r^2*tan(alpha/2)^2*cos(alpha)^3*sin(alpha) - r^2*tan(alpha/2)^4*cos(alpha)^3*sin(alpha) + 2^(1/2)*r*x*cos(alpha)^2 + 2^(1/2)*R*r*cos(alpha)*sin(alpha) - 2*2^(1/2)*R*r*tan(alpha/2)^2*cos(alpha)^2 - 2^(1/2)*R*r*tan(alpha/2)^4*cos(alpha)^2 - 2^(1/2)*r*x*cos(alpha)*sin(alpha) + 2*2^(1/2)*r*x*tan(alpha/2)^2*cos(alpha)^2 + 2^(1/2)*r*x*tan(alpha/2)^4*cos(alpha)^2 - 4*r*y*tan(alpha/2)^2*sin(alpha)*sin(alpha - pi/4) - 2*r*y*tan(alpha/2)^4*sin(alpha)*sin(alpha - pi/4) + 2*2^(1/2)*R*r*tan(alpha/2)^2*cos(alpha)*sin(alpha) + 2^(1/2)*R*r*tan(alpha/2)^4*cos(alpha)*sin(alpha) - 2*2^(1/2)*r*x*tan(alpha/2)^2*cos(alpha)*sin(alpha) - 2^(1/2)*r*x*tan(alpha/2)^4*cos(alpha)*sin(alpha)))^(1/2) + 2^(1/2)*l*r - 4*R*l*tan(alpha/2)^2 - 2*R*l*tan(alpha/2)^4 + 4*l*x*tan(alpha/2)^2 + 2*l*x*tan(alpha/2)^4 - 2*2^(1/2)*l*r*tan(alpha/2)^2 + 2*2^(1/2)*l*r*tan(alpha/2)^3 + 2^(1/2)*l*r*tan(alpha/2)^4 - 2*2^(1/2)*l*r*tan(alpha/2)))/(r^2*cos(alpha)^4 - 4*l*z - 4*R*x + 4*R^2*tan(alpha/2)^2 + 2*R^2*tan(alpha/2)^4 + 2*R^2 + 4*l^2*tan(alpha/2)^2 + 2*l^2*tan(alpha/2)^4 - 4*m^2*tan(alpha/2)^2 - 2*m^2*tan(alpha/2)^4 + 2*l^2 + 4*x^2*tan(alpha/2)^2 + 2*x^2*tan(alpha/2)^4 - 2*m^2 + 4*y^2*tan(alpha/2)^2 + 2*y^2*tan(alpha/2)^4 + 4*z^2*tan(alpha/2)^2 + 2*z^2*tan(alpha/2)^4 + 2*x^2 + 2*y^2 + 2*z^2 - 2*r^2*cos(alpha)^3*sin(alpha) + r^2*cos(alpha)^2*sin(alpha)^2 + 2*r^2*sin(alpha)^2*sin(alpha - pi/4)^2 - 8*R*x*tan(alpha/2)^2 - 4*R*x*tan(alpha/2)^4 - 8*l*z*tan(alpha/2)^2 - 4*l*z*tan(alpha/2)^4 + 2*r^2*tan(alpha/2)^2*cos(alpha)^4 + r^2*tan(alpha/2)^4*cos(alpha)^4 - 4*r*y*sin(alpha)*sin(alpha - pi/4) + 2*r^2*tan(alpha/2)^2*cos(alpha)^2*sin(alpha)^2 + r^2*tan(alpha/2)^4*cos(alpha)^2*sin(alpha)^2 + 4*r^2*tan(alpha/2)^2*sin(alpha)^2*sin(alpha - pi/4)^2 + 2*r^2*tan(alpha/2)^4*sin(alpha)^2*sin(alpha - pi/4)^2 - 2*2^(1/2)*R*r*cos(alpha)^2 - 4*r^2*tan(alpha/2)^2*cos(alpha)^3*sin(alpha) - 2*r^2*tan(alpha/2)^4*cos(alpha)^3*sin(alpha) + 2*2^(1/2)*r*x*cos(alpha)^2 + 2*2^(1/2)*R*r*cos(alpha)*sin(alpha) - 4*2^(1/2)*R*r*tan(alpha/2)^2*cos(alpha)^2 - 2*2^(1/2)*R*r*tan(alpha/2)^4*cos(alpha)^2 - 2*2^(1/2)*r*x*cos(alpha)*sin(alpha) + 4*2^(1/2)*r*x*tan(alpha/2)^2*cos(alpha)^2 + 2*2^(1/2)*r*x*tan(alpha/2)^4*cos(alpha)^2 - 8*r*y*tan(alpha/2)^2*sin(alpha)*sin(alpha - pi/4) - 4*r*y*tan(alpha/2)^4*sin(alpha)*sin(alpha - pi/4) + 4*2^(1/2)*R*r*tan(alpha/2)^2*cos(alpha)*sin(alpha) + 2*2^(1/2)*R*r*tan(alpha/2)^4*cos(alpha)*sin(alpha) - 4*2^(1/2)*r*x*tan(alpha/2)^2*cos(alpha)*sin(alpha) - 2*2^(1/2)*r*x*tan(alpha/2)^4*cos(alpha)*sin(alpha)))
-2*atan((2*(2*R*l - 2*l*x + ((4*l*x - 4*R*l + 2*2^(1/2)*l*r - 8*R*l*tan(alpha/2)^2 - 4*R*l*tan(alpha/2)^4 + 8*l*x*tan(alpha/2)^2 + 4*l*x*tan(alpha/2)^4 - 4*2^(1/2)*l*r*tan(alpha/2)^2 + 4*2^(1/2)*l*r*tan(alpha/2)^3 + 2*2^(1/2)*l*r*tan(alpha/2)^4 - 4*2^(1/2)*l*r*tan(alpha/2))^2/4 - ((r^2*cos(alpha)^4)/2 - 2*l*z - 2*R*x + 2*R^2*tan(alpha/2)^2 + R^2*tan(alpha/2)^4 + R^2 + 2*l^2*tan(alpha/2)^2 + l^2*tan(alpha/2)^4 - 2*m^2*tan(alpha/2)^2 - m^2*tan(alpha/2)^4 + l^2 + 2*x^2*tan(alpha/2)^2 + x^2*tan(alpha/2)^4 - m^2 + 2*y^2*tan(alpha/2)^2 + y^2*tan(alpha/2)^4 + 2*z^2*tan(alpha/2)^2 + z^2*tan(alpha/2)^4 + x^2 + y^2 + z^2 - r^2*cos(alpha)^3*sin(alpha) + (r^2*cos(alpha)^2*sin(alpha)^2)/2 + r^2*sin(alpha)^2*sin(alpha - pi/4)^2 - 4*R*x*tan(alpha/2)^2 - 2*R*x*tan(alpha/2)^4 - 4*l*z*tan(alpha/2)^2 - 2*l*z*tan(alpha/2)^4 + r^2*tan(alpha/2)^2*cos(alpha)^4 + (r^2*tan(alpha/2)^4*cos(alpha)^4)/2 - 2*r*y*sin(alpha)*sin(alpha - pi/4) + r^2*tan(alpha/2)^2*cos(alpha)^2*sin(alpha)^2 + (r^2*tan(alpha/2)^4*cos(alpha)^2*sin(alpha)^2)/2 + 2*r^2*tan(alpha/2)^2*sin(alpha)^2*sin(alpha - pi/4)^2 + r^2*tan(alpha/2)^4*sin(alpha)^2*sin(alpha - pi/4)^2 - 2^(1/2)*R*r*cos(alpha)^2 - 2*r^2*tan(alpha/2)^2*cos(alpha)^3*sin(alpha) - r^2*tan(alpha/2)^4*cos(alpha)^3*sin(alpha) + 2^(1/2)*r*x*cos(alpha)^2 + 2^(1/2)*R*r*cos(alpha)*sin(alpha) - 2*2^(1/2)*R*r*tan(alpha/2)^2*cos(alpha)^2 - 2^(1/2)*R*r*tan(alpha/2)^4*cos(alpha)^2 - 2^(1/2)*r*x*cos(alpha)*sin(alpha) + 2*2^(1/2)*r*x*tan(alpha/2)^2*cos(alpha)^2 + 2^(1/2)*r*x*tan(alpha/2)^4*cos(alpha)^2 - 4*r*y*tan(alpha/2)^2*sin(alpha)*sin(alpha - pi/4) - 2*r*y*tan(alpha/2)^4*sin(alpha)*sin(alpha - pi/4) + 2*2^(1/2)*R*r*tan(alpha/2)^2*cos(alpha)*sin(alpha) + 2^(1/2)*R*r*tan(alpha/2)^4*cos(alpha)*sin(alpha) - 2*2^(1/2)*r*x*tan(alpha/2)^2*cos(alpha)*sin(alpha) - 2^(1/2)*r*x*tan(alpha/2)^4*cos(alpha)*sin(alpha))*(2*l*z - 2*R*x + (r^2*cos(alpha)^4)/2 + 2*R^2*tan(alpha/2)^2 + R^2*tan(alpha/2)^4 + R^2 + 2*l^2*tan(alpha/2)^2 + l^2*tan(alpha/2)^4 - 2*m^2*tan(alpha/2)^2 - m^2*tan(alpha/2)^4 + l^2 + 2*x^2*tan(alpha/2)^2 + x^2*tan(alpha/2)^4 - m^2 + 2*y^2*tan(alpha/2)^2 + y^2*tan(alpha/2)^4 + 2*z^2*tan(alpha/2)^2 + z^2*tan(alpha/2)^4 + x^2 + y^2 + z^2 - r^2*cos(alpha)^3*sin(alpha) + (r^2*cos(alpha)^2*sin(alpha)^2)/2 + r^2*sin(alpha)^2*sin(alpha - pi/4)^2 - 4*R*x*tan(alpha/2)^2 - 2*R*x*tan(alpha/2)^4 + 4*l*z*tan(alpha/2)^2 + 2*l*z*tan(alpha/2)^4 + r^2*tan(alpha/2)^2*cos(alpha)^4 + (r^2*tan(alpha/2)^4*cos(alpha)^4)/2 - 2*r*y*sin(alpha)*sin(alpha - pi/4) + r^2*tan(alpha/2)^2*cos(alpha)^2*sin(alpha)^2 + (r^2*tan(alpha/2)^4*cos(alpha)^2*sin(alpha)^2)/2 + 2*r^2*tan(alpha/2)^2*sin(alpha)^2*sin(alpha - pi/4)^2 + r^2*tan(alpha/2)^4*sin(alpha)^2*sin(alpha - pi/4)^2 - 2^(1/2)*R*r*cos(alpha)^2 - 2*r^2*tan(alpha/2)^2*cos(alpha)^3*sin(alpha) - r^2*tan(alpha/2)^4*cos(alpha)^3*sin(alpha) + 2^(1/2)*r*x*cos(alpha)^2 + 2^(1/2)*R*r*cos(alpha)*sin(alpha) - 2*2^(1/2)*R*r*tan(alpha/2)^2*cos(alpha)^2 - 2^(1/2)*R*r*tan(alpha/2)^4*cos(alpha)^2 - 2^(1/2)*r*x*cos(alpha)*sin(alpha) + 2*2^(1/2)*r*x*tan(alpha/2)^2*cos(alpha)^2 + 2^(1/2)*r*x*tan(alpha/2)^4*cos(alpha)^2 - 4*r*y*tan(alpha/2)^2*sin(alpha)*sin(alpha - pi/4) - 2*r*y*tan(alpha/2)^4*sin(alpha)*sin(alpha - pi/4) + 2*2^(1/2)*R*r*tan(alpha/2)^2*cos(alpha)*sin(alpha) + 2^(1/2)*R*r*tan(alpha/2)^4*cos(alpha)*sin(alpha) - 2*2^(1/2)*r*x*tan(alpha/2)^2*cos(alpha)*sin(alpha) - 2^(1/2)*r*x*tan(alpha/2)^4*cos(alpha)*sin(alpha)))^(1/2) - 2^(1/2)*l*r + 4*R*l*tan(alpha/2)^2 + 2*R*l*tan(alpha/2)^4 - 4*l*x*tan(alpha/2)^2 - 2*l*x*tan(alpha/2)^4 + 2*2^(1/2)*l*r*tan(alpha/2)^2 - 2*2^(1/2)*l*r*tan(alpha/2)^3 - 2^(1/2)*l*r*tan(alpha/2)^4 + 2*2^(1/2)*l*r*tan(alpha/2)))/(r^2*cos(alpha)^4 - 4*l*z - 4*R*x + 4*R^2*tan(alpha/2)^2 + 2*R^2*tan(alpha/2)^4 + 2*R^2 + 4*l^2*tan(alpha/2)^2 + 2*l^2*tan(alpha/2)^4 - 4*m^2*tan(alpha/2)^2 - 2*m^2*tan(alpha/2)^4 + 2*l^2 + 4*x^2*tan(alpha/2)^2 + 2*x^2*tan(alpha/2)^4 - 2*m^2 + 4*y^2*tan(alpha/2)^2 + 2*y^2*tan(alpha/2)^4 + 4*z^2*tan(alpha/2)^2 + 2*z^2*tan(alpha/2)^4 + 2*x^2 + 2*y^2 + 2*z^2 - 2*r^2*cos(alpha)^3*sin(alpha) + r^2*cos(alpha)^2*sin(alpha)^2 + 2*r^2*sin(alpha)^2*sin(alpha - pi/4)^2 - 8*R*x*tan(alpha/2)^2 - 4*R*x*tan(alpha/2)^4 - 8*l*z*tan(alpha/2)^2 - 4*l*z*tan(alpha/2)^4 + 2*r^2*tan(alpha/2)^2*cos(alpha)^4 + r^2*tan(alpha/2)^4*cos(alpha)^4 - 4*r*y*sin(alpha)*sin(alpha - pi/4) + 2*r^2*tan(alpha/2)^2*cos(alpha)^2*sin(alpha)^2 + r^2*tan(alpha/2)^4*cos(alpha)^2*sin(alpha)^2 + 4*r^2*tan(alpha/2)^2*sin(alpha)^2*sin(alpha - pi/4)^2 + 2*r^2*tan(alpha/2)^4*sin(alpha)^2*sin(alpha - pi/4)^2 - 2*2^(1/2)*R*r*cos(alpha)^2 - 4*r^2*tan(alpha/2)^2*cos(alpha)^3*sin(alpha) - 2*r^2*tan(alpha/2)^4*cos(alpha)^3*sin(alpha) + 2*2^(1/2)*r*x*cos(alpha)^2 + 2*2^(1/2)*R*r*cos(alpha)*sin(alpha) - 4*2^(1/2)*R*r*tan(alpha/2)^2*cos(alpha)^2 - 2*2^(1/2)*R*r*tan(alpha/2)^4*cos(alpha)^2 - 2*2^(1/2)*r*x*cos(alpha)*sin(alpha) + 4*2^(1/2)*r*x*tan(alpha/2)^2*cos(alpha)^2 + 2*2^(1/2)*r*x*tan(alpha/2)^4*cos(alpha)^2 - 8*r*y*tan(alpha/2)^2*sin(alpha)*sin(alpha - pi/4) - 4*r*y*tan(alpha/2)^4*sin(alpha)*sin(alpha - pi/4) + 4*2^(1/2)*R*r*tan(alpha/2)^2*cos(alpha)*sin(alpha) + 2*2^(1/2)*R*r*tan(alpha/2)^4*cos(alpha)*sin(alpha) - 4*2^(1/2)*r*x*tan(alpha/2)^2*cos(alpha)*sin(alpha) - 2*2^(1/2)*r*x*tan(alpha/2)^4*cos(alpha)*sin(alpha)))

simple(d)

simplify:

2*atan((2*cos(alpha/2)^4*(2*l*x - 2*R*l + ((16*l^2*(2*R - 2*x - 2^(1/2)*r*cos(alpha)^2 + (2^(1/2)*r*sin(2*alpha))/2)^2)/(cos(alpha) + 1)^4 - ((2*R^2 - 4*l*z - r^2*sin(2*alpha) - 4*R*x + 2*l^2 - 2*m^2 + r^2 + 2*x^2 + 2*y^2 + 2*z^2 - 2^(1/2)*R*r + 2*r*y*sin(pi/4 + 2*alpha) + 2^(1/2)*r*x - 2^(1/2)*r*y - 2^(1/2)*R*r*cos(2*alpha) + 2^(1/2)*R*r*sin(2*alpha) + 2^(1/2)*r*x*cos(2*alpha) - 2^(1/2)*r*x*sin(2*alpha))*(4*l*z - 4*R*x - r^2*sin(2*alpha) + 2*R^2 + 2*l^2 - 2*m^2 + r^2 + 2*x^2 + 2*y^2 + 2*z^2 - 2^(1/2)*R*r + 2*r*y*sin(pi/4 + 2*alpha) + 2^(1/2)*r*x - 2^(1/2)*r*y - 2^(1/2)*R*r*cos(2*alpha) + 2^(1/2)*R*r*sin(2*alpha) + 2^(1/2)*r*x*cos(2*alpha) - 2^(1/2)*r*x*sin(2*alpha)))/(4*cos(alpha/2)^8))^(1/2) + 2^(1/2)*l*r - 4*R*l*tan(alpha/2)^2 - 2*R*l*tan(alpha/2)^4 + 4*l*x*tan(alpha/2)^2 + 2*l*x*tan(alpha/2)^4 - 2*2^(1/2)*l*r*tan(alpha/2)^2 + 2*2^(1/2)*l*r*tan(alpha/2)^3 + 2^(1/2)*l*r*tan(alpha/2)^4 - 2*2^(1/2)*l*r*tan(alpha/2)))/(2*R^2 - 4*l*z - r^2*sin(2*alpha) - 4*R*x + 2*l^2 - 2*m^2 + r^2 + 2*x^2 + 2*y^2 + 2*z^2 - 2^(1/2)*R*r + 2*r*y*sin(pi/4 + 2*alpha) + 2^(1/2)*r*x - 2^(1/2)*r*y - 2^(1/2)*R*r*cos(2*alpha) + 2^(1/2)*R*r*sin(2*alpha) + 2^(1/2)*r*x*cos(2*alpha) - 2^(1/2)*r*x*sin(2*alpha)))
-2*atan((2*cos(alpha/2)^4*(2*R*l - 2*l*x + ((16*l^2*(2*R - 2*x - 2^(1/2)*r*cos(alpha)^2 + (2^(1/2)*r*sin(2*alpha))/2)^2)/(cos(alpha) + 1)^4 - ((2*R^2 - 4*l*z - r^2*sin(2*alpha) - 4*R*x + 2*l^2 - 2*m^2 + r^2 + 2*x^2 + 2*y^2 + 2*z^2 - 2^(1/2)*R*r + 2*r*y*sin(pi/4 + 2*alpha) + 2^(1/2)*r*x - 2^(1/2)*r*y - 2^(1/2)*R*r*cos(2*alpha) + 2^(1/2)*R*r*sin(2*alpha) + 2^(1/2)*r*x*cos(2*alpha) - 2^(1/2)*r*x*sin(2*alpha))*(4*l*z - 4*R*x - r^2*sin(2*alpha) + 2*R^2 + 2*l^2 - 2*m^2 + r^2 + 2*x^2 + 2*y^2 + 2*z^2 - 2^(1/2)*R*r + 2*r*y*sin(pi/4 + 2*alpha) + 2^(1/2)*r*x - 2^(1/2)*r*y - 2^(1/2)*R*r*cos(2*alpha) + 2^(1/2)*R*r*sin(2*alpha) + 2^(1/2)*r*x*cos(2*alpha) - 2^(1/2)*r*x*sin(2*alpha)))/(4*cos(alpha/2)^8))^(1/2) - 2^(1/2)*l*r + 4*R*l*tan(alpha/2)^2 + 2*R*l*tan(alpha/2)^4 - 4*l*x*tan(alpha/2)^2 - 2*l*x*tan(alpha/2)^4 + 2*2^(1/2)*l*r*tan(alpha/2)^2 - 2*2^(1/2)*l*r*tan(alpha/2)^3 - 2^(1/2)*l*r*tan(alpha/2)^4 + 2*2^(1/2)*l*r*tan(alpha/2)))/(2*R^2 - 4*l*z - r^2*sin(2*alpha) - 4*R*x + 2*l^2 - 2*m^2 + r^2 + 2*x^2 + 2*y^2 + 2*z^2 - 2^(1/2)*R*r + 2*r*y*sin(pi/4 + 2*alpha) + 2^(1/2)*r*x - 2^(1/2)*r*y - 2^(1/2)*R*r*cos(2*alpha) + 2^(1/2)*R*r*sin(2*alpha) + 2^(1/2)*r*x*cos(2*alpha) - 2^(1/2)*r*x*sin(2*alpha)))