hi guys i have a question for you,

can anyone help me to find the correct code to mantain the structure of vel_qD list and simplify the term diff(s1(t),t)??

i'm driving crazy for that beacuse i'm not able to do it...

thanks, down here i post the code...

vel_qD := [diff(theta1(t), t) = -(diff(s1(t), t))*cos(theta3(t))/(LAD*sin(theta1(t)+theta3(t))), diff(theta2(t), t) = (L1*sin(theta1(t)+theta3(t))*(diff(s1(t), t))+L1*sin(theta1(t)-theta3(t))*(diff(s1(t), t))-2*LAD*sin(theta1(t)+theta3(t))*(diff(s1(t), t)))/(LAD*LBC*cos(theta1(t)+theta3(t)-theta2(t))-LAD*LBC*cos(theta1(t)+theta3(t)+theta2(t))), diff(theta3(t), t) = (diff(s1(t), t))*cos(theta1(t))/(L3*sin(theta1(t)+theta3(t))), diff(s2(t), t) = (L1*sin(theta1(t)+theta3(t)-theta2(t))*(diff(s1(t), t))+L1*sin(-theta3(t)-theta2(t)+theta1(t))*(diff(s1(t), t))-LAD*sin(theta1(t)+theta3(t)-theta2(t))*(diff(s1(t), t))-LAD*sin(theta1(t)+theta3(t)+theta2(t))*(diff(s1(t), t)))/(LAD*cos(theta1(t)+theta3(t)-theta2(t))-LAD*cos(theta1(t)+theta3(t)+theta2(t)))]

Weyl tensor is identically equal to zero in 3D and I have tried to show this by inputting an arbitrary metric and calculating components of Weyl tensor. Thus this answer should give me the empty set but I am not getting that, thanks in advance.

CODE:

with(Physics):

Setup(mathematicalnotation = true)

Setup(dimension = 3, coordinates = (X = [x1, x2, x3]), metric = 2*F6(X)*dx2*dx3+2*F5(X)*dx1*dx3+2*F4(X)*dx1*dx2+F1(X)*(dx1^2)+F2(X)*(dx2^2)+F3(X)*(dx3^2))

g_[]

Weyl[alpha, beta, mu, nu, nonzero]

Download Weyltensor0in3d.mw

Hi all, I have a problem but can't solve, anyone help me. Example we have json link http://myjson.com/16knzm

How to read procedure getName and getAge from json link above to be

Thank you very much. Sory because my english is bad.

Hi,

While trying to run this code :

pde := diff(u(x, t), t) = k*diff(u(x, t), x, x);
bc := u(x, 0) = T, u(0, t) = a*t + b, u(L, t) = T;
pdsolve([pde, bc], u(x, t)) assuming (0 < k, 0 < L, 0 < a, 0 < b, 0 < T, 0 <= t, 0 <= x and x <= L);

I get the following error :

Error, (in assuming) when calling 'factor'. Received: 'floating point coefficients are incompatible with field extension; use 'real' or 'complex' instead'

Any idea why ?

Assume I know some relations like 0<a<b<c<1, n is positive integer, and I want to know if

holds. How to check this in Maple? Is there any command like verifiy evalb for this kind of problem.? Or solve the inequality in terms of c, given the relations of a,b,c?

Thanks.

Hi, I'm trying to plot equipotential lines and streamlines in Maple, and both equations are in polar coordinates. I can plot a contourplot in cartesian coordinates, but adding "coords=polar", it throws an error. I tried to write a do loop but it wasn't having it either. any help would be appreciated

restart; with(LinearAlgebra); with(plots);
K := 1;
psi := K*r^(4/3)*sin(4/3*theta);
phi := K*r^(4/3)*cos(4/3*theta);

p1 := contourplot(psi, r = 0 .. 1, theta = 0 .. 3*Pi*(1/8));

p2 := contourplot(phi, r = 0 .. 1, theta = 0 .. 3*Pi*(1/8));
display(p1, p2);

which version of maple start to support Grid Computing Toolbox?

It has become more and more common to meet questions as labelled as "Spam". What does this classification mean?
Strangely if you click on the little red flag "Spam" it even seems that you can delete the corresponding question.
Does it mean that some people here have the power to decide if a question deserves to be answered or merits to be put on the trash?
Given that these questions are answered the same way than any other non spam labelled question, why are they labelled as spam?

 

Hi I need to write procedure to find a cubic equation... anyone could help me ...? 

Hello

 Every time im working with maple and answer is in term of sin or cos maple dont calculate them for example it give me sin(pi/2) but i want it himself know that sin(pi/2)=1 some times i use of [eval] but it again dont calculate it what i should do?

Generate Matrix Automatically for solving Higher order Differential Equation For Chebyshev Polynomial

What is the concept of these terms? 

(D[2, 2](T))(x, 0) = 0, (D[1, 1](T))(x, 0) = 0 ? I want to know these terms show

with respect by which parameter?

At a point in a worksheet I end up with an equation that has summations on both sides.  The range of summation is the same but the summands are different.  I want to remove the summations from both sides, keeping the equation with just the summands. How can this be done?  The only way I have found is to manually select each summand with the mouse and paste it into a new line which breaks the 'automation' of the script.

Thanks in advance.

This

expr:='1/r^2*diff(r^2*diff(v(r),r),r)'

gives

And when evaluated second time it gives

expr

The question is, how to put expr back to its original form shown at the top?

I tried simplify, combine, etc.. but nothing puts back to same form.

The reason I am asking, is that I need put more complicated expression in form that resembles when I am looking at in textbook. For an example, the Laplacian

VectorCalculus:-Laplacian(u(r,theta,phi),'spherical'[r,theta,phi])

But the above should be the same as

So I figured if I can rewrite each term to look like in the shorter version above (complete derivative version), it will be easier for me to compare what Maple gives and the text book shows,

ps. I found that the following command in Maples gives a little clearer Laplacian, but it is still not as simplified as the book but it is better than using VectorCalculus:-Laplacian

Physics[Vectors]:-Laplacian(u(r,theta,phi));

At least this has each term a little more seprated.

Hello everyone,

Even using the command "discont=true", some of the functions I plot still present discontinuities, but some of them do not present.

How can I fix this? This one file ilustrates perfectly the problem.

file_discont.mw