Advanced Search

salim-barzani

1640 Reputation

9 Badges

1 years, 74 days
Contact salim-barzani

MaplePrimes Activity


These are questions asked by salim-barzani

simplify equation befor convert the ma...

salim-barzani 1640 Maple
radical export simplification
August 12 2024
0 1

when i do the convert in maple to latex  is do but not fully simplify and some kind of clearer must write for paper and i must do this case by case by hand but how i can simplify before i convert to latex and remove all extra thing like multiply between two squar root


 

> 

restart
> 

K := [A[1] = 0, A[0] = 0, B[1] = `&-+`(sqrt(2)*sqrt(a[5])/sqrt(a[4])), k = k, a[2] = -a[5], w = -2*a[5]*a[3]*(4*k^2-1)/(3*a[4]), a[1] = 8*a[5]*a[3]/(3*a[4]), v = 2*a[1]*k]

[A[1] = 0, A[0] = 0, B[1] = `&-+`(2^(1/2)*a[5]^(1/2)/a[4]^(1/2)), k = k, a[2] = -a[5], w = -(2/3)*a[5]*a[3]*(4*k^2-1)/a[4], a[1] = (8/3)*a[5]*a[3]/a[4], v = 2*a[1]*k]

 (1)
> 

latex(K)

\left[A_{1} = 0, A_{0} = 0, B_{1} =
\mp \frac{\sqrt{2}\, \sqrt{a_{5}}}{\sqrt{a_{4}}}, k = k, a_{2} =
-a_{5}, w = -\frac{2 a_{5} a_{3} \left(4 k^{2}-1\right)}{3 a_{4}},
a_{1} = \frac{8 a_{5} a_{3}}{3 a_{4}}, v = 2 a_{1} k\right]

  
> 

NULL


 

Download K.mw

show variable in outcome ...

salim-barzani 1640
procedure duplicate-question
August 06 2024
1 1

i have a generator function but in out come i have phi(p_1,p_2,p_3, so on )=** result is clear but this p_1 and p_2 in not shown i want to be shown in my outcome

generate_solution.mw

How determine the complex region for 3...

salim-barzani 1640 Maple 2021
complex complexplot3d plotting
August 02 2024
1 12
> 

restart;
> 

local gamma;

gamma

 (1)
> 

with(Plot)

 

> 

params := {alpha = 2.5, k = 3, w = 2, beta[3] = 3, beta[4] = 1.7,theta=0,gamma=1};

{alpha = 2.5, gamma = 1, k = 3, theta = 0, w = 2, beta[3] = 3, beta[4] = 1.7}

 (2)
> 

xi := sqrt(-1/(72*alpha*beta[4]+72*gamma*beta[4]))*(2*alpha*k*t+x)

(-1/(72*alpha*beta[4]+72*gamma*beta[4]))^(1/2)*(2*alpha*k*t+x)

 (3)

 

> 

sol1 := [U(xi), -k*x -(9*alpha*k^2*beta[4] + 2*beta[3]^2)/(9*beta[4])*t + theta];

[U((-1/(72*alpha*beta[4]+72*gamma*beta[4]))^(1/2)*(2*alpha*k*t+x)), -k*x-(1/9)*(9*alpha*k^2*beta[4]+2*beta[3]^2)*t/beta[4]+theta]

 (4)

 

> 

sol2 := eval(sol1, U(xi) = -beta[3]/(3*beta[4]) + beta[3]*sinh(xi)/(6*beta[4]*cosh(xi)) + beta[3]*cosh(xi)/(6*beta[4]*sinh(xi)));

[-(1/3)*beta[3]/beta[4]+(1/6)*beta[3]*sinh((-1/(72*alpha*beta[4]+72*gamma*beta[4]))^(1/2)*(2*alpha*k*t+x))/(beta[4]*cosh((-1/(72*alpha*beta[4]+72*gamma*beta[4]))^(1/2)*(2*alpha*k*t+x)))+(1/6)*beta[3]*cosh((-1/(72*alpha*beta[4]+72*gamma*beta[4]))^(1/2)*(2*alpha*k*t+x))/(beta[4]*sinh((-1/(72*alpha*beta[4]+72*gamma*beta[4]))^(1/2)*(2*alpha*k*t+x))), -k*x-(1/9)*(9*alpha*k^2*beta[4]+2*beta[3]^2)*t/beta[4]+theta]

 (5)

 

> 

solnum :=eval(sol2, params);

[-.5882352940+(.2941176471*I)*sin(.7247137946*t+0.4831425297e-1*x)/cos(.7247137946*t+0.4831425297e-1*x)-(.2941176471*I)*cos(.7247137946*t+0.4831425297e-1*x)/sin(.7247137946*t+0.4831425297e-1*x), -3*x-23.67647059*t]

 (6)
> 

plots:-complexplot3d(solnum, x = -50.. 50, t = -50..50);

Warning, unable to evaluate the function to numeric values in the region; complex values were detected

  

 
> 

NULL


if there is any other way for graph please share with me

Download complexplot3d.mw

plot solution of PDE ...

salim-barzani 1640 Maple 2021
plotting
August 01 2024
1 1 
restart;
with(Plot);
params := {alpha = 2.5, k = 3, w = 2, beta[3] = 3, beta[4] = 1.7};
xi := beta[3]*(2*alpha*k*t + x)*sqrt(1/(36*alpha*beta[4] + 36*gamma*beta[4]));
params := {alpha = 2.5, k = 3, w = 2, beta[3] = 3, beta[4] = 1.7}

          xi := beta[3] (2 alpha k t + x) 

                                                 (1/2)
            /                 1                 \     
            |-----------------------------------|     
            \36 alpha beta[4] + 36 gamma beta[4]/     


sol1n := u(x, t) = U(xi)*exp((-sqrt(1/(36*alpha*beta[4] + 36*gamma*beta[4]))*x + w*t + theta)*I);
                     /                          
                     |                          
 sol1n := u(x, t) = U|beta[3] (2 alpha k t + x) 
                     \                          

                                        (1/2)\    /  /
   /                 1                 \     |    |  |
   |-----------------------------------|     | exp|I |
   \36 alpha beta[4] + 36 gamma beta[4]/     /    \  \
                                       (1/2)                \\
  /                 1                 \                     ||
 -|-----------------------------------|      x + w t + theta||
  \36 alpha beta[4] + 36 gamma beta[4]/                     //



plot3d(rhs(sol1n), x = 0 .. 250, t = 0 .. 4);

how plot the the solution of PDE of this kind of function?

Download plot.mw

solve equations with condition parameter...

salim-barzani 1640 Maple 2021
parameters substitution differential-equations
July 30 2024
0 1

before run file remove all (:) i want calculate equation but with a condition for example: when a=4 then find other parameter in my equation with respect to a=4 find other

usesol.mw

First 30 31 32 33 34 35 Page 32 of 35