From 272062cb67cd0ec503dcbf5569fabfb7891dcc4b Mon Sep 17 00:00:00 2001 From: allen Date: Thu, 20 Sep 2001 16:32:50 +0000 Subject: Fixed bug in C code part (doesn't affect any fortran thorns using macros) git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinBase/ADMMacros/trunk@26 b1d164ef-f17a-46e7-89d4-021c7118ef4e --- src/macro/TRKK_guts.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/macro/TRKK_guts.h b/src/macro/TRKK_guts.h index 734e166..05a8f1b 100644 --- a/src/macro/TRKK_guts.h +++ b/src/macro/TRKK_guts.h @@ -26,7 +26,7 @@ #ifdef CCODE TRKK_TRKK = UPPERMET_UXX*KK_KKXX + UPPERMET_UYY*KK_KKYY - + UPPERMET_UZZ*KK_KKZZ + 2D0*(UPPERMET_UXY*KK_KKXY + + UPPERMET_UZZ*KK_KKZZ + 2.0*(UPPERMET_UXY*KK_KKXY + UPPERMET_UXZ*KK_KKXZ + UPPERMET_UYZ*KK_KKYZ); #endif -- cgit v1.2.3