diff options
Diffstat (limited to 'data/diffraction.cl')
| -rw-r--r-- | data/diffraction.cl | 8 |
1 files changed, 5 insertions, 3 deletions
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); |