From 472212d386e7fabe4f7d757fd733951869a49b1d Mon Sep 17 00:00:00 2001
From: Thomas White <taw@physics.org>
Date: Fri, 23 May 2014 17:10:28 +0200
Subject: Remove dump of scale factors

---
 src/hrs-scaling.c | 6 ------
 1 file changed, 6 deletions(-)

diff --git a/src/hrs-scaling.c b/src/hrs-scaling.c
index 34500cfc..5ce39cc6 100644
--- a/src/hrs-scaling.c
+++ b/src/hrs-scaling.c
@@ -544,12 +544,6 @@ RefList *scale_intensities(Crystal **crystals, int n, RefList *gref,
 		reject_outliers(old_osfs, n, crystals);
 		done = test_convergence(old_osfs, n, crystals);
 
-		FILE *fh = fopen("scale-factors.log", "a");
-		for ( j=0; j<n; j++ ) {
-			fprintf(fh, "%5.2f\n", crystal_get_osf(crystals[j]));
-		}
-		fclose(fh);
-
 		/* No reference -> generate list for next iteration */
 		if ( gref == NULL ) {
 			reflist_free(full);
-- 
cgit v1.2.3