## Avoiding the "roots of complex number"...

Hello,

I'm encountering an issue with the "roots of complex number" message while running my Maple code. Maple seems unable to solve this problem for me.

I would greatly appreciate any ideas or suggestions that could help me resolve this error.

Vib-code.mw

## Error, (in anonymous procedure called from depends...

I still see these Maple internal errors in Maple 2024.

Now calling odetest.

The problem is that it is not possible to catch them.

Any suggestion what to do and what causes it?

 > interface(version);

 > Physics:-Version();

 > sol:=y(x) = (exp(RootOf(-sin(x)*tanh(1/2*_Z+1/2*c__1)^2+sin(x)+exp(_Z)))+sin(x))/sin(x); ode:=diff(y(x),x)-cot(x)*(y(x)^(1/2)-y(x)) = 0;

 > try    odetest(sol,ode,y(x)); catch:    print("cought error "); end try;

Error, (in anonymous procedure called from depends) too many levels of recursion

## How does one insert unusual Math symbols in a text...

Hello:

I have created a simple plot and labelled a line as follows

Lbl:=plots[textplot]([600,-Pi*floor(R)*ln(R)-0.01,typeset(-pi*floor(r)*ln(r)),font=[Helvitica,bold,10]],labels=[T," "]):

where R is a number, so the label appears near where I want it to be:

But part of the formula is floor(r) and I can't make that appear as the 2D mathematical symbol for floor(r) in the typeset;

If I make the typeset part of an axis label or a legend, I can cut and paste the math2 expression for floor(r) just before I export the plot and that works, but how do I do that for a textplot that is sitting in the middle of a plot?

Thank you.

## How can I define a linear transformation?...

Dear All,

I want to define a linear transformation called T, an operator on the variable x. This transformation is such that, for example, the transformation T(alpha__1*x^2*y+alpha__2*x^4*t+alpha__3*t*y) returns alpha__1*y*T(x^2)+alpha__2*t*T(x^4)+alpha__3*t*y*T(1).

Can anyone help me in this matter? At this stage of the work, I don't have a precise definition of this linear transformation.

T(alpha__1*x^2*y+alpha__2*x^4*t+alpha__3*t*y)=alpha__1*y*T(x^2)+alpha__2*t*T(x^4)+alpha__3*t*y*T(1);

Best wishes

## Mma to Maple of Monte Carlo Integration code...

Hopefully, this is a question relating to Mathematica, which I find virtually unreadable, and the Statistics package, which I am minimally familiar with, that someone can answer quickly.

Hence, could someone translate the following Mathematica code into Maple code? (The MmaTranslator failed at the 2nd line.)

```func[x_] := 1/(1 + Sinh[2*x]*(Log[x])^2);

Distrib[x_, average_, var_] :=   PDF[NormalDistribution[average, var], 1.1*x - 0.1];
n = 10;
RV = RandomVariate[TruncatedDistribution[{0.8, 3}, NormalDistribution[1, 0.399]], n];
Int = 1/n Total[func[RV]/Distrib[RV, 1, 0.399]]*Integrate[Distrib[x, 1, 0.399], {x, 0.8, 3}]```

## how to simplify this simple expression?...

hi , there is a simple expression ,

1D-input code:

3*G*(`&Delta;&gamma;`*H - `&sigma;y`(`&Delta;&gamma;`) + q)/(-q + `&sigma;y`(`&Delta;&gamma;`))^2;

and I want to simplify it like below ,but failed  ,

hope for the result:

3*G*`&Delta;&gamma;`*H/(q - `&sigma;y`(`&Delta;&gamma;`))^2 - 3*G/(q - `&sigma;y`(`&Delta;&gamma;`));

then  I'd like to use algsubs , but again  a error occurs.

1D-input :

algsubs(3*G*`&Delta;&gamma;`/(q - `&sigma;y`(`&Delta;&gamma;`)) = y, 3*G*`&Delta;&gamma;`*H/(q - `&sigma;y`(`&Delta;&gamma;`))^2 - 3*G/(q - `&sigma;y`(`&Delta;&gamma;`)));

hope for some suggestions . thanks!

## odetest does not validate correct solution for fir...

I think I found another clitch in odetest.

dsolve gives correct solution to this first order ode with IC. But odetest does not verify that the solution is satisfied for the IC part, but only for the ode itself.

Below worksheet confirms the solution is also valid for the IC.   So why odetest does not give 0 for the IC part?

 > restart;

 > interface(version);

 > Physics:-Version();

 > libname;

 > ode:=x^2*diff(y(x),x)*cos(y(x))+1=0; ic:=y(infinity)=Pi/3; #16/3*Pi; sol:=dsolve([ode,ic]); odetest(sol,[ode,ic])

 > #we see that odetest think the solution does not verify the IC. But it does
 > IC_eq:=Pi/3=limit(rhs(sol),x=infinity)

I think what odetest did is not use limit when plugging in the values. That is why.

If we do not use limit, this is what happens:

```IC_eq:=Pi/3=eval(rhs(sol),x=infinity)
```

And this explains the odetest output. It should have used limit.

ps. just in case also reported to Maplesoft support.

## develop solid forms...

Hi, I am trying to illustrate the concept of solid areas, and I'm wondering if there's a way to easily develop them (representing each of their faces in two dimensions on the same plane) using Maple? Thank you for your help

SolidesDév.mw

## Trouble with AI Formula Search...

Every last query I make in the AI Formula Assistant returns this message...

This happens even when I use a basic canned query shown in use-case examples (e.g., surface area, sphere).

I have accepted the Terms of Use.  Is there some other setting I need to enable? Thanks.

## Something weird with dsolve and Heaviside function...

For the following program using dsolve to solved a differential equation with a sum of exponential inputs, the time required has a huge dependence on subtle difference in paramters.

For example, if Cl := 0.32, calculation time is 1.4 sec.    If Cl := 0.33,  calculation time is 39 sec.

Also, calculation time seems to have huge dependence  on whether or not I truncate M

Can someone please explain what is going on?

restart;
st := time();
N := 4;

T := 5.0/60;
M := 6905;
dose := t -> M*sum(Heaviside(t - 24*k/N)*exp((-t + 24*k/N)/T), k = 0 .. 2*N - 1);
Cl := 0.32;
deq := diff(C(t), t) = dose(t) - Cl*C(t);
sol := t -> rhs(dsolve({deq, C(0) = 0}));
p := plot(sol(t), t = 0 .. 48);
time() - st;
1.360

## How do I solve a Blasius problem in Shooting metho...

I tried to solve a Blasius problem (available in maple), but I have an error. How to solve this issue.

## Icons dissapearing...

What might be the reason for the GUI loosing icons during a session? It looks like this

Mouse over let the icons reappear.

This problem is not new to me and only happens from time to tim

The only thing I can say is that I didn't see it after restarting Maple.
And: Only the icons on the left-most disappear.

Everything under Windows 10

Has anyone seen the same thing?

Any idea how to fix this?

## how to solve system of equation to get answer with...

I'm trying derive the equation for a matching resistor pad.  In order for me to get a solution (eg for R2), I had to "manually" solve the one equation and then substitute the resulting value in the other.  Why doesn't solve do the same thing?

 >
 >
 (1)

 >
 (2)
 >
 >
 (3)
 >
 (4)
 >
 >
 (5)

 >
 (6)
 >
 (7)