I have a for loop :

for n to 20 do 'A'^n = A[1]^n end do

Is it possible to change the way the output is displayed ? Right now its just on in one collum in the document, and a row for each do. Is it possible maybe to set it up in 2 collums or even 3 ?

Dear Forum

Lets say, I use the simplify function to process some expression and it returns x*x. On the paper, I find x^2. How can I use Maple to verify that x*x==x^2?

Thanks for any hints.

How to do subj? Straightforward way doesn't compile:

restart;

myint:= proc(u::float)::float;
return int(exp(x^6), x=0.0..u);
end proc:


createcomp:=proc (expr::evaln, exprfunc::evaln);
exprfunc:=(v::float)->unapply(evaln(expr),a)(v);
return Compiler:-Compile(exprfunc,optimize);
end proc:
global_expr:=myint(a)+a^a;
s:=createcomp(global_expr, global_exprfunc);

"Error, (in Print) cannot translate value of lexically...

How can i trunc (find closest integer) each element in a matrix ? 

This is my matrix equation:

for n to 20 do 'CD'^n, 'F' = evalf(C[1].D[1]^n.F[1]) end do

And i want to show  "trunced" results

How can the ?DifferentialGeometry package be used to apply a vector (derivative) to a scalar?  I thought Hook might be used here, but I don't know that there is a way to express a scalar as a 0-form.  Consider

with(DifferentialGeometry):
DGsetup([x,y],E2):
Hook(D_x, x^2);
Error, (in DifferentialGeometry:-Hook) expected 2nd argument to be a differential form or bi-form. Received x^2

> eqns := {(x[1]+1)^2+y[1]^2 = (x[2]-1)^2+y[2]^2, (x[1]-c[1])^2+(y[1]-c[2])^2 = (x[3]-1)^2+y[3]^2, (x[2]-c[1])^2+(y[2]-c[2])^2 = (x[3]+1)^2+y[3]^2, y[1](x[3]+1) = y[3](x[1]+1), y[2](x[3]-1) = y[3](x[2]-1), (x[2]-c[1])(y[1]-c[2]) = (x[1]-c[1])(y[2]-c[2])};
print(`output redirected...`); # input placeholder
 /          2       2            ...

The variable A is a matrix in Maple. I need to show A, A^2, A^3, ....., A^19, A^20, and that i do by making a for loop:

    for n to 20 do A^n end do

And it works and shows correct results.. 

But i want to show more than just the result of each step in the for loop. 

The result right now is without variable name etc. How can i show more than just the result ? ... 

I have changed the Typesettinglevel to extended.

Hello guys,

I am unfamiliar with maple and have problems with dsolve complex system:

dz*_i/dt=sum(sum(z_i-z_j),j=1..2),i=1..2).

where i not equal to j and z* is conjugate(z).

here is my code:

for i from 1 to 2 do

summ(i)=0

od;

for j from 1 to 2 do

for i from 1 to 2 do

if i <> j then

summ(i)=summ(i)+(z_j(t)-z_i(t));

end if

od;

od

for j from 1 to 2 do

Dear Forum

I'm trying to evaluate the following expression:

The value of the integral should equal 1 and from that the value of the normalization constant N can be obtained. It should equal sqrt...

ggg:=(y,a,b)->
(2*(-a+6*y^2*a^2+2*b*y^2*a^2+9*b*y^3*a+3*b*y^2*a+b*y^6*a^2+4*b*y^5*a^2+5*b*y^4*a^2+2*b*y^5*a+8*b*y^4*a+3*b*y^3*a^2+4*b*y^2-y^3*a-3*y^2*a+y^6*a^3+5*y^5*a^3+8*y^4*a^3+4*y^3*a^3+y^5*a^2+5*y^4*a^2+9*y^3*a^2+b*y^4+4*b*y^3+y*a^2+2*a*b*y+y^3*a*(y+1)^(-2*b)+a*(y+1)^(-2*b)+3*y^2*a*(y+1)^(-2*b)+3*y*a*(y+1)^(-2*b)-2*y^2*a^2*(y+1)^(-2*b)-y*a^2*(y+1)^(-2*b)-3*y*a-y^3*a^2*(y+1)^(-2*b))/(y^2*(a+b)*(y+1)*(y+2)^2*(y*a+1)^2)+(-2-y^2+2*y^2*a^2-2*y+4*b*y^3*a+8*b*y^2*a+2*b*y^4*a^2+4*b*y^3*a^2...

 Hi all,

I'm trying to use the geometry module. I tried the following code:

> with(geometry);
> point(A, xA, xB);
A
> point(B, xB, yB);
B
> line(AB, [A, B]);
line: One of the following conditions must be satisfied xA-xB <> 0 xB-yB <> 0
Error, (in geometry:-line) not enough information: the line is not defined

As you can see, maple is unable to create the line object since the two points can be the same....

calchas:~ sedoglavic$ maple
    |\^/|     Maple 14 (APPLE UNIVERSAL OSX)
._|\|   |/|_. Copyright (c) Maplesoft, a division of Waterloo Maple Inc. 2010
 \  MAPLE  /  All rights reserved. Maple is a trademark of
 <____ ____>  Waterloo Maple Inc.
      |       Type ? for help.
> 264 ;
      ...

Hello,

I have downloaded the quaternion package in Maple but I can't figure out how to plot them. According to the help page I need a package 'with(Plots)' (with a capital P for plots). Has anyone had any success in plotting quaternions? I'd really appreciate some help.

Thank you.

What is the total number of the nonnegative integer solutions of the system
{x+2*y+5*z-10^2012<=0, x+3*y+4*z-10^2012<=0}?
Edit. Bad copy and paste and  the tags.

What is the total number of the natural solutions of the equation
2*x+3*y+5*z+8*t-10^2012 = 0? How to find it with Maple?