Creation of "Frame-Field" for the mixmaster metric with constant basis inner product.

> restart:

> grtw();

`GRTensorII Version 1.79 (R6)`

`2 February 2001`

`Developed by Peter Musgrave, Denis Pollney and Kay...

`Copyright 1994-2001 by the authors.`

`Latest version available from: http://grtensor.phy...

`e:/Grtii(6)/Metrics`

> makeg(mix1);

Makeg 2.0: GRTensor metric/basis entry utility

To quit makeg, type 'exit' at any prompt.

Do you wish to enter a 1) metric [g(dn,dn)],

2) line element [ds],

3) non-holonomic basis [e(1)...e(n)], or

4) NP tetrad [l,n,m,mbar]?

makeg> 3;

Enter coordinates as a LIST (eg. [t,r,theta,phi]):

makeg> [Theta,Phi,Psi,T];

Would you like to enter 1) covariant components,

2) contravariant components, or

3) both.

makeg> 1;

Enter the covariant components of basis vector '1' as a LIST (eg. [1,0,0,0]) or differential (eg. d[x] + d[y]):

makeg> [-exp(a(T))*(1-Psi^2)^(1/2)/(1-Theta^2)^(1/2),exp(a(T))*Psi*(1-Theta^2)^(1/2),0,0];

Enter the covariant components of basis vector '2' as a LIST (eg. [1,0,0,0]) or differential (eg. d[x] + d[y]):

makeg> [-exp(b(T))*Psi/(1-Theta^2)^(1/2),-exp(b(T))*(1-Theta^2)^(1/2)*(1-Psi^2)^(1/2),0,0];

Enter the covariant components of basis vector '3' as a LIST (eg. [1,0,0,0]) or differential (eg. d[x] + d[y]):

makeg> [0,Theta*exp(c(T)),exp(c(T))/(1-Psi^2)^(1/2),0];

Enter the covariant components of basis vector '4' as a LIST (eg. [1,0,0,0]) or differential (eg. d[x] + d[y]):

makeg> [0,0,0,exp(a(T)+b(T)+c(T))];

Is the basis inner product 1) Diagonal, or

2) Symmetric?

makeg> 1;

Enter eta[1,1]:

makeg> 1;

Enter eta[2,2]:

makeg> 1;

Enter eta[3,3]:

makeg> 1;

Enter eta[4,4]:

makeg> -1;

If there are any complex valued coordinates, constants or functions

for this spacetime, please enter them as a SET ( eg. { z, psi } ).

Complex quantities [default={}]:

makeg> {};

`The values you have entered are:`

Coordinates = [Theta, Phi, Psi, T]

`Basis 1-forms:`

omega[1] = vector([-exp(a(T))*sqrt(1-Psi^2)/(sqrt(1...

omega[2] = vector([-exp(b(T))*Psi/(sqrt(1-Theta^2))...

omega[3] = vector([0, Theta*exp(c(T)), exp(c(T))/(s...

omega[4] = vector([0, 0, 0, exp(a(T)+b(T)+c(T))])

`Inner product of basis vectors:`

eta = matrix([[1, 0, 0, 0], [0, 1, 0, 0], [0, 0, 1,...

You may choose to 0) Use the metric WITHOUT saving it,

1) Save the metric as it is,

2) Re-enter a basis vector,

3) Re-enter the inner product,

4) Add/change constraints,

5) Add a text description, or

6) Abandon this metric and return to Maple.

makeg> 5;

Enter text information:

> Mixmaster metric (e.g. MTW Box 30.1, Theta = cos(theta), Psi = sin(psi))

`The values you have entered are:`

Coordinates = [Theta, Phi, Psi, T]

`Basis 1-forms:`

omega[1] = vector([-exp(a(T))*sqrt(1-Psi^2)/(sqrt(1...

omega[2] = vector([-exp(b(T))*Psi/(sqrt(1-Theta^2))...

omega[3] = vector([0, Theta*exp(c(T)), exp(c(T))/(s...

omega[4] = vector([0, 0, 0, exp(a(T)+b(T)+c(T))])

`Inner product of basis vectors:`

eta = matrix([[1, 0, 0, 0], [0, 1, 0, 0], [0, 0, 1,...

You may choose to 0) Use the metric WITHOUT saving it,

1) Save the metric as it is,

2) Re-enter a basis vector,

3) Re-enter the inner product,

4) Add/change constraints,

5) Add a text description, or

6) Abandon this metric and return to Maple.

makeg> 1;

Information written to: `e:/Grtii(6)/Metrics/mix1.mpl`

Do you wish to use this spacetime in the current session?

(1=yes [default], other=no):

makeg>