|
From: Daniel V. <dan...@ya...> - 2019-10-26 16:47:49
|
Hi All, Given the following code: declare(t,mainvar)$orderless(m,K,g,a)$declare([m,K,g,a],constant)$assume(m>0,K>0,g>0,a>0)$ A:(√(5)*K)/(2*m)-(3*K)/(2*m)$ B:(√(5)*g)/(√(2)*√(√(5)+5))+(3*g)/(√(2)*√(√(5)+5))$ C:-(√(5)*K)/(2*m)-(3*K)/(2*m)$ D:(3*g)/(√(2)*√(5-√(5)))-(√(5)*g)/(√(2)*√(5-√(5)))$ Eq1:'diff(z_1(t),t,2)=A*z_1(t)+B$ Eq2:'diff(z_2(t),t,2)=C*z_2(t)+D$ atvalue(z_1(t),[t=0],z_10)$ atvalue(z_2(t),[t=0],z_20)$atvalue(diff(z_1(t),t),[t=0],v_10)$ atvalue(diff(z_2(t),t),[t=0],v_20)$ desol1:desolve(Eq1,z_1(t)); desol2:desolve(Eq2,z_2(t)); desol:desolve([Eq1,Eq2],[z_1(t),z_2(t)])$map(ldisp,desol)$ When desolve is used on one single equation, it works fine, when it is used with two decoupled equations it fails.What is its problem?Thanks. Daniel Volinski |