## Place numerator after denominator?...

I have a Maple result presented in the first (top) formula which I would like to format as in the second (bottom) formula:

Can this be done? This is Maple 2016.1

## Fractional differential equation...

Hi!

I am simulate the code for fractional differential equation. But the out put is not wright...
sir_(2).mw

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

## Spherical wave reflected from cylinder...

Dear all,

I would like to find a way to make the reflection of a spherical wave inside a tube (a cylinder). You have herafter an exemple of a sphere increasing inside a tube, but without the reflections...

Any idea how to do this?

Thanks a lot for your help.

## Roots of the characteristic polynomial ...

how i can calculate roots of the characteristic polynomial equations {dsys and dsys2}and dsolve them with arbitrary initial condition for differennt amont of m and n?thanksKr.mw

 (1)

 (2)

 (3)





## A problem in using Grid[Launch]...

Hi all,

I start working with the Grid package.
To familiarize myself with it I ran the "primeChecker" example, which of course has worked perfectly well.

Next I did this (a priori harmless) simple modifications :

1. within the primeChecker procedure :
replace  myVal := userData[thisNode+1] :
by         myVal := userData[thisNode+1, 1] :
2. before launching the procedure with Grid[Launch] :
replace  userData := [ .... ] :  #which is a list
by         userData := [ .... ] :  # the same thing
userData := convert(userData, matrix):

I get the following error message :
error, (in unknown) Matrix index out of range

What does it mean and how can I fix this ?

## Algebraic equation over reals...

I have problem to get real answer in a simple equation. maple just give me complex answer.

how i can get parametric real answer? Ihave trid this two way but not applicaple.

with(RealDomain); assume(T::real)

My code is:
Qz := 7.39833755306637215940309264474*10^7*sqrt(1/T)*(T-297.2)/T-16242.7935852035929839431551189*sqrt(1/T)/T;

q := (.6096*(299.2-T))/(sqrt(1.60000000000000000000000000000*10^(-9)-r^2)-0.346410161513775458705489268300e-4);

with(RealDomain); assume(T::real);

e := simplify(solve({0 = q-Qz}, {T}))

and the result like:

e := {T = 1/RootOf(-609600000000000000000000000000000000000000000000000000000+(879515018020273730453559011332895956000000000000000000000000000*sqrt(-625000000*r^2+1)-761682348615485390130551939524898425387968750740910059296172487)*Z^5+(-2959335021226548863761237057896000000000000000000000000000000*sqrt(-625000000*r^2+1)+2562859306691152293409465394507279449380503585614734443742000)*_Z^3+182392320000000000000000000000000000000000000000000000000000*_Z^2)^2}

dose anyone hase any opinion?

## Maple does not save some variables?...

Hello

I have experienced that maple does not save all of the varibles. But some it does.

I calculate with units, could that be the reason?

I have allso been thinking that it has something to do with saving the document online in onenote. But that works like the file is saved on the Pc's harddrive.

Are there anybody else that has experienced this?

I calculate with units, but as the varible does not appear in the calculation with units, I make one varible with the same result, to get the next calculation to work.

Regards

Heide

## Is evala/toprof command in new Maple versions?...

Does evala/toprof still exist in newer Maple versions, or is there an equivalent?

## Why won't this procedure compile?...

Why won't this procedure Compile? All I get is a cryptic and ungrammatical error message.

step:= proc(
n::integer[4],
XYZ::Matrix(datatype= float[8]),
E::Vector(datatype=integer[4]), F::Vector(datatype=integer[4]),
W::Matrix(datatype= float[8]), #3x2 scratch matrix
mu::integer[4]
)
option autocompile;
local
i::integer[4], j::integer[4],
ed::float[8],
fd::float[8],
p::float[8], t::float[8]
;
to mu do
for i to n do
ed:= 0;  fd:= 0;
for j to 3 do
p:= XYZ[i,j];
t:= XYZ[E[i],j] - p;
ed:= ed+t^2;
W[j,1]:= t;
t:= XYZ[F[i],j] - p;
fd:= fd+t^2;
W[j,2]:= t
od;
ed:= sqrt(ed) + .01;  fd:= sqrt(fd) + .01;
for j to 3 do
XYZ[i,j]:= 0.995*XYZ[i,j] - 0.01*W[j,1]/ed + 0.02*W[j,2]/fd
od
od
od
end proc;
Compiler:-Compile(step);

Error, (in Compiler:-Compile1) In memory compilation failed

## Integral of complex function...

Dear all,

I have somme difficulties to calculate this integral.

int(I*sqrt((R*exp(I*theta)+1)/(R*exp(I*theta)-a)), theta = 0 .. Pi);

Thanks

## A strange result from dsolve...

Hello guys,

I was just playing around with differential equations, when I noticed that symbolic solution is  different from the numerical.What is the reason for this strange behavior?

ODE := (diff(y(x), x))*(ln(y(x))+x) = 1

sol := dsolve({ODE, y(1) = 1}, y(x))

a := plot(op(2, sol), x = .75 .. 2, color = "Red");
sol2 := dsolve([ODE, y(1) = 1], numeric, range = .75 .. 2);

with(plots);
b := odeplot(sol2, .75 .. 2, thickness = 4);
display({a, b});

Mariusz Iwaniuk

## Problem with KelvinBei function...

Hello,

I need to crate a function to be evaluated in a range of values, and this function i would to use in other expression, example:

cel1      "seq(i,i=0.001..2,0.001)"

cel2      "A:=&1";cel1

cel3      "f:=x->diff(KelvinBei(0,x),x)"

cel4      ""B:=map(x->f(x),[A])"

This is ok with a lot of function but with diff(KelvinBei(0,x),x) in cel4 show this error "Error,(in f) invalid input:.1e-2, which is not valid for its 2nd argument.

Why??? How can I do??

## Strange result for the evaluation of a sum...

Hello guys,

I was just playing around with the Shanks transformation of a power series, when I noticed that polynomials aren't evaluated as I would expect.
I created this minimal working example; the function s should evaluate for z=0 to a[0], however it return simply 0.
Is there something I messed up?

 >
 >
 (1)
 >
 (2)

The value of s in z=0 should be a[0], however it returns 0:

 >
 (3)
 >
 (4)

Sören

## Kummer Function...

Hi all,

It is believeble for me that the KummerU function is infinite or has a singular solution at r=0;

but without the command D(R) and dsolve ({er, D(R)(0)=0}, {R(r)}) that show the r=0 is a singular solution for the R(r), how could I prove it without using of these commands: for example is plotting of this function applicable??

while we have not the value of the  \lambda

 (1)

 (2)

 (3)

 (4)

 (5)

## Spherical wave reflected from plane...

Hi all,

I am generating a sphere with increasing radius that interacts at some point with a plan, just like this:

I would like to find a way to make the sphere "wave" (I agree this is not a wave...) reflected by the plan as in a mirror.

How could I do that ?

Thanks a lot for your help.

B

 First 807 808 809 810 811 812 813 Last Page 809 of 2122
﻿