Advanced Search

salim-barzani

1575 Reputation

9 Badges

1 years, 42 days
Contact salim-barzani

MaplePrimes Activity


These are replies submitted by salim-barzani

i did plot but how......

salim-barzani 1575
May 21 2025
0 0

@mmcdara after spending more than 2 day and changing variable one by one i get the best shape of existence  plot, your trail is so good and design are emazing, i like your style plot but i have a lot of this long function which i have to plot them becuase of that i asked is make me angry when i spen this time for one plot 

plots-long_term_.mw

Thanks you dear Dr it work...

salim-barzani 1575
May 16 2025
0 0

@dharr  is so better than before becuase i have a lot of that U(xi) i am looking for them but this index work very good thanks 

keep working on changing latex...

salim-barzani 1575
May 09 2025
0 0

@acer it pretty working with this kind of factoring it do all factoring this is so good and i like it, i try to use both of your code to see which one is better the factoring is better work because the other code make fraction  

> 

restart
> 

with(PDEtools)
> 

with(LinearAlgebra)
> 

NULL
> 

with(SolveTools)
> 

undeclare(prime)

`There is no more prime differentiation variable; all derivatives will be displayed as indexed functions`

 (1)
> 

NULL
> 

declare(G(xi)); declare(U(xi))

G(xi)*`will now be displayed as`*G

  

U(xi)*`will now be displayed as`*U

 (2)
> 

S4 := diff(G(xi), xi) = p+r*G(xi)+s*G(xi)^2

diff(G(xi), xi) = p+r*G(xi)+s*G(xi)^2

 (3)
> 

D11 := sort(S4, order = plex(r, p, s, xi))

diff(G(xi), xi) = G(xi)*r+p+G(xi)^2*s

 (4)
> 

forget(latex); latex(D11)

G_{\xi} = p +r G +s \,G^{2}

  
> 

Ode := (24*I)*U(xi)*k^2*w^2-6*(diff(diff(diff(U(xi), xi), xi), xi))*k^2*v*c[1]+4*(diff(diff(diff(U(xi), xi), xi), xi))*k^2*w*c[1]+(diff(diff(diff(diff(diff(U(xi), xi), xi), xi), xi), xi))*alpha*s*c[1]-(24*I)*U(xi)*k^2*s^2+(24*I)*(diff(diff(U(xi), xi), xi))*s^2-(24*I)*(diff(diff(U(xi), xi), xi))*v^2+(diff(U(xi), xi))*k^4*v*c[1]-4*(diff(U(xi), xi))*k^4*w*c[1]-48*(diff(U(xi), xi))*k*v*w+72*c[2]*U(xi)^2*(diff(U(xi), xi))*v-48*(diff(U(xi), xi))*k*s^2+(diff(diff(diff(diff(diff(U(xi), xi), xi), xi), xi), xi))*v*c[1]-(4*I)*(diff(diff(U(xi), xi), xi))*k^3*v*c[1]+72*(diff(U(xi), xi))*U(xi)^2*beta*s*c[2]-10*(diff(diff(diff(U(xi), xi), xi), xi))*alpha*k^2*s*c[1]+5*(diff(U(xi), xi))*alpha*k^4*s*c[1]+(4*I)*(diff(diff(diff(diff(U(xi), xi), xi), xi), xi))*k*v*c[1]+(6*I)*(diff(diff(U(xi), xi), xi))*k^3*w*c[1]-(24*I)*U(xi)^3*k*w*c[2]+I*U(xi)*alpha*k^5*s*c[1]-(10*I)*(diff(diff(U(xi), xi), xi))*alpha*k^3*s*c[1]+(24*I)*U(xi)^3*beta*k*s*c[2]+(5*I)*(diff(diff(diff(diff(U(xi), xi), xi), xi), xi))*alpha*k*s*c[1]-I*(diff(diff(diff(diff(U(xi), xi), xi), xi), xi))*k*w*c[1]-I*U(xi)*k^5*w*c[1] = 0

-I*(diff(diff(diff(diff(U(xi), xi), xi), xi), xi))*k*w*c[1]+I*U(xi)*alpha*k^5*s*c[1]-6*(diff(diff(diff(U(xi), xi), xi), xi))*k^2*v*c[1]+4*(diff(diff(diff(U(xi), xi), xi), xi))*k^2*w*c[1]+(diff(diff(diff(diff(diff(U(xi), xi), xi), xi), xi), xi))*alpha*s*c[1]-4*(diff(U(xi), xi))*k^4*w*c[1]-48*(diff(U(xi), xi))*k*v*w+72*c[2]*U(xi)^2*(diff(U(xi), xi))*v+(24*I)*(diff(diff(U(xi), xi), xi))*s^2-(24*I)*(diff(diff(U(xi), xi), xi))*v^2+(diff(U(xi), xi))*k^4*v*c[1]+(diff(diff(diff(diff(diff(U(xi), xi), xi), xi), xi), xi))*v*c[1]-48*(diff(U(xi), xi))*k*s^2-10*(diff(diff(diff(U(xi), xi), xi), xi))*alpha*k^2*s*c[1]+72*(diff(U(xi), xi))*U(xi)^2*beta*s*c[2]-(24*I)*U(xi)*k^2*s^2+(24*I)*U(xi)*k^2*w^2+5*(diff(U(xi), xi))*alpha*k^4*s*c[1]-(24*I)*U(xi)^3*k*w*c[2]+(4*I)*(diff(diff(diff(diff(U(xi), xi), xi), xi), xi))*k*v*c[1]-I*U(xi)*k^5*w*c[1]-(4*I)*(diff(diff(U(xi), xi), xi))*k^3*v*c[1]+(6*I)*(diff(diff(U(xi), xi), xi))*k^3*w*c[1]+(5*I)*(diff(diff(diff(diff(U(xi), xi), xi), xi), xi))*alpha*k*s*c[1]-(10*I)*(diff(diff(U(xi), xi), xi))*alpha*k^3*s*c[1]+(24*I)*U(xi)^3*beta*k*s*c[2] = 0

 (5)
> 

alt2 := eval(collect(Ode, [U(xi), diff(U(xi), xi), diff(diff(U(xi), xi), xi), diff(diff(diff(U(xi), xi), xi), xi), diff(diff(diff(diff(diff(U(xi), xi), xi), xi), xi), xi)], proc (u) options operator, arrow; subsindets(simplify(u), And(`+`, satisfies(proc (uu) options operator, arrow; type(denom(uu), {integer, `&*`(integer, specfunc(__K))}) end proc)), proc (uu) options operator, arrow; map(`*`, uu, denom(uu))/__K(denom(uu)) end proc) end proc), __K = (proc (u) options operator, arrow; u end proc))

(24*I)*k*c[2]*(beta*s-w)*U(xi)^3+72*c[2]*(beta*s+v)*(diff(U(xi), xi))*U(xi)^2+I*(c[1]*(alpha*s-w)*k^3-24*s^2+24*w^2)*k^2*U(xi)+(1/5)*(5*c[1]*(5*alpha*s+v-4*w)*k^3-240*s^2-240*w*v)*k*(diff(U(xi), xi))+(-(2*I)*(5*alpha*s+2*v-3*w)*k^3*c[1]+(24*I)*s^2-(24*I)*v^2)*(diff(diff(U(xi), xi), xi))-2*k^2*c[1]*(5*alpha*s+3*v-2*w)*(diff(diff(diff(U(xi), xi), xi), xi))+c[1]*(alpha*s+v)*(diff(diff(diff(diff(diff(U(xi), xi), xi), xi), xi), xi))+I*(diff(diff(diff(diff(U(xi), xi), xi), xi), xi))*k*c[1]*(5*alpha*s+4*v-w) = 0

 (6)
> 

alt1 := collect(Ode, [U(xi), diff(U(xi), xi), diff(diff(U(xi), xi), xi), diff(diff(diff(U(xi), xi), xi), xi), diff(diff(diff(diff(diff(U(xi), xi), xi), xi), xi), xi)], factor)

(24*I)*k*c[2]*(beta*s-w)*U(xi)^3+72*c[2]*(beta*s+v)*(diff(U(xi), xi))*U(xi)^2+I*(alpha*k^3*s*c[1]-k^3*w*c[1]-24*s^2+24*w^2)*k^2*U(xi)+k*(5*alpha*k^3*s*c[1]+k^3*v*c[1]-4*k^3*w*c[1]-48*s^2-48*v*w)*(diff(U(xi), xi))-(2*I)*(5*alpha*k^3*s*c[1]+2*k^3*v*c[1]-3*k^3*w*c[1]-12*s^2+12*v^2)*(diff(diff(U(xi), xi), xi))-2*k^2*c[1]*(5*alpha*s+3*v-2*w)*(diff(diff(diff(U(xi), xi), xi), xi))+c[1]*(alpha*s+v)*(diff(diff(diff(diff(diff(U(xi), xi), xi), xi), xi), xi))+I*(diff(diff(diff(diff(U(xi), xi), xi), xi), xi))*k*c[1]*(5*alpha*s+4*v-w) = 0

 (7)
 

NULL

Download work-latex.mw

i will do that...

salim-barzani 1575
May 07 2025
0 0

@acer sorry for quesioning a lot .

i will tell you later...

salim-barzani 1575
May 07 2025
0 0

@acer  the idea a little bit long i am not answer becuase i changed my problem, i have to work on your code really is so pretty and i have to apply for my equation all of them i will work on it after finishing my work on equation i will back to this pretty code you write and if i stuck for another question like that i will ask to help again , please give me a little time to solve my equation, and this code you write it is remove a lot of comment of reviewer of journals  i copy and paste the equation from maple to latex and if they don't so compact they will mention why you didn't do that and this process will make my paper to get revision i don't want my paper get revision and accepted at once.

thank you so much...

salim-barzani 1575
May 07 2025
0 0

@acer  i knew something is mistake but i ddin't know where my mind is busy too much, thank you so much.

reply...

salim-barzani 1575
May 06 2025
0 0

@acer the last equation when i want apply some comand but i didn't get usefull one 

share your mw.file...

salim-barzani 1575
May 06 2025
0 0

@JaneCherrytree  don't write with Ai share your file instead 

Sometimes my questions deleted...

salim-barzani 1575
May 06 2025
0 0

@Carl Love he is my friend i send him detail he posted for me ,a lot of my questions are deleted , I didn't post questions twice i will but i deleted exist ine then i will post another but they think is a repeated question 

can you add 2D too!...

salim-barzani 1575
May 05 2025
0 0

i want plot that with make a generation parameter specialy when we do G(k,a,b,c,d,f,epsilon) in my function we have that i want to plot 2@D and 3D  but we generation parameter each time for one graph for example in first time we have G(k,1,b,c,d,e,l,epsilon)&G(k,0.5,b,c,d,e,l,epsilon)&G(k,0.2,b,c,d,e,l,epsilon) be like that also all b,c,d,e,epsilon are random parameter and k is range , i want something easy to undrestand and effective like this

Download p1.mw

they delete my question......

salim-barzani 1575
May 05 2025
0 0

@janhardo i didn't see last comment of you

today they have one job just deleting my...

salim-barzani 1575
May 05 2025
0 0

@janhardo  no comment

thank you so much john...

salim-barzani 1575
May 05 2025
0 0

@janhardo can we plot this is 3D shape

i want some other opton if is exist...

salim-barzani 1575
May 05 2025
0 0

@janhardo i want like that 

 

> 

restart; with(plots); with(LinearAlgebra); printf("Step 1: Define the wave number variable l and parameter range for plotting.\n"); lrange := -6 .. 4; f := 1; k := l; printf("Step 2: Define values for parameters.\n"); d := .2; epsilon := 1; G := proc (l, a, b, c) options operator, arrow; 2*Im(sqrt(-a^2*f*d-a*b+(1/2)*l^2-3*a+(1/2)*sqrt(-48*a^3*f*d+4*epsilon*l^3*c-24*a*epsilon*l*c+l^4+4*l^2*c^2-48*a^2*b-12*a*l^2+36*a^2))) end proc; printf("Step 4: Create individual plots for each value of a.\n"); plot1 := plot(G(l, 1, 1, 1), l = lrange, color = red, thickness = 2); plot2 := plot(G(l, 1, .5, 1), l = lrange, color = blue, thickness = 2); plot3 := plot(G(l, 1, .3, 1), l = lrange, color = green, thickness = 2); printf("Step 5: Overlay all plots together with proper labels and legend.\n"); overlay := display([plot1, plot2, plot3], title = "Overlay of G(l) for a = 1, 0.5, 0.3", labels = ["Wave number l", "Growth rate G(l)"], legend = ["a = 1", "a = 0.5", "a = 0.3"], axes = boxed, size = [600, 500]); printf("Step 6: Display the final combined plot.\n"); overlay

Step 1: Define the wave number variable l and parameter range for plotting.
Step 2: Define values for parameters.
Step 4: Create individual plots for each value of a.
Step 5: Overlay all plots together with proper labels and legend.
Step 6: Display the final combined plot.

  

 
> 

NULL


 

Download p1.mw

change function to this...

salim-barzani 1575
May 05 2025
0 0

@janhardo i have another function insttead of m  what this 

plot-w.mw



Maple Worksheet - Error

Failed to load the worksheet /maplenet/convert/pp.mw .
 

Download pp.mw

 

3 4 5 6 7 8 9 Last Page 5 of 38