Test007

50 Reputation

5 Badges

5 years, 51 days

MaplePrimes Activity


These are questions asked by Test007

I want to solve the following problem in Maple:

I used the following Maple code. I am unsure whether this is the correct way of entering the assumptions for the initial and boundary conditions though.


 

eq := diff(u(x, t), t, t)-4*(diff(u(x, t), x, x)) = 0

diff(diff(u(x, t), t), t)-4*(diff(diff(u(x, t), x), x)) = 0

(1)

ic := `assuming`([u(x, 0) = 4*sin(x), (D[2](u))(x, 0) = 0], [x > 0])

u(x, 0) = 4*sin(x), (D[2](u))(x, 0) = 0

(2)

bc := `assuming`([(D[1](u))(0, t) = 0], [t > 0])

(D[1](u))(0, t) = 0

(3)

`assuming`([simplify(pdsolve([eq, ic, bc]))], [`and`(t > 0, x > -t)])

u(x, t) = (-4*Heaviside(x-2*t)+4)*sin(2*t-x)+4*sin(x)*cos(2*t)

(4)

``

``

Download IVP_with_inequalities.mw

How can I create an even function, g, in Maple? I want Maple to give g(x) - g(-x) as 0.

1 2 3 Page 3 of 3