Hello Everybody

for Solving a parabolic Inhomogeneous  PDE, I used the Green's Function,

I tried to simplify the Inhomogeneous term, But still can not calculate the answer.

this is my file : W111.mw

Please HELP !

I like the pretty print of maple, and I want to print the output to a file instead Maple document (if it could be, print in both of 2).

For example:

exprs := [ (a*x + b)/sin(x) = 0, (a*x^2 + b*x + c)/(d*x + e) = 0 ]:
print~(exprs);

And my output text file may be somthing like this:
                          a x + b    

As an exercise to find the solution of this equation,

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

Maple 14 and 15 provide no answer, which preceding releases found to be x = 19,

but complain about a "numeric exception: division by zero"!

     Is that progress with Maple?

> r= r*cos(theta) + r*sin(theta);

le the ODE, ode.

> G=6.67 * 10^(-11);

> F1=(m*a);

> F2=(-G*M*m)/(abs(r^(3)));

> solve(m*a)=(-G*M*m)/(abs(r^(3)));

11_1_eng.mw This Maple worksheet Ukrainian students have downloaded 84.581 times a week. ("ZNO")

> with(DifferentialAlgebra:-Tools);
Error, `DifferentialAlgebra` does not evaluate to a module
with(DifferentialAlgebra):
> with(DifferentialAlgebra);
Error, invalid input: with expects its 1st argument, pname, to be of type {`module`, package}, but received DifferentialAlgebra

don't know why maple 12 give these error, how to import differentialalgebra package?

I was warming by Maple that:

Warning, Exception in unload function 'free': Error, (in _free) invalid dictionary ID

What is it? I have no information about this warning.

I would like to calculate the power series solution of a set of ODEs. However, I know that this power series will contain non-integer coefficients, which are dependent on a (rational) parameter of the system, α. I'm solving the ODE by power series in the usual way, that is, by defining each of the solution variables as a function with the first few terms of their power series (with unknown coefficients), substituting these into the ODEs, and finding a series of the ODE which should be of the form:

Hi All,

I am trying to solve set of equations after applying boundary conditions.  There are 4 coefficients which I have to find by solving following 4 equations;

I tried to solve using the command solve({A, B,C,D},[E,F,G,H]), but it just returns [],  does anyone know which command to use for backward substitution of coefficients.  Also if I try to solve it separately, it says "recursive error"

Your help will be appreciated

Thanks

I opened one of my worksheets this morning and started executing it using the ! tool. When it came to the first plot command, it replaced the previous plotted output by the following:

1 ************                                                                
  +          **********                                                       
  +                   ******                                                  
  +                         *****A...

Hello everybody

I need to simplify (or even approximate ) a huge expression which is a two-variable function of x and t,

including  SinCos and Exp. ( it's length is like 10 pages ! )

I tried everything but nothing worked.

Please HELP !

it starts like this:

Q(x,t):=

Hello, 

I am just starting to learn about maple.

I have a graph of two functions and would like to find the range that they agree within

 a certain percentage using fsolve() and format the interval as a list. 

The part that is throwing me off is the within a certain value part.  Thanks in advance!

where is wrong?

illegal use of a formal parameter

evolf := proc(z, f, terminal_counter)
h1 := z + f;
h2 := z - f;
h3 := z*f;
h4 := z+diff(f,x);
h5 := z-diff(f,x);
h6 := z*diff(f,x);
h7 := subs(x=z, f);
N := 7;
test := [h1, h2, h3, h4, h5, h6, h7];
print(test);
fitness := [0, 0, 0, 0, 0, 0, 0];

if terminal_counter > 5 then
    return fitness;
end if;

total_fitness := 0;
for i from 1 to N do

I've been using LagrangeMultipliers to solve a problem. Solutions returned involve RootOf.

What I want to do is extract the expression within RootOf() so that I can do fsolve() on that.

The expr from RootOf is a 6th order polynomial in _Z.

I've tried convert(RootOf(...), radical), but it doesn't work very well on polyhnomials of order greater than or equal 5.

Any suggestion(s) for this extraction that I want ?

A := C/H/k*Q/R1/R2/(-1+R1)*(Q*R2*R1-R1*R2+1)-2*C*Q*(R1*R2+1)/H/k/(-1+R1)/R1/R2;

plot14:= plot(subs({Q=6,R2=8.75,k=4,C=1.96,H=7},A),R1=0..1,color=blue):

display(plot14,view=-15..10);

points:=op([1,1],plot14):

writedata("c:/khan/plotdata.txt",points,float);

Error, (in writedata) Bad data found undefined

Any one there?