diff options
author | Thomas White <taw@physics.org> | 2010-09-10 16:34:09 +0200 |
---|---|---|
committer | Thomas White <taw@physics.org> | 2012-02-22 15:26:57 +0100 |
commit | 64b735e37f7b7afa01ec7fa49ab765505c5cbd07 (patch) | |
tree | 2fd27eb3057c4cc2b96659adbdcc4175299de400 /src/likelihood.c | |
parent | bdf7024d71f824667a91022b4e049742fa7bdafe (diff) |
process_hkl: Add --reference and --outstream options
Diffstat (limited to 'src/likelihood.c')
-rw-r--r-- | src/likelihood.c | 41 |
1 files changed, 0 insertions, 41 deletions
diff --git a/src/likelihood.c b/src/likelihood.c deleted file mode 100644 index cb5595f8..00000000 --- a/src/likelihood.c +++ /dev/null @@ -1,41 +0,0 @@ -/* - * likelihood.c - * - * Likelihood maximisation - * - * (c) 2006-2010 Thomas White <taw@physics.org> - * - * Part of CrystFEL - crystallography with a FEL - * - */ - - -#ifdef HAVE_CONFIG_H -#include <config.h> -#endif - -#include "statistics.h" -#include "utils.h" - - -void scale_intensities(const double *model, ReflItemList *model_items, - double *new_pattern, ReflItemList *new_items, - double f0, int f0_valid) -{ - double s; - unsigned int i; - ReflItemList *items; - - items = intersection_items(model_items, new_items); - s = stat_scale_intensity(model, new_pattern, items); - delete_items(items); - if ( f0_valid ) printf("%f %f\n", s, f0); - - /* NaN -> abort */ - if ( isnan(s) ) return; - - /* Multiply the new pattern up by "s" */ - for ( i=0; i<LIST_SIZE; i++ ) { - new_pattern[i] *= s; - } -} |