Go to the source code of this file.
|
#define | CMPLX "complex.h $Revision: 1.5 $ on $Date: 88/11/22 02:51:07 $ " |
|
#define | DC_ABS(a, b) (FABS(a) + FABS(b)) |
|
#define | DC_DIVEQ(a, b, c, d) |
|
#define | DC_MULT(a, b, c, d, x, y) |
|
#define | DC_MINUSEQ(a, b, c, d) |
|
#define | C_SQRT(A) |
|
#define | C_MAG2(A) |
|
#define | C_CONJ(A) ((A).imag *= -1.0) |
|
#define | C_CONJEQ(A, B) |
|
#define | C_EQ(A, B) |
|
#define | C_NORM(A, B) |
|
#define | C_ABS(A) (sqrt((A).real * (A.real) + (A.imag * A.imag))) |
|
#define | C_MUL(A, B) |
|
#define | C_MULEQ(A, B, C) |
|
#define | C_DIV(A, B) |
|
#define | C_DIVEQ(A, B, C) |
|
#define | C_ADD(A, B) |
|
#define | C_ADDEQ(A, B, C) |
|
#define | C_SUB(A, B) |
|
#define | C_SUBEQ(A, B, C) |
|
#define C_ABS |
( |
|
A | ) |
(sqrt((A).real * (A.real) + (A.imag * A.imag))) |
Value:{ \
(A).real += (B.real); \
(A).imag += (B.imag); \
}
Definition at line 188 of file complex.h.
#define C_ADDEQ |
( |
|
A, |
|
|
|
B, |
|
|
|
C |
|
) |
| |
Value:{ \
(A).real = (B.real) + (C.real); \
(A).imag = (B.imag) + (C.imag); \
}
Definition at line 193 of file complex.h.
#define C_CONJ |
( |
|
A | ) |
((A).imag *= -1.0) |
#define C_CONJEQ |
( |
|
A, |
|
|
|
B |
|
) |
| |
Value:{ \
(A).real = (B.real); \
(A).imag = - (B.imag); \
}
Definition at line 127 of file complex.h.
Value:{ \
double _tmp, _mag; \
_tmp = (A.real); \
(A).real = _tmp * (B.real) + (A).imag * (B.imag); \
(A).imag = - _tmp * (B.imag) + (A.imag) * (B.real); \
_mag = (B.real) * (B.real) + (B.imag) * (B.imag); \
(A).real /= _mag; \
(A).imag /= _mag; \
}
Definition at line 169 of file complex.h.
#define C_DIVEQ |
( |
|
A, |
|
|
|
B, |
|
|
|
C |
|
) |
| |
Value:{ \
double _mag; \
(A).real = (B.real) * (C.real) + (B.imag) * (C.imag); \
(A).imag = (B.imag) * (C.real) - (B.real) * (C.imag); \
_mag = (C.real) * (C.real) + (C.imag) * (C.imag); \
(A).real /= _mag; \
(A).imag /= _mag; \
}
Definition at line 179 of file complex.h.
Value:{ \
(A).real = (B.real); \
(A).imag = (B.imag); \
}
Definition at line 132 of file complex.h.
Value:(((A).real = (A).real * (A).real + (A).imag * (A).imag), \
(A).imag = 0.0)
Definition at line 122 of file complex.h.
Value:{ \
double TMP1, TMP2; \
TMP1 = (A.real); \
TMP2 = (B.real); \
(A).real = TMP1 * TMP2 - (A.imag) * (B.imag); \
(A).imag = TMP1 * (B.imag) + (A.imag) * TMP2; \
}
Definition at line 156 of file complex.h.
#define C_MULEQ |
( |
|
A, |
|
|
|
B, |
|
|
|
C |
|
) |
| |
Value:{ \
(A).real = (B.real) * (C.real) - (B.imag) * (C.imag); \
(A).imag = (B.real) * (C.imag) + (B.imag) * (C.real); \
}
Definition at line 164 of file complex.h.
Value: if ((A).real == 0.0 && (A).imag == 0.0) { \
(B) = 0; \
(B) += 1; \
(A).real /= 2.0; \
(A).imag /= 2.0; \
(B) -= 1; \
(A).real *= 2.0; \
(A).imag *= 2.0; \
} \
} \
}
while(TDesc->tSucc!=NULL)
Definition at line 137 of file complex.h.
Value:{ \
(A).imag = sqrt(-(A).real); \
(A).real = 0.0; \
} else { \
(A).real = sqrt((A).real); \
(A).imag = 0.0; \
} \
} else { \
_mag = sqrt((A).real * (A).real + (A).imag * (A).imag); \
_a = (_mag - (A).real) / 2.0;
\ (A).real = sqrt(_mag); \
(A).imag /= (2.0 * (A).real); \
} else { \
_a = sqrt(_a); \
(A).real = (A).imag / (2.0 * _a); \
(A).imag = _a; \
} \
} \
}
Definition at line 98 of file complex.h.
Value:{ \
(A).real -= (B.real); \
(A).imag -= (B.imag); \
}
Definition at line 198 of file complex.h.
#define C_SUBEQ |
( |
|
A, |
|
|
|
B, |
|
|
|
C |
|
) |
| |
Value:{ \
(A).real = (B.real) - (C.real); \
(A).imag = (B.imag) - (C.imag); \
}
Definition at line 203 of file complex.h.
#define CMPLX "complex.h $Revision: 1.5 $ on $Date: 88/11/22 02:51:07 $ " |
#define DC_DIVEQ |
( |
|
a, |
|
|
|
b, |
|
|
|
c, |
|
|
|
d |
|
) |
| |
Value:{ \
} else { \
} \
(*(b)) = y; \
}
Definition at line 38 of file complex.h.
#define DC_MINUSEQ |
( |
|
a, |
|
|
|
b, |
|
|
|
c, |
|
|
|
d |
|
) |
| |
#define DC_MULT |
( |
|
a, |
|
|
|
b, |
|
|
|
c, |
|
|
|
d, |
|
|
|
x, |
|
|
|
y |
|
) |
| |
Value:{ \
*(x) = (
a) * (
c) - (b) * (
d) ; \
*(y) = (
a) * (
d) + (b) * (
c) ; \
}
Definition at line 64 of file complex.h.