I know Maple has/had opensource ideas behind it, that's why

interface(verboseproc=3)

print(sum)

allows seing source code for function sum, but what if I want to see the source code for local procedures in Statistics module,

for example

print(Statistics[Distribution])

>proc() local T; try if type(args[1],':-ProbabilityDistribution') then if nargs=1 then return eval(args[1...

I am trying to translate the following Mathematica code into Maple, but am having a lot of difficulties finding the equivalent commands.  Could you please help?

Table[ Partition[ Take[ Flatten[ t ], {k, 3*Length[ t ], 3} ], cols ], {k, 1,3} ]

Note: t,k, and cols are all variables

I'm trying to create Skewed Normal distribution with the following PDF

I'm using the following command for that (referenced from http://en.wikipedia.org/wiki/Skew_normal_distribution

Dear Maple users

I have been looking for the list of fonts used by Maple, but couldn't find it. Can someone refer me to it? I am installing lots of programs on a new computer, and since some of them are graphics programs, I get a load of fonts thrown in my Windows Font folder. Therefore it is my intention to remove a lot of the unnecessary fonts. But I don't want to remove the ones used my Maple, so I will...

Dear all, 

I'm using the maple command in MacOS. While doing some computations, Maple periodically prints out the GC information such as:

memory used=444.9MB, alloc=184.7MB, time=7.75

I'm wondering how to tell Maple to only suppress those information? I also noticed that maple has an option -q to suppress such information, however, that option is too powerful which suppress other useful pretty printings too, which is not what i want.

Thanks,

hi, in following commands what is wrong :

s define before. i sure it's error related to dsolve. i want to have f[i](x):= dsolve({s[ii], ics[ii]})

for ii from 1 to 6 do ;
ics[ii]:=f[ii](0)=0,D(f[ii])(0)=0,D(f[ii])(10)=0;
ans := dsolve({s[ii], ics[ii]}) ;
 f[ii](x):=ans
od:

thanks

hi

i want to write these commands in maple but i dont khnow how to wirte :

do i=1,10

ans = i*2

f(i)=ans

end do

above code written in fortran patern and i want maple patern. for example i try these command but it doesnt work.

for ii from 1 to 10
 do ii*2
 f[ii](x):=%
end do

I'm looking for an older worksheet called something like 'Basic Jet Engine Model' originally created for Maple V. 

Does anyone recall such a worksheet?

Hi all,

 I am trying to solve a system of pde's to get an analytical solution in maple. here's the system:

pde1:=diff(Ti(r,t),t)=(1/r)*diff(r*diff(Ti(r,t),r),r);

bc1:=Ti(r,0)=1,D1(Ti)(0,t)=0,D1(Ti)(1,t)=D1(To)(1,t);

pde2:=diff(To(r,t),t)=(1/r)*diff(r*diff(To(r,t),r),r);

bc2:=To(r,0)=0,D1(To)(1,t)=D1(Ti)(1,t),D1(To)(1.5,t)=0;

sys:=[pde1,pde2,bc1,bc2];

sol:=pdsolve(pde);

Error, (in pdsolve/sys) the input system...

In Maple (v13), how can you present a step-by-step solution in a document where each step :

1. Follows on from the previous line;
2. The equal signs are (vertically) lined up underneath each other; and
3. There may or may not be a LHS (there isn't if the LHS hasn't changed).

I suspect you need to use a table, but with this idea in mind I still cannot work out how to do this.

Hope this all makes sense.

[moderator edit:...

I have no idea what happens here:

restart;(a+3)^17;expand(%);

s=05189CFC, invalid INTPOS

Error, (in Typeset:-Tdisplay[true]) object at address is invalid
                     Typesetting:-mi("` `")
Error, unexpected result from Typesetting

I have Maple 15.

I've recently uploaded an application to the MAPLE Application Centre:

http://www.maplesoft.com/applications/view.aspx?SID=121124

I have since tried to make edits to the application and to submit them using the edit facility there, but none has been implemented. Please would some one let me know ne who can help resolve this problem? 

MRB

Hi. I have a function defined like this: 

myfun := proc(a11 ......)

f := a11 * x^2 + 2*a12*x*y + a22*y^2 + 2*a13*x + 2*a23*y + a33;
printf("\n");
 printf("%a",f);

 end proc; 

When i call this function from my worksheet, the "f" polynomial is printed unformatted. For example the output in my worksheet is

x^2+6*x*y+y^2-2*2^(1/2)*x-6*2^(1/2)*y-4

i use symmetric function package

with(SF):

i would like to know after calculating the basis toS(....)

which function can be used to convert into polynomials?

as i expect to get the sequence from any polynomials generated from it

refere to http://www.maplesoft.com/support/help/Maple/view.aspx?path=PDEtools/SymmetryTest

1. What is the purpose of using SymmetryTest for PDE?

2. What is the purpose of using infinitesimals?

3. What is the purpose of using InfinitesimalsGenerator?

4. Any documents or books mentioning above in detail?