Are comma's ever used in denominators?

Just curious, since when say transcribing code from a book and you're in the denominator pushing the comma should automatically move you over and up to where one should be placed.  Not that it really matters but if it's easy to implement that would be a luxury (unless of course commas are used in denominators).

I am creating a plot but the numbers on the horizontal axis overlap.  Is there a way to change the directions of the numbers displayed under the horizontal axis (tickmark labels) from horizontal to vertical?

The picture below shows how the numbers are bunched together under the horizontal axis.  I'd like them to be displayed vertical

Thank you

1. Take a group for example. First we can set up a group G by

G:=<<a,b>|<a²=1,b³=1,(a.b)²=1>>. Actually,G=S₃. So how to simplify a long production,

such as "a.b.b.a.b.b.a.b"?

2. How to define a finitely presented algebra over some field, such as the enveloping algebra

or quantum group of a Lie algebra? And moreover how to do the similar computation about 

simplifying a long production?

Hi

Anyone could help me in solving the following system of equations to get constants C1, C2, C3 and C4. MALPE give me this "soution may have been lost".  The MAPLE sheet is also attached.

Download solution_lost.mw

Hi all,

I have this system

> system1D := H = alpha*gamma[2, 2]*d[2, 1]-beta*d[1, 2]*gamma[1, 2]^2-gamma*d[1, 2]*gamma[2, 1]^2+alpha*gamma[2, 2]^2*d[2, 2]-beta*d[2, 2]*gamma[2, 2]^2-gamma*d[2, 2]*gamma[2, 2]^2, E = alpha*gamma[2, 1]*d[1, 1]-beta*d[1, 2]*gamma[1, 1]-gamma*d[1, 1]*gamma[2, 1]+alpha*gamma[2, 1]^2*d[1, 2]-beta*d[2, 2]*gamma[2, 1]-gamma*d[2, 1]*gamma[2, 2], B = alpha*gamma[1, 1]*d[2, 1]-beta*d[1, 1]*gamma[1, 1]^2-gamma*d[1, 1]*gamma[1, 1]^2+alpha*gamma[1, 1]^2*d[2, 2]-beta*d[2, 1]*gamma[2, 1]^2-gamma*d[2, 1]*gamma[1, 2]^2, D = alpha*gamma[1, 2]*d[2, 1]-beta*d[1, 1]*gamma[1, 2]^2-gamma*d[1, 2]*gamma[1, 1]^2+alpha*gamma[1, 2]^2*d[2, 2]-beta*d[2, 1]*gamma[2, 2]^2-gamma*d[2, 2]*gamma[1, 2]^2, A = alpha*gamma[1, 1]*d[1, 1]-beta*d[1, 1]*gamma[1, 1]-gamma*d[1, 1]*gamma[1, 1]+alpha*gamma[1, 1]^2*d[1, 2]-beta*d[2, 1]*gamma[2, 1]-gamma*d[2, 1]*gamma[1, 2], C = alpha*gamma[1, 2]*d[1, 1]-beta*d[1, 1]*gamma[1, 2]-gamma*d[1, 2]*gamma[1, 1]+alpha*gamma[1, 2]^2*d[1, 2]-beta*d[2, 1]*gamma[2, 2]-gamma*d[2, 2]*gamma[1, 2], F = alpha*gamma[2, 1]*d[2, 1]-beta*d[1, 2]*gamma[1, 1]^2-gamma*d[1, 1]*gamma[2, 1]^2+alpha*gamma[2, 1]^2*d[2, 2]-beta*d[2, 2]*gamma[2, 1]^2-gamma*d[2, 1]*gamma[2, 2]^2, G = alpha*gamma[2, 2]*d[1, 1]-beta*d[1, 2]*gamma[1, 2]-gamma*d[1, 2]*gamma[2, 1]+alpha*gamma[2, 2]^2*d[1, 2]-beta*d[2, 2]*gamma[2, 2]-gamma*d[2, 2]*gamma[2, 2], H = alpha*delta[2, 2]*d[2, 1]-beta*d[1, 2]*delta[1, 2]^2-gamma*d[1, 2]*delta[2, 1]^2+alpha*delta[2, 2]^2*d[2, 2]-beta*d[2, 2]*delta[2, 2]^2-gamma*d[2, 2]*delta[2, 2]^2, E = alpha*delta[2, 1]*d[1, 1]-beta*d[1, 2]*delta[1, 1]-gamma*d[1, 1]*delta[2, 1]+alpha*delta[2, 1]^2*d[1, 2]-beta*d[2, 2]*delta[2, 1]-gamma*d[2, 1]*delta[2, 2], B = alpha*delta[1, 1]*d[2, 1]-beta*d[1, 1]*delta[1, 1]^2-gamma*d[1, 1]*delta[1, 1]^2+alpha*delta[1, 1]^2*d[2, 2]-beta*d[2, 1]*delta[2, 1]^2-gamma*d[2, 1]*delta[1, 2]^2, D = alpha*delta[1, 2]*d[2, 1]-beta*d[1, 1]*delta[1, 2]^2-gamma*d[1, 2]*delta[1, 1]^2+alpha*delta[1, 2]^2*d[2, 2]-beta*d[2, 1]*delta[2, 2]^2-gamma*d[2, 2]*delta[1, 2]^2, A = alpha*delta[1, 1]*d[1, 1]-beta*d[1, 1]*delta[1, 1]-gamma*d[1, 1]*delta[1, 1]+alpha*delta[1, 1]^2*d[1, 2]-beta*d[2, 1]*delta[2, 1]-gamma*d[2, 1]*delta[1, 2], C = alpha*delta[1, 2]*d[1, 1]-beta*d[1, 1]*delta[1, 2]-gamma*d[1, 2]*delta[1, 1]+alpha*delta[1, 2]^2*d[1, 2]-beta*d[2, 1]*delta[2, 2]-gamma*d[2, 2]*delta[1, 2], F = alpha*delta[2, 1]*d[2, 1]-beta*d[1, 2]*delta[1, 1]^2-gamma*d[1, 1]*delta[2, 1]^2+alpha*delta[2, 1]^2*d[2, 2]-beta*d[2, 2]*delta[2, 1]^2-gamma*d[2, 1]*delta[2, 2]^2, G = alpha*delta[2, 2]*d[1, 1]-beta*d[1, 2]*delta[1, 2]-gamma*d[1, 2]*delta[2, 1]+alpha*delta[2, 2]^2*d[1, 2]-beta*d[2, 2]*delta[2, 2]-gamma*d[2, 2]*delta[2, 2];


> subs({A = 0, B = 0, C = 0, D = 0, E = 0, F = 0, G = 0, H = 0, delta[1, 1] = 1, delta[1, 2] = 0, delta[2, 1] = 0, delta[2, 2] = 0, gamma[1, 1] = 1, gamma[1, 2] = 0, gamma[2, 1] = 0, gamma[2, 2] = 0, delta[1, 1]^2 = 0, delta[1, 2]^2 = 0, delta[2, 1]^2 = 1, delta[2, 2]^2 = 0, gamma[1, 1]^2 = 0, gamma[1, 2]^2 = 1, gamma[2, 1]^2 = 0, gamma[2, 2]^2 = 0}, {system1D});

The problem is: there is any simple way to use command "subs" when some expression such that delta[1,1]=1, gamma[1,1]=1, gamma[1,2]^2=1 have value and others are zero.

Can someone please advice and help me on this?

thanks

witribm

Hello to you all,

I have this DE

but when I try to change the variable

I get this

>algsubs(r(t) = 1/u(t), diff(diff(r(t), t), t)-k/r(t) = -K/r(t)^2);

Why is it not done for the rest of the terms.  Is there a more easy way to do it.  Take into account that I cannot use dsolve because it is in an course in integral.

Thank in advance for your help.

--------------------------------------
Mario Lemelin

Maple 2015 Ubuntu 14.04 - 64 bits
Maple 2015 Win 10 Pro -  64 bits
messagerie : mario.lemelin@cgocable.ca
téléphone :  (819) 376-0987

Does anyone know an easy way to convert %d_ to D? I tried the convert command, but no effect.  Thanks.

Michael

Hi!

For my lecture advanced dynamics, I got the question to make a sketch of the coordinate system and the particle’s motion, with the following position vector:

r(t) = (a cos(ωt))i + (b sin(ωt))j + (ct)k

In this function, ω is in [rad/s], a and b are in [m], t in [s] and c is [m/s].

I have no idea what this should look like, and I was thinking about plotting this with Maple, but thus far I'm not succeeding in plotting it. Which function or method can I use to visualize this in Maple?

Thanks a lot!

Hi all,

I have this system

> system2hD := 0 = -d[1, 2], 0 = -d[2, 1], 0 = -delta*d[1, 2], 0 = -d[1, 1]-delta*d[1, 1], 0 = -delta*d[1, 1]-d[2, 2];
> solve({system2hD, delta <> 0, delta <> 1}, {d[1, 1], d[1, 2], d[2, 1], d[2, 2]});
      {d[1, 1] = 0, d[1, 2] = 0, d[2, 1] = 0, d[2, 2] = 0}

But, I hope to get the answers as {d[1, 1] = -delta*d[1, 1], d[1, 2] = 0, d[2, 1] = 0, d[2, 2] = -delta*d[1, 1]}. I think, I should not use the command "solve".

Can someone please advice and hepl me on this?

thanks

witribm

Hello all,

Yesterday, I upgraded to Mac OS X El Capitan.

Now, when working with Maple 2015, I feel the gui is very slow and sometimes irresponsive, when trying to scroll through my worksheets as well as through help pages (e.g., "help plot3d"). When I do the same within Maple 18, it works without any problems.

Does anybody else have the same issue?

Cheers,

Franky

Below is a calculation with 200 Volt and 100 Ω.
The output is 1 Ampere at -45 degrees.
This is useful for electrical circuit calculations, and I can get the right result on a TI-nspire.

However I can't make maple 2015 do it. It's resembling polar coordinates but I can't seem to find any info I can understand.

"((200&angle;0&deg;))/((100&angle;45&deg;)+(100&angle;45&deg;))=\

1&angle;-45&deg;"

below is the same equation but in a picture so it can be read by humans:

http://imgur.com/3i2Su0B

Hopefully theres some simple comands that can help make this easy.

Thanks

For example, I have a commutation table of finite Lie algebra. I'd like to extract some information from it (mainly, I'm interested in maximal dimension of abelian Lie subalgebra).

if eval(simplify( subs(a=2,subs(b= 5,f))))) - n = 0 then

      hello := union(hello, {f})

end if:

after subs(a=2,subs(b= 5,f))) to verify , some of hello return -n

negative

why it is possible to pass the if condition statement?

if it is normal case, how to write correct if statement to ensure no -n 

I want to plot a cone in 3-d for any given axis vecttor, center and eccentricity.

Hello everybody

In the following attached file, I have used "fnormal" command to omit small numbers that are less than "1e-6" but when I run the maple, I see the numbers such as 2.10^(-11). What's the problem?

Thanks in advance.

Lin1.mw