From 5c991f788ad98303520ec2d4b9d262c6bcabc49a Mon Sep 17 00:00:00 2001 From: schnetter Date: Tue, 11 Sep 2007 12:08:50 +0000 Subject: 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 --- src/macro/CDXCDK_guts.h | 6 +++--- src/macro/CDYCDK_guts.h | 6 +++--- 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) - -- cgit v1.2.3