diff options
author | jthorn <jthorn@f88db872-0e4f-0410-b76b-b9085cfa78c5> | 2002-09-03 15:14:03 +0000 |
---|---|---|
committer | jthorn <jthorn@f88db872-0e4f-0410-b76b-b9085cfa78c5> | 2002-09-03 15:14:03 +0000 |
commit | c3df52e92cb53823ccc7663cb9658eca7df7ed6c (patch) | |
tree | 70baa7adca57f66082e794987ab640593d38d8d5 /src/gr/ellipsoid.out | |
parent | 9c3426afc677bfb1f0d0cabf57cd83a0c5d8f354 (diff) |
move high-level driver routines from gr/ to new driver/ directory
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinderDirect/trunk@707 f88db872-0e4f-0410-b76b-b9085cfa78c5
Diffstat (limited to 'src/gr/ellipsoid.out')
-rw-r--r-- | src/gr/ellipsoid.out | 38 |
1 files changed, 0 insertions, 38 deletions
diff --git a/src/gr/ellipsoid.out b/src/gr/ellipsoid.out deleted file mode 100644 index 4a0ee01..0000000 --- a/src/gr/ellipsoid.out +++ /dev/null @@ -1,38 +0,0 @@ - |\^/| Maple 7 (IBM INTEL LINUX) -._|\| |/|_. Copyright (c) 2001 by Waterloo Maple Inc. - \ MAPLE / All rights reserved. Maple is a registered trademark of - <____ ____> Waterloo Maple Inc. - | Type ? for help. -# ellipsoid.maple -- compute equations for offset ellipsoid setup -# $Header: /numrelcvs/ThornburgCVS/AHFinderDirect/src/gr/ellipsoid.maple,v 1.2 2002/04/22 15:10:32 jthorn Exp $ -> -# -# ellipsoid has center (A,B,C), radius (a,b,c) -# angular coordinate system has center (U,V,W) -# -# direction cosines wrt angular coordinate center are (alpha,beta,gamma) -# but Maple predefines gamma = Euler's constant, so we use (xcos,ycos,zcos) -# instead, i.e. a point has coordinates (U+xcos*r, V+ycos*r, W+zcos*r) -# -# then the equation of the ellipsoid is -# (U+xcos*r - A)^2 (V+ycos*r - B)^2 (W+zcos*r - C)^2 -# ----------------- + ---------------- + ----------------- = 1 -# a^2 b^2 c^2 -# -# to solve this, we introduce intermediate variables -# AU = A - U -# BV = B - V -# CW = C - W -# -> eqn := (xcos*r - AU)^2/a^2 + (ycos*r - BV)^2/b^2 + (zcos*r - CW)^2/c^2 = 1; - 2 2 2 - (xcos r - AU) (ycos r - BV) (zcos r - CW) - eqn := -------------- + -------------- + -------------- = 1 - 2 2 2 - a b c - -> -> read "../maple/util.mm"; -Error, unable to read `../maple/util.mm` -> quit -bytes used=129844, alloc=196572, time=0.03 |