This is my code

restart; L := [];
for a from -10 to 10 do
for b from -10 to 10 do
for c from -10 to 10 do
k := (-a*b*c+a*b*z+a*c*y+b*c*x)/igcd(a*b, b*c, c*a, a*b*c); if a*b*c <> 0 then L := [op(L), [[a, 0, 0], [0, b, 0], [0, 0, c]], k*signum(lcoeff(k)) = 0] end if end do end do end do; nops(L); L

I think my code was error, because  a from -10 to 10. 

[Delta][4*4]*{b}[4*1]={0}

Which {b} is an eigenvector

When I try the example from Maple Help for LPSolve (I use Windows)

with(Optimization);
LPSolve(-4*x-5*y, {0 <= x, 0 <= y, x+2*y <= 6, 5*x+4*y <= 20});

I do not get the same solution like in the example: [-19., [x = 2.66666666666667, y = 1.66666666666667]]
Instead I get

Warning, problem appears to be unbounded
            [0., [x = HFloat(0.0), y = HFloat(0.0)]]

My Professor uses the same version, but with Linux and do not have such problems. Why my installation does not solve the standart Help example?

Thank you

Hi

Let D={ Z=x+I*y,    -Pi*(n+1/2) <= x, y <= Pi*(n+1/2)}  

z belong the boundary of the previous square.

I would like to compute the modul of this function  f (z) =  coth(z) using the usual function  cos(x) cos(y), sinh(x) or cosh(y)  and show that | f(z)|  is less than one

Many thanks for any help

Hello, im a total begineer with maple and i need help defining a matrix, i need to get this into a matrix

 anyone knows how could i put this in a matriz of n x 1?   (the one thats only a column)

any help would be greatly appreciated

Thanks in advance!

Hello I was trying to manipulate maple to write a procedure checking a matrix , say A with n rows and n columns. That matrix A given any row/column the sum of the entries for every row and column are equal. For example matrix [(-1,2)(2,-1)], every row and column in this matrix sums to 1. The entries in the matrix can be any real number.

Put x=f₁(t₁,t₂,t₃), y=f₂(t₁,t₂,t₃), z=f₃(t₁,t₂,t₃).  

The question is that: How to plot all points of form [x,y,z] with t₁ in [a₁,b₁], t₂ in [a₂,b₂], t₃ in [a₃,b₃].

Thank you.

hi.

please help me for remover this problem.

''''

-Float(infinity)*signum((5.*A3*A1-24.*A2^2)*A1/A2^2)''''

ReducedCantiler.mw
 

Download ReducedCantiler.mw

Hello.

I've just installed Maple 2015 and when I started it, this happened

It seemed that something was wrong with the graphics or java. But I really don't know what to do next.

Please help me, thank you.

Say I define the following variables.

These are all nineth roots of unity. An equivalent definition would be:

In fact, the following code shows that aa[i] /a[i] =1 for all i, so one would concluse aa[i]=a[i]:

for i to 9 do 
simplify(a[i]/aa[i])
end do

But when I try to check via "Equal":

I get as output

                              true
                             false
                             false
                             false
                             false
                             false
                              true
                             false
                             false
The problem goes even further since one representation is accepted as a solution of a linear equation system while the other is not.

Another curiosity:

gives just the same expression, whereas simplifying the same expression to the third power gives 0.

Guys,

I am not very familiar with Maple and have to solve quite a complex equation.

I have an equation which is complex ,containing I . I split this equation up in Re=0 an Im=0 . I have to get an answer in function of other parameters, in order to plot these... Maybe it s easier if you look at the work sheet

Download operationele_inductanties.mwoperationele_inductanties.mw
 

How to find the integral of  over the part of the unit ball  centered at the origin which lies in the positive octant  ? Numeric calculations suggest .

How to find the double integral of  over the disk of radius  which is centered at the origin? 

Here is my try 

restart; evalf(VectorCalculus:-int(sin(x^2)*cos(y^2), [x, y] = Circle(`<,>`(0, 0), 1), inert), 15);
                       0.722091449378409
identify(%);
                       0.722091449378409

Hello people in mapleprimes,

I want to modify the following expression a to b. For it, I used c code.
But, as seen in d, just using c returns a. Originally, I intended phi being between 0 and 1, so
that 1-phi >0. Isn't any better way to modify a to b? and it is better to have maple sort expression remembering 1-phi to be positive, and to have maple give any priority to it in modifying a to b.

a:=(-2*theta+1)*phi/(phi-1)+theta;
b:=(2*theta-1)*phi/(-phi+1)+theta;
c:=simplify(-1*numer(op(1,aa)))/simplify((-1)*denom(op(1,aa)))+theta;
d:=simplify(c)
(-2*theta+1)*phi/(phi-1) + theta

I will be very glad if you borrow me your idea.

Thank you in advance.

Dear all, 

We are trying to use a fortran subroutine in maple using external calling. I was able to get the 'multiply' example working. i.e. through the steps descibed here: http://www.mapleprimes.com/questions/203646-External-Calling-FORTRAN-Dll--Error 

My mult.f looks like this: 

    subroutine multiply(a,b)
    real a,b,mult
    mult=a*b
    return 
    end

It simply takes two arguments (Real), and returns the product. I used the following commands to build the dll: 

1. gfortran -c mult.f        ## This creates the object file mult.o, which is used later. 

2. gfortran -shared -mrtd -o mult.dll mult.o ## This creates the dll and can be used in maple. 

The command in maple looks like this : 

mult := define_external("multiply",LIB="C:/shared/mult.dll",FORTRAN,'a'::(float[4]),'b'::(float[4]), RETURN::(float[4]));

And finally, 

mult(3., 3.) ## works, if it gives the correct output. 

Few things to note here are: 

1. The dll has to be generated from inside the Cygwin64 shell, with cygwin64/bin in the system path. 

2. This only worked for (some) 64-bit Maple version (Maple 2016 Standard). 

The reason, I repeated a working example, was because I tried following the same steps for the more complicated case, however without success so far.  This post explains an approach on how to pass a subroutine as an argument to a fortran subroutine in the dll. http://www.mapleprimes.com/posts/37031-Calling-An-External-Routine-That-Needs However the post is old and the steps did not work for me. 

My system is as follows: 

1. Fortran file to generate the dll, takefunc.f , takes a subroutine as an argument and calls it. 

    subroutine take(func)
    external func
    call func()
    end

2. Fortran driver file to verify that the dll generated through this program works: 

    PROGRAM main
    external take, fun
    call take(fun)
    END
    
    SUBROUTINE fun()
    PRINT *, "This is a nice one"
    END

I want the step 2 to be performed in maple, i.e. fun() should be a maple procedure, and we should be able to use either WRAPPER or second dll to use take() in maple. 

I want the process to work with latest maple versions and compilers, Windows7 64-bit or 32-bit (and hopefully later). F77 is fine. 

Regret the long post, will keep this post updated if I make any progress. Any guidance in this matter is highly appreciated. Anyway to make define_external spew more debug information will also help. 

- Chintan Pathak 

Research Scientist,

ChemE, University of Washington.