From e6936efeb95151a5f31829e9c93770bab0c2bdb7 Mon Sep 17 00:00:00 2001
From: diener <diener@f69c4107-0314-4c4f-9ad4-17e986b73f4a>
Date: Thu, 13 Apr 2006 23:01:19 +0000
Subject: Another file I forgot previously.

git-svn-id: https://svn.cct.lsu.edu/repos/numrel/LSUThorns/SummationByParts/trunk@65 f69c4107-0314-4c4f-9ad4-17e986b73f4a
---
 src/call_up_derivs.c | 22 +++++++++++-----------
 1 file changed, 11 insertions(+), 11 deletions(-)

diff --git a/src/call_up_derivs.c b/src/call_up_derivs.c
index 2189e3f..e6f5afa 100644
--- a/src/call_up_derivs.c
+++ b/src/call_up_derivs.c
@@ -6,7 +6,7 @@
 #include "util_Table.h"
 
 void DiffUpGv ( const CCTK_POINTER_TO_CONST cctkGH_, const CCTK_INT dir,
-              const CCTK_INT up, const CCTK_REAL *var, CCTK_REAL *dvar,
+              const CCTK_REAL *var, CCTK_REAL *dvar, const CCTK_REAL *up, 
               const CCTK_INT table_handle )
 {
   cGH const * restrict const cctkGH = cctkGH_;
@@ -29,7 +29,7 @@ void DiffUpGv ( const CCTK_POINTER_TO_CONST cctkGH_, const CCTK_INT dir,
                                        const CCTK_INT *bb,
                                        const CCTK_INT *gsize,
                                        const CCTK_REAL *delta,
-                                       const CCTK_INT *up,
+                                       const CCTK_REAL *up,
                                        CCTK_REAL *dvar);
   void CCTK_FCALL CCTK_FNAME(up_deriv_gf_4_2)(const CCTK_REAL *var,
                                        const CCTK_INT *ni,
@@ -39,7 +39,7 @@ void DiffUpGv ( const CCTK_POINTER_TO_CONST cctkGH_, const CCTK_INT dir,
                                        const CCTK_INT *bb,
                                        const CCTK_INT *gsize,
                                        const CCTK_REAL *delta,
-                                       const CCTK_INT *up,
+                                       const CCTK_REAL *up,
                                        CCTK_REAL *dvar);
   void CCTK_FCALL CCTK_FNAME(up_deriv_gf_6_3_opt)(const CCTK_REAL *var,
                                        const CCTK_INT *ni,
@@ -49,7 +49,7 @@ void DiffUpGv ( const CCTK_POINTER_TO_CONST cctkGH_, const CCTK_INT dir,
                                        const CCTK_INT *bb,
                                        const CCTK_INT *gsize,
                                        const CCTK_REAL *delta,
-                                       const CCTK_INT *up,
+                                       const CCTK_REAL *up,
                                        CCTK_REAL *dvar);
   void CCTK_FCALL CCTK_FNAME(up_deriv_gf_8_4_opt)(const CCTK_REAL *var,
                                        const CCTK_INT *ni,
@@ -59,7 +59,7 @@ void DiffUpGv ( const CCTK_POINTER_TO_CONST cctkGH_, const CCTK_INT dir,
                                        const CCTK_INT *bb,
                                        const CCTK_INT *gsize,
                                        const CCTK_REAL *delta,
-                                       const CCTK_INT *up,
+                                       const CCTK_REAL *up,
                                        CCTK_REAL *dvar);
 
   
@@ -142,11 +142,11 @@ void DiffUpGv ( const CCTK_POINTER_TO_CONST cctkGH_, const CCTK_INT dir,
     if ( CCTK_Equals(operator_type,"Minimal Bandwidth") ) {
       switch(loc_order) {
       case 2: {
-        CCTK_FNAME(up_deriv_gf_2_1)(var,&ni,&nj,&nk,&dir,bb,&gsize,&delta,&up,dvar);
+        CCTK_FNAME(up_deriv_gf_2_1)(var,&ni,&nj,&nk,&dir,bb,&gsize,&delta,up,dvar);
         break;
       }
       case 4: {
-        CCTK_FNAME(up_deriv_gf_4_2)(var,&ni,&nj,&nk,&dir,bb,&gsize,&delta,&up,dvar);
+        CCTK_FNAME(up_deriv_gf_4_2)(var,&ni,&nj,&nk,&dir,bb,&gsize,&delta,up,dvar);
         break;
       }
       default:
@@ -155,19 +155,19 @@ void DiffUpGv ( const CCTK_POINTER_TO_CONST cctkGH_, const CCTK_INT dir,
     } else {
       switch(loc_order) {
       case 2: {
-        CCTK_FNAME(up_deriv_gf_2_1)(var,&ni,&nj,&nk,&dir,bb,&gsize,&delta,&up,dvar);
+        CCTK_FNAME(up_deriv_gf_2_1)(var,&ni,&nj,&nk,&dir,bb,&gsize,&delta,up,dvar);
         break;
       }
       case 4: {
-        CCTK_FNAME(up_deriv_gf_4_2)(var,&ni,&nj,&nk,&dir,bb,&gsize,&delta,&up,dvar);
+        CCTK_FNAME(up_deriv_gf_4_2)(var,&ni,&nj,&nk,&dir,bb,&gsize,&delta,up,dvar);
         break;
       }
       case 6: {
-        CCTK_FNAME(up_deriv_gf_6_3_opt)(var,&ni,&nj,&nk,&dir,bb,&gsize,&delta,&up,dvar);
+        CCTK_FNAME(up_deriv_gf_6_3_opt)(var,&ni,&nj,&nk,&dir,bb,&gsize,&delta,up,dvar);
         break;
       }
       case 8: {
-        CCTK_FNAME(up_deriv_gf_8_4_opt)(var,&ni,&nj,&nk,&dir,bb,&gsize,&delta,&up,dvar);
+        CCTK_FNAME(up_deriv_gf_8_4_opt)(var,&ni,&nj,&nk,&dir,bb,&gsize,&delta,up,dvar);
         break;
       }
       default:
-- 
cgit v1.2.3