I want to build a list or vector out of 2 vectors containing values and 2 lists containing the order in the total list (or vecotr), I was wondering if there is a very simple way to do this instead of using loops?

NbNode:=6;

These are values:

U:=<1,2,2,3>;

UElim:=<0,5>;

And these are orders:

Elim:=[2,4];

ListEqn:=[seq( i, i=1..NbNode )]:

ListEqn:=subsop(seq(i=NULL, i in Elim), ListEqn);

The final result should be:

Utot=[1,0,2,5,2,3]

why doesn't "coeff" command work on this equation?

f=zin-z2(z3(z1(zin+I*z1*tan(beta1*d1))+I*z3*(tan(beta3*d3))(z1+I*zin*tan(beta1*d1)))

+I*z2*(tan(beta2*d2))(z3*(z1+I*zin*tan(beta1*d1))+I*z1(zin+I*z1*tan(beta1*d1))*tan(beta3*d3)))/(z2(z3(z1+I*zin*tan(beta1*d1))

+I*z1(zin+I*z1*tan(beta1*d1))*tan(beta3*d3))+I*z3(z1(zin+I*z1*tan(beta1*d1))+I*z3*(tan(beta3*d3))(z1+I*zin*tan(beta1*d1)))*tan(beta2*d2))

a0 := coeff(f, zin, 2);

b0 := coeff(f, zin, 1);

c0 := coeff(f, zin, 0);

Hey all,
I want to solve ODEs with Maple but for some reason I am not getting any output. No error, just no output. Can someone tell me where I am going wrong (this DE is just a random example I pulled out of the air):
> eqn := diff(y(t), `$`(t, 2))+1/y(t)^2 = sin(t);
> dsolve(eqn, y(t));

restart:

A:=Vector(<2*u[1]+u[2],3*u[1]+u[3],5*u[2]-u[3]>);

U:=<1,2,3>;

for i to 3 do

A:=eval(A,u[i]=U[i]);

od;

How can I do this in a simpler and faster way? I will do this procedure for many times with larger vecotors and matrices.

TIA

Is there a way to combine Arrays, like 5 Arrays called a,b,c,d,e into a single Array? a,b,c,d and e are all the same size.

Ive been using.

A := Array(...) (whatever size I need)

for k to z do

A[k] := a[k]

end do:

for k to z do

A[k+z] := b[k]

end do:

for k to z do

A[k+(2*z)] := c[k]

end do:

for k to z do

A[k+(3*z)] := d[k]

end do:

for k to z do

A[k+(4*z)] := e[k]

end do:

Good Afternoon everybody,

Would anybody please see why Maple would not substitute the list Lx :=[...], and Lz[....] into the equation in the attached procedure called inertia. My goal is to output the mass moment of inertia of the machine foundation.

Regards,

Hey all,
I have a system of differential equations that I want to solve using Runge Kutta, but for hte life of me I can't figure out the syntax for the command. Maybe someone here can point out where I am going wrong?
> accx := m*(diff(x(t), `$`(t, 2))) = -q*A*sin(w*t)-q^2/(x(t)^2+y(t)^2);
> accy := m*(diff(y(t), `$`(t, 2))) = -q^2/(x(t)^2+y(t)^2);
> IC := x(0) = -0.1322943021e-8, y(0) = 0.793765813e-10, (D(y))(0) = 0, (D(x))(0) = 3839294.99;
> RungeKutta([acc, acc2], IC, 0.1e-14);

We want to add 5 to the list L:

with(ListTools):

L:=[1,3,6,7];

L:=[L,5];

L:=Flatten(L);

I think there must be an easier way to do this, I would be thankful if someone let me know.

Can we define functions in Maple? If so, what is the difference between a user-defined function and a procedure?

I have a loop in my program. It sometimes takes a long time to run. I want to output a value of a variable that indicate how many jobs has been done. Since this value changes constantly, so the ordinary print method will generate a large amount output. Is there any way I can make this value shows in just one area dynamically?

Hi,

maybe anyone knows a workaround for this: draw a rectangle in MapleSim, select the menu with the filling tool and browse for an image. The imported image (gif,jpeg, what you want) does not show up properly, it is stangely distorted. I really need this feature because i want to create some demo sheets to show how to do things in MapleSim. I use MapleSim2 with latest updates.

Thanks

The usual optimization constraint in Maple looks like: con := [ w[1] <= 1, w[2] <= 1, w[1] >= -1, w[2] >= -1, w[1] + w[2] = 1 ]

I was wondering if it is possible to have a constraint where the

different weights w[1] , w[2] can only take the values -1 , 0 , 1

Hello

Does anybody hasa suggest how to quickly get the "initial conditons" of a (control) loop in MapleSim ?

When I'm debugging loops in MaplSim I'm missing a way to get the inital conditions and then to be able to see the (first) numerical values in each probe or on the "wires/ports".

Does something like this exit, or is it to be pushed on the "suggestion" list.

This applies also to PDE resolutions, the "get Initial Condition" run is a good trick to first check your model before running it.

Good Morning,

Would anybody be kind to help me with the attached worksheet. Most of the worksheet worked except for the last procedure where I was trying to call a procedure called** cog **that output the center of gravity of a concrete block **xyzc** in another procedure called **Inertia**. Please, how do I acheived this in Maple.

Regards

Moses