File: SCComplex.h

package info (click to toggle)
supercollider 1%3A3.4.5-1wheezy1
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 26,972 kB
  • sloc: cpp: 116,645; lisp: 64,914; ansic: 10,725; python: 3,548; perl: 766; ruby: 487; sh: 152; makefile: 117; xml: 13
file content (128 lines) | stat: -rw-r--r-- 3,655 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
/*
	SuperCollider real time audio synthesis system
    Copyright (c) 2002 James McCartney. All rights reserved.
	http://www.audiosynth.com

    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation; either version 2 of the License, or
    (at your option) any later version.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301  USA
*/


#ifndef _SCComplex_
#define _SCComplex_

////////////////////////////////////////////////////////////////////////////////

struct SCPolar;

struct SCComplex
{
	SCComplex(float r, float i) : real(r), imag(i) {}
	void Set(float r, float i) { real = r; imag = i; }

	SCComplex& operator=(SCComplex b) { real = b.real; imag = b.imag; return *this; }
	SCComplex& operator=(float b) { real = b; imag = 0.; return *this; }

	SCPolar ToPolar();
	SCPolar ToPolarApx();

	void ToPolarInPlace();
	void ToPolarApxInPlace();

	float real, imag;
};

struct SCPolar
{
	SCPolar(float m, float p) : mag(m), phase(p) {}
	void Set(float m, float p) { mag = m; phase = p; }

	SCPolar& operator=(SCPolar b) { mag = b.mag; phase = b.phase; return *this; }
	SCPolar& operator=(float b) { mag = b; phase = 0.; return *this; }

	SCComplex ToComplex();
	SCComplex ToComplexApx();

	void ToComplexInPlace();
	void ToComplexApxInPlace();

	float mag, phase;
};

void ToComplex(SCPolar in, SCComplex& out);

inline SCComplex operator+(SCComplex a, SCComplex b) { return SCComplex(a.real + b.real, a.imag + b.imag); }
inline SCComplex operator+(SCComplex a, float b) { return SCComplex(a.real + b, a.imag); }
inline SCComplex operator+(float a, SCComplex b) { return SCComplex(a + b.real, b.imag); }

inline SCComplex& operator+=(SCComplex& a, const SCComplex& b) { a.real += b.real, a.imag += b.imag; return a; }
inline SCComplex& operator+=(SCComplex& a, float b) { a.real += b; return a; }

inline SCComplex operator-(SCComplex a, SCComplex b) { return SCComplex(a.real - b.real, a.imag - b.imag); }
inline SCComplex operator-(SCComplex a, float b) { return SCComplex(a.real - b, a.imag); }
inline SCComplex operator-(float a, SCComplex b) { return SCComplex(a - b.real, b.imag); }

inline SCComplex operator-=(SCComplex a, SCComplex b) { a.real -= b.real, a.imag -= b.imag; return a; }
inline SCComplex operator-=(SCComplex a, float b) { a.real -= b; return a; }

inline SCComplex operator*(SCComplex a, SCComplex b)
{
	return SCComplex(a.real * b.real - a.imag * b.imag, a.real * b.imag + a.imag * b.real);
}

inline SCComplex operator*(SCComplex a, float b)
{
	return SCComplex(a.real * b, a.imag * b);
}

inline SCComplex operator*(float a, SCComplex b)
{
	return SCComplex(b.real * a, b.imag * a);
}

inline SCComplex operator*=(SCComplex a, SCComplex b)
{
	a.Set(
		a.real * b.real - a.imag * b.imag,
		a.real * b.imag + a.imag * b.real
	);
	return a;
}

inline SCComplex operator*=(SCComplex a, float b)
{
	a.real *= b;
	a.imag *= b;
	return a;
}


inline SCPolar operator*(SCPolar a, float b)
{
	return SCPolar(a.mag * b, a.phase);
}

inline SCPolar operator*(float a, SCPolar b)
{
	return SCPolar(a * b.mag, b.phase);
}

inline SCPolar operator*=(SCPolar a, float b)
{
	a.mag *= b;
	return a;
}


#endif