[go: up one dir, main page]

MaplePrimes Questions

Search Questions:

Om Vedic Samagri provides a comprehensive selection of authentic, high-quality items for Vedic rituals and spiritual practices. Our collection includes premium incense, sacred powders such as vibhuti, aromatic herbs, and other essential accessories designed to enrich your devotional activities. Each product is meticulously crafted to support and enhance your prayers, homas (fire rituals), and other religious ceremonies, fostering a serene and spiritually charged environment. Trust Om Vedic Samagri to bring traditional, spiritually uplifting elements into your practice, helping you to achieve a deeper connection in your worship and meditation.
https://omvedicsamagri.com/

For me this result is suspicious. What do you think? 

This ode diff(y(x),x) = f*y(x)^4+g*y(x)+h; is clearly quadrature, since I did not tell Maple that f,g,h depend on x. So this can be solved by just integration. But when asking odeadvisor if it is Chini, it says yes. When asking it what type it is, now it says it is quadrature.

Am I missing something here? I was expecting [NONE] when asking it if it is Chini.

Yes, the ode has the form of Chini, which is   y'=f(x)*y^n + g(x)*y + h(x), where n=4 here. But if f,g,h do not depend on x, then this is now just quadrature. Right? Calling it Chini is little misleading I think.
 

interface(version);

`Standard Worksheet Interface, Maple 2024.1, Windows 10, June 25 2024 Build ID 1835466`

Physics:-Version();

`The "Physics Updates" version in the MapleCloud is 1796 and is the same as the version installed in this computer, created 2024, August 29, 14:22 hours Pacific Time.`

libname;

"C:\Users\Owner\maple\toolbox\2024\Physics Updates\lib", "C:\Program Files\Maple 2024\lib"

restart;

ode:=diff(y(x),x) = f*y(x)^4+g*y(x)+h;
DEtools:-odeadvisor(ode,y(x),[Chini]);

diff(y(x), x) = f*y(x)^4+g*y(x)+h

[_Chini]

DEtools:-odeadvisor(ode,y(x))

[_quadrature]

dsolve(ode,y(x),[quadrature]);

x-Intat(1/(_a^4*f+_a*g+h), _a = y(x))-c__1 = 0

dsolve(ode,y(x),[Chini]);

y(x) = -RootOf(Intat(g^4/(_a^4*f*h^3-_a*g^4+g^4), _a = _Z)+g*x+c__1)*h/g

 


 

Download question_on_advisor_august_28_2024.mw

Notice another problem in this solutions. If g=0, then the Chini solution gives divison by zero now, while the quadrature solution still works.

 

Dear All,

I am facing some problems. I want to draw some plots: I have considered the 4th order momentum equation and the 2nd order energy equation; it requires 6 boundary conditions, which I have provided, but till asking for errors (in dsolve/numeric/bvp/convertsys) too few boundary conditions: expected 7, got 6.

eqn1 := {((kappa[1].phi[1]+kappa[2].phi[2]+kappa[3].phi[3])/(phi[1]+phi[2]+phi[3])+(p-1).kappa[f]+(p-1).(kappa[1].phi[1]+kappa[2].phi[2]+kappa[3].phi[3])-(p-1).(phi[1]+phi[2]+phi[3]).kappa[f])/((kappa[1].phi[1]+kappa[2].phi[2]+kappa[3].phi[3])/(phi[1]+phi[2]+phi[3])+(p-1).kappa[f]-(p-1).(kappa[1].phi[1]+kappa[2].phi[2]+kappa[3].phi[3])+(phi[1]+phi[2]+phi[3]).kappa[f]).(diff(theta(eta), eta, eta)+4/3.N.(diff((1+(K-1).theta(eta))^3.(diff(theta(eta), eta)), eta)))+Pr.(((1-phi[3]).((1-phi[2])*(1-phi[1]+phi[1].(`ρc__s1`/`ρc__f`))+phi[2].(`ρc__s2`/`ρc__f`))+phi[3].(`ρc__s3`/`ρc__f`)).(R.f(eta)+alpha.eta).(diff(theta(eta), eta))+Q.theta(eta)+R.Ec.((diff(f(eta), eta, eta))^2)) = 0, diff(f(eta), eta, eta, eta, eta)-(1-phi[1])^2.5.((1-phi[2])^2.5).((1-phi[3])^2.5).((1-phi[3]).((1-phi[2]).(1-phi[1]+phi[1].(`ρ__s1`/`ρ__f`))+phi[2].(`ρ__s2`/`ρ__f`))+phi[3].(`ρ__s3`/`ρ__f`)).(alpha.(eta.(diff(f(eta), eta, eta, eta))+3.*(diff(f(eta), eta, eta)))+(diff(f(eta), eta, eta, eta)).f(eta)-(diff(f(eta), eta)).(diff(f(eta), eta, eta))).R-(1-phi[1])^2.5.((1-phi[2])^2.5).((1-phi[3])^2.5).A.B.e^(-B.eta) = 0, f(-1) = S, f(1) = 1, theta(-1) = 1, theta(1) = 0, (D(f))(-1) = 0, (D(f))(1) = 0}

sys1 := eval(eqn1, {A = 1, B = .5, Ec = .1, K = 1.5, N = .5, Pr = 2, Q = .4, R = 1, S = -.1, p = 3, alpha = .2, `ρ__f` = 997.1, `ρ__s1` = 0, `ρ__s2` = 0, `ρ__s3` = 5180, `ρc__f` = 997.1.4179, `ρc__s1` = 0, `ρc__s2` = 0, `ρc__s3` = 5180.670, phi[1] = 0., phi[2] = 0., phi[3] = 0.3e-1, kappa[1] = 0, kappa[2] = 0, kappa[3] = 9.7, kappa[f] = .613})

sol1 := dsolve(sys1, numeric);
Error, (in dsolve/numeric/bvp/convertsys) too few boundary conditions: expected 7, got 6
with(plots);
t1 := odeplot(sol1, [eta, diff(f(eta), eta)], eta = -1 .. 1, numpoints = 65, thickness = 0, color = green, linestyle = solid);
plots[plots:-display]({t1})

Download A1.mw

Dear all,

is there a versioning concept similiar to Eclipse ?

I did expect the following two plot statements (MaplePrimes is only rendering one statement) to produce the same plot. What did I do wrong when using mod in plot?

kernelopts(version)

`Maple 2024.1, X86 64 WINDOWS, Jun 25 2024, Build ID 1835466`

(1)

plot([seq([t, `mod`(t, 10)], t = 1 .. 100)])

 

plot(`mod`(t, 10), t = 0 .. 100)

 

NULL

Download mod_in_plot.mw

In my Maple 2020, I noticed my program got stuck (overnight so let's say for at least 8 hours) on factorization of relatively small integer, so I tried the command standalone:

ifactor(630743190664091077)

and it just froze. For comparsion I tried other SW and programming libraries and basically all of them had the answer instantly. Also looking at the Maple's methods, if I force pollard or lenstra, it also gets the answer instantly. If my understanding is correct, it gets stuck on the method 'morrbril' which is part of the default mix (I tried also mpqs and it gave FAIL, but at least instantly). 

Is that something that still happens by default in newer versions? Seems to me if it gets stuck on 18 decimal digit integer, maybe it's not the best default method...

restart;
with(geometry);
with(plots);
Bl := color = black;
y0 := x -> -ln(1 - exp(-x));
y0 := proc (x) options operator, arrow; -ln(1-exp(-x)) end proc

y1 := x -> -ln(-1 + exp(-x));
y1 := proc (x) options operator, arrow; -ln(-1+exp(-x)) end proc

y2 := x -> -ln(1 + exp(-x));
y2 := proc (x) options operator, arrow; -ln(1+exp(-x)) end proc

p := plot(y0(x), x = 0.02 .. 4, scaling = constrained, color = blue);
p1 := plot(y2(x), x = -4 .. 4, scaling = constrained, color = green);
p2 := plot(y1(x), x = -4 .. 0, scaling = constrained, color = red);
display({p, p1, p2}, view = [-4 .. 4, -4 .. 5]);
Calculate its area; Thank you.

Why Maple can not do this basic combining of two terms? What do  I need to do to help Maple do it? Am I not using the correct command?

restart;

interface(version);

`Standard Worksheet Interface, Maple 2024.1, Windows 10, June 25 2024 Build ID 1835466`

Physics:-Version();

`The "Physics Updates" version in the MapleCloud is 1795 and is the same as the version installed in this computer, created 2024, August 28, 23:14 hours Pacific Time.`

e:=B^2/(4*(k^n)^(2/3)) - (k^n)^(1/3)*x;

(1/4)*B^2/(k^n)^(2/3)-(k^n)^(1/3)*x

combine(e);

(1/4)*B^2/(k^n)^(2/3)-(k^n)^(1/3)*x

combine(e,symbolic)

(1/4)*B^2*k^(-(2/3)*n)-k^((1/3)*n)*x

combine(e,power)

(1/4)*B^2/(k^n)^(2/3)-(k^n)^(1/3)*x

combine(e,radical)

(1/4)*B^2/(k^n)^(2/3)-(k^n)^(1/3)*x

combine(e,radical,symbolic)

(1/4)*B^2/(k^n)^(2/3)-(k^n)^(1/3)*x

combine(e) assuming positive;

(1/4)*B^2*k^(-(2/3)*n)-k^((1/3)*n)*x

combine(e,abs)

(1/4)*B^2/(k^n)^(2/3)-(k^n)^(1/3)*x

 

 

Download how_to_combine_august_28_2024.mw

For reference, using another software, this is what it gives

Hi everyone, I am looking for help, regarding the solution of nonlinear ordinary differential equations numerically. I have explained my problem in my Maple worksheet. Could anyone please help me in this regard?

Help.mw

Is this valid:

Int(sqrt(x^2+sqrt(x^4+1))/(x+1)/sqrt(x^4+1),x=0..infinity) =
(1/8)*ln((52+36*2^(1/2))*(2+2*2^(1/2))^(1/2)+80*2^(1/2)+113)*(2+2*2^(1/2))^(1/2);

?

SimpleMarsBlyProcedure.mw

Hello Orbital Mechanics and astrodynamics designers of Maple Primes! I am trying to fly to Mars and enter into orbit around it! I know there are a few of you out there that have thought about doing that! Think of all the great mathematicians who have "dabbled" with orbits and astrodynamics! Anyway, here is my problem: I have a simple keplerian model for doing a flyby around Mars and I have a simple model for Reaction Control Thrusters (RCS) to help put the spacecraft into orbit around Mars.  The first thruster burn happens as the spacecraft enters Mars' Sphere Of Influence (SOI) when it is less than 577000 km away and that burn is needed.  I do that with a piecewise continous function with the conditions set up to fire the thrusters.  But in that same piecewise continous function, I have a 2nd thruster firing with the times called out to fire again.  But this time I want to fire the thruster at periapse (P) in order to go into orbit around Mars.  I believe that the Rosenbrock and/or RKF45 are not responding to the 2nd conditions in the piecewise function I have set up for the thruster firing times.  I have to fire the thruster at periapse and I know that time I reach the periapse point.  Also, in my Maple file you will see that I can "cant" the spacecraft to better control the direction of my burns.  

The problem I am encountering seems to be more about the piecewise functions with multiple conditions and expressions.  Please take a look at my Maple file and see if any of you Orbital Mechanics and/or astrodynamicsts familar with Maple can see what I am doing wrong here.  You don't have to be a astrodyamicist per se, just perhaps you have run across this problem of piecewise functions in dsolve with method = rosenbrock or RKF45. 

Thank you. 

In this post about a non-linear system of equations solutions were sougth. It turned out that there were no non-trivial solutions for the given numerical values. However, with different numerical values there should be solutions.

In analogy to the fundamental theorem of algebra (which clearly states the number of roots),
I wonder if Maple provides commands that can estimate an upper bound of roots/solutions for a system of multivariate equations by analysing the structure of the system of equations rather than attempting to solve it.

I am not sure if rules, methods or theorems exist at all for multivariate problems. Maybe it is a stupid question but for me this was non-trivial for the case given above.

In the Standard interface, the length of an expression that display in the worksheet can be limited using the Options dialog: Options Dialog - Precision Tab - Maple Help. However, I would like to know if I can change this option programmatically. The closest interface variables are elisiontermsbefore, elisiontermsafter and termelisionthreshold, but as the aforementioned help page states, they control the “term elision” and are not the same as “expression length limit”. So, is this possible? 

Writng the Pde wave function solution in a textbook form ?
golfvergelijking_oplossing_gebruiken_om_integraaluisom_te_halen_voorbeeld.mw

1 2 3 4 5 6 7 Last Page 1 of 2350