December 09 2009
kagu 60
this is my program to calcul pade approximant at n points complex or real. and i want to excute this program with L =40 or more but it can't.

L:=4:

P:=add(p[k]*x^k,k=0..L):

Q:=1+add(q[k]*x^k,k=1..L+1):

f:=(-1/x)*ln(1-x):

a:=seq(coeftayl(f*Q-P,x=I,k),k=0..L):

a1:=seq(coeftayl(f*Q-P,x=-I,k),k=0..L):

s:=fsolve({a, a1});

AP:=evalf(eval(P/Q,s)):

please can you help to improve this program.

December 09 2009
sjch 12
Hi,
im relatively new to Maple and only use it occasionally to rearrange equations for further use.
I would like to express the following equation in the form (V=...) but seem not able to. V(P,T)
the equation should express volume V as function of P and T (pressure and temperature). b, c and d are constants
EQN := V+b = (1/(V*(4*V-b)^3)-c*V-d)/(P*sqrt(T)*V^2)
How can I do this?
thanks for any help/suggestions

I am trying to approximate the solution of vi_vh to
vi_vh = 1 / sqrt(vx_vh^2 + (vi_vh+vz_vh)^2)
with the expression
vi_vh = a * vz_vh^3 + b * vz_vh^2 + c * vz_vh + d + e * vz_vh * vx_vh^2
where b and d are zero
The approximation is for the region -2<><>

I have a question where I'm trying to find the value of some variable C that when multiplied by the double integral of a function returns 1 as the answer.

The function I'm in putting is f:=(x,y) -> C* exp((-0.001*x)-0.002*y), but leaving out the C when inputting into maple

The function also has parameters for the values of x and y where both are between -1 and 1(including =1 and 1) and x<y with x being greater than or equal to 0

December 09 2009
mdc 228
I'm trying to use Maple to calculate surface integral; before getting to the surface integral, I need to get cross product of two vectors; but I could not get the codes work. Please help.

with (VectorCalculus):

x:= (r,t) -> r*sin(t);

y:= (r,t) -> r*cos(t);

z:= (r,t) -> r^2.sin(t)*cos(t);

> R := Vector*[x(r, t), y(r, t), z(r, t)];

Vector [r sin(t), r cos(t), r sin(t) cos(t)]

> r1 := VectorField(diff(R, r));

VectorField([0, 0, 0] + Vector [sin(t), cos(t), 2 r sin(t) cos(t)])

>

> r2 := VectorField(diff(R, t));

This is my program below. When I try to get an output, nothing happens, please help!

> restart:

> with(plots):

readlib(readdata):

lrc:=array(-1..1,-1..1):

lrn:=array(-1..1,-1..1):

urn:=array(-2..2,-2..2):

unr:=array(-2..2,-2..2):

urc:=array(-2..2,-2..2):

Ylm:=array(1..2,-2..2):

Dj:=array(-1..1,-1..1):

Dj2:=array(-2..2,-2..2):

rhoc[-1..1,-1..1,1..21]:

December 08 2009
mdc 228
Given z = x*y, where 0<>

Here is my working so far

S1:=unapply(u*FresnelS(u)+((1/Pi)*cos((1/2)*Pi*u^2))-(1/Pi),u);

C1:=unapply(u*FresnelC(u)-((1/Pi)*sin((1/2)*Pi*u^2)),u);

with(plottools);

with(plots);

u0:=sqrt(0.25);

evalf(FresnelC(u0)+FresnelS(u0)*cot((3*Pi)/8));

p1:=display(plot([FresnelC(u),FresnelS(u),u=0..u0]));

p2:=display(plot(x-0.5191572775,x=0..1,y=0..1,colour=black));

display(p1,p2);

December 08 2009
gepo 531
Hi, all,
I have a question about how to compute inverse of matrix over field. Here field is actually GF(2)={0,1}.
The description of MatrixInverse is here:
LinearAlgebra[Generic][MatrixInverse] - compute the inverse of a square Matrix
MatrixInverse[F](A)
Parameters:
F: the domain of computation, a field
A: rectangular Matrix over values in F
How to describe the F here?
For example, how to illustrate {0,1} here?
Thanks a lot.

Download 6782_Cheng.pdf

View file details

Why does Maple squawk when I submit more equations than it needs for FSOLVE? Shouldn't Maple be able to tell that the first equation is dependent on the next two equations and ignore it? Why can't SOLVE simply output the solutions as shown in the comment line instead of giving me all that razzamatazz about RootOf this and RootOfthat? Thanks, Ratch

I dont know if I am suppose to post this in the Get Help Forum;

So I am trying to get ready for a skills test in using Maple and I am stuck on a couple review questions, I know they seem simple but I am really new at Maple. Help Please?

Question:

Find the arc length of the curve y^2 + y = x with positive y-values from x =1 to x = 6 in two different ways and plot the graph of the curve with MAPLE.

Thanks

December 07 2009
gepo 531
Hi, all,
I have a confusion when I made a newline in worksheet mode. Usually, when I hit "shift+enter", then a newline is got. However, I found that in worksheet mode, when I hit "shift+enter", there is a newline, but there is no arrow appearing at the beginning of the newline while other worksheet file (not mine) has such a arrow at the beginning of each new line.
any idea?
my maple is maple12.
thanks

December 07 2009
Meggy 4
I am trying to plot four different DEs on one graph, but Maple does not like the fact that I have several constants that are not assigned to numerical values. Here is my code:

December 07 2009
mdc 228
Hi,

How would the parametric equation for the following cylinder be like?

Cylinder: x^2 + y^2 = a*x where a > 0

Thanks

my system [u(t),v(t),w(t)] is highly non-linear. I want to understand the local behavior at [u=0,v=0,w=0]. The boundary conditions are as follows: u(0) is given but v(0) and w(0) are not. I want to know if there is a suitable choice of v(0) and w(0) such that the system will converge to the critical point [0,0,0].

Can this system be approximated by a linear system? Or by a two-dimensional system?