2 files changed, 25 insertions, 0 deletions
diff --git a/libcrystfel/src/crystal.c b/libcrystfel/src/crystal.c
index 664d933e..02255110 100644
--- a/libcrystfel/src/crystal.c
+++ b/libcrystfel/src/crystal.c
@@ -97,6 +97,30 @@ Crystal *crystal_new()
 
 
 /**
+ * crystal_copy:
+ * @cryst: A %Crystal to copy.
+ *
+ * Creates a new %Crystal which is a copy of @cryst.  The copy is a "shallow
+ * copy", which means that copies are NOT made of the data structures which
+ * @cryst contains references to, for example its %RefList.
+ *
+ * Returns: a (shallow) copy of @cryst, or NULL on failure.
+ *
+ */
+Crystal *crystal_copy(Crystal *cryst)
+{
+	Crystal *c;
+
+	c = crystal_new();
+	if ( c == NULL ) return NULL;
+
+	memcpy(c, cryst, sizeof(Crystal));
+
+	return c;
+}
+
+
+/**
  * crystal_free:
  * @cryst: A %Crystal to free.
  *
diff --git a/libcrystfel/src/crystal.h b/libcrystfel/src/crystal.h
index 3d0ad9d1..8c32a87d 100644
--- a/libcrystfel/src/crystal.h
+++ b/libcrystfel/src/crystal.h
@@ -48,6 +48,7 @@ typedef struct _crystal Crystal;
 
 
 extern Crystal *crystal_new(void);
+extern Crystal *crystal_copy(Crystal *cryst);
 extern void crystal_free(Crystal *cryst);
 
 extern UnitCell *crystal_get_cell(Crystal *cryst);