Add support for setting the family.HEADmaster

2 files changed, 6 insertions, 0 deletions

diff --git a/param.ccl b/param.ccl
index cd81760..7ebe38b 100644
--- a/param.ccl
+++ b/param.ccl
@@ -40,3 +40,8 @@ CCTK_INT max_iter "Maximum number of Newton iterations"
 {
     1: :: ""
 } 16
+
+CCTK_INT family "Initial data family"
+{
+    : :: ""
+} 0
diff --git a/src/teukolsky.c b/src/teukolsky.c
index 234fedb..90d0559 100644
--- a/src/teukolsky.c
+++ b/src/teukolsky.c
@@ -52,6 +52,7 @@ void teukolsky_data(CCTK_ARGUMENTS)
         td->basis_scale_factor[1] = scale_factor;
         td->solution_branch = solution_branch;
         td->max_iter        = max_iter;
+        td->family          = family;
 
         if (omp_threads)
             td->nb_threads = strtol(omp_threads, NULL, 0);