## Is there studymaterial for vectorcalculus ...

Asked by:

I want to do a organised introduction in Maple  with the student and main vectorcalculus package
Is there some studymatrial to find for this ?

## How to find integral of the output of a system of ...

Asked by:

I am using Maple to solve a system of ODEs numerically. Right now, I want to find the integration of the output of the system of ODEs. How it is possible to do this?

F := dsolve(ODESys union ICs, {y0(t), y1(t), y2(t), y3(t)}, type = numeric)

Y0 := t -> rhs(op(2, F(t)))

Now, I want to find int(Y0,t=0..1).

## How to realize the Complete Sauqre?...

Asked by:

Why this simple case cannot be simplified to Complete Square form

restart:

EQ := 1/4*n[1]^4 - 1/2*n[1]^2 + 1/4

simplify(1/4*n[1]^4 - 1/2*n[1]^2 + 1/4, 'size')

with(Student[Precalculus])
CompleteSquare(EQ);

## RE: how to apply product to sum identities of trig...

Asked by:

Dear all,

Would you tell me a way to apply the identity relationship in Maple, to rewrite 'subexp' below to 'subexp2'?

 > restart;
 > subexp := M__a*sin(omega*t + alpha)*I__a*sin(omega*t + phi);
 (1)
 > subexp2 := M__a * I__a * (-1/2*(cos(2*omega*t + alpha + phi)-cos(alpha - phi)));
 (2)
 > is(subexp = subexp2);
 (3)
 >

Download Q20200901.mw

## Propriety of an ellipse...

Asked by:

In the plane, an ABC triangle is considered for the vertices B and C are fixed, A being variable so that b +c remains constant and equal to a given length l. (b=distance(A,C), (c=distance(A,B)
How to show that the product tan(B/2=*tan(C/2) remains constant ?

## Complicated solution of dsolve with RootOf(_Z)...

Asked by:

Hello,

I would like to solve this equation and keep the parameters a and eta unknown and assign them a value later on. Is it possible ?

I know I can solve this equation numerically, it works, but I want to change the parameters to fit experimental data.

I tried this :

ode:=diff(y(t),t)=-(4/3)*(a/eta)*(y(t)^3+1):
lambdaE:=dsolve({ode,y(0)=1},y(t),explicit);

But the solution appears with RootOf expression and I can't get a numerical solution afterwards.

lambdaE := y(t) = RootOf(6*eta*sqrt(3)*arctan(((2*_Z - 1)*sqrt(3))/3) - eta*sqrt(3)*Pi - 3*eta*ln(_Z^2 - _Z + 1) + 6*eta*ln(_Z + 1) - 6*eta*ln(2) + 24*t*a)

I tried some things from forums but nothing works.

Do you have any leads on how to do it please ?

Thank you in advance

Manon

## is there easy way to simulate lines rotation?...

Asked by:

is there easy way to simulate lines rotation like robotic arm following point P moving by adjusting angle q1 and q2?

i feel point two lines and simulate static two lines in animate is also not easy.

with(plots):
with(geometry):
#Joint at (5,5)
#length a  2, y=7, x, solve(subs(y=7,2^2 = (y-5)^2+(x-5)^2), x)[1];
#length b 2, y=1, x, solve(subs(y=4,2^2 = (y-5)^2+(x-5)^2), x)[1];
point(A, 5, 5), point(B, solve(subs(y=7,2^2 = (y-5)^2+(x-5)^2), x)[1], 7):
point(C, 5, 5), point(D, solve(subs(y=4,2^2 = (y-5)^2+(x-5)^2), x)[1], 4):
line(L1, [A, B]);
line(L2, [C, D]);
_EnvHorizontalName := x;
_EnvVerticalName := y;
Equation(L1);
Equation(L2);
solve(Equation(L1), y);
solve(Equation(L2), y);
plot([solve(Equation(L1), y),solve(Equation(L2), y)], x = 1 .. 2);
animate(plot, [Equation(L1),Equation(L2), x = 0 .. 2], A = -3 .. 3);

Angle Reference from below

angle of L2 , q1a

angle of L1,  q2a

p1 := vector([a*cos(q1), a*sin(q1)]);
P := evalm(p1 + b*vector([cos(q1+q2), sin(q1+q2)]));
Pe := map(expand, P);
A := {cos(q1) = c1, sin(q1) =s1, cos(q2)=c2, sin(q2)=s2};
P := subs(A, op(Pe));
F1 := [x - P[1], y - P[2], s1^2+c1^2-1, s2^2+c2^2-1 ];
F2 := subs({a=1, b=1}, F1);
with(Groebner):
g1 := Basis(F2, plex(c2, s2, c1, s1, y, x));
g1 := [-4*x^2+x^4+2*x^2*y^2+y^4-4*y*x^2*s1-4*y^3*s1+4*s1^2*x^2+4*s1^2*y^2, 2*y*s1+2*x*c1-x^2-y^2, 4*x-x^3-y^2*x+2*y*x*s1-2*y^2*c1-4*s1^2*x+4*y*s1*c1, s1^2+c1^2-1, x*s1-y*c1+s2, -y^2+2-x^2+2*c2];
map(indets, g1);

g2 := Basis(F2, plex(c2, s2, c1, s1));

assume point x = 1, y = 0.5
g2spec := subs({x=1, y=1/2}, [g2[1],g2[3]]);
S1 := [solve(g2spec[1])];
q1a := evalf(arcsin(S1[1]));
q1b := evalf(arcsin(S1[2]));

S2 := [solve(subs(s1=S1[1], g2spec[2])), solve(subs(s1=S1[2], g2spec[2])) ];
q2a := evalf(arcsin(S2[1]));
q2b := evalf(arcsin(S2[2]));

q2a := subs({a=2,b=2}, q2a);
if q2a < 0 then
q2a_pi := evalf(eval(-q2a-Pi));
else
q2a_pi := evalf(eval(Pi-q2a));
end if:
q2a_pi;

q2b := subs({a=2,b=2}, q2b);
if q2b < 0 then
q2b_pi := evalf(eval(-q2b-Pi));
else
q2b_pi := evalf(eval(Pi-q2b));
end if:
q2b_pi;

## issue with Physics:-Latex. Invalid latex on expres...

Asked by:

I've been using Physics:-Latex in my large program, and checking the output visually. I noticed this small issue on one page.

When asking Physics:-Latex to generate Latex for this expression

It gives

While when using standard latex() command, the result is

Below is the worksheet attached. Using Latest Physics and Maple.

 > interface(version)

 > Physics:-Version()

 > restart;
 >
 > expr:=1/2*int(exp(-t)*f(t),t)*exp(t)-1/2*exp(-t)*int(exp(t)*f(t),t)

 > Physics:-Latex(expr)

\frac{\left(\int {\rm e}^{-t} f \left(t \right)d t \right) {\rm e}^{t}}{2}+-\frac{1}{2} {\rm e}^{-t} \left(\int {\rm e}^{t} f \left(t \right)d t \right)

 > latex(expr)

{\frac {\int \!{{\rm e}^{-t}}f \left( t \right) \,{\rm d}t{{\rm e}^{t}
}}{2}}-{\frac {{{\rm e}^{-t}}\int \!{{\rm e}^{t}}f \left( t \right)
\,{\rm d}t}{2}}

 >

THe latex file used to compile the Maple output Latex using TeXLive distribution on Linux is

\documentclass[12pt]{article}
\usepackage{amsmath}
%\usepackage{maplestd2e} %not needed for this example
\begin{document}

%output of Physics:-Latex()
$\frac{\left(\int {\rm e}^{-t} f \left(t \right)d t \right) {\rm e}^{t}}{2}+-\frac{1}{2} {\rm e}^{-t} \left(\int {\rm e}^{t} f \left(t \right)d t \right)$

%output of maple latex()
${\frac {\int \!{{\rm e}^{-t}}f \left( t \right) \,{\rm d}t{{\rm e}^{t}}}{2}}-{\frac {{{\rm e}^{-t}}\int \!{{\rm e}^{t}}f \left( t \right) \,{\rm d}t}{2}}$

\end{document}

Download latex_issue_5.mw

## Set Maple 2020 as default open file .mw and .mws...

Asked by:

Hello everyone, my computer installed Maple 2016, 2020 and set Maple 2016 as default opening files .mw, .mws. How to change default to Maple 2020 . I tried searching on Google but not found.

Thank you very much.

## residual sum of squares in Nonlinear curve...

Asked by:

Hello!

How to calculate the residual sum of squares of a Nonlinear Fitting?

I tried but was unsuccessful.

## express the function z in terms of Legendre functi...

Asked by:

How I can prove the following equation in red box.

Also, Pn(v) and qn(v) are the real combinations of half-integer Legendre functions.

For more details please see

https://math.stackexchange.com/questions/2746660/potential-flow-around-a-torus-laplace-equation-in-toroidal-coordinates/3809487#3809487

## How is this Basisgrid procedure programmed?...

Asked by:

I did already some programmingexercises , but this sort of programming example i did not encounter in the programmingbook
How it is programmed in general lines ?
I do have a lot of small procedures to learn from

But it is too much asked here on the forum to explain all ins and outs for this procedure, because it is not that simple.

Download Basisgrid_procedure.mw

## Changing the standard unit to Joules per kilogram ...

Asked by:

When I'm doing math more complicated, than in the first line, Maple gives the incorrect type of unit.
I want the unit as displayed in the first line, but by using the math/syntax shown in the last line.

Maple does not have "Joule per kilogram times kelvin", as a choosable option when I do the syntax in the last line.

Is there any way I can end up with the correct unit, even tho I am using syntaxes?
In theory, I should end up with the same answer as a result?.

## Maple 2D Output automatic aligment...

Asked by:

Is it possible to make executed math aka 2D Outputs, automatically align left?
I'm doing it manually for every execution I make. But is there any setting, that does orient the text to the left by standard?

## How to Perform Set Operations with Intervals?...

Asked by:

I have intervals A=(-infinity,7), B=(-10,25), and C=(15,infinity). How do I use Maple to perform the union and intersection of such intervals?

 First 11 12 13 14 15 16 17 Last Page 13 of 1731
﻿