From d5fc4b4d09f052816b325aac7d913c44aa8e6702 Mon Sep 17 00:00:00 2001
From: Anton Khirnov <anton@khirnov.net>
Date: Wed, 4 Mar 2020 17:23:06 +0100
Subject: Add support for setting the family.

---
 param.ccl       | 5 +++++
 src/teukolsky.c | 1 +
 2 files changed, 6 insertions(+)

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);
-- 
cgit v1.2.3