From 2b115b938d8bfba13f4193e329728b09a750b79f Mon Sep 17 00:00:00 2001 From: Thomas White Date: Wed, 13 Mar 2013 10:43:42 +0100 Subject: Add Lorentz factor --- src/partial_sim.c | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'src/partial_sim.c') diff --git a/src/partial_sim.c b/src/partial_sim.c index 7c93da1b..32e6666a 100644 --- a/src/partial_sim.c +++ b/src/partial_sim.c @@ -100,12 +100,13 @@ static void calculate_partials(Crystal *cr, { signed int h, k, l; Reflection *rfull; - double p, Ip, If; + double L, p, Ip, If; int bin; get_indices(refl, &h, &k, &l); get_asymm(sym, h, k, l, &h, &k, &l); p = get_partiality(refl); + L = get_lorentz(refl); pthread_mutex_lock(full_lock); rfull = find_refl(full, h, k, l); @@ -139,7 +140,7 @@ static void calculate_partials(Crystal *cr, } } - Ip = crystal_get_osf(cr) * p * If; + Ip = crystal_get_osf(cr) * L * p * If; res = resolution(crystal_get_cell(cr), h, k, l); bin = NBINS*2.0*res/max_q; -- cgit v1.2.3