From 8d1254709ac940882ac5ac4dca4b600c79e8df77 Mon Sep 17 00:00:00 2001
From: Thomas White <taw@physics.org>
Date: Tue, 8 Dec 2009 21:17:17 +0100
Subject: Output convergence.dat file (R vs n_patterns)

---
 src/process_hkl.c | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'src/process_hkl.c')

diff --git a/src/process_hkl.c b/src/process_hkl.c
index 3961046e..d4f2d6bf 100644
--- a/src/process_hkl.c
+++ b/src/process_hkl.c
@@ -139,6 +139,7 @@ static void process_reflections(double *ref, double *trueref,
 	int ctot = 0;
 	int nmeas = 0;
 	double R, scale;
+	FILE *fh;
 
 	for ( j=0; j<LIST_SIZE; j++ ) {
 		ctot += counts[j];
@@ -163,6 +164,10 @@ static void process_reflections(double *ref, double *trueref,
 		snprintf(name, 63, "results/ZA-%u.dat", n_patterns);
 		write_reflections(name, counts, ref, 1, cell);
 	}
+
+	fh = fopen("results/convergence.dat", "a");
+	fprintf(fh, "%u %5.2f %5.2f\n", n_patterns, R*100.0, mean_counts);
+	fclose(fh);
 }
 
 
-- 
cgit v1.2.3