diff options
| author | schnetter <schnetter@b1d164ef-f17a-46e7-89d4-021c7118ef4e> | 2007-09-11 12:08:50 +0000 |
|---|---|---|
| committer | schnetter <schnetter@b1d164ef-f17a-46e7-89d4-021c7118ef4e> | 2007-09-11 12:08:50 +0000 |
| commit | 5c991f788ad98303520ec2d4b9d262c6bcabc49a (patch) | |
| tree | c820300e33e76b772b49dfdd46590cf5d9b5272d | |
| parent | 4151baa0b6541563985fe16ed1d72713dac2753a (diff) | |
Correct some compile problems with the C version of the macros.
Obviously nobody used this code before. Now at least it compiles.
Patch contributed by Frank Loeffler.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinBase/ADMMacros/trunk@97 b1d164ef-f17a-46e7-89d4-021c7118ef4e
| -rw-r--r-- | src/macro/CDXCDK_guts.h | 6 | ||||
| -rw-r--r-- | src/macro/CDYCDK_guts.h | 6 | ||||
| -rw-r--r-- | src/macro/CDZCDK_guts.h | 6 |
3 files changed, 9 insertions, 9 deletions
diff --git a/src/macro/CDXCDK_guts.h b/src/macro/CDXCDK_guts.h index 7ddee37..a891b60 100644 --- a/src/macro/CDXCDK_guts.h +++ b/src/macro/CDXCDK_guts.h @@ -37,11 +37,11 @@ #ifdef CCODE - CDXCDK_CDXCDKXX = DXDK_DXDKXX - 2D0*(CHR2_XXX*CDXCDK_KXX + CDXCDK_CDXCDKXX = DXDK_DXDKXX - 2.*(CHR2_XXX*CDXCDK_KXX + CHR2_YXX*CDXCDK_KXY + CHR2_ZXX*CDXCDK_KXZ); - CDXCDK_CDXCDKYY = DXDK_DXDKYY - 2D0*(CHR2_XXY*CDXCDK_KXY + CDXCDK_CDXCDKYY = DXDK_DXDKYY - 2.*(CHR2_XXY*CDXCDK_KXY + CHR2_YXY*CDXCDK_KYY + CHR2_ZXY*CDXCDK_KYZ); - CDXCDK_CDXCDKZZ = DXDK_DXDKZZ - 2D0*(CHR2_XXZ*CDXCDK_KXZ + CDXCDK_CDXCDKZZ = DXDK_DXDKZZ - 2.*(CHR2_XXZ*CDXCDK_KXZ + CHR2_YXZ*CDXCDK_KYZ + CHR2_ZXZ*CDXCDK_KZZ); CDXCDK_CDXCDKXY = DXDK_DXDKXY - CHR2_XXY*CDXCDK_KXX - diff --git a/src/macro/CDYCDK_guts.h b/src/macro/CDYCDK_guts.h index 601d366..57d7497 100644 --- a/src/macro/CDYCDK_guts.h +++ b/src/macro/CDYCDK_guts.h @@ -41,13 +41,13 @@ #ifdef CCODE - CDYCDK_CDYCDKXX = DYDK_DYDKXX - 2D0*(CHR2_XXY*CDYCDK_KXX + + CDYCDK_CDYCDKXX = DYDK_DYDKXX - 2.*(CHR2_XXY*CDYCDK_KXX + CHR2_YXY*CDYCDK_KXY + CHR2_ZXY*CDYCDK_KXZ); - CDYCDK_CDYCDKYY = DYDK_DYDKYY - 2D0*(CHR2_XYY*CDYCDK_KXY + + CDYCDK_CDYCDKYY = DYDK_DYDKYY - 2.*(CHR2_XYY*CDYCDK_KXY + CHR2_YYY*CDYCDK_KYY + CHR2_ZYY*CDYCDK_KYZ); - CDYCDK_CDYCDKZZ = DYDK_DYDKZZ - 2D0*(CHR2_XYZ*CDYCDK_KXZ + + CDYCDK_CDYCDKZZ = DYDK_DYDKZZ - 2.*(CHR2_XYZ*CDYCDK_KXZ + CHR2_YYZ*CDYCDK_KYZ + CHR2_ZYZ*CDYCDK_KZZ); CDYCDK_CDYCDKXY = DYDK_DYDKXY - (CHR2_XYY*CDYCDK_KXX) - diff --git a/src/macro/CDZCDK_guts.h b/src/macro/CDZCDK_guts.h index fcfb0aa..6b0da04 100644 --- a/src/macro/CDZCDK_guts.h +++ b/src/macro/CDZCDK_guts.h @@ -41,13 +41,13 @@ #ifdef CCODE - CDZCDK_CDZCDKXX = DZDK_DZDKXX - 2D0*(CHR2_XXZ*CDZCDK_KXX + + CDZCDK_CDZCDKXX = DZDK_DZDKXX - 2.*(CHR2_XXZ*CDZCDK_KXX + CHR2_YXZ*CDZCDK_KXY + CHR2_ZXZ*CDZCDK_KXZ); - CDZCDK_CDZCDKYY = DZDK_DZDKYY - 2D0*(CHR2_XYZ*CDZCDK_KXY + + CDZCDK_CDZCDKYY = DZDK_DZDKYY - 2.*(CHR2_XYZ*CDZCDK_KXY + CHR2_YYZ*CDZCDK_KYY + CHR2_ZYZ*CDZCDK_KYZ); - CDZCDK_CDZCDKZZ = DZDK_DZDKZZ - 2D0*(CHR2_XZZ*CDZCDK_KXZ + + CDZCDK_CDZCDKZZ = DZDK_DZDKZZ - 2.*(CHR2_XZZ*CDZCDK_KXZ + CHR2_YZZ*CDZCDK_KYZ + CHR2_ZZZ*CDZCDK_KZZ); CDZCDK_CDZCDKXY = DZDK_DZDKXY-(CHR2_XYZ*CDZCDK_KXX) - |