aboutsummaryrefslogtreecommitdiff
path: root/cyclone/sickle/cartopol.c
diff options
context:
space:
mode:
authorHans-Christoph Steiner <eighthave@users.sourceforge.net>2012-01-30 17:16:45 +0000
committerHans-Christoph Steiner <eighthave@users.sourceforge.net>2012-01-30 17:16:45 +0000
commit9c3309a7191ece24d44e1599d7290318df144ff0 (patch)
tree166d2fa4927de26001ee7a0f5347ae93f71fe858 /cyclone/sickle/cartopol.c
parentbbb80ee9ae981da4b25941500c8f3cc7eeb14063 (diff)
fixed inversed phase output and checked against Max5 for compatibility, now [cartopol~] matches the output of [cartopol]
svn path=/trunk/externals/miXed/; revision=15927
Diffstat (limited to 'cyclone/sickle/cartopol.c')
-rw-r--r--cyclone/sickle/cartopol.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/cyclone/sickle/cartopol.c b/cyclone/sickle/cartopol.c
index 4c25797..e33f782 100644
--- a/cyclone/sickle/cartopol.c
+++ b/cyclone/sickle/cartopol.c
@@ -30,9 +30,9 @@ static t_int *cartopol_perform(t_int *w)
t_float *out2 = (t_float *)(w[5]);
while (nblock--)
{
- float rl = *in1++, im = -*in2++; /* CHECKED */
- *out1++ = hypotf(rl, im);
- *out2++ = atan2f(im, rl);
+ float rl = *in1++, im = *in2++; /* checked against Max5 */
+ *out1++ = hypotf(rl, im);
+ *out2++ = atan2f(im, rl);
}
return (w + 6);
}
@@ -45,8 +45,8 @@ static t_int *cartopol_perform_nophase(t_int *w)
t_float *out1 = (t_float *)(w[4]);
while (nblock--)
{
- float rl = *in1++, im = -*in2++; /* CHECKED */
- *out1++ = hypotf(rl, im);
+ float rl = *in1++, im = *in2++; /* checked against Max5 */
+ *out1++ = hypotf(rl, im);
}
return (w + 5);
}