HI.please help me for solve differenrtial equation with finite difference method not dsolve numeric solver in maple

thanks

FDM2.mw

Download FDM2.mw

with(Optimization):

theta := Complex(1,1);
Minimize(theta^3-3*(A*theta^2+B), {0 <= theta^3-3*(A*theta^2+B)}, assume = nonnegative)

Error, (in Optimization:-NLPSolve) complex value encountered

Also always i try to solve that strange ecuation maple give me like an aswer in terms of Z, with an integral on it, i don't get nothing. I evaluate a point with right click, evaluate a point. Choose the variables value, and the time at wich i want to evaluate the ecuation. Later it give me the same strange solution but with the variables replaced for the values i gave to the program. Then i choose right click, aproximate, and don't matter if i select 5, 10 or more digits, it launchs to me the same strange ecuation, not the number i'm waiting for.

So that i want to know now is how can i manipulate a numerical solution to a diff ecuation.

For example if i got this system of diff ecuation

dx/dt = (-k/m) (x srqt(x^2 + y^2))

dy/dt = (-k/m) (y srqt(x^2 + y^2)) - g

Which is a projectile trajectory taking care of air drag force, and i want to know at which initial speed i have to fire the body to reach 300m if it is fired from the initial point at (0,0), and it's initial velocity on x is 3 times it's initial velocity on y (initial launch angle condition)? 

How can i input that conditions to make maple give me a solution for something like that?

hi

i have a problem with convert mathematica code in to maple one

i attached maple file .some line have error.please help me for remove error

thanks

fdm.mw

fdm.pdf

Hello,how can i plot 50 answers of this equation?P:=0.5lambda.tan(lambda)-1

hello.

i have two problem in maple file, that is attached..

one of them is RootOf...note that i suppose that [varepsilon := -2.3650203724313] for i can going on following calculation

and second is  Float(undefined) in calculation integral

please help me

thanks

(m=1_n=6)2.mw

Hi,

I have attached a Maple file. My problem is that the solve for the simultaneous equation does not give me understandable results. I even simplified my equations by saying some parameters are zero although my final goal is to find an expression for a and varphi. Any idea how to solve this analytically? I know how to do it numerically. I need an analytical expression.

Thanks,

Baharm31

I have Maple output that extends page width. I can of course see the entire output when I scroll to the right. But since I want to make a screenshot of the output, I need to have the output on one page. Is there a possibility to have the output printed on one page, not extending page width?

Any comments would be greatly appreciated!

How can I plot the complex function f(z)=1/(1-z) for |z|<1 into maple code? (z is a complex number)

Best regards,

Seda 

curve =2{t (3 t^4+50 t^2-33),7 t^6-60 t^4+15 t^2+2}/(t^2+1)^3;
implicit =GroebnerBasis[Thread[{x, y}== curve],{x, y}, t]//First550731776-41620992 x^2+585816 x^4+625 x^6-182250 x^4 y -41620992 y^2+1171632 x^2 y^2+1875 x^4 y^2+364500 x^2 y^3+585816 y^4+1875 x^2 y^4-36450 y^5+625 y^6


http://mathematica.stackexchange.com/questions/87136/how-to-convert-a-rational-parametric-plane-curve-into-implicit-form

I am working on modelling a helicopter blade. Maplesim's Flexible Beam model cannot handle composite material cross section and pre-twist angle. I need to build a custom component based on Hodges's beam model. When I use the Custom Component template, add port and choose port type, there is no "frame" type, which is needed to connect other multibody components. Is it possible to create custom multibody component? If so, how can I make it? Thanks! 

from mathematica,

n = 5;
CalabiYau[z_, k1_, k2_] := Module[{z1 = Exp[2Pi I k1/n]Cosh[z]^(2/n), z2 = Exp[2Pi I k2/n]Sinh[z]^(2/n)}, {Re[z1], Re[z2], Cos[alpha]Im[z1] + Sin[alpha]Im[z2]}];
Do[alpha = (0.25 + t)Pi; Show[Graphics3D[Table[ParametricPlot3D[CalabiYau[x + I y, k1, k2], {x, -1, 1}, {y, 0, Pi/2}, DisplayFunction -> Identity, Compiled ->False][[1]], {k1, 0, n - 1}, {k2, 0, n - 1}], PlotRange -> 1.5{{-1, 1}, {-1, 1}, {-1, 1}}, ViewPoint -> {1, 1, 0}]], {t, 0, 1, 0.1}];

n := 5;

z1 := exp(2*3.14*I*k1/n)*cosh(z)^(2/n);
z2 := exp(2*3.14*I*k2/n)*sinh(z)^(2/n);

alpha = (0.25 + t)Pi;

xx := Re(z1);
yy := Re(z2);
uu := cos(alpha)*Im(z1) + sin(alpha)*Im(z2);

where k1, k2, alpha are variables

print([xx,yy,uu]);

i find algcurve has implicitize

how to use this implicitize to find 3d surface?

is there any other method to find?

i searched groebner basis can do this, but in mathematica is different from maple example

Hello,how can i find the lambda in this equation? and x=0..2 , t=0..2

Hello,how can i find the roots of this equation? "5lambda.tan(lambda)-1" and lambda=0..10

HOW DO I GET A STEP BY STEP SOLUTION FOR INVERSE Z TRANSFORM HELPPP!!!!!!