diff options
author | jthorn <jthorn@f88db872-0e4f-0410-b76b-b9085cfa78c5> | 2001-09-17 17:32:10 +0000 |
---|---|---|
committer | jthorn <jthorn@f88db872-0e4f-0410-b76b-b9085cfa78c5> | 2001-09-17 17:32:10 +0000 |
commit | 52a381b7be1eca93a86f4fb0b631f0286188f51f (patch) | |
tree | 44e36519b3f75047621cdddd07ac412257304f6c /src/maple | |
parent | 1e7d21757e4a6593c7a9f807c87273714680c182 (diff) |
use new symbolic sqrt function ssqrt()
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinderDirect/trunk@357 f88db872-0e4f-0410-b76b-b9085cfa78c5
Diffstat (limited to 'src/maple')
-rw-r--r-- | src/maple/coords.maple | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/maple/coords.maple b/src/maple/coords.maple index 68adbb1..374bb92 100644 --- a/src/maple/coords.maple +++ b/src/maple/coords.maple @@ -31,7 +31,7 @@ x_xyz[3] := zz; x_xyz_list := map(op, [entries(x_xyz)]); # r coordinate -r__fnd := sqrt(xx^2 + yy^2 + zz^2, symbolic); +r__fnd := ssqrt(xx^2 + yy^2 + zz^2); # (rho,sigma) coordinates y_rs := array(1..N_ang); |