I solve for a transfer function using Syrup, and want to operate on the Real part and Imagninary parts separately.  I've added "assumes" statements for every variable:  

assume(Rsrc, real);
assume(C1, real);
assume(Lp, real);
assume(C2, real);
assume(f, real);
assume(RL, real);
additionally(0 < Rsrc, 0 < C1, 0 < Lp, 0 < C2, 0 < RL, 0 < f);

When I then do something like :

 
instead of gettting just the real part of the expression, I get :

as if one of the variables was still not assumed to be Real.  I'm not sure where all the '~' are coming from ---is that the issue?

I apologize, I can't insert content for some reason..., although I can add the worksheeet.
pi_filter_osc_anal.mw

I have a function

f(x)=2*2^x-2

g(x)=-1/2x^2+3/2+5

When I plot by, plot(f(x),g(x) - no problem there.

But I need the intersection to continue my task and when trying to do f(x)=g(x) I get x=RootOf... back.

I've tried solve and a lot of other things, can anyone please help?

Thanks in advance

Best

Hello

I need to find all the variants (I am not sure if this is the correct term to be used but I hope this will be clear in the example) of a specific indeterminate in a given expression.  Here is an example:

alpha[3, 5]*xi[1]*xi[8] + alpha[3, 5]*xi[4]*xi[5] + alpha[3, 3]

For this particular example, xi[1], xi[8], xi[4], and xi[5] are the variables I am looking for. The indexes of xi change depending on the previous calculation.  Also, in some cases, I need the alpha variables instead, that is, alpha[3,5], and alpha[3,3].  

I could not figure out how to use indets in this case.

Many thanks for your help. 

I have a question? from the link: https://www.maplesoft.com/applications/view.aspx?SID=5084&view=html

How can we solve equation 2.1 to achieve solution 3.1 with boundary conditions explained in section " 1) Gaussian solution " ?
is this possible with maple?

Download pdsolve.mw

Consider a function for a sample say

operations := proc(A)

local O1, O2, O3, O4, O5, O6, O7, O8;

O1 := A + 2;

O2 := 2*A;

O3 := A^2;

O4 := A mod 2;

O5 := A + 3;

O6 := 3*A;

O7 := A^3;

O8 := A mod 3;

end proc;

First time when I call operations function as operations(3) the output should come in first row

second time when i call the same function as operations(8) the output should come in second row

Similiarly the third time i call in the third row of the rtable.

In generale senario The rtable can contain say k columns based on the number of outputs in that function called.

And each call of the same function the new output is written in a new row.

Finally we should be able to export this rtable to excel.

BAR_CHART.mw

PLOT.mw

I may be misunderstanding the documentation of implicitplot.  Can someone set me straight?

This is extracted from the implicitplot's help page:

implicitplot(-x^2 + y, x = 0 .. 2, y = 0 .. x);

The plotting range is limited to y ≤ x, as intended.  Let us verify that it does the right thing:

display(
	implicitplot(-x^2 + y, x = 0 .. 2, y = 0 .. x, color=red),
	plot(x, x=0..2, color=blue)
);

Yes, indeed it does.

Now let us try limiting the plotting range to y ≤ 1 − x². Here is what we get:

display(
	implicitplot(-x^2 + y, x = 0 .. 2, y = 0 .. 1-x^2, color=red),
	plot(1-x^2, x=0..2, color=blue)
);

I expected the red curve to lie entirely below the blue curve but it doesn't. Am I misunderstanding implicitplot?

Download worksheet: mw.mw

I prefer using the wotksheet envirionment

How do I make Maple input the default and 2D output the default?

SImilartly how do I change the default font size?

Using the VectorCalculus package in Maple 2020.2, the Jacobian does accept my target function, whereas the Hessian does not. Both the Jacobian and the Hessian need an algebraic expression for its input.

What can I do to make it work?

kind regards, Harry

vectorcalculus_question.mw

Sorry to bother you with a basic question again.

How do I get both the indexes and the values of a table?

Table.mw

The rational expression at the beginning of the code is approximant. p1-p5 are conditions imposed on t, and are to be solved simultaneously to obtain a[0]-a[4] which are then substituted into t to obtain Cf. S1-S4 are to be obtained from Cf and its derivative.

However, I observed that Cf is not providing the desired results. What have I done wrong? Please Can someone be of help?

Thank you and kind regards

restart:
t:=sum(a[j]*x^j,j=0..2)/sum(a[j]*x^j,j=3..4):
F:=diff(t,x,x):
p1:=simplify(eval(t,x=q))=y[n]:
p2:=simplify(eval(t,x=q+h))=y[n+1]:
p3:=simplify(eval(F,x=q))=f[n]:
p4:=simplify(eval(F,x=q+h))=f[n+1]:
p5:=simplify(eval(F,x=q+2*h))=f[n+2]:
vars:= seq(a[i],i=0..4):
Cc:=eval(<vars>, solve({p||(1..5)}, {vars}));
for i from 1 to 5 do
	a[i-1]:=Cc[i]:
end do:
Cf:=t;
M:=diff(Cf,x):
s4:=y[n+2]=collect(simplify(eval(Cf,x=q+2*h)),[y[n],y[n+1],f[n],f[n+1],f[n+2]], recursive);
s3:=h*delta[n]=collect(h*simplify(eval(M,x=q)),{y[n],y[n+1],f[n],f[n+1],f[n+2]},factor);
s2:=h*delta[n+1]=collect(h*simplify(eval(M,x=q+h)),{y[n],y[n+1],f[n],f[n+1],f[n+2]},factor):
s1:=h*delta[n+1]=collect(h*simplify(eval(M,x=q+2*h)),{y[n],y[n+1],f[n],f[n+1],f[n+2]},factor):

After I define a Ckt (a ladder network) such as :

Ckt := [v1(4), R1(50) &+ L2(0.9600), Cp(0.8200), L1(0.5000) &+ R2(0.2000), RL(1.3430) &+ LL(0.1550)]

How would I then use the value of R1 as defined above, for example, in a subsequent calculation?

Assuming the results from Solve are in (sol,rest), how can I use R1 (defined in Ckts)as a variable  --something like:

P_R1_ave := (abs(eval(v[R1], rest))/sqrt(2))^2/Ckt[R1]

t-match_impedance.mw

BTW, I can no longer "insert contents" .  I get the following error:

Maple Worksheet - Error

Failed to load the worksheet /maplenet/convert/t-match_impedance.mw .
 

I have no idea what may have changed --perhaps something on our server?

The following code completes apparently without error on Maple 2020.2, but with Maple 2021.1 I get a deconnection from the kernel:

restart:
with(LinearAlgebra):
A:=Statistics:-Sample(Normal(0,1),[2500,2500]):
U,S,Vt:=SingularValues(A,output=['U','S','Vt']):
Norm(U.DiagonalMatrix(S).Vt-A);

The crash occurs when running the last line.

The code works on both versions with a smaller matrix (256x256).

Is there something obviously wrong with this piece of code, or a change in Maple 2021 that could explain this?

Note: I'm running Maple on Windows 10, the machine has 16 GB RAM, and the memory usage stays low.

I am trying to represent and compute integrals of closed 1-forms in 2 variables (the result of the integral does not depend on the path chosen), I would like them to display in the usual way

$$\int f(x,y) dx + g(x,y) dy$$

ideally both in the inert form (equivalent to the function Int) and active form (int, where Maple would if possible try to express the integral). The only computation requirement for the inert form would be that the x derivative gives $f$, and the y derivative gives $g$.

Is it possible to modify the possible arguments of the functions Int, int, such that they accept to represent such integral and implement a program to compute them if possible?

I know how to write a program to compute this, but the output display will not use the symbol $\int$ and will not behave nicely when differentiating.