From 42ff62fadff7f55845ea8f1177c57923e4b3c8b6 Mon Sep 17 00:00:00 2001
From: knarf <knarf@4f5cb9a8-4dd8-4c2d-9bbd-173fa4467843>
Date: Wed, 14 Dec 2011 04:21:01 +0000
Subject: Add-comments-to-describe-the-order-of-orthonormalisa

git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/WeylScal4/trunk@93 4f5cb9a8-4dd8-4c2d-9bbd-173fa4467843
---
 m/WeylScal4.m | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/m/WeylScal4.m b/m/WeylScal4.m
index ac86d90..fab4589 100644
--- a/m/WeylScal4.m
+++ b/m/WeylScal4.m
@@ -134,12 +134,18 @@ PsisCalc[fdOrder_, PD_] :=
   Compute the local tetrad
  ****************************************************************************)
 
+        (* azmuthal *)
 	va1 -> -ymoved, va2 -> xmoved+offset, va3 -> 0,
+
+        (* radial *)
 	vb1 -> xmoved+offset, vb2 -> ymoved, vb3 -> zmoved,
+
+        (* polar *)
 	vc[ua] -> Sqrt[detg] gInv[ua,ud] Eps[ld,lb,lc] va[ub] vb[uc],
 
 	(* Orthonormalize using Gram-Schmidt*)
 
+        (* Orthonormalize in the order phi, r, theta *)
         wa[ua] -> va[ua],
         omega11 -> wa[ua] wa[ub] g[la,lb],
         ea[ua] -> wa[ua] / Sqrt[omega11],
-- 
cgit v1.2.3