I try to solve a large class of origami folds using Maple, this is the mw file (at this stage, only one step missing, I'm not very good with trigonometry using Maple).

At this end I only have to express the angle alpha in function if the anlgle theta and the lengths y_a and y_b.

More explainations soon.

Charles

restart:with(LinearAlgebra):
L:=407:
> L2:=convert(L,binary):
> N:=length(L2):
> T:=2^N-L:
> TB:=convert(T,binary):
> k:=length(TB):
> T2:=convert(T,base,2):
> T2V:=Vector[row]([T2,0$(N-k)]):
> T2VC:=Vector[row]([1$N]):
> T2V1:=VectorScalarMultiply(T2V,-1):
> T2VA1:=VectorAdd(T2VC,T2V1):
> ADDT:=Vector[row]([1,T2VA1]):
> B_N:=Array(Hessenberg[lower],1..N+1,1..N+1,(a,b)->1):
> C:=convert(B_N, Matrix):
> Permanent(C):
> delB:=DeleteRow(C,N+1..N+1):
> B(L):=Matrix(N+1,N+1,[[delB],[ADDT]]):
> Permanent(B(L));

I do not understand how to use this command (on strings), I want to convert
outputs from PARI like below - any hints for me doing that?
"5.2185454343674342011212095337 E444" ->
5.2185454343674342011212095337E444
"0.E-66*I" ->
0.I
"0.14237172979226366716527232070 +
3.1415926535897932384626433833*I"
which would work with 'parse', but not if exponential notation is involved.

convert(407,binary);
101100111
I want the vector [1,0,1,1,0,0,1,1,1].
I don,t make this. Please help me!

Hi folks,
I'm using the IntegralTools(Change) function to change the variables of integration in a double integral to lower the order of a polynomial under a radical prior to integration (praise to Axel!). The result contains exponents under the radical and in the limits of integration that seem to defy Maple's numerical integration routines. (Sorry for not using HTML! I tried to present in 2D math, but the preview post omitted the math entirely. Just paste it into a worksheet to convert this text mess into a mathematical one.)
`Int(70871722182849/100000000000000000*Int((20.6066600725-0.164853280580e-1*sqrt(1.562500*(RealDomain[`^`])(10, 6)+7.58249999999*(RealDomain[`^`])(10, 6)*(RealDomain[`^`])(xi[2], 99999999999999939/100000000000000000)-3.35631780000*(RealDomain[`^`])(10, 7)*(RealDomain[`^`])(xi[1], .10000000000000)*(RealDomain[`^`])(xi[2], 99999999999999939/100000000000000000)+9.19908900000*(RealDomain[`^`])(10, 6)*(RealDomain[`^`])(xi[1], .20000000000000)+9.19908899998*(RealDomain[`^`])(10, 6)*(RealDomain[`^`])(xi[2], 99999999999999939/50000000000000000)+7.58250000000*(RealDomain[`^`])(10, 6)*(RealDomain[`^`])(xi[1], .10000000000000))+50.0000000000*(RealDomain[`^`])(xi[1], .10000000000000)+50.0000000000*(RealDomain[`^`])(xi[2], 99999999999999939/100000000000000000))*(RealDomain[`^`])(xi[2], 0.70163004961021e-1), xi[1] = (RealDomain[`^`])(c, 1000) .. (RealDomain[`^`])(d, 1000))/(RealDomain[`^`])(xi[2], 99929128277817151/100000000000000000), xi[2] = (RealDomain[`^`])(a, 100000000000000000/70871722182849) .. (RealDomain[`^`])(b, 100000000000000000/70871722182849))`

I have noticed that my

text that was converted from MW to HTML is not properly displayed.
If you look at the end of the text, you will se the command
> f:=x->piecewise(x FSeries:=FSeriesOfFunction(f,-Pi..Pi);
which is not correct. The part "FSeries:=FSeriesOfFunction(f,-Pi..Pi);" is the next command.
View the original worksheet

via the MapleNet to see the difference.
The problem is in the symbol "lower than" (which appears in definition of the piecewise continous function), because the publication system (or what) thinks that it is the begining of an unsupported HTML tag and the "tag" is removed. The solution is to substitute "lower than" for "< ;" (without the white space before the semicolon) and maybe the same with the "grater than" symbol.

I have noticed, that a text, that was converted from MW to HTML is not correctly displayed. Link to my text is
http://beta.mapleprimes.com/blog/karel-srot/computing-fourier-series-using-the-package-fourier
If you look at the end of the text, you will se the command
> f:=x->piecewise(x FSeries:=FSeriesOfFunction(f,-Pi..Pi);
which is not correct. The text "FSeries:=FSeriesOfFunction(f,-Pi..Pi);" is the next command.
View the original worksheet via the MapleNet to see the difference
http://maplenet.maplesoft.com/maplenet/worksheet/mapleprimes/1280_examples1-executed.mw
The problem is in displaying of the symbol "lower than" (which is in definition of piecewise continous function), because the publication system (or what) thinks that it is the begining of an unsupported HTML tag. What about to substitute "lower than" for "< ;" during the conversion (and the same for "grater than" symbol)?

I'm in the process of manipulating Maple worksheets (both Classic .mws and Standard .mw formats) blindly from the command line. There are a surprising number of stumbling blocks in Maple that make this work difficult. While I've managed to worm my way around them one by one, I thought I'd take some time to just voice my frustration so that others are aware of these pitfalls.

I should note that I am using Maple 10.02 on a Gentoo Linux machine, feeding my commands into Maple through a standard pipe. I would update to Maple 10.04, but the updater program from the website continues to cause problems with Java. Another complaint? That might as well be...

I am trying to use maple to find the limit of a subsequence, but what I've tried hasn't worked

For example define . Then using maple

=

**> restart;**

**dotpro := (psi,phi,L)->int(evalc(conjugate(psi)*phi),x=-L..L);**

**dotpro(exp(I/hbar*p*x)/sqrt(2*L), exp(I/hbar*q*x)/sqrt(2*L),L);**

The MaplePrimes file manager is a feature that makes it easy for people to share their files with each other. With just a few clicks, you can post an attractive image, an HTML version of a Maple worksheet or even a fully interactive worksheet on MapleNet. Read on for the details on how to use this tool:

fsolve fails when eqs are 2D integrations

**> restart;**

**> infolevel[all]:=0;**

**> infolevel[evalf]:=0;**

thank you georgios kokovidis for acknowledging my question.thank you so much!however i still have questions.can anybody here please help me with this type of questions,im not an engineering or math major,so you can guys say im so bad with math.please help me.this are the questions.
sketch the following and convert to rectangular:
> 1.)x=t^(3), y=t^(2);
2.)x = (sec t)+2, y = (tan t)-1
3.) r = 2+2sin4thetha
4.) r = 4cos2theta
find the dy/dx of the following:
> 1.)x=t^(3), y=t^(2);
2.)x = (sec t)+2, y = (tan t)-1
3.) r = 2+2sin4thetha
4.) r = 4cos2theta
find the equation of the tangent line to the function with the indicated information:

I am a newcomer to Maple, so I am going to assume that my problems are generally simple, and that I should be posting in this Newbie forum. My apologies in advance if I assumed wrong.
My problem is that I take an equation that contains a radical as a common factor for several terms, rearrange it so the radical is on one side, square the equation to remove the radical, and then do a change of variables to convert the equation to a quadratic and solve it. All of that goes well, but when I convert back to the original variable and attempt to verify the solution it becomes very complicated, and I can't seem to simplify it enough to verify the solution.

This is a portion of my first Maple program. I included the part that had the relevant code and output of what is going wrong. The problem I am having is in the PlotTable I create. It is a table with specifically defined indices, which gets added to each time through a loop. What each indices refers to is a table of lists, representing an x,y coord pair. The first time an index is added is corrects puts the data. The second time you can see that it added the second data correctly, but it also overwrote the data for the previous index.
for k from 1 to nops([indices(thicknesstable)]) do #loop for each structure