[Commits] [svn:einsteintoolkit] GRHydro_InitData/trunk/src/ (Rev. 206)

rhaas at tapir.caltech.edu rhaas at tapir.caltech.edu
Wed Mar 27 20:49:08 CDT 2013


User: rhaas
Date: 2013/03/27 08:49 PM

Modified:
 /trunk/src/
  GRHydro_BondiM.c

Log:
 GRHydro_Init_Data: remove sincos from Bondi ID routine
 
 From: Roland Haas <rhaas at tapir.caltech.edu>

File Changes:

Directory: /trunk/src/
======================

File [modified]: GRHydro_BondiM.c
Delta lines: +5 -11
===================================================================
--- trunk/src/GRHydro_BondiM.c	2013-03-28 01:49:05 UTC (rev 205)
+++ trunk/src/GRHydro_BondiM.c	2013-03-28 01:49:08 UTC (rev 206)
@@ -67,13 +67,12 @@
 #define DLOOP1     for(i=0  ;i<NDIM ;i++)
 #define DLOOP2     for(i=0  ;i<NDIM ;i++) for(j=0  ;j<NDIM ;j++)
 
+static inline void sincos(double theta, CCTK_REAL *sth, CCTK_REAL *cth)
+{
+  *sth = sin(theta);
+  *cth = cos(theta);
+}
 
-#if !defined(__INTEL_COMPILER)
-# define LOCAL_SINCOS
-# define sincos( theta_ , sth_ , cth_ )  {  *(sth_) = sin((theta_)) ;  *(cth_) = cos((theta_)) ;  }
-#endif
-
-
 //Newton-Raphson parameters:
 #define NEWT_DIM_B        (1      )
 #define MAX_NEWT_ITER_B   (30     )    /* Max. # of Newton-Raphson iterations for find_root_2D(); */
@@ -1349,8 +1348,3 @@
 #undef COORD_ISOTROPIC     
 #undef DLOOP1
 #undef DLOOP2
-
-#ifdef LOCAL_SINCOS
-# undef sincos
-# undef LOCAL_SINCOS
-#endif



More information about the Commits mailing list