Rouben Rostamian

MaplePrimes Activity


These are replies submitted by Rouben Rostamian

@Carl Love I also see the behavior described by the OP.  Perhaps that's specific to Linux.  Here's what I see:

restart;

kernelopts(version);

`Maple 2018.1, X86 64 LINUX, Jun 8 2018, Build ID 1321769`

interface(version);

`Standard Worksheet Interface, Maple 2018.1, Linux, June 8 2018 Build ID 1321769`

prettyprint=3 is the default:

interface(prettyprint);

3

solve(x^2-1,x);

1, -1

Let prettyprint=1:

interface(prettyprint=1);

                                   3, [3]

solve(x^2-1,x);

                                    1, -1

Download mw.mw

@Alger

restart;

Let

C := (n,x) -> cos(n*Pi*ln(x/a)/b);

proc (n, x) options operator, arrow; cos(n*Pi*ln(x/a)/b) end proc

where

params := a = x1, b = ln(x2/x1)/2;

a = x1, b = (1/2)*ln(x2/x1)

Let's verify that "{C(n,x): n=0.. infinity}" is an orthogonal family on the interval x1, x2

in the L^2 norm with the weight 1/x.  Maple has some difficulty in calculating the definite

integral (I don't know why), therefore I will calculate the indefinite integral first,

and then plug in the end points.

z1 := int(C(n,x)*C(m,x)/x, x);

(1/2)*b*sin(Pi*ln(x/a)*(m-n)/b)/(Pi*(m-n))+(1/2)*b*sin(Pi*ln(x/a)*(m+n)/b)/(Pi*(m+n))

z2 := eval(z1, {params});

(1/4)*ln(x2/x1)*sin(2*Pi*ln(x/x1)*(m-n)/ln(x2/x1))/(Pi*(m-n))+(1/4)*ln(x2/x1)*sin(2*Pi*ln(x/x1)*(m+n)/ln(x2/x1))/(Pi*(m+n))

Plug in the lower limit:

eval(z2, x=x1);

0

Plug in the upper limit:

eval(z2, x=x2) assuming m::integer, n::integer;

0

This shows the orthogonality of the C(n, x) functions.

 

I expect that the remaining orthogonality conditions may be verified in the same

way but I haven't actually done it.

 

 

 

 

Download orthogonality.mw

@Kitonum That's a nice animation—the red segments stand out and nicely demonstrate their equal lengths and orthogonality.

It is interesting that when one of the sides of the quadrilateral degenerates to zero length, that is, when the quadrilateral turns into a triangle (even a right triangle!), the theorem's assertion still remains valid and nontrivial.  I don't recall having seen that special case stated anywhere.  One would think that Euclid would have noticed that.

 

@Markiyan Hirnyk I invite you to go back and read (carefully now!) the reply under the heading "Yes, I have the response" and don't pull things out of your imagination, or somewhere else.

 

@Markiyan Hirnyk I am not going to stop you from laughing, but consider reading carefully what is written rather than what you imagine is written.  And an apology will not hurt either.

@Markiyan Hirnyk The introduction of biorthogonality in this discussion is a red herring.  For the purpose applying the Fourier transform, what is needed is the orthogonality of the basis functions which in the context this problem consists of the family
{ C(n,x), S(m,x) }n = 0...∞, m = 1...∞,
and where the orthogonality is relative to the given weighted L2 inner product.  I pointed out that family of functions given in the original post was not orthogonal, that's why an attempt to apply the Fourier transform was leading to an incorrect result.   The family of functions in the amended post is orthogonal, therefore applying the Fourier transform is legitimate in that case.  That's all.

 

@Alger OK, then.  After that change, the issue raised in your original post should go away.

@vv Nice application of complex algebra!

Digging through my archive of Maple files, I found this animation from some yeara ago:

prob-02-quad.mw

@ibndirac I don't quite understand the setting of this problem. On the one hand you impose boundary conditions at x=0 and x=L, perhaps implying that you seek a solution g(x,t) where 0 < x < L. On the other hand, to determine beta, you need the values of g(x,t) for all x ∈ (−∞,∞). What is the domain of g? Some clarification is needed.

You will get more helpful responses if you post a real worksheet rather than snippets, especially since the snippets that you have posted seem to be inaccurate.  For instance, what is the meaning of the derivative diff(g(x, t), v) since g(x,t) has no v in it?

To post a worksheet, click the big fat green arrow that appears in the toolbar of the window where you edit your message for posting.

I don't think referencing a web page is a good idea in a thesis.  If you saw a reference to a web page in a thesis written on 1995, would you expect to find it today?

Furthermore, a web page is a living document; it may be changed/updated without notice.  What you see now may not be what your readers will see two years from now.  In fact, the web page that you have referred to, corresponds to Maple's help page "?Groebner[Basis]".  At the bottom of that page in Maple 2018.1 we have:
     The Groebner[Basis] command was updated in Maple 2018.

It may be more helpful to your readers if you cite one or more of the published articles that appear at the end of the help page "?Groebner[Algorithms]".

 

@rahinui On Maple 2017.3 and 2018.0 (on 64 bit Linux) I am getting the expected answer {f(t, x) = _F1(x)}.  Something strange must be happening at your end. Check!

Did you try applying dsolve() to the system? If you did, what didn't you like about the result?  Post your worksheet so that others won't have to retype the equations.

@Carl Love Maybe there is something to that, however
caption = typeset(a^(b^(c^d))+u^(v^(w^t)))
takes up significantly larger space but causes no problem.

First 57 58 59 60 61 62 63 Last Page 59 of 99