From d05eecd314661fad45db4fb48df179f861d77d24 Mon Sep 17 00:00:00 2001
From: Thomas White <taw@physics.org>
Date: Mon, 12 Aug 2013 10:41:30 +0200
Subject: partialator: Debugging stuff

---
 src/partialator.c | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)

(limited to 'src/partialator.c')

diff --git a/src/partialator.c b/src/partialator.c
index 88912226..ad6d9a49 100644
--- a/src/partialator.c
+++ b/src/partialator.c
@@ -309,6 +309,16 @@ static void display_progress(int n_images, int n_crystals)
 }
 
 
+static const char *str_flags(Crystal *cr)
+{
+	if ( crystal_get_user_flag(cr) ) {
+		return "N";
+	}
+
+	return "-";
+}
+
+
 int main(int argc, char *argv[])
 {
 	int c;
@@ -671,6 +681,21 @@ int main(int argc, char *argv[])
 	/* Output results */
 	write_reflist(outfile, full);
 
+	/* Dump parameters */
+	FILE *fh;
+	fh = fopen("partialator.params", "w");
+	if ( fh == NULL ) {
+		ERROR("Couldn't open partialator.params!\n");
+	} else {
+		for ( i=0; i<n_crystals; i++ ) {
+			fprintf(fh, "%4i %5.2f %8.5e %s\n", i,
+			        crystal_get_osf(crystals[i]),
+			        crystal_get_image(crystals[i])->div,
+			        str_flags(crystals[i]));
+		}
+		fclose(fh);
+	}
+
 	/* Clean up */
 	for ( i=0; i<n_crystals; i++ ) {
 		reflist_free(crystal_get_reflections(crystals[i]));
-- 
cgit v1.2.3