:[benjamin@bh4 ~]$ maple
    |\^/|     Maple 8 (IBM INTEL LINUX)
._|\|   |/|_. Copyright (c) 2002 by Waterloo Maple Inc.
 \  MAPLE  /  All rights reserved. Maple is a registered trademark of
 <____ ____>  Waterloo Maple Inc.
      |       Type ? for help.
> read 'geometry';
Warning, the protected names norm and trace have been redefined and unprotected
                             WARNING: Tensor system may not be initialized.

                                           TENSOR_READ := true

                                 TensorInit:: Tensor system initialized.

                                                    f

                                                   [     /d   \2     /d   \ /d   \]
                                                   [-1 + |-- f|      |-- f| |-- f|]
                                                   [     \dt  /      \dt  / \dr  /]
                      [TENSOR, _T5, [IS, 2, L, L], [                              ]]
                                                   [/d   \ /d   \         /d   \2 ]
                                                   [|-- f| |-- f|     1 + |-- f|  ]
                                                   [\dt  / \dr  /         \dr  /  ]

                         2 (GeometryN . :  . (Lmetric[ . ] previously computed.))

                              2 (GeometryN . :  . (Computing Umetric[ . ].))

                              2 (GeometryN . :  . (Umetric[ . ] computed.))

                               2 (GeometryN . :  . (Computing Delta[ . ].))

                               2 (GeometryN . :  . (Delta[ . ] computed.))

                             2 (GeometryN . :  . (Computing DLmetric[ . ].))

                              2 (GeometryN . :  . (DLmetric[ . ] computed.))

                              2 (GeometryN . :  . (Computing Chris1[ . ].))

                               2 (GeometryN . :  . (Chris1[ . ] computed.))

                              2 (GeometryN . :  . (Computing Chris2[ . ].))

                               2 (GeometryN . :  . (Chris2[ . ] computed.))

                              2 (GeometryN . :  . (Computing RicciUL[ . ].))

bytes used=4000156, alloc=3407248, time=0.19
                              2 (GeometryN . :  . (RicciUL[ . ] computed.))

                              2 (GeometryN . :  . (Computing RicciLL[ . ].))

                              2 (GeometryN . :  . (RicciLL[ . ] computed.))

                              2 (GeometryN . :  . (Computing RicciSc[ . ].))

                              2 (GeometryN . :  . (RicciSc[ . ] computed.))

                            2 (GeometryN . :  . (Computing EinsteinLL[ . ].))

                             2 (GeometryN . :  . (EinsteinLL[ . ] computed.))

               / 2   \   / 2   \                    /  2    \          / 2   \   / 2   \
               |d    |   |d    | /d   \2     /d   \ | d     | /d   \   |d    |   |d    | /d   \2
               |--- f| + |--- f| |-- f|  - 2 |-- f| |----- f| |-- f| - |--- f| + |--- f| |-- f|
               |  2  |   |  2  | \dr  /      \dt  / \dt dr  / \dr  /   |  2  |   |  2  | \dt  /
               \dt   /   \dt   /                                       \dr   /   \dr   /
      EOM := - --------------------------------------------------------------------------------- = 0
                                           /     /d   \2   /d   \2\2
                                           |-1 - |-- f|  + |-- f| |
                                           \     \dr  /    \dt  / /