aboutsummaryrefslogtreecommitdiff
path: root/ML_WaveToy
diff options
context:
space:
mode:
authorPeter Diener <diener@diener-3.lsu.edu>2008-02-18 17:35:29 -0600
committerPeter Diener <diener@diener-3.lsu.edu>2008-02-18 17:35:29 -0600
commit57f92d6d38ca670683493464c57b179cad0286e7 (patch)
treee33d2faed0fa88af28f6defa44dff5436bd5a535 /ML_WaveToy
parentefc4a186eed598e64856e8d0e740e2cbf295e401 (diff)
dummy merge
dummy merge Signed-off-by: Peter Diener <diener@diener-3.lsu.edu>
Diffstat (limited to 'ML_WaveToy')
-rw-r--r--ML_WaveToy/configuration.ccl4
-rw-r--r--ML_WaveToy/interface.ccl4
-rw-r--r--ML_WaveToy/param.ccl4
-rw-r--r--ML_WaveToy/schedule.ccl4
-rw-r--r--ML_WaveToy/src/Boundaries.c92
-rw-r--r--ML_WaveToy/src/RegisterMoL.c4
-rw-r--r--ML_WaveToy/src/RegisterSymmetries.c4
-rw-r--r--ML_WaveToy/src/Startup.c4
-rw-r--r--ML_WaveToy/src/WT_Gaussian.c4
-rw-r--r--ML_WaveToy/src/WT_RHS.c4
-rw-r--r--ML_WaveToy/src/make.code.defn4
11 files changed, 62 insertions, 70 deletions
diff --git a/ML_WaveToy/configuration.ccl b/ML_WaveToy/configuration.ccl
index f772d68..b343426 100644
--- a/ML_WaveToy/configuration.ccl
+++ b/ML_WaveToy/configuration.ccl
@@ -1,5 +1,5 @@
-# File produced by user eschnett
-# Produced with Mathematica Version 6.0 for Mac OS X x86 (32-bit) (April 20, 2007)
+# File produced by user diener
+# Produced with Mathematica Version 6.0 for Linux x86 (32-bit) (April 20, 2007)
# Mathematica script written by Ian Hinder and Sascha Husa
diff --git a/ML_WaveToy/interface.ccl b/ML_WaveToy/interface.ccl
index c644d9b..fae6a52 100644
--- a/ML_WaveToy/interface.ccl
+++ b/ML_WaveToy/interface.ccl
@@ -1,5 +1,5 @@
-# File produced by user eschnett
-# Produced with Mathematica Version 6.0 for Mac OS X x86 (32-bit) (April 20, 2007)
+# File produced by user diener
+# Produced with Mathematica Version 6.0 for Linux x86 (32-bit) (April 20, 2007)
# Mathematica script written by Ian Hinder and Sascha Husa
diff --git a/ML_WaveToy/param.ccl b/ML_WaveToy/param.ccl
index 6c5e289..d32c338 100644
--- a/ML_WaveToy/param.ccl
+++ b/ML_WaveToy/param.ccl
@@ -1,5 +1,5 @@
-# File produced by user eschnett
-# Produced with Mathematica Version 6.0 for Mac OS X x86 (32-bit) (April 20, 2007)
+# File produced by user diener
+# Produced with Mathematica Version 6.0 for Linux x86 (32-bit) (April 20, 2007)
# Mathematica script written by Ian Hinder and Sascha Husa
diff --git a/ML_WaveToy/schedule.ccl b/ML_WaveToy/schedule.ccl
index b52fd02..a02f75f 100644
--- a/ML_WaveToy/schedule.ccl
+++ b/ML_WaveToy/schedule.ccl
@@ -1,5 +1,5 @@
-# File produced by user eschnett
-# Produced with Mathematica Version 6.0 for Mac OS X x86 (32-bit) (April 20, 2007)
+# File produced by user diener
+# Produced with Mathematica Version 6.0 for Linux x86 (32-bit) (April 20, 2007)
# Mathematica script written by Ian Hinder and Sascha Husa
diff --git a/ML_WaveToy/src/Boundaries.c b/ML_WaveToy/src/Boundaries.c
index 419a25f..e119d69 100644
--- a/ML_WaveToy/src/Boundaries.c
+++ b/ML_WaveToy/src/Boundaries.c
@@ -1,5 +1,5 @@
-/* File produced by user eschnett */
-/* Produced with Mathematica Version 6.0 for Mac OS X x86 (32-bit) (April 20, 2007) */
+/* File produced by user diener */
+/* Produced with Mathematica Version 6.0 for Linux x86 (32-bit) (April 20, 2007) */
/* Mathematica script written by Ian Hinder and Sascha Husa */
@@ -43,7 +43,7 @@ void ML_WaveToy_ApplyBoundConds(CCTK_ARGUMENTS)
ierr = Boundary_SelectGroupForBC(cctkGH, CCTK_ALL_FACES, 1, -1,
"ML_WaveToy::WT_rho", WT_rho_bound);
if (ierr < 0)
- CCTK_WARN(0, "Failed to register WT_rho_bound BC for ML_WaveToy::WT_rho!");
+ CCTK_WARN(-1, "Failed to register WT_rho_bound BC for ML_WaveToy::WT_rho!");
}
if (CCTK_EQUALS(WT_u_bound, "none" ) ||
@@ -54,7 +54,7 @@ void ML_WaveToy_ApplyBoundConds(CCTK_ARGUMENTS)
ierr = Boundary_SelectGroupForBC(cctkGH, CCTK_ALL_FACES, 1, -1,
"ML_WaveToy::WT_u", WT_u_bound);
if (ierr < 0)
- CCTK_WARN(0, "Failed to register WT_u_bound BC for ML_WaveToy::WT_u!");
+ CCTK_WARN(-1, "Failed to register WT_u_bound BC for ML_WaveToy::WT_u!");
}
if (CCTK_EQUALS(rho_bound, "none" ) ||
@@ -65,7 +65,7 @@ void ML_WaveToy_ApplyBoundConds(CCTK_ARGUMENTS)
ierr = Boundary_SelectVarForBC(cctkGH, CCTK_ALL_FACES, 1, -1,
"ML_WaveToy::rho", rho_bound);
if (ierr < 0)
- CCTK_WARN(0, "Failed to register rho_bound BC for ML_WaveToy::rho!");
+ CCTK_WARN(-1, "Failed to register rho_bound BC for ML_WaveToy::rho!");
}
if (CCTK_EQUALS(u_bound, "none" ) ||
@@ -76,150 +76,142 @@ void ML_WaveToy_ApplyBoundConds(CCTK_ARGUMENTS)
ierr = Boundary_SelectVarForBC(cctkGH, CCTK_ALL_FACES, 1, -1,
"ML_WaveToy::u", u_bound);
if (ierr < 0)
- CCTK_WARN(0, "Failed to register u_bound BC for ML_WaveToy::u!");
+ CCTK_WARN(-1, "Failed to register u_bound BC for ML_WaveToy::u!");
}
if (CCTK_EQUALS(WT_rho_bound, "radiative"))
{
/* apply radiation boundary condition */
- static CCTK_INT handle_WT_rho_bound = -1;
- if (handle_WT_rho_bound < 0) handle_WT_rho_bound = Util_TableCreate(UTIL_TABLE_FLAGS_CASE_INSENSITIVE);
- if (handle_WT_rho_bound < 0) CCTK_WARN(0, "could not create table!");
+ CCTK_INT handle_WT_rho_bound = Util_TableCreate(UTIL_TABLE_FLAGS_CASE_INSENSITIVE);
+ if (handle_WT_rho_bound < 0) CCTK_WARN(-1, "could not create table!");
if (Util_TableSetReal(handle_WT_rho_bound , WT_rho_bound_limit, "LIMIT") < 0)
- CCTK_WARN(0, "could not set LIMIT value in table!");
+ CCTK_WARN(-1, "could not set LIMIT value in table!");
if (Util_TableSetReal(handle_WT_rho_bound ,WT_rho_bound_speed, "SPEED") < 0)
- CCTK_WARN(0, "could not set SPEED value in table!");
+ CCTK_WARN(-1, "could not set SPEED value in table!");
ierr = Boundary_SelectGroupForBC(cctkGH, CCTK_ALL_FACES, 1, handle_WT_rho_bound,
"ML_WaveToy::WT_rho", "Radiation");
if (ierr < 0)
- CCTK_WARN(0, "Failed to register Radiation BC for ML_WaveToy::WT_rho!");
+ CCTK_WARN(-1, "Failed to register Radiation BC for ML_WaveToy::WT_rho!");
}
if (CCTK_EQUALS(WT_u_bound, "radiative"))
{
/* apply radiation boundary condition */
- static CCTK_INT handle_WT_u_bound = -1;
- if (handle_WT_u_bound < 0) handle_WT_u_bound = Util_TableCreate(UTIL_TABLE_FLAGS_CASE_INSENSITIVE);
- if (handle_WT_u_bound < 0) CCTK_WARN(0, "could not create table!");
+ CCTK_INT handle_WT_u_bound = Util_TableCreate(UTIL_TABLE_FLAGS_CASE_INSENSITIVE);
+ if (handle_WT_u_bound < 0) CCTK_WARN(-1, "could not create table!");
if (Util_TableSetReal(handle_WT_u_bound , WT_u_bound_limit, "LIMIT") < 0)
- CCTK_WARN(0, "could not set LIMIT value in table!");
+ CCTK_WARN(-1, "could not set LIMIT value in table!");
if (Util_TableSetReal(handle_WT_u_bound ,WT_u_bound_speed, "SPEED") < 0)
- CCTK_WARN(0, "could not set SPEED value in table!");
+ CCTK_WARN(-1, "could not set SPEED value in table!");
ierr = Boundary_SelectGroupForBC(cctkGH, CCTK_ALL_FACES, 1, handle_WT_u_bound,
"ML_WaveToy::WT_u", "Radiation");
if (ierr < 0)
- CCTK_WARN(0, "Failed to register Radiation BC for ML_WaveToy::WT_u!");
+ CCTK_WARN(-1, "Failed to register Radiation BC for ML_WaveToy::WT_u!");
}
if (CCTK_EQUALS(rho_bound, "radiative"))
{
/* apply radiation boundary condition */
- static CCTK_INT handle_rho_bound = -1;
- if (handle_rho_bound < 0) handle_rho_bound = Util_TableCreate(UTIL_TABLE_FLAGS_CASE_INSENSITIVE);
- if (handle_rho_bound < 0) CCTK_WARN(0, "could not create table!");
+ CCTK_INT handle_rho_bound = Util_TableCreate(UTIL_TABLE_FLAGS_CASE_INSENSITIVE);
+ if (handle_rho_bound < 0) CCTK_WARN(-1, "could not create table!");
if (Util_TableSetReal(handle_rho_bound , rho_bound_limit, "LIMIT") < 0)
- CCTK_WARN(0, "could not set LIMIT value in table!");
+ CCTK_WARN(-1, "could not set LIMIT value in table!");
if (Util_TableSetReal(handle_rho_bound ,rho_bound_speed, "SPEED") < 0)
- CCTK_WARN(0, "could not set SPEED value in table!");
+ CCTK_WARN(-1, "could not set SPEED value in table!");
ierr = Boundary_SelectVarForBC(cctkGH, CCTK_ALL_FACES, 1, handle_rho_bound,
"ML_WaveToy::rho", "Radiation");
if (ierr < 0)
- CCTK_WARN(0, "Failed to register Radiation BC for ML_WaveToy::rho!");
+ CCTK_WARN(-1, "Failed to register Radiation BC for ML_WaveToy::rho!");
}
if (CCTK_EQUALS(u_bound, "radiative"))
{
/* apply radiation boundary condition */
- static CCTK_INT handle_u_bound = -1;
- if (handle_u_bound < 0) handle_u_bound = Util_TableCreate(UTIL_TABLE_FLAGS_CASE_INSENSITIVE);
- if (handle_u_bound < 0) CCTK_WARN(0, "could not create table!");
+ CCTK_INT handle_u_bound = Util_TableCreate(UTIL_TABLE_FLAGS_CASE_INSENSITIVE);
+ if (handle_u_bound < 0) CCTK_WARN(-1, "could not create table!");
if (Util_TableSetReal(handle_u_bound , u_bound_limit, "LIMIT") < 0)
- CCTK_WARN(0, "could not set LIMIT value in table!");
+ CCTK_WARN(-1, "could not set LIMIT value in table!");
if (Util_TableSetReal(handle_u_bound ,u_bound_speed, "SPEED") < 0)
- CCTK_WARN(0, "could not set SPEED value in table!");
+ CCTK_WARN(-1, "could not set SPEED value in table!");
ierr = Boundary_SelectVarForBC(cctkGH, CCTK_ALL_FACES, 1, handle_u_bound,
"ML_WaveToy::u", "Radiation");
if (ierr < 0)
- CCTK_WARN(0, "Failed to register Radiation BC for ML_WaveToy::u!");
+ CCTK_WARN(-1, "Failed to register Radiation BC for ML_WaveToy::u!");
}
if (CCTK_EQUALS(WT_rho_bound, "scalar"))
{
/* apply scalar boundary condition */
- static CCTK_INT handle_WT_rho_bound = -1;
- if (handle_WT_rho_bound < 0) handle_WT_rho_bound = Util_TableCreate(UTIL_TABLE_FLAGS_CASE_INSENSITIVE);
- if (handle_WT_rho_bound < 0) CCTK_WARN(0, "could not create table!");
+ CCTK_INT handle_WT_rho_bound = Util_TableCreate(UTIL_TABLE_FLAGS_CASE_INSENSITIVE);
+ if (handle_WT_rho_bound < 0) CCTK_WARN(-1, "could not create table!");
if (Util_TableSetReal(handle_WT_rho_bound ,WT_rho_bound_scalar, "SCALAR") < 0)
- CCTK_WARN(0, "could not set SCALAR value in table!");
+ CCTK_WARN(-1, "could not set SCALAR value in table!");
ierr = Boundary_SelectGroupForBC(cctkGH, CCTK_ALL_FACES, 1, handle_WT_rho_bound,
"ML_WaveToy::WT_rho", "scalar");
if (ierr < 0)
- CCTK_WARN(0, "Failed to register Scalar BC for ML_WaveToy::WT_rho!");
+ CCTK_WARN(-1, "Failed to register Scalar BC for ML_WaveToy::WT_rho!");
}
if (CCTK_EQUALS(WT_u_bound, "scalar"))
{
/* apply scalar boundary condition */
- static CCTK_INT handle_WT_u_bound = -1;
- if (handle_WT_u_bound < 0) handle_WT_u_bound = Util_TableCreate(UTIL_TABLE_FLAGS_CASE_INSENSITIVE);
- if (handle_WT_u_bound < 0) CCTK_WARN(0, "could not create table!");
+ CCTK_INT handle_WT_u_bound = Util_TableCreate(UTIL_TABLE_FLAGS_CASE_INSENSITIVE);
+ if (handle_WT_u_bound < 0) CCTK_WARN(-1, "could not create table!");
if (Util_TableSetReal(handle_WT_u_bound ,WT_u_bound_scalar, "SCALAR") < 0)
- CCTK_WARN(0, "could not set SCALAR value in table!");
+ CCTK_WARN(-1, "could not set SCALAR value in table!");
ierr = Boundary_SelectGroupForBC(cctkGH, CCTK_ALL_FACES, 1, handle_WT_u_bound,
"ML_WaveToy::WT_u", "scalar");
if (ierr < 0)
- CCTK_WARN(0, "Failed to register Scalar BC for ML_WaveToy::WT_u!");
+ CCTK_WARN(-1, "Failed to register Scalar BC for ML_WaveToy::WT_u!");
}
if (CCTK_EQUALS(rho_bound, "scalar"))
{
/* apply scalar boundary condition */
- static CCTK_INT handle_rho_bound = -1;
- if (handle_rho_bound < 0) handle_rho_bound = Util_TableCreate(UTIL_TABLE_FLAGS_CASE_INSENSITIVE);
- if (handle_rho_bound < 0) CCTK_WARN(0, "could not create table!");
+ CCTK_INT handle_rho_bound = Util_TableCreate(UTIL_TABLE_FLAGS_CASE_INSENSITIVE);
+ if (handle_rho_bound < 0) CCTK_WARN(-1, "could not create table!");
if (Util_TableSetReal(handle_rho_bound ,rho_bound_scalar, "SCALAR") < 0)
- CCTK_WARN(0, "could not set SCALAR value in table!");
+ CCTK_WARN(-1, "could not set SCALAR value in table!");
ierr = Boundary_SelectVarForBC(cctkGH, CCTK_ALL_FACES, 1, handle_rho_bound,
"ML_WaveToy::rho", "scalar");
if (ierr < 0)
- CCTK_WARN(0, "Error in registering Scalar BC for ML_WaveToy::rho!");
+ CCTK_WARN(-1, "Error in registering Scalar BC for ML_WaveToy::rho!");
}
if (CCTK_EQUALS(u_bound, "scalar"))
{
/* apply scalar boundary condition */
- static CCTK_INT handle_u_bound = -1;
- if (handle_u_bound < 0) handle_u_bound = Util_TableCreate(UTIL_TABLE_FLAGS_CASE_INSENSITIVE);
- if (handle_u_bound < 0) CCTK_WARN(0, "could not create table!");
+ CCTK_INT handle_u_bound = Util_TableCreate(UTIL_TABLE_FLAGS_CASE_INSENSITIVE);
+ if (handle_u_bound < 0) CCTK_WARN(-1, "could not create table!");
if (Util_TableSetReal(handle_u_bound ,u_bound_scalar, "SCALAR") < 0)
- CCTK_WARN(0, "could not set SCALAR value in table!");
+ CCTK_WARN(-1, "could not set SCALAR value in table!");
ierr = Boundary_SelectVarForBC(cctkGH, CCTK_ALL_FACES, 1, handle_u_bound,
"ML_WaveToy::u", "scalar");
if (ierr < 0)
- CCTK_WARN(0, "Error in registering Scalar BC for ML_WaveToy::u!");
+ CCTK_WARN(-1, "Error in registering Scalar BC for ML_WaveToy::u!");
}
return;
diff --git a/ML_WaveToy/src/RegisterMoL.c b/ML_WaveToy/src/RegisterMoL.c
index b394a5d..86ccf50 100644
--- a/ML_WaveToy/src/RegisterMoL.c
+++ b/ML_WaveToy/src/RegisterMoL.c
@@ -1,5 +1,5 @@
-/* File produced by user eschnett */
-/* Produced with Mathematica Version 6.0 for Mac OS X x86 (32-bit) (April 20, 2007) */
+/* File produced by user diener */
+/* Produced with Mathematica Version 6.0 for Linux x86 (32-bit) (April 20, 2007) */
/* Mathematica script written by Ian Hinder and Sascha Husa */
diff --git a/ML_WaveToy/src/RegisterSymmetries.c b/ML_WaveToy/src/RegisterSymmetries.c
index cf9633e..82a4f12 100644
--- a/ML_WaveToy/src/RegisterSymmetries.c
+++ b/ML_WaveToy/src/RegisterSymmetries.c
@@ -1,5 +1,5 @@
-/* File produced by user eschnett */
-/* Produced with Mathematica Version 6.0 for Mac OS X x86 (32-bit) (April 20, 2007) */
+/* File produced by user diener */
+/* Produced with Mathematica Version 6.0 for Linux x86 (32-bit) (April 20, 2007) */
/* Mathematica script written by Ian Hinder and Sascha Husa */
diff --git a/ML_WaveToy/src/Startup.c b/ML_WaveToy/src/Startup.c
index 71be71f..49b9a0b 100644
--- a/ML_WaveToy/src/Startup.c
+++ b/ML_WaveToy/src/Startup.c
@@ -1,5 +1,5 @@
-/* File produced by user eschnett */
-/* Produced with Mathematica Version 6.0 for Mac OS X x86 (32-bit) (April 20, 2007) */
+/* File produced by user diener */
+/* Produced with Mathematica Version 6.0 for Linux x86 (32-bit) (April 20, 2007) */
/* Mathematica script written by Ian Hinder and Sascha Husa */
diff --git a/ML_WaveToy/src/WT_Gaussian.c b/ML_WaveToy/src/WT_Gaussian.c
index 34cc2fa..26dba99 100644
--- a/ML_WaveToy/src/WT_Gaussian.c
+++ b/ML_WaveToy/src/WT_Gaussian.c
@@ -1,5 +1,5 @@
-/* File produced by user eschnett */
-/* Produced with Mathematica Version 6.0 for Mac OS X x86 (32-bit) (April 20, 2007) */
+/* File produced by user diener */
+/* Produced with Mathematica Version 6.0 for Linux x86 (32-bit) (April 20, 2007) */
/* Mathematica script written by Ian Hinder and Sascha Husa */
diff --git a/ML_WaveToy/src/WT_RHS.c b/ML_WaveToy/src/WT_RHS.c
index 060c0b8..9755093 100644
--- a/ML_WaveToy/src/WT_RHS.c
+++ b/ML_WaveToy/src/WT_RHS.c
@@ -1,5 +1,5 @@
-/* File produced by user eschnett */
-/* Produced with Mathematica Version 6.0 for Mac OS X x86 (32-bit) (April 20, 2007) */
+/* File produced by user diener */
+/* Produced with Mathematica Version 6.0 for Linux x86 (32-bit) (April 20, 2007) */
/* Mathematica script written by Ian Hinder and Sascha Husa */
diff --git a/ML_WaveToy/src/make.code.defn b/ML_WaveToy/src/make.code.defn
index 1cd6049..0fa6a98 100644
--- a/ML_WaveToy/src/make.code.defn
+++ b/ML_WaveToy/src/make.code.defn
@@ -1,5 +1,5 @@
-# File produced by user eschnett
-# Produced with Mathematica Version 6.0 for Mac OS X x86 (32-bit) (April 20, 2007)
+# File produced by user diener
+# Produced with Mathematica Version 6.0 for Linux x86 (32-bit) (April 20, 2007)
# Mathematica script written by Ian Hinder and Sascha Husa