Advanced Search

Question: command within the DETools package

Question:command within the DETools package

herclau 1038 Maple
package
November 10 2009
0
There any command within the DETools package, with which to avoid the following steps:
 

> diff(Q(t), t) = eta*(T(t)-theta)*s/l;

d eta (T(t) - theta) s

--- Q(t) = --------------------

dt l

> diff(Q(t), t) = -c*m*(diff(T(t), t));

d / d \

--- Q(t) = -c m |--- T(t)|

dt \ dt /

> rhs(diff(Q(t), t) = eta*(T(t)-theta)*s/l) = rhs(diff(Q(t), t) = -c*m*(diff(T(t), t)));

eta (T(t) - theta) s / d \

-------------------- = -c m |--- T(t)|

l \ dt /

> eta*(T(t)-theta)*s/l = -c*m*(diff(T(t), t)), T(0) = `#msub(mi("T"),mn("0"))`;

eta (T(t) - theta) s / d \

-------------------- = -c m |--- T(t)|, T(0) = #msub(mi("T"),mn("0"))

l \ dt /

dsolve({eta*(T(t)-theta)*s/l = -c*m*(diff(T(t), t)), T(0) = `#msub(mi("T"),mn("0"))`}, {T(t)});

/ eta s t\

T(t) = theta + exp|- -------| (#msub(mi("T"),mn("0")) - theta)

\ l c m /

> Gracias

Herclau
Please Wait...