From 03e793ed612baf1d5ddb15fe83db444947d3cbd0 Mon Sep 17 00:00:00 2001 From: allen Date: Thu, 2 May 2002 21:55:18 +0000 Subject: Added interface to SOR for LinMetric git-svn-id: http://svn.cactuscode.org/arrangements/CactusElliptic/EllSOR/trunk@78 fa3da13c-9f13-4301-a575-cf5b8c5e1907 --- src/ConfMetric.c | 31 ++++++++++++++++++++++++++++--- 1 file changed, 28 insertions(+), 3 deletions(-) (limited to 'src/ConfMetric.c') diff --git a/src/ConfMetric.c b/src/ConfMetric.c index 1b714a7..360fb28 100644 --- a/src/ConfMetric.c +++ b/src/ConfMetric.c @@ -27,12 +27,37 @@ CCTK_FILEVERSION(CactusElliptic_EllSOR_ConfMetric_c) #define SQR(a) ((a)*(a)) -static int firstcall = 1; +/******************************************************************** + ********************* Local Data Types *********************** + ********************************************************************/ + +/******************************************************************** + ********************* Local Routine Prototypes ********************* + ********************************************************************/ int SORConfMetric3D(cGH *GH, int *MetricPsiI, int conformal, int FieldIndex, int MIndex, int NIndex, CCTK_REAL *AbsTol, CCTK_REAL *RelTol); +/******************************************************************** + ***************** Scheduled Routine Prototypes ********************* + ********************************************************************/ + +/******************************************************************** + ********************* Other Routine Prototypes ********************* + ********************************************************************/ + +/******************************************************************** + ********************* Local Data ***************************** + ********************************************************************/ + +static int firstcall = 1; + +/******************************************************************** + ********************* External Routines ********************** + ********************************************************************/ + + /*@@ @routine SORConfMetric3D @date Tue Sep 26 11:28:08 2000 @@ -50,8 +75,8 @@ int SORConfMetric3D(cGH *GH, int *MetricPsiI, int conformal, @@*/ int SORConfMetric3D(cGH *GH, int *MetricPsiI, int conformal, - int FieldIndex, int MIndex, int NIndex, - CCTK_REAL *AbsTol, CCTK_REAL *RelTol) + int FieldIndex, int MIndex, int NIndex, + CCTK_REAL *AbsTol, CCTK_REAL *RelTol) { DECLARE_CCTK_PARAMETERS -- cgit v1.2.3