From 407e426cdccb6ff780e23dc5e660fb7fe01027cf Mon Sep 17 00:00:00 2001 From: hawke Date: Mon, 30 Jun 2003 16:03:34 +0000 Subject: Add in missing set of the abs for the normalized constraint. git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinBase/ADMMacros/trunk@57 b1d164ef-f17a-46e7-89d4-021c7118ef4e --- src/macro/HAMADM_guts.h | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/macro/HAMADM_guts.h b/src/macro/HAMADM_guts.h index 9c87ccb..523d0d5 100644 --- a/src/macro/HAMADM_guts.h +++ b/src/macro/HAMADM_guts.h @@ -21,12 +21,14 @@ #ifdef FCODE HAMADM_HAMADM = TRRICCI_TRRICCI - TRKK_TRKK + TRK_TRK**2 + HAMADM_HAMADMABS = abs(TRRICCI_TRRICCI) + abs(TRKK_TRKK) + TRK_TRK**2 #endif #ifdef CCODE HAMADM_HAMADM = TRRICCI_TRRICCI - TRKK_TRKK + TRK_TRK**2 + HAMADM_HAMADMABS = fabs(TRRICCI_TRRICCI) + fabs(TRKK_TRKK) + TRK_TRK**2 #endif -- cgit v1.2.3