Remove dump of scale factors

1 files changed, 0 insertions, 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);