Advanced Search

Maple Questions and Posts

These are Posts and Questions associated with the product, Maple
View unanswered posts
Maple Questions and Posts Feed

Exploring the Mapping of Vertical Lines under 𝑤 ...

Asked by: Paras31 250
complex plotting conformal
April 10 2025
0  2

In the transformation w = e^z, vertical lines in the complex z-plane of the form Re(z)=a are mapped to circles of radius e^a in the w-plane.

Can I create a Maple visualization that does the following:

  1. Displays the result side by side, showing each vertical line in the z-plane and its corresponding mapped circle in the w-plane.

  2. Does it use a different color and style for each line and its image (e.g., dashed, dotted, solid, or different colors)?

> 

restart; interface(imaginaryunit = 'i')
> 

z := 2+2*I

2+2*I

 (1)
> 

with(plots); point1 := pointplot([[Re(z), Im(z)]], symbol = solidcircle, color = blue, axes = normal, labels = ["Re(z)", "Im(z)"], title = "Complex Number Plot")

 
> 

mod_z := abs(z)

2*2^(1/2)

 (2)
> 

vector1 := arrow([0, 0], [Re(z), Im(z)], color = red, shape = double_arrow, width = 0.5e-1, border = false, head_width = .1, head_length = .1); vector2 := arrow([0, 0], [0, Im(z)], color = green, shape = double_arrow, width = 0.5e-1, border = false, head_width = .1, head_length = .1); vector3 := arrow([0, 0], [Re(z), 0], color = yellow, shape = double_arrow, width = 0.5e-1, border = false, head_width = .1, head_length = .1)
> 

display([vector1, point1, vector2, vector3], axes = normal, labels = ["Re(z)", "Im(z)"], view = [0 .. 3, -1 .. 4], scaling = constrained, title = "Modulus of complex number")

 
> 

w := 2+3*I

2+3*I

 (3)
> 

z+w

4+5*I

 (4)
> 

z-w

-I

 (5)
> 

z.w

-2+10*I

 (6)
> 

z/w

10/13-(2/13)*I

 (7)
> 

restart
> 

with(plots); a := 2; complexplot(a+I*t, t = -Pi .. Pi, title = "Vertical Line Re(z)=2")

 
> 

A := [-3, -1, 0, 1, 2]; P := [seq(complexplot(x+I*y, y = -10 .. 10, color = red), `in`(x, A))]; display(P, title = "Multiple Vertical Lines in Complex Plane")

 
> 

with(plots); B := [-3, -1, 0, 1, 2]; H := [seq(complexplot(x+I*y, x = -10 .. 10, color = blue), `in`(y, B))]; display(H, title = "Multiple Horizontal Lines in Complex Plane")

 
 

NULL

Download operations.mw

How finding parameter, in somewhere i did mistake ...

Asked by: salim-barzani 1610
syntax pde differential-equations
April 10 2025
2  4

This is first type of solving parameter but  i solved some semilar but the shape of them are so different and solving them different too i did my trail but i can't reach out solution also the author solve by another way which i did too but i have to solve in this way too thanks  for any help !

> 

restart
> 

with(PDEtools)
> 

with(LinearAlgebra)
> 

NULL
> 

with(SolveTools)
> 

_local(gamma)

Warning, A new binding for the name `gamma` has been created. The global instance of this name is still accessible using the :- prefix, :-`gamma`.  See ?protect for details.

  
> 

``

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

 (1)
> 

declare(u(x, y, z, t))

u(x, y, z, t)*`will now be displayed as`*u

 (2)
> 

declare(f(x, y, z, t))

f(x, y, z, t)*`will now be displayed as`*f

 (3)
> 

pde := 9*(diff(u(x, y, z, t), t, x))+diff(u(x, y, z, t), `$`(x, 6))-5*(diff(u(x, y, z, t), `$`(x, 3), y)+diff(u(x, y, z, t), `$`(y, 2)))+15*((diff(u(x, y, z, t), `$`(x, 2)))*(diff(u(x, y, z, t), `$`(x, 3)))+(diff(u(x, y, z, t), x))*(diff(u(x, y, z, t), `$`(x, 4)))-(diff(u(x, y, z, t), x))*(diff(u(x, y, z, t), x, y))-(diff(u(x, y, z, t), `$`(x, 2)))*(diff(u(x, y, z, t), y)))+45*(diff(u(x, y, z, t), x))^2*(diff(u(x, y, z, t), `$`(x, 2)))+alpha*(diff(u(x, y, z, t), `$`(x, 2)))+beta*(diff(u(x, y, z, t), x, y))+delta*(diff(u(x, y, z, t), x, z))

9*(diff(diff(u(x, y, z, t), t), x))+diff(diff(diff(diff(diff(diff(u(x, y, z, t), x), x), x), x), x), x)-5*(diff(diff(diff(diff(u(x, y, z, t), x), x), x), y))-5*(diff(diff(u(x, y, z, t), y), y))+15*(diff(diff(u(x, y, z, t), x), x))*(diff(diff(diff(u(x, y, z, t), x), x), x))+15*(diff(u(x, y, z, t), x))*(diff(diff(diff(diff(u(x, y, z, t), x), x), x), x))-15*(diff(u(x, y, z, t), x))*(diff(diff(u(x, y, z, t), x), y))-15*(diff(diff(u(x, y, z, t), x), x))*(diff(u(x, y, z, t), y))+45*(diff(u(x, y, z, t), x))^2*(diff(diff(u(x, y, z, t), x), x))+alpha*(diff(diff(u(x, y, z, t), x), x))+beta*(diff(diff(u(x, y, z, t), x), y))+delta*(diff(diff(u(x, y, z, t), x), z))

 (4)
> 

``
> 

oppde := [op(expand(pde))]; u_occurrences := map(proc (i) options operator, arrow; numelems(select(has, [op([op(i)])], u)) end proc, oppde); linear_op_indices := ListTools:-SearchAll(1, u_occurrences); pde_linear := add(oppde[[linear_op_indices]]); pde_nonlinear := expand(simplify(expand(pde)-pde_linear))

9*(diff(diff(u(x, y, z, t), t), x))+diff(diff(diff(diff(diff(diff(u(x, y, z, t), x), x), x), x), x), x)-5*(diff(diff(diff(diff(u(x, y, z, t), x), x), x), y))-5*(diff(diff(u(x, y, z, t), y), y))+alpha*(diff(diff(u(x, y, z, t), x), x))+beta*(diff(diff(u(x, y, z, t), x), y))+delta*(diff(diff(u(x, y, z, t), x), z))

  

15*(diff(diff(u(x, y, z, t), x), x))*(diff(diff(diff(u(x, y, z, t), x), x), x))+15*(diff(u(x, y, z, t), x))*(diff(diff(diff(diff(u(x, y, z, t), x), x), x), x))-15*(diff(u(x, y, z, t), x))*(diff(diff(u(x, y, z, t), x), y))-15*(diff(diff(u(x, y, z, t), x), x))*(diff(u(x, y, z, t), y))+45*(diff(u(x, y, z, t), x))^2*(diff(diff(u(x, y, z, t), x), x))

 (5)
> 

H := u(x, y, z, t) = 2*(diff(ln(f(x, y, z, t)), x))

u(x, y, z, t) = 2*(diff(f(x, y, z, t), x))/f(x, y, z, t)

 (6)
> 

L := eval(pde_linear, H) = 0

2*(diff(diff(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x), x), x))/f(x, y, z, t)-10*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), y))/f(x, y, z, t)-10*(diff(diff(diff(f(x, y, z, t), x), y), y))/f(x, y, z, t)+alpha*(2*(diff(diff(diff(f(x, y, z, t), x), x), x))/f(x, y, z, t)-6*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))/f(x, y, z, t)^2+4*(diff(f(x, y, z, t), x))^3/f(x, y, z, t)^3)+beta*(2*(diff(diff(diff(f(x, y, z, t), x), x), y))/f(x, y, z, t)-2*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), y))/f(x, y, z, t)^2-4*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), y))/f(x, y, z, t)^2+4*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), y))/f(x, y, z, t)^3)+delta*(2*(diff(diff(diff(f(x, y, z, t), x), x), z))/f(x, y, z, t)-2*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), z))/f(x, y, z, t)^2-4*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), z))/f(x, y, z, t)^2+4*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), z))/f(x, y, z, t)^3)+280*(diff(diff(diff(f(x, y, z, t), x), x), x))^2*(diff(f(x, y, z, t), x))/f(x, y, z, t)^3-5040*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))^5/f(x, y, z, t)^6+5040*(diff(diff(f(x, y, z, t), x), x))^2*(diff(f(x, y, z, t), x))^3/f(x, y, z, t)^5-1260*(diff(diff(f(x, y, z, t), x), x))^3*(diff(f(x, y, z, t), x))/f(x, y, z, t)^4-80*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))*(diff(f(x, y, z, t), y))/f(x, y, z, t)^3+360*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), y))/f(x, y, z, t)^4-240*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), y))/f(x, y, z, t)^3-20*(diff(f(x, y, z, t), x))*(diff(f(x, y, z, t), y))^2/f(x, y, z, t)^3+84*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x))*(diff(f(x, y, z, t), x))^2/f(x, y, z, t)^3-420*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), x))^3/f(x, y, z, t)^4+420*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), x))/f(x, y, z, t)^3+1680*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))^4/f(x, y, z, t)^5-2520*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))^2*(diff(diff(f(x, y, z, t), x), x))/f(x, y, z, t)^4+420*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(diff(f(x, y, z, t), x), x))^2/f(x, y, z, t)^3+36*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), t))/f(x, y, z, t)^3-36*(diff(diff(f(x, y, z, t), t), x))*(diff(f(x, y, z, t), x))/f(x, y, z, t)^2-18*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), t))/f(x, y, z, t)^2-14*(diff(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x), x))*(diff(f(x, y, z, t), x))/f(x, y, z, t)^2-42*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x))*(diff(diff(f(x, y, z, t), x), x))/f(x, y, z, t)^2-70*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(diff(diff(f(x, y, z, t), x), x), x))/f(x, y, z, t)^2+1440*(diff(f(x, y, z, t), x))^7/f(x, y, z, t)^7+10*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), y))/f(x, y, z, t)^2+40*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), y))*(diff(f(x, y, z, t), x))/f(x, y, z, t)^2+40*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(diff(f(x, y, z, t), x), y))/f(x, y, z, t)^2-120*(diff(diff(diff(f(x, y, z, t), x), x), y))*(diff(f(x, y, z, t), x))^2/f(x, y, z, t)^3+60*(diff(diff(f(x, y, z, t), x), x))*(diff(diff(diff(f(x, y, z, t), x), x), y))/f(x, y, z, t)^2-60*(diff(diff(f(x, y, z, t), x), x))^2*(diff(f(x, y, z, t), y))/f(x, y, z, t)^3+240*(diff(f(x, y, z, t), x))^3*(diff(diff(f(x, y, z, t), x), y))/f(x, y, z, t)^4-240*(diff(f(x, y, z, t), x))^4*(diff(f(x, y, z, t), y))/f(x, y, z, t)^5+20*(diff(diff(f(x, y, z, t), x), y))*(diff(f(x, y, z, t), y))/f(x, y, z, t)^2+10*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), y), y))/f(x, y, z, t)^2+18*(diff(diff(diff(f(x, y, z, t), t), x), x))/f(x, y, z, t) = 0

 (7)
> 

numer(lhs(-80*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))*(diff(f(x, y, z, t), y))/f(x, y, z, t)^3+360*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), y))/f(x, y, z, t)^4-240*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), y))/f(x, y, z, t)^3+420*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), x))/f(x, y, z, t)^3-2520*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))^2*(diff(diff(f(x, y, z, t), x), x))/f(x, y, z, t)^4+alpha*(2*(diff(diff(diff(f(x, y, z, t), x), x), x))/f(x, y, z, t)-6*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))/f(x, y, z, t)^2+4*(diff(f(x, y, z, t), x))^3/f(x, y, z, t)^3)+beta*(2*(diff(diff(diff(f(x, y, z, t), x), x), y))/f(x, y, z, t)-2*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), y))/f(x, y, z, t)^2-4*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), y))/f(x, y, z, t)^2+4*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), y))/f(x, y, z, t)^3)+delta*(2*(diff(diff(diff(f(x, y, z, t), x), x), z))/f(x, y, z, t)-2*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), z))/f(x, y, z, t)^2-4*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), z))/f(x, y, z, t)^2+4*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), z))/f(x, y, z, t)^3)+2*(diff(diff(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x), x), x))/f(x, y, z, t)-10*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), y))/f(x, y, z, t)-10*(diff(diff(diff(f(x, y, z, t), x), y), y))/f(x, y, z, t)+1440*(diff(f(x, y, z, t), x))^7/f(x, y, z, t)^7+18*(diff(diff(diff(f(x, y, z, t), t), x), x))/f(x, y, z, t)+280*(diff(diff(diff(f(x, y, z, t), x), x), x))^2*(diff(f(x, y, z, t), x))/f(x, y, z, t)^3-5040*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))^5/f(x, y, z, t)^6+5040*(diff(diff(f(x, y, z, t), x), x))^2*(diff(f(x, y, z, t), x))^3/f(x, y, z, t)^5-1260*(diff(diff(f(x, y, z, t), x), x))^3*(diff(f(x, y, z, t), x))/f(x, y, z, t)^4-20*(diff(f(x, y, z, t), x))*(diff(f(x, y, z, t), y))^2/f(x, y, z, t)^3+84*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x))*(diff(f(x, y, z, t), x))^2/f(x, y, z, t)^3-420*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), x))^3/f(x, y, z, t)^4+1680*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))^4/f(x, y, z, t)^5+420*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(diff(f(x, y, z, t), x), x))^2/f(x, y, z, t)^3+36*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), t))/f(x, y, z, t)^3-36*(diff(diff(f(x, y, z, t), t), x))*(diff(f(x, y, z, t), x))/f(x, y, z, t)^2-18*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), t))/f(x, y, z, t)^2-14*(diff(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x), x))*(diff(f(x, y, z, t), x))/f(x, y, z, t)^2-42*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x))*(diff(diff(f(x, y, z, t), x), x))/f(x, y, z, t)^2-70*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(diff(diff(f(x, y, z, t), x), x), x))/f(x, y, z, t)^2+10*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), y))/f(x, y, z, t)^2+40*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), y))*(diff(f(x, y, z, t), x))/f(x, y, z, t)^2+40*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(diff(f(x, y, z, t), x), y))/f(x, y, z, t)^2-120*(diff(diff(diff(f(x, y, z, t), x), x), y))*(diff(f(x, y, z, t), x))^2/f(x, y, z, t)^3+60*(diff(diff(f(x, y, z, t), x), x))*(diff(diff(diff(f(x, y, z, t), x), x), y))/f(x, y, z, t)^2-60*(diff(diff(f(x, y, z, t), x), x))^2*(diff(f(x, y, z, t), y))/f(x, y, z, t)^3+240*(diff(f(x, y, z, t), x))^3*(diff(diff(f(x, y, z, t), x), y))/f(x, y, z, t)^4-240*(diff(f(x, y, z, t), x))^4*(diff(f(x, y, z, t), y))/f(x, y, z, t)^5+20*(diff(diff(f(x, y, z, t), x), y))*(diff(f(x, y, z, t), y))/f(x, y, z, t)^2+10*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), y), y))/f(x, y, z, t)^2 = 0))*denom(rhs(-80*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))*(diff(f(x, y, z, t), y))/f(x, y, z, t)^3+360*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), y))/f(x, y, z, t)^4-240*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), y))/f(x, y, z, t)^3+420*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), x))/f(x, y, z, t)^3-2520*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))^2*(diff(diff(f(x, y, z, t), x), x))/f(x, y, z, t)^4+alpha*(2*(diff(diff(diff(f(x, y, z, t), x), x), x))/f(x, y, z, t)-6*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))/f(x, y, z, t)^2+4*(diff(f(x, y, z, t), x))^3/f(x, y, z, t)^3)+beta*(2*(diff(diff(diff(f(x, y, z, t), x), x), y))/f(x, y, z, t)-2*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), y))/f(x, y, z, t)^2-4*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), y))/f(x, y, z, t)^2+4*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), y))/f(x, y, z, t)^3)+delta*(2*(diff(diff(diff(f(x, y, z, t), x), x), z))/f(x, y, z, t)-2*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), z))/f(x, y, z, t)^2-4*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), z))/f(x, y, z, t)^2+4*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), z))/f(x, y, z, t)^3)+2*(diff(diff(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x), x), x))/f(x, y, z, t)-10*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), y))/f(x, y, z, t)-10*(diff(diff(diff(f(x, y, z, t), x), y), y))/f(x, y, z, t)+1440*(diff(f(x, y, z, t), x))^7/f(x, y, z, t)^7+18*(diff(diff(diff(f(x, y, z, t), t), x), x))/f(x, y, z, t)+280*(diff(diff(diff(f(x, y, z, t), x), x), x))^2*(diff(f(x, y, z, t), x))/f(x, y, z, t)^3-5040*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))^5/f(x, y, z, t)^6+5040*(diff(diff(f(x, y, z, t), x), x))^2*(diff(f(x, y, z, t), x))^3/f(x, y, z, t)^5-1260*(diff(diff(f(x, y, z, t), x), x))^3*(diff(f(x, y, z, t), x))/f(x, y, z, t)^4-20*(diff(f(x, y, z, t), x))*(diff(f(x, y, z, t), y))^2/f(x, y, z, t)^3+84*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x))*(diff(f(x, y, z, t), x))^2/f(x, y, z, t)^3-420*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), x))^3/f(x, y, z, t)^4+1680*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))^4/f(x, y, z, t)^5+420*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(diff(f(x, y, z, t), x), x))^2/f(x, y, z, t)^3+36*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), t))/f(x, y, z, t)^3-36*(diff(diff(f(x, y, z, t), t), x))*(diff(f(x, y, z, t), x))/f(x, y, z, t)^2-18*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), t))/f(x, y, z, t)^2-14*(diff(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x), x))*(diff(f(x, y, z, t), x))/f(x, y, z, t)^2-42*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x))*(diff(diff(f(x, y, z, t), x), x))/f(x, y, z, t)^2-70*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(diff(diff(f(x, y, z, t), x), x), x))/f(x, y, z, t)^2+10*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), y))/f(x, y, z, t)^2+40*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), y))*(diff(f(x, y, z, t), x))/f(x, y, z, t)^2+40*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(diff(f(x, y, z, t), x), y))/f(x, y, z, t)^2-120*(diff(diff(diff(f(x, y, z, t), x), x), y))*(diff(f(x, y, z, t), x))^2/f(x, y, z, t)^3+60*(diff(diff(f(x, y, z, t), x), x))*(diff(diff(diff(f(x, y, z, t), x), x), y))/f(x, y, z, t)^2-60*(diff(diff(f(x, y, z, t), x), x))^2*(diff(f(x, y, z, t), y))/f(x, y, z, t)^3+240*(diff(f(x, y, z, t), x))^3*(diff(diff(f(x, y, z, t), x), y))/f(x, y, z, t)^4-240*(diff(f(x, y, z, t), x))^4*(diff(f(x, y, z, t), y))/f(x, y, z, t)^5+20*(diff(diff(f(x, y, z, t), x), y))*(diff(f(x, y, z, t), y))/f(x, y, z, t)^2+10*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), y), y))/f(x, y, z, t)^2 = 0)) = numer(rhs(-80*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))*(diff(f(x, y, z, t), y))/f(x, y, z, t)^3+360*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), y))/f(x, y, z, t)^4-240*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), y))/f(x, y, z, t)^3+420*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), x))/f(x, y, z, t)^3-2520*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))^2*(diff(diff(f(x, y, z, t), x), x))/f(x, y, z, t)^4+alpha*(2*(diff(diff(diff(f(x, y, z, t), x), x), x))/f(x, y, z, t)-6*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))/f(x, y, z, t)^2+4*(diff(f(x, y, z, t), x))^3/f(x, y, z, t)^3)+beta*(2*(diff(diff(diff(f(x, y, z, t), x), x), y))/f(x, y, z, t)-2*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), y))/f(x, y, z, t)^2-4*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), y))/f(x, y, z, t)^2+4*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), y))/f(x, y, z, t)^3)+delta*(2*(diff(diff(diff(f(x, y, z, t), x), x), z))/f(x, y, z, t)-2*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), z))/f(x, y, z, t)^2-4*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), z))/f(x, y, z, t)^2+4*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), z))/f(x, y, z, t)^3)+2*(diff(diff(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x), x), x))/f(x, y, z, t)-10*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), y))/f(x, y, z, t)-10*(diff(diff(diff(f(x, y, z, t), x), y), y))/f(x, y, z, t)+1440*(diff(f(x, y, z, t), x))^7/f(x, y, z, t)^7+18*(diff(diff(diff(f(x, y, z, t), t), x), x))/f(x, y, z, t)+280*(diff(diff(diff(f(x, y, z, t), x), x), x))^2*(diff(f(x, y, z, t), x))/f(x, y, z, t)^3-5040*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))^5/f(x, y, z, t)^6+5040*(diff(diff(f(x, y, z, t), x), x))^2*(diff(f(x, y, z, t), x))^3/f(x, y, z, t)^5-1260*(diff(diff(f(x, y, z, t), x), x))^3*(diff(f(x, y, z, t), x))/f(x, y, z, t)^4-20*(diff(f(x, y, z, t), x))*(diff(f(x, y, z, t), y))^2/f(x, y, z, t)^3+84*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x))*(diff(f(x, y, z, t), x))^2/f(x, y, z, t)^3-420*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), x))^3/f(x, y, z, t)^4+1680*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))^4/f(x, y, z, t)^5+420*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(diff(f(x, y, z, t), x), x))^2/f(x, y, z, t)^3+36*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), t))/f(x, y, z, t)^3-36*(diff(diff(f(x, y, z, t), t), x))*(diff(f(x, y, z, t), x))/f(x, y, z, t)^2-18*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), t))/f(x, y, z, t)^2-14*(diff(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x), x))*(diff(f(x, y, z, t), x))/f(x, y, z, t)^2-42*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x))*(diff(diff(f(x, y, z, t), x), x))/f(x, y, z, t)^2-70*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(diff(diff(f(x, y, z, t), x), x), x))/f(x, y, z, t)^2+10*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), y))/f(x, y, z, t)^2+40*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), y))*(diff(f(x, y, z, t), x))/f(x, y, z, t)^2+40*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(diff(f(x, y, z, t), x), y))/f(x, y, z, t)^2-120*(diff(diff(diff(f(x, y, z, t), x), x), y))*(diff(f(x, y, z, t), x))^2/f(x, y, z, t)^3+60*(diff(diff(f(x, y, z, t), x), x))*(diff(diff(diff(f(x, y, z, t), x), x), y))/f(x, y, z, t)^2-60*(diff(diff(f(x, y, z, t), x), x))^2*(diff(f(x, y, z, t), y))/f(x, y, z, t)^3+240*(diff(f(x, y, z, t), x))^3*(diff(diff(f(x, y, z, t), x), y))/f(x, y, z, t)^4-240*(diff(f(x, y, z, t), x))^4*(diff(f(x, y, z, t), y))/f(x, y, z, t)^5+20*(diff(diff(f(x, y, z, t), x), y))*(diff(f(x, y, z, t), y))/f(x, y, z, t)^2+10*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), y), y))/f(x, y, z, t)^2 = 0))*denom(lhs(-80*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))*(diff(f(x, y, z, t), y))/f(x, y, z, t)^3+360*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), y))/f(x, y, z, t)^4-240*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), y))/f(x, y, z, t)^3+420*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), x))/f(x, y, z, t)^3-2520*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))^2*(diff(diff(f(x, y, z, t), x), x))/f(x, y, z, t)^4+alpha*(2*(diff(diff(diff(f(x, y, z, t), x), x), x))/f(x, y, z, t)-6*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))/f(x, y, z, t)^2+4*(diff(f(x, y, z, t), x))^3/f(x, y, z, t)^3)+beta*(2*(diff(diff(diff(f(x, y, z, t), x), x), y))/f(x, y, z, t)-2*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), y))/f(x, y, z, t)^2-4*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), y))/f(x, y, z, t)^2+4*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), y))/f(x, y, z, t)^3)+delta*(2*(diff(diff(diff(f(x, y, z, t), x), x), z))/f(x, y, z, t)-2*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), z))/f(x, y, z, t)^2-4*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), z))/f(x, y, z, t)^2+4*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), z))/f(x, y, z, t)^3)+2*(diff(diff(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x), x), x))/f(x, y, z, t)-10*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), y))/f(x, y, z, t)-10*(diff(diff(diff(f(x, y, z, t), x), y), y))/f(x, y, z, t)+1440*(diff(f(x, y, z, t), x))^7/f(x, y, z, t)^7+18*(diff(diff(diff(f(x, y, z, t), t), x), x))/f(x, y, z, t)+280*(diff(diff(diff(f(x, y, z, t), x), x), x))^2*(diff(f(x, y, z, t), x))/f(x, y, z, t)^3-5040*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))^5/f(x, y, z, t)^6+5040*(diff(diff(f(x, y, z, t), x), x))^2*(diff(f(x, y, z, t), x))^3/f(x, y, z, t)^5-1260*(diff(diff(f(x, y, z, t), x), x))^3*(diff(f(x, y, z, t), x))/f(x, y, z, t)^4-20*(diff(f(x, y, z, t), x))*(diff(f(x, y, z, t), y))^2/f(x, y, z, t)^3+84*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x))*(diff(f(x, y, z, t), x))^2/f(x, y, z, t)^3-420*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), x))^3/f(x, y, z, t)^4+1680*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))^4/f(x, y, z, t)^5+420*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(diff(f(x, y, z, t), x), x))^2/f(x, y, z, t)^3+36*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), t))/f(x, y, z, t)^3-36*(diff(diff(f(x, y, z, t), t), x))*(diff(f(x, y, z, t), x))/f(x, y, z, t)^2-18*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), t))/f(x, y, z, t)^2-14*(diff(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x), x))*(diff(f(x, y, z, t), x))/f(x, y, z, t)^2-42*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x))*(diff(diff(f(x, y, z, t), x), x))/f(x, y, z, t)^2-70*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(diff(diff(f(x, y, z, t), x), x), x))/f(x, y, z, t)^2+10*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), y))/f(x, y, z, t)^2+40*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), y))*(diff(f(x, y, z, t), x))/f(x, y, z, t)^2+40*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(diff(f(x, y, z, t), x), y))/f(x, y, z, t)^2-120*(diff(diff(diff(f(x, y, z, t), x), x), y))*(diff(f(x, y, z, t), x))^2/f(x, y, z, t)^3+60*(diff(diff(f(x, y, z, t), x), x))*(diff(diff(diff(f(x, y, z, t), x), x), y))/f(x, y, z, t)^2-60*(diff(diff(f(x, y, z, t), x), x))^2*(diff(f(x, y, z, t), y))/f(x, y, z, t)^3+240*(diff(f(x, y, z, t), x))^3*(diff(diff(f(x, y, z, t), x), y))/f(x, y, z, t)^4-240*(diff(f(x, y, z, t), x))^4*(diff(f(x, y, z, t), y))/f(x, y, z, t)^5+20*(diff(diff(f(x, y, z, t), x), y))*(diff(f(x, y, z, t), y))/f(x, y, z, t)^2+10*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), y), y))/f(x, y, z, t)^2 = 0))

420*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), x))*f(x, y, z, t)^4-2520*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))^2*(diff(diff(f(x, y, z, t), x), x))*f(x, y, z, t)^3-6*f(x, y, z, t)^5*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))*alpha-2*f(x, y, z, t)^5*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), y))*beta-4*f(x, y, z, t)^5*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), y))*beta+4*f(x, y, z, t)^4*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), y))*beta-2*f(x, y, z, t)^5*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), z))*delta-4*f(x, y, z, t)^5*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), z))*delta+4*f(x, y, z, t)^4*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), z))*delta-80*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))*(diff(f(x, y, z, t), y))*f(x, y, z, t)^4+360*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), y))*f(x, y, z, t)^3-240*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), y))*f(x, y, z, t)^4+2*(diff(diff(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x), x), x))*f(x, y, z, t)^6-10*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), y))*f(x, y, z, t)^6-10*(diff(diff(diff(f(x, y, z, t), x), y), y))*f(x, y, z, t)^6+18*(diff(diff(diff(f(x, y, z, t), t), x), x))*f(x, y, z, t)^6-14*(diff(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x), x))*(diff(f(x, y, z, t), x))*f(x, y, z, t)^5-42*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x))*(diff(diff(f(x, y, z, t), x), x))*f(x, y, z, t)^5-70*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(diff(diff(f(x, y, z, t), x), x), x))*f(x, y, z, t)^5+10*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), y))*f(x, y, z, t)^5+40*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), y))*(diff(f(x, y, z, t), x))*f(x, y, z, t)^5+40*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(diff(f(x, y, z, t), x), y))*f(x, y, z, t)^5-120*(diff(diff(diff(f(x, y, z, t), x), x), y))*(diff(f(x, y, z, t), x))^2*f(x, y, z, t)^4+60*(diff(diff(f(x, y, z, t), x), x))*(diff(diff(diff(f(x, y, z, t), x), x), y))*f(x, y, z, t)^5-60*(diff(diff(f(x, y, z, t), x), x))^2*(diff(f(x, y, z, t), y))*f(x, y, z, t)^4+240*(diff(f(x, y, z, t), x))^3*(diff(diff(f(x, y, z, t), x), y))*f(x, y, z, t)^3-240*(diff(f(x, y, z, t), x))^4*(diff(f(x, y, z, t), y))*f(x, y, z, t)^2+20*(diff(diff(f(x, y, z, t), x), y))*(diff(f(x, y, z, t), y))*f(x, y, z, t)^5+10*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), y), y))*f(x, y, z, t)^5+280*(diff(diff(diff(f(x, y, z, t), x), x), x))^2*(diff(f(x, y, z, t), x))*f(x, y, z, t)^4-5040*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))^5*f(x, y, z, t)+5040*(diff(diff(f(x, y, z, t), x), x))^2*(diff(f(x, y, z, t), x))^3*f(x, y, z, t)^2-1260*(diff(diff(f(x, y, z, t), x), x))^3*(diff(f(x, y, z, t), x))*f(x, y, z, t)^3-20*(diff(f(x, y, z, t), x))*(diff(f(x, y, z, t), y))^2*f(x, y, z, t)^4+84*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x))*(diff(f(x, y, z, t), x))^2*f(x, y, z, t)^4-420*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), x))^3*f(x, y, z, t)^3+1680*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))^4*f(x, y, z, t)^2+420*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(diff(f(x, y, z, t), x), x))^2*f(x, y, z, t)^4+36*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), t))*f(x, y, z, t)^4-36*(diff(diff(f(x, y, z, t), t), x))*(diff(f(x, y, z, t), x))*f(x, y, z, t)^5-18*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), t))*f(x, y, z, t)^5+2*f(x, y, z, t)^6*(diff(diff(diff(f(x, y, z, t), x), x), x))*alpha+4*f(x, y, z, t)^4*(diff(f(x, y, z, t), x))^3*alpha+2*f(x, y, z, t)^6*(diff(diff(diff(f(x, y, z, t), x), x), y))*beta+2*f(x, y, z, t)^6*(diff(diff(diff(f(x, y, z, t), x), x), z))*delta+1440*(diff(f(x, y, z, t), x))^7 = 0

 (8)
> 

F1 := %

420*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), x))*f(x, y, z, t)^4-2520*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))^2*(diff(diff(f(x, y, z, t), x), x))*f(x, y, z, t)^3-6*f(x, y, z, t)^5*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))*alpha-2*f(x, y, z, t)^5*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), y))*beta-4*f(x, y, z, t)^5*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), y))*beta+4*f(x, y, z, t)^4*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), y))*beta-2*f(x, y, z, t)^5*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), z))*delta-4*f(x, y, z, t)^5*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), z))*delta+4*f(x, y, z, t)^4*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), z))*delta-80*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))*(diff(f(x, y, z, t), y))*f(x, y, z, t)^4+360*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), y))*f(x, y, z, t)^3-240*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), x), y))*f(x, y, z, t)^4+2*(diff(diff(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x), x), x))*f(x, y, z, t)^6-10*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), y))*f(x, y, z, t)^6-10*(diff(diff(diff(f(x, y, z, t), x), y), y))*f(x, y, z, t)^6+18*(diff(diff(diff(f(x, y, z, t), t), x), x))*f(x, y, z, t)^6-14*(diff(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x), x))*(diff(f(x, y, z, t), x))*f(x, y, z, t)^5-42*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x))*(diff(diff(f(x, y, z, t), x), x))*f(x, y, z, t)^5-70*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(diff(diff(f(x, y, z, t), x), x), x))*f(x, y, z, t)^5+10*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), y))*f(x, y, z, t)^5+40*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), y))*(diff(f(x, y, z, t), x))*f(x, y, z, t)^5+40*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(diff(f(x, y, z, t), x), y))*f(x, y, z, t)^5-120*(diff(diff(diff(f(x, y, z, t), x), x), y))*(diff(f(x, y, z, t), x))^2*f(x, y, z, t)^4+60*(diff(diff(f(x, y, z, t), x), x))*(diff(diff(diff(f(x, y, z, t), x), x), y))*f(x, y, z, t)^5-60*(diff(diff(f(x, y, z, t), x), x))^2*(diff(f(x, y, z, t), y))*f(x, y, z, t)^4+240*(diff(f(x, y, z, t), x))^3*(diff(diff(f(x, y, z, t), x), y))*f(x, y, z, t)^3-240*(diff(f(x, y, z, t), x))^4*(diff(f(x, y, z, t), y))*f(x, y, z, t)^2+20*(diff(diff(f(x, y, z, t), x), y))*(diff(f(x, y, z, t), y))*f(x, y, z, t)^5+10*(diff(f(x, y, z, t), x))*(diff(diff(f(x, y, z, t), y), y))*f(x, y, z, t)^5+280*(diff(diff(diff(f(x, y, z, t), x), x), x))^2*(diff(f(x, y, z, t), x))*f(x, y, z, t)^4-5040*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), x))^5*f(x, y, z, t)+5040*(diff(diff(f(x, y, z, t), x), x))^2*(diff(f(x, y, z, t), x))^3*f(x, y, z, t)^2-1260*(diff(diff(f(x, y, z, t), x), x))^3*(diff(f(x, y, z, t), x))*f(x, y, z, t)^3-20*(diff(f(x, y, z, t), x))*(diff(f(x, y, z, t), y))^2*f(x, y, z, t)^4+84*(diff(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x), x))*(diff(f(x, y, z, t), x))^2*f(x, y, z, t)^4-420*(diff(diff(diff(diff(f(x, y, z, t), x), x), x), x))*(diff(f(x, y, z, t), x))^3*f(x, y, z, t)^3+1680*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(f(x, y, z, t), x))^4*f(x, y, z, t)^2+420*(diff(diff(diff(f(x, y, z, t), x), x), x))*(diff(diff(f(x, y, z, t), x), x))^2*f(x, y, z, t)^4+36*(diff(f(x, y, z, t), x))^2*(diff(f(x, y, z, t), t))*f(x, y, z, t)^4-36*(diff(diff(f(x, y, z, t), t), x))*(diff(f(x, y, z, t), x))*f(x, y, z, t)^5-18*(diff(diff(f(x, y, z, t), x), x))*(diff(f(x, y, z, t), t))*f(x, y, z, t)^5+2*f(x, y, z, t)^6*(diff(diff(diff(f(x, y, z, t), x), x), x))*alpha+4*f(x, y, z, t)^4*(diff(f(x, y, z, t), x))^3*alpha+2*f(x, y, z, t)^6*(diff(diff(diff(f(x, y, z, t), x), x), y))*beta+2*f(x, y, z, t)^6*(diff(diff(diff(f(x, y, z, t), x), x), z))*delta+1440*(diff(f(x, y, z, t), x))^7 = 0

 (9)
> 

NULL
> 

S := f(x, y, z, t) = a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1])

f(x, y, z, t) = a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1])

 (10)
> 

A := eval(F1, S)

600*a[1]^4*k[1]^4*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^4*p[1]*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^3+1204*a[1]^3*k[1]^7*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^3*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^4-4200*a[1]^4*k[1]^7*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^4*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^3-500*a[1]^3*k[1]^4*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^3*p[1]*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^4+30*a[1]^2*k[1]*p[1]^2*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^2*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^5-54*a[1]^2*w[1]*k[1]^2*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^2*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^5-6*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^5*a[1]^2*k[1]^3*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^2*alpha-6*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^5*a[1]^2*k[1]^2*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^2*p[1]*beta+4*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^4*a[1]^3*k[1]^2*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^3*p[1]*beta-6*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^5*a[1]^2*k[1]^2*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^2*r[1]*delta+4*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^4*a[1]^3*k[1]^2*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^3*r[1]*delta+18*a[1]*w[1]*k[1]^2*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1])*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^6-10*a[1]*k[1]*p[1]^2*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1])*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^6+2*a[1]*k[1]^7*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1])*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^6-10*a[1]*k[1]^4*p[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1])*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^6+2*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^6*a[1]*k[1]^2*p[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1])*beta+2*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^6*a[1]*k[1]^2*r[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1])*delta+1440*a[1]^7*k[1]^7*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^7-5040*a[1]^6*k[1]^7*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^6*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))+6720*a[1]^5*k[1]^7*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^5*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^2-20*a[1]^3*k[1]*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^3*p[1]^2*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^4+36*a[1]^3*k[1]^2*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^3*w[1]*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^4+2*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^6*a[1]*k[1]^3*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1])*alpha+4*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^4*a[1]^3*k[1]^3*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^3*alpha-126*a[1]^2*k[1]^7*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^2*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^5+150*a[1]^2*k[1]^4*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^2*p[1]*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^5-240*a[1]^5*k[1]^4*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^5*p[1]*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^2 = 0

 (11)
> 

simplify(1440*a[1]^7*k[1]^7*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^7+6720*a[1]^5*k[1]^7*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^5*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^2-126*a[1]^2*k[1]^7*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^2*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^5+1204*a[1]^3*k[1]^7*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^3*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^4-4200*a[1]^4*k[1]^7*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^4*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^3+2*a[1]*k[1]^7*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1])*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^6-5040*a[1]^6*k[1]^7*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^6*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))+600*a[1]^4*k[1]^4*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^4*p[1]*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^3-500*a[1]^3*k[1]^4*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^3*p[1]*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^4+30*a[1]^2*k[1]*p[1]^2*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^2*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^5-54*a[1]^2*w[1]*k[1]^2*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^2*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^5-6*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^5*a[1]^2*k[1]^3*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^2*alpha+18*a[1]*w[1]*k[1]^2*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1])*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^6-10*a[1]*k[1]*p[1]^2*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1])*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^6-10*a[1]*k[1]^4*p[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1])*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^6-20*a[1]^3*k[1]*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^3*p[1]^2*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^4+36*a[1]^3*k[1]^2*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^3*w[1]*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^4+2*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^6*a[1]*k[1]^3*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1])*alpha+4*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^4*a[1]^3*k[1]^3*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^3*alpha+150*a[1]^2*k[1]^4*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^2*p[1]*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^5-240*a[1]^5*k[1]^4*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^5*p[1]*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^2-6*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^5*a[1]^2*k[1]^2*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^2*p[1]*beta+4*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^4*a[1]^3*k[1]^2*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^3*p[1]*beta-6*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^5*a[1]^2*k[1]^2*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^2*r[1]*delta+4*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^4*a[1]^3*k[1]^2*(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^3*r[1]*delta+2*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^6*a[1]*k[1]^2*p[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1])*beta+2*(a[0]+a[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]))^6*a[1]*k[1]^2*r[1]*exp(t*w[1]+x*k[1]+y*p[1]+z*r[1])*delta = 0)

2*a[0]*k[1]*(-57*a[0]^4*(k[1]^6-(15/19)*k[1]^3*p[1]-(1/19)*k[1]^2*alpha+(1/19)*(-beta*p[1]-delta*r[1]-9*w[1])*k[1]+(5/19)*p[1]^2)*a[1]*exp(2*t*w[1]+2*x*k[1]+2*y*p[1]+2*z*r[1])+302*a[0]^3*(k[1]^6+(25/151)*k[1]^3*p[1]+(1/151)*k[1]^2*alpha+(1/151)*(beta*p[1]+delta*r[1]+9*w[1])*k[1]-(5/151)*p[1]^2)*a[1]^2*exp(3*t*w[1]+3*x*k[1]+3*y*p[1]+3*z*r[1])-302*a[0]^2*(k[1]^6+(25/151)*k[1]^3*p[1]+(1/151)*k[1]^2*alpha+(1/151)*(beta*p[1]+delta*r[1]+9*w[1])*k[1]-(5/151)*p[1]^2)*a[1]^3*exp(4*t*w[1]+4*x*k[1]+4*y*p[1]+4*z*r[1])+57*a[0]*(k[1]^6-(15/19)*k[1]^3*p[1]-(1/19)*k[1]^2*alpha+(1/19)*(-beta*p[1]-delta*r[1]-9*w[1])*k[1]+(5/19)*p[1]^2)*a[1]^4*exp(5*t*w[1]+5*x*k[1]+5*y*p[1]+5*z*r[1])+(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1])*a[0]^5-exp(6*t*w[1]+6*x*k[1]+6*y*p[1]+6*z*r[1])*a[1]^5)*(k[1]^6-5*k[1]^3*p[1]+k[1]^2*alpha+(beta*p[1]+delta*r[1]+9*w[1])*k[1]-5*p[1]^2))*a[1] = 0

 (12)
> 

E := %

2*a[0]*k[1]*(-57*a[0]^4*(k[1]^6-(15/19)*k[1]^3*p[1]-(1/19)*k[1]^2*alpha+(1/19)*(-beta*p[1]-delta*r[1]-9*w[1])*k[1]+(5/19)*p[1]^2)*a[1]*exp(2*t*w[1]+2*x*k[1]+2*y*p[1]+2*z*r[1])+302*a[0]^3*(k[1]^6+(25/151)*k[1]^3*p[1]+(1/151)*k[1]^2*alpha+(1/151)*(beta*p[1]+delta*r[1]+9*w[1])*k[1]-(5/151)*p[1]^2)*a[1]^2*exp(3*t*w[1]+3*x*k[1]+3*y*p[1]+3*z*r[1])-302*a[0]^2*(k[1]^6+(25/151)*k[1]^3*p[1]+(1/151)*k[1]^2*alpha+(1/151)*(beta*p[1]+delta*r[1]+9*w[1])*k[1]-(5/151)*p[1]^2)*a[1]^3*exp(4*t*w[1]+4*x*k[1]+4*y*p[1]+4*z*r[1])+57*a[0]*(k[1]^6-(15/19)*k[1]^3*p[1]-(1/19)*k[1]^2*alpha+(1/19)*(-beta*p[1]-delta*r[1]-9*w[1])*k[1]+(5/19)*p[1]^2)*a[1]^4*exp(5*t*w[1]+5*x*k[1]+5*y*p[1]+5*z*r[1])+(exp(t*w[1]+x*k[1]+y*p[1]+z*r[1])*a[0]^5-exp(6*t*w[1]+6*x*k[1]+6*y*p[1]+6*z*r[1])*a[1]^5)*(k[1]^6-5*k[1]^3*p[1]+k[1]^2*alpha+(beta*p[1]+delta*r[1]+9*w[1])*k[1]-5*p[1]^2))*a[1] = 0

 (13)
> 

indets(E)

{alpha, beta, delta, t, x, y, z, a[0], a[1], k[1], p[1], r[1], w[1], exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]), exp(2*t*w[1]+2*x*k[1]+2*y*p[1]+2*z*r[1]), exp(3*t*w[1]+3*x*k[1]+3*y*p[1]+3*z*r[1]), exp(4*t*w[1]+4*x*k[1]+4*y*p[1]+4*z*r[1]), exp(5*t*w[1]+5*x*k[1]+5*y*p[1]+5*z*r[1]), exp(6*t*w[1]+6*x*k[1]+6*y*p[1]+6*z*r[1])}

 (14)
> 

E1 := subs({exp(t*w[1]+x*k[1]+y*p[1]+z*r[1]) = eX, exp(2*t*w[1]+2*x*k[1]+2*y*p[1]+2*z*r[1]) = eY, exp(3*t*w[1]+3*x*k[1]+3*y*p[1]+3*z*r[1]) = eZ, exp(4*t*w[1]+4*x*k[1]+4*y*p[1]+4*z*r[1]) = eW, exp(5*t*w[1]+5*x*k[1]+5*y*p[1]+5*z*r[1]) = eV, exp(6*t*w[1]+6*x*k[1]+6*y*p[1]+6*z*r[1]) = eB}, E)

2*a[0]*k[1]*(-57*a[0]^4*(k[1]^6-(15/19)*k[1]^3*p[1]-(1/19)*k[1]^2*alpha+(1/19)*(-beta*p[1]-delta*r[1]-9*w[1])*k[1]+(5/19)*p[1]^2)*a[1]*eY+302*a[0]^3*(k[1]^6+(25/151)*k[1]^3*p[1]+(1/151)*k[1]^2*alpha+(1/151)*(beta*p[1]+delta*r[1]+9*w[1])*k[1]-(5/151)*p[1]^2)*a[1]^2*eZ-302*a[0]^2*(k[1]^6+(25/151)*k[1]^3*p[1]+(1/151)*k[1]^2*alpha+(1/151)*(beta*p[1]+delta*r[1]+9*w[1])*k[1]-(5/151)*p[1]^2)*a[1]^3*eW+57*a[0]*(k[1]^6-(15/19)*k[1]^3*p[1]-(1/19)*k[1]^2*alpha+(1/19)*(-beta*p[1]-delta*r[1]-9*w[1])*k[1]+(5/19)*p[1]^2)*a[1]^4*eV+(-eB*a[1]^5+eX*a[0]^5)*(k[1]^6-5*k[1]^3*p[1]+k[1]^2*alpha+(beta*p[1]+delta*r[1]+9*w[1])*k[1]-5*p[1]^2))*a[1] = 0

 (15)
> 

indets(E1)

{alpha, beta, delta, eB, eV, eW, eX, eY, eZ, a[0], a[1], k[1], p[1], r[1], w[1]}

 (16)
> 

p2c := normal(E1)

-2*a[0]*k[1]*(eB*a[1]^5*k[1]^6-57*eV*a[0]*a[1]^4*k[1]^6+302*eW*a[0]^2*a[1]^3*k[1]^6-eX*a[0]^5*k[1]^6+57*eY*a[0]^4*a[1]*k[1]^6-302*eZ*a[0]^3*a[1]^2*k[1]^6-5*eB*a[1]^5*k[1]^3*p[1]+45*eV*a[0]*a[1]^4*k[1]^3*p[1]+50*eW*a[0]^2*a[1]^3*k[1]^3*p[1]+5*eX*a[0]^5*k[1]^3*p[1]-45*eY*a[0]^4*a[1]*k[1]^3*p[1]-50*eZ*a[0]^3*a[1]^2*k[1]^3*p[1]+alpha*eB*a[1]^5*k[1]^2+3*alpha*eV*a[0]*a[1]^4*k[1]^2+2*alpha*eW*a[0]^2*a[1]^3*k[1]^2-alpha*eX*a[0]^5*k[1]^2-3*alpha*eY*a[0]^4*a[1]*k[1]^2-2*alpha*eZ*a[0]^3*a[1]^2*k[1]^2+beta*eB*a[1]^5*k[1]*p[1]+3*beta*eV*a[0]*a[1]^4*k[1]*p[1]+2*beta*eW*a[0]^2*a[1]^3*k[1]*p[1]-beta*eX*a[0]^5*k[1]*p[1]-3*beta*eY*a[0]^4*a[1]*k[1]*p[1]-2*beta*eZ*a[0]^3*a[1]^2*k[1]*p[1]+delta*eB*a[1]^5*k[1]*r[1]+3*delta*eV*a[0]*a[1]^4*k[1]*r[1]+2*delta*eW*a[0]^2*a[1]^3*k[1]*r[1]-delta*eX*a[0]^5*k[1]*r[1]-3*delta*eY*a[0]^4*a[1]*k[1]*r[1]-2*delta*eZ*a[0]^3*a[1]^2*k[1]*r[1]+9*eB*a[1]^5*k[1]*w[1]-5*eB*a[1]^5*p[1]^2+27*eV*a[0]*a[1]^4*k[1]*w[1]-15*eV*a[0]*a[1]^4*p[1]^2+18*eW*a[0]^2*a[1]^3*k[1]*w[1]-10*eW*a[0]^2*a[1]^3*p[1]^2-9*eX*a[0]^5*k[1]*w[1]+5*eX*a[0]^5*p[1]^2-27*eY*a[0]^4*a[1]*k[1]*w[1]+15*eY*a[0]^4*a[1]*p[1]^2-18*eZ*a[0]^3*a[1]^2*k[1]*w[1]+10*eZ*a[0]^3*a[1]^2*p[1]^2)*a[1] = 0

 (17)
> 

indets(p2c)

{alpha, beta, delta, eB, eV, eW, eX, eY, eZ, a[0], a[1], k[1], p[1], r[1], w[1]}

 (18)
> 

eqns := {coeffs(collect(p2c, {eB, eV, eW, eX, eY, eZ}, distributed), {eB, eV, eW, eX, eY, eZ})}; nops(%)

Error, invalid arguments to coeffs

  

1

 (19)
> 

NULL
> 

Co := solve(E1, {a[0], a[1], k[1], n[1], p[1], r[1], w[1]}, explicit)

{a[0] = a[0], a[1] = a[1], k[1] = 0, n[1] = n[1], p[1] = p[1], r[1] = r[1], w[1] = w[1]}, {a[0] = a[0], a[1] = 0, k[1] = k[1], n[1] = n[1], p[1] = p[1], r[1] = r[1], w[1] = w[1]}, {a[0] = 0, a[1] = a[1], k[1] = k[1], n[1] = n[1], p[1] = p[1], r[1] = r[1], w[1] = w[1]}, {a[0] = a[0], a[1] = a[1], k[1] = k[1], n[1] = n[1], p[1] = p[1], r[1] = -(eB*a[1]^5*k[1]^6-57*eV*a[0]*a[1]^4*k[1]^6+302*eW*a[0]^2*a[1]^3*k[1]^6-eX*a[0]^5*k[1]^6+57*eY*a[0]^4*a[1]*k[1]^6-302*eZ*a[0]^3*a[1]^2*k[1]^6-5*eB*a[1]^5*k[1]^3*p[1]+45*eV*a[0]*a[1]^4*k[1]^3*p[1]+50*eW*a[0]^2*a[1]^3*k[1]^3*p[1]+5*eX*a[0]^5*k[1]^3*p[1]-45*eY*a[0]^4*a[1]*k[1]^3*p[1]-50*eZ*a[0]^3*a[1]^2*k[1]^3*p[1]+alpha*eB*a[1]^5*k[1]^2+3*alpha*eV*a[0]*a[1]^4*k[1]^2+2*alpha*eW*a[0]^2*a[1]^3*k[1]^2-alpha*eX*a[0]^5*k[1]^2-3*alpha*eY*a[0]^4*a[1]*k[1]^2-2*alpha*eZ*a[0]^3*a[1]^2*k[1]^2+beta*eB*a[1]^5*k[1]*p[1]+3*beta*eV*a[0]*a[1]^4*k[1]*p[1]+2*beta*eW*a[0]^2*a[1]^3*k[1]*p[1]-beta*eX*a[0]^5*k[1]*p[1]-3*beta*eY*a[0]^4*a[1]*k[1]*p[1]-2*beta*eZ*a[0]^3*a[1]^2*k[1]*p[1]+9*eB*a[1]^5*k[1]*w[1]-5*eB*a[1]^5*p[1]^2+27*eV*a[0]*a[1]^4*k[1]*w[1]-15*eV*a[0]*a[1]^4*p[1]^2+18*eW*a[0]^2*a[1]^3*k[1]*w[1]-10*eW*a[0]^2*a[1]^3*p[1]^2-9*eX*a[0]^5*k[1]*w[1]+5*eX*a[0]^5*p[1]^2-27*eY*a[0]^4*a[1]*k[1]*w[1]+15*eY*a[0]^4*a[1]*p[1]^2-18*eZ*a[0]^3*a[1]^2*k[1]*w[1]+10*eZ*a[0]^3*a[1]^2*p[1]^2)/(delta*k[1]*(eB*a[1]^5+3*eV*a[0]*a[1]^4+2*eW*a[0]^2*a[1]^3-eX*a[0]^5-3*eY*a[0]^4*a[1]-2*eZ*a[0]^3*a[1]^2)), w[1] = w[1]}

 (20)
> 

NULL
> 

case1 := Co[1]

{a[0] = a[0], a[1] = a[1], k[1] = 0, n[1] = n[1], p[1] = p[1], r[1] = r[1], w[1] = w[1]}

 (21)
> 

F := subs(case1, S)

f(x, y, z, t) = a[0]+a[1]*exp(t*w[1]+y*p[1]+z*r[1])

 (22)
> 

F1 := eval(H, F)

u(x, y, z, t) = 0

 (23)
> 

NULL
> 

pdetest(F1, pde)

0

 (24)

Download F-P-O-W.mw

RGB Matrix for a 3D plot...

Asked by: Mapleliquid 20
April 10 2025
2  5

Dear community,

i want to create my own RGB Matrix for a plot. In this picture from maple soft homepage you can see a matrix A. I created a Matrix with 49 rows and 49 columns. From Datatyp Float. The plots is just red. Has anybody an idea how I can create a Matrix, which works?

Simultaneously solving showing error?...

Asked by: Andiguys 65
April 10 2025
0  5

I have two conditions, A and B, which must both be greater than or equal to zero. However, when I try to solve the problem, I encounter an error.

Could you please help me resolve this?

Note: All the parameters, whether specified or not, are positive and greater than zero.
File : Q3.mw

How seperate Linear and nonlinear term in equation...

Asked by: salim-barzani 1610
pde differential-equations duplicate-question
April 09 2025
3  2

sometime this code i use make a problem for me and sometime they work very good how i can get something general for use in all equation 

> 

restart
> 

with(PDEtools)
> 

with(LinearAlgebra)
> 

NULL
> 

with(SolveTools)
> 

_local(gamma)

Warning, A new binding for the name `gamma` has been created. The global instance of this name is still accessible using the :- prefix, :-`gamma`.  See ?protect for details.

  
> 

``

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

 (1)
> 

declare(u(x, y, z, w, t))

u(x, y, z, w, t)*`will now be displayed as`*u

 (2)
> 

declare(f(x, y, z, w, t))

f(x, y, z, w, t)*`will now be displayed as`*f

 (3)
> 

pde := 4*(diff(u(x, y, z, w, t), x, t))-(diff(u(x, y, z, w, t), `$`(x, 3), y))+diff(u(x, y, z, w, t), x, `$`(y, 3))+12*(diff(u(x, y, z, w, t), x))*(diff(u(x, y, z, w, t), y))+12*u(x, y, z, w, t)*(diff(u(x, y, z, w, t), x, y))-6*(diff(u(x, y, z, w, t), z, w)) = 0

4*(diff(diff(u(x, y, z, w, t), t), x))-(diff(diff(diff(diff(u(x, y, z, w, t), x), x), x), y))+diff(diff(diff(diff(u(x, y, z, w, t), x), y), y), y)+12*(diff(u(x, y, z, w, t), x))*(diff(u(x, y, z, w, t), y))+12*u(x, y, z, w, t)*(diff(diff(u(x, y, z, w, t), x), y))-6*(diff(diff(u(x, y, z, w, t), w), z)) = 0

 (4)
> 

oppde := [op(expand(pde))]; u_occurrences := map(proc (i) options operator, arrow; numelems(select(has, [op([op(i)])], u)) end proc, oppde); linear_op_indices := ListTools:-SearchAll(1, u_occurrences); pde_linear := add(oppde[[linear_op_indices]]); pde_nonlinear := expand(simplify(expand(pde)-pde_linear))

0

  

4*(diff(diff(u(x, y, z, w, t), t), x))-(diff(diff(diff(diff(u(x, y, z, w, t), x), x), x), y))+diff(diff(diff(diff(u(x, y, z, w, t), x), y), y), y)+12*(diff(u(x, y, z, w, t), x))*(diff(u(x, y, z, w, t), y))+12*u(x, y, z, w, t)*(diff(diff(u(x, y, z, w, t), x), y))-6*(diff(diff(u(x, y, z, w, t), w), z)) = 0

 (5)
> 

pde_linear, pde_nonlinear := selectremove(proc (term) options operator, arrow; not has((eval(term, u(x, y, z, w, t) = a*u(x, y, z, w, t)))/a, a) end proc, expand(pde))

() = 0, 4*(diff(diff(u(x, y, z, w, t), t), x))-(diff(diff(diff(diff(u(x, y, z, w, t), x), x), x), y))+diff(diff(diff(diff(u(x, y, z, w, t), x), y), y), y)+12*(diff(u(x, y, z, w, t), x))*(diff(u(x, y, z, w, t), y))+12*u(x, y, z, w, t)*(diff(diff(u(x, y, z, w, t), x), y))-6*(diff(diff(u(x, y, z, w, t), w), z)) = ()

 (6)
 

NULL

Download seperate_L-NL.mw

Display quality with rotated screens...

Asked by: Anthrazit 885
resolution java orientation
April 09 2025
3  13

I need to take up an issue which is quite old, but still unsolved.

https://www.mapleprimes.com/questions/234249-Text-Quality-On-Screen

The problem is that in specific display configurations with one (rotated) vertical screen and multiple horizontal screens, the quality of fonts especially is significantly lower in Maple as with a configuration with just horizontal screens.

The affect is visible in Maple when it is on the horizontal (unrotated) screens.

Here are screenshots for comparision, and the layout of my desktop.

Screen layout:

Screenshot rotated

Screenshot unrotated

It seems that the problem is present when starting Maple. Changing the rotation of the screen when Maple is running does not affect the font quality in Maple.

Other (Windows) programs are not affected at all of this changes, so this seems to be a Java issue.

How to get roman numbers in subscripts ...

Asked by: C_R 3442
April 09 2025
1  13

For constants I prefer subscripts over indeces.

I noticed that numbers in subscripts are printed in italic. This is against a common prettyprint convention, where variables are in italic and numbers are in roman. In the example below "1" can easily be misread as "l" (which is probably one of the reasons for this convention)

Is there a way to get numbers printed in roman in subscripts? To force roman print I tried

t__`#mo("1");`
Error, missing operator or `;`

In 2d-Math the convention is respected in the input but not in the outut

How to solve this eq by exact solution...

Asked by: juvjchfyukv347_dfg 20
syntax homework pde
April 09 2025
2  4

ut + 1/2(u^2)x −uxx =0, u(x,0)=x.

 

How do I solve this equationby exact solution...

Asked by: juvjchfyukv347_dfg 20
ode homework differential-equations
April 08 2025
1  2

u'''-u=x+2 u'(0)=2, u''(0)=2

How determine the ode type ? my answer and real an...

Asked by: Arya-S-AA 175
ode differential-equations duplicate-account
April 08 2025
1  2

my answer is so different but  and i want remove this lambert in my test? can we do something for giving question exactly solve the question by model i have a book of ode which a lot of time i do some trail but have a problem? how i can remove this issue specially for bernoli and  other type?

> 

restart
> 

with(DEtools, odeadvisor)
> 

ode := diff(y(x), x)+x/y(x)+2 = 0

diff(y(x), x)+x/y(x)+2 = 0

 (1)
> 

Student:-ODEs:-Type(ode)

{}

 (2)
> 

odeadvisor(ode)

[[_homogeneous, `class A`], _rational, [_Abel, `2nd type`, `class A`]]

 (3)
> 

Student:-ODEs:-Type(ode); W := dsolve(ode); odetest(W, ode)

{}

  

y(x) = -x*(LambertW(-c__1*x)+1)/LambertW(-c__1*x)

  

0

 (4)

Download test.mw

Parameter Sensitivity and Conditions for Ensuring ...

Asked by: Andiguys 65
April 08 2025
0  0

I want both Pc and r(Pc) to be greater than or equal to zero. The only constraint is that all parameters for which I’ve provided data must remain positive. Can we identify the key parameters that significantly affect Pc? Also, what condition ensures that Pc ≥ 0? Ideally, I’d like Pc to be less than or equal to Pu. Could you suggest what changes in the numerical values I should make to ensure Pc becomes a positive value?

Attaching file: Q2.mw

Can we include a graph that shows how Pc changes with respect to variations in the most sensitive parameters?

Open file dialog: How to list only Maple files...

Asked by: C_R 3442
gui
April 07 2025
2  3

With the new GUI:
I get all files (*.*) listed by default.
Other file types to filter are not listed.

Is this the same on other machines?

Can I do something about it?

Maple 2025 / Toolbars...

Asked by: Anthrazit 885
gui ribbon toolbar
April 07 2025
0  3

I'm struggling to find the Undo botton, according to the help file they should reside under "View" menu - select Toolbar.

I can't find any "Toolbar" in the View menu.

Document layout / tab indenting...

Asked by: Anthrazit 885
April 07 2025
0  1

How do I make indents in Maple 2025 for more readable layout?

Haven't used that much in 2024, but according to help this should be in Format - Tab settings. I don't find that in 2025 unfortunately.

which method to use to remove RootOf ?...

Asked by: nm 11398
rootof
April 07 2025
2  1

I know of 3 ways to remove RootOf, but sometimes they give different result. How does one decide which to use? This is done in code. So method to decide can't depend on looking at the screen and see which result one "likes" more than the other.

Is allvalues() the one to use all the time? Could one of these 3 methods fail, and then one has to try the next one?

> 

 

> 

interface(version);

`Standard Worksheet Interface, Maple 2025.0, Linux, March 24 2025 Build ID 1909157`

> 

Physics:-Version();

`The "Physics Updates" version in the MapleCloud is 1859 and is the same as the version installed in this computer, created 2025, April 6, 14:34 hours Pacific Time.`

> 

restart
> 

e:=y*4^(1/3)*((4*x^2*RootOf(_Z^2*y - 4*_Z*x + y) - y^2*RootOf(_Z^2*y - 4*_Z*x + y) - x*y)/y^2)^(1/3) - _C2;

y*4^(1/3)*((4*x^2*RootOf(_Z^2*y-4*_Z*x+y)-y^2*RootOf(_Z^2*y-4*_Z*x+y)-x*y)/y^2)^(1/3)-_C2

> 

convert(e,radical)

y*4^(1/3)*((4*x^2*(2*x+(4*x^2-y^2)^(1/2))/y-y*(2*x+(4*x^2-y^2)^(1/2))-x*y)/y^2)^(1/3)-_C2

> 

DEtools:-remove_RootOf(e)

(1/16)*(c__2^3+4*x*y^2)^2/(y*(4*x^2-y^2)^2)-(c__2^3+4*x*y^2)*x/(y*(4*x^2-y^2))+y = 0

> 

allvalues( e)

y*4^(1/3)*((4*x^2*(2*x+(4*x^2-y^2)^(1/2))/y-y*(2*x+(4*x^2-y^2)^(1/2))-x*y)/y^2)^(1/3)-c__2, y*4^(1/3)*((-4*x^2*(-2*x+(4*x^2-y^2)^(1/2))/y+y*(-2*x+(4*x^2-y^2)^(1/2))-x*y)/y^2)^(1/3)-c__2


 

Download removing_rootof_april_7_2025.mw

First 23 24 25 26 27 28 29 Last Page 25 of 2219