Hello, 

I would like to solve this differential equation: Eq2 := diff(z(x), x, x) = p*(1+(diff(z(x), x))^2)^.5 

I do not want an analytical solution, but I would like to obtain solutions on a graph, and I want to be able to change the value of the parametre p according to the value of x. 

For example, for x from 1 to 10 I want p=2, then for x from 10 to 11 I want p=10, then for x from 11 to 20 p=2...... 

Does anybody have any ideas please? :) 

Hi there, i want to write a procedure which can initiat the sexond procedure accodingly. For example, f1(a,b,c,d,e,f) where a,b,c,d,e,f is set of different atoms. say, Here I only need to deal with a and d type atoms to calculate energy values through f2 procedure.    

f1:=proc(a,b,c,d,e,f)   
.....
.....
end proc;

How i can write a procedure to assign values, like f1(yes,no,no,yes,no,no) or with number as f1(1,0,0,1,0,0) to show i only need a and d results. 

I try to make the inverse of a one to one piecewise function, but the solve command gives a function of lists. How can I avoid this?

restart;
f := x -> piecewise( x<=1, (x-1)/2, x<2, -3*(x-1)+3, 2*(x-2)+3 ):
solve( f(x)=y, x ): g := unapply(%,y): lprint(g(x));
piecewise(x <= 0, [1+2*x], x < 3, [2-(1/3)*x], 3 <= x, [1/2+(1/2)*x])

I am trying to pass the caption of a Button named A1 with

PLEASE HELP OUT

  I try to loop this problem using if statement but i am getting wrong lobatooB.mwaswer,the works looks like this see the attached file 

relativistic_64.mwrelativistic_64.mw

I will post here the output of two commands that has me a bit worried. Of course it is entirely possible that I am overlooking something very simple, which is why I am writing to your site.

> residue(1/(2^s-1), s=2*Pi*I*3/log(2));
                                           0

I have tried a program concerning an edge detector posted in 2005 by jan69.
The program works well till the end. I manage to have :

> Write ("edge.jpg", img_edge);

                             21108

But I don't know  how to find or create the new picture (after the edge detector).
Can you tell me how doing this ?

relativistic_64.mwrelativistic_64.mw

Hello,

I am new to Maple.

I have a set of spreadsheet data :(x1, y1), (x2, y2) .....(xn,yn).

And I have an equation that contains an infinite series with unkowns.

e.g.) y=  A*x + sum ( B * exp(-n^2 * (x-C)) /n^2, n=1..infinity);

Where A, B, C are unkowns, which I want to get optimized values for the spreadsheet data fitting.

Please let me know.

Sung Yeol

Dear Experts,

I am in a process of trying the roots of a sextic polynomial.

Attached is the equation type  sixthorderpolynomial.mw  . I tried to do some simplification. But still not able to find the solution.   I tried to use Factor also. But no progress.

I am intended to get the solutoin for lambda variable and remaining are variables are constants.

Hello,
I try to solve ODE. The resolution should be possible since I have found an article from which the calculations were done with Matlab.Here, I try to solve my system of equations diffs with maple.

When I use limit like this:limit(LommelS1(4.04, 3.04, z)/z^5.04, z = 0).The maplesoft shows:Float(infinity).How can I deal with this???,Please help me

Hi,

     I'm trying to estimate a very diffcult integral with Maple. Here it is

restart;
chi:=Pi/2-theta:
epsilon:=0.001: 

Vsi:=-(1/sqrt( 1+epsilon - cos(chi)*cos(phi-Pi/3)) + 1/sqrt( 1 +epsilon- cos(chi)*cos(phi-Pi))+ 1/sqrt(1+epsilon-cos(chi)*cos(phi+Pi/3)));

evalf((Int(Vsi*SphericalY(3,2,theta,phi)*conjugate(SphericalY(2,1,theta,phi))*sin(theta), [theta=0..Pi,phi=0..2*Pi])));

I ultimatly want epsilon->0,...

How does one view the Maple code that controls embedded components in a worksheet? I've looked at every menu on the toolbar and every context menu I could find, but nothing seems to fit.