form a linear combination, wedge product or tensor product of a list of vectors, forms or tensors
DGzip(C, T, operand)
a list of Maple expressions
a list of vectors, differential p-forms, or tensors (of the same type); the number of elements in C and T must be equal
a string, one of "plus", "wedge", or "tensor"
DGzip(C, T, "plus") returns the additive linear combination of the objects in T with coefficients taken from the list C.
DGzip(T, "wedge") returns the wedge product of the forms in T.
DGzip(T, "tensor") returns the tensor product of the tensors in the list T.
This command is part of the DifferentialGeometry package, and so can be used in the form DGzip(...) only after executing the command with(DifferentialGeometry). It can always be used in the long form DifferentialGeometry:-DGzip.
Initialize a 4-dimensional manifold M with coordinates [x, y, z, w].
DGsetup([x, y, z, w], M):
Form a vector on M with arbitrary coefficients.
C1 := [a, b, c, d];
T1 := [D_x, D_y, D_z, D_w];
X := DGzip(C1, T1, "plus");
Generate a list of 6 coefficients using the seq command, generate a basis for the 2-forms on M using the GenerateForms command, and use DGzip to make a general 2-form on M.
C2 := [seq(a||i, i = 1 ..6)];
T2 := Tools:-GenerateForms([dx, dy, dz, dw], 2);
omega := DGzip(C2, T2, "plus");
Define the standard volume form on M.
T3 := [dx, dy, dz, dw];
nu := DGzip(T3, "wedge");
Create the tensor product of a list of tensors.
T4 := evalDG([dx, D_x, dy, D_y, dz, D_z, dw, D_w]);
T := DGzip(T4, "tensor");
Download Help Document
What kind of issue would you like to report? (Optional)