In[]:=
l=0.5​​F=13000/4​​f=0.12​​Eel=200000000000​​Iin=0.05*(4*0.008)^3/4​​k[x]=2*(f/l)/(1+4*(f/l)^2*(x/l)^2)^(3/2)​​k'[x]​​dsdx[x]:=(1+4*(x/l)^2*(f/l)^2)^(1/2)​​M[x]:=-F*x-F*l/2​​θ[x]:=((u''[x]*dsdx[x]-u'[x]*dsdx'[x])/(dsdx[x])^2-(k'[x]*u'[x])/(dsdx[x]*k[x]))*1/k[x]+k[x]*u[x]​​Dsolve[M[x]-Eel*Iin*θ'[x]==0,θ[x],x]
Out[]=
0.5
Out[]=
3250
Out[]=
0.12
Out[]=
200000000000
Out[]=
4.096×
-7
10
Out[]=
0.48
3/2
(1+0.9216
2
x
)
Out[]=
′
k
[x]
Out[]=
Dsolve-812.5-3250x-81920.
′
θ
[x]0,
0.48u[x]
3/2
(1+0.9216
2
x
)
+2.08333
3/2
(1+0.9216
2
x
)
-2.08333(1+0.9216
2
x
)
′
k
[x]
′
u
[x]+
-
′
dsdx
[x]
′
u
[x]+
1+0.9216
2
x
′′
u
[x]
1+0.9216
2
x
,x