Dimension in the atlas package
Description:
- In the atlas package the working dimension can be integer or symbolic. The corresponding variable is automatically assigned by atlas[Coframe] procedure.
- If the dimension is not an integer then all calculations are performed in terms of Sum operator (see examples below).
Examples:
Declare some functions:
| > | Functions(f=f(y[k]),h=h(x[j])); |
 | (2.1) |
Declare some vectors:
![{X, Y, Z, E[k]}](Maple/atlas/help/images/dim_2.gif) | (2.2) |
Declare some forms:
| > | Forms(e[j]=1,xi=1,theta=p); |
![{xi, theta, e[j]}](Maple/atlas/help/images/dim_3.gif) | (2.3) |
Declare coframe 1-forms:
![{e[k]}[k = 1 .. n]](Maple/atlas/help/images/dim_4.gif) | (2.4) |
Declare frame vectors:
![{E[j]}[j = 1 .. n]](Maple/atlas/help/images/dim_5.gif) | (2.5) |
Declare connection:
![omega[i, j]](Maple/atlas/help/images/dim_6.gif) | (2.6) |
Using d-procedure:
For functions:
'd(f*h)'=d(f*h);
![d(`*`(f, `*`(h))) = `+`(`*`(Sum(`*`(Diff(f, y[l[2]]), `*`(d(y[l[2]]))), l[2] = 1 .. n), `*`(h)), `*`(f, `*`(Sum(`*`(Diff(h, x[l[2]]), `*`(d(x[l[2]]))), l[2] = 1 .. n))))](Maple/atlas/help/images/dim_7.gif) | (2.7) |
Obviously that:
'd(h*xi)'=d(h*xi);
![d(`*`(h, `*`(xi))) = `+`(`-`(Sum(`*`(Diff(h, x[l[2]]), `*`(`&^`(xi, d(x[l[2]])))), l[2] = 1 .. n)), `*`(h, `*`(d(xi))))](Maple/atlas/help/images/dim_8.gif) | (2.8) |
Using ToBasis procedure:
![`&.`(X, xi) = Sum(`*`(iota[E[l[2]]](xi), `*`(Sum(`*`(iota[X](e[l[1]]), `*`(`&.`(E[l[1]], e[l[2]]))), l[1] = 1 .. n))), l[2] = 1 .. n)](Maple/atlas/help/images/dim_9.gif) | (2.9) |
Using div-procedure:
| > | div(X)=div(ToBasis(X)); |
, `*`(Sum(iota[E[l[2]]](omega[l[2], l[1]]), l[2] = 1 .. n))), l[1] = 1 .. n), Sum(iota[E[l[1]]](d(iota[X](e[l[1]]))), l[1] = 1 .. n))](Maple/atlas/help/images/dim_10.gif) | (2.10) |
Using Lie derivative:
| > | 'L[E[i]](e[k])'=L[E[i]](e[k]); |
![L[E[i]](e[k]) = iota[E[i]](d(e[k]))](Maple/atlas/help/images/dim_11.gif) | (2.11) |
| > | 'L[E[i]](E[j])'=L[E[i]](E[j]); |
![L[E[i]](E[j]) = Sum(`*`(`+`(iota[E[i]](omega[l[1], j]), `-`(iota[E[j]](omega[l[1], i]))), `*`(E[l[1]])), l[1] = 1 .. n)](Maple/atlas/help/images/dim_12.gif) | (2.12) |
Declare constant
:
Constants(lambda);
 | (2.13) |
Let us declare another coframe 1-forms:
Coframe(e[j]=d(x[j])/(1+lambda*Sum(x[i]^2,i=1..N)),j=1..N);
| Warning, You have to restart the Coframe procedure and then Frame procedure! | |
| > | Coframe(e[j]=d(x[j])/(1+lambda*Sum(x[i]^2,i=1..N)),j=1..N); |
![{e[j] = `/`(`*`(d(x[j])), `*`(`+`(1, `*`(lambda, `*`(Sum(`*`(`^`(x[i], 2)), i = 1 .. N))))))}[j = 1 .. N]](Maple/atlas/help/images/dim_15.gif) | (2.14) |
And another frame vectors:
Frame(E[k]);
![{E[k]}[k = 1 .. N]](Maple/atlas/help/images/dim_16.gif) | (2.15) |
| > | 'd(e[k])'=normal(d(e[k])); |
![d(e[k]) = `+`(`-`(`*`(2, `*`(lambda, `*`(Sum(`*`(x[i], `*`(`&^`(e[i], e[k]))), i = 1 .. N))))))](Maple/atlas/help/images/dim_17.gif) | (2.16) |
![d(x[j]) = `+`(e[j], `*`(e[j], `*`(lambda, `*`(Sum(`*`(`^`(x[i], 2)), i = 1 .. N)))))](Maple/atlas/help/images/dim_18.gif) | (2.17) |
![d(h) = Sum(`*`(Diff(h, x[l[1]]), `*`(`+`(e[l[1]], `*`(e[l[1]], `*`(lambda, `*`(Sum(`*`(`^`(x[i], 2)), i = 1 .. N))))))), l[1] = 1 .. N)](Maple/atlas/help/images/dim_19.gif) | (2.18) |
 | (2.19) |
![d(F) = `+`(`*`(Diff(F, f), `*`(Sum(`*`(Diff(f, y[l[1]]), `*`(d(y[l[1]]))), l[1] = 1 .. N))), `*`(Diff(F, h), `*`(Sum(`*`(Diff(h, x[l[1]]), `*`(`+`(e[l[1]], `*`(e[l[1]], `*`(lambda, `*`(Sum(`*`(`^`(x[i...](Maple/atlas/help/images/dim_21.gif)
![d(F) = `+`(`*`(Diff(F, f), `*`(Sum(`*`(Diff(f, y[l[1]]), `*`(d(y[l[1]]))), l[1] = 1 .. N))), `*`(Diff(F, h), `*`(Sum(`*`(Diff(h, x[l[1]]), `*`(`+`(e[l[1]], `*`(e[l[1]], `*`(lambda, `*`(Sum(`*`(`^`(x[i...](Maple/atlas/help/images/dim_22.gif) | (2.20) |
See Also:
atlas, atlas[Coframe], atlas[Frame], atlas[Connection].