diff options
| author | Thomas White <taw@physics.org> | 2018-05-11 13:18:04 +0200 |
|---|---|---|
| committer | Thomas White <taw@physics.org> | 2018-05-11 13:25:08 +0200 |
| commit | f6d95bc7f26a5900d001e98d7cf36e9a1981b7f0 (patch) | |
| tree | fa9d1c671e5e064ff9284225be7d950fad878657 /src/scaling.c | |
| parent | b5008197d73329882cff1734a32e7aff02553eb8 (diff) | |
Fix up scaling definitions
Diffstat (limited to 'src/scaling.c')
| -rw-r--r-- | src/scaling.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/scaling.c b/src/scaling.c index 7f9b4cff..cabc5952 100644 --- a/src/scaling.c +++ b/src/scaling.c @@ -267,7 +267,7 @@ int scale_one_crystal(Crystal *cr, const RefList *listR, int flags) } x[n] = s*s; - y[n] = log(IhR) - log(pS) + log(LS) - log(IhS); + y[n] = log(LS) + log(IhS) -log(pS) - log(IhR); w[n] = pS; n++; @@ -329,7 +329,7 @@ int scale_one_crystal(Crystal *cr, const RefList *listR, int flags) } crystal_set_osf(cr, exp(G)); - crystal_set_Bfac(cr, B); + crystal_set_Bfac(cr, -B); free(x); free(y); |