## 1401 Reputation

7 years, 165 days

## Try:...

```func := 2*omega^2*B[1]*Zeta*omega[0] - omega^3*B[1]*I + omega*B[1]*omega[0]^2*I - 2*I*B[0]*Zeta*omega*omega[0] - B[0]*omega^2 + B[0]*omega[0]^2;

(evalc(func) assuming (B[0] in real, omega[0] in real, omega in real, Zeta in real, B[1] in real));

#2*omega^2*B[1]*Zeta*omega[0] - B[0]*omega^2 + B[0]*omega[0]^2 + (-2*Zeta*omega*B[0]*omega[0] - omega^3*B[1] + omega*B[1]*omega[0]^2)*I```

## You can find x in terms of y(x) using so...

You can find x in terms of y(x) using fsolve command.Analytical solution is  impossible.

 >
 >
 (1)
 >
 >
 >
 (2)
 >
 (3)
 >
 >
 >
 >
 >
 >

## Only approximation....

This is Abel diff equation and I doubt there's a closed form for this differential equation.I checked this PDF and I did not find any solution.

 >
 >
 >
 (1)
 >
 (2)
 >
 (3)
 >
 (4)
 >
 >
 (5)
 >
 (6)
 >
 >

## Maybe like this.See  in attached fi...

Maybe like this.See  in attached file.

## Exact numbers:...

Using identify command:

 >
 >
 (1)
 >
 >
 >
 (2)
 >
 (3)
 >

## Use...

Use ":=" not "=" defining sys.

sys := {1800*40 + 15*300*30 - 30*Biy = 0, -1800 + Biy + Ciy - 300*30 = 0};

solve(sys, {Biy, Ciy});

#{Biy = 6900, Ciy = 3900}

fsolve(sys);

{Biy = 6900, Ciy = 3900}

## Workaround....

In Maple fourier transform is weak and  Maple can't find it ,thats wee need a workaround.

 >
 >
 >
 (1)
 >
 (2)
 >
 (3)
 >
 >

## By numeric...

I doubt there's a closed form(symbolic solution) for the Inverse Laplace.

```I do not have the source of the code and the author who made it available,because I do not remember which web-page I copied from.
```

With numeric Inverse Laplace:

 >
 >
 (1)
 >
 >
 (2)
 >
 >
 >

## Yes...

Yes,MAPLE have capabability to do multidimensional FTs,but is very weak.

 >
 >
 >
 (1)
 >
 (2)
 >
 (3)
 >
 (4)
 >
 (5)
 >
 (6)
 >
 (7)
 >
 (8)
 >
 (9)
 >
 (10)
 >
 (11)
 >
 (12)
 >

## simplify(evala(f))...

```simplify(evala(f)) assuming x>0

#1/(sinh(x)*cosh(x))```

 >
 >
 (1)
 >
 (2)
 >
 (3)
 >
 (4)
 >
 (5)
 >
 (6)
 >
 >
 >

## On Maple 2019...

Solution is not displayed in Maple 18,because pdsolve support for PDE's equations is still somewhat limited,
so don't be surprised if some things don't work yet.

Solution by Maple 2019:

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

## Maple 2019...

You're out of luck,probably version issue.

In Maple 2019 solve command is updated and solve your problem.

restart;

eq := 0.1 = 23.714*(-0.93205)^2/(20.3 + 61.4*0.884^x);

solve(convert(eq, rational), x);

#ln(1955501/646542)/ln(221/250)

Or using fsolve:

f := a -> fsolve(eq, x = a);
map(f, -10});

#-8.976314317

## Maple 2019...

On Maple 2019;

int(1/(1 + x + y + z)^3, z = 0 .. 1 - x - y, y = 0 .. 1 - x, x = 0 .. 1);

#-5/16 + ln(2)/2

## Similar way:...

The following code returns all pairs  [a,b]  for which a solution exists.

restart;

f := (a, b) -> irem(b*a, 10000):

N := 5000:# (Increase it if necessary)

L := []:

for a to N do

for b from a to N do

if f(a, b) = 2391 then L := [op(L), [a, b]];

end if; end do; end do;
L;

 5 6 7 8 9 10 11 Last Page 7 of 18
﻿