From 73d5930cb8351d470e583c6ab5ed22ff1a851c8f Mon Sep 17 00:00:00 2001 From: Thomas White Date: Tue, 7 Jun 2011 11:46:08 +0200 Subject: Tidy up --- data/diffraction.cl | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'data') diff --git a/data/diffraction.cl b/data/diffraction.cl index e58f16a2..9f939413 100644 --- a/data/diffraction.cl +++ b/data/diffraction.cl @@ -57,11 +57,13 @@ float4 get_q(float fs, float ss, float res, float clen, float k, kzn = k*(native_cos(tt)-1.0); /* x divergence */ - kx = kxn*cos(xdiv) +kzn*sin(xdiv); - kz = -kxn*sin(xdiv) +kzn*cos(xdiv); - kxn = kx; kzn = kz; + kx = kxn*native_cos(xdiv) +kzn*native_sin(xdiv); + ky = kyn; + kz = -kxn*native_sin(xdiv) +kzn*native_cos(xdiv); + kxn = kx; kyn = ky; kzn = kz; /* y divergence */ + kx = kxn; ky = kyn*cos(ydiv) +kzn*sin(ydiv); kz = -kyn*sin(ydiv) +kzn*cos(ydiv); -- cgit v1.2.3