FLOAT
x = complex<FLOAT> (re, im);
template <class FLOAT> ostream&
operator << (ostream& os, const complex<FLOAT>& x)
template <class FLOAT> complex<FLOAT>&
__doadv (complex<FLOAT>* ths, const complex<FLOAT>& y)
FLOAT ar = abs (y.re);
FLOAT ai = abs (y.im);
FLOAT nr, ni;
FLOAT t, d;
template <class FLOAT> complex<FLOAT>
operator / (const complex<FLOAT>& x, const complex<FLOAT>& y)
FLOAT ar = abs (real (y));
FLOAT ai = abs (imag (y));
FLOAT nr, ni;
FLOAT t, d;
return complex<FLOAT> (nr, ni);
template <class FLOAT> complex<FLOAT>
operator / (FLOAT x, const complex<FLOAT>& y)
FLOAT ar = abs (real (y));
FLOAT ai = abs (imag (y));
FLOAT nr, ni;
FLOAT t, d;
return complex<FLOAT> (nr, ni);
template <class FLOAT> complex<FLOAT>
pow (const complex<FLOAT>& xin, int y)
return complex<FLOAT> (1.0);
complex<FLOAT> r (1.0);
complex<FLOAT> x (xin);
x = FLOAT(1)/x;
template <class FLOAT> complex<FLOAT>
sqrt (const complex<FLOAT>& x)
FLOAT r = abs (x);
FLOAT nr, ni;
return complex<FLOAT> (nr, ni);
template <class FLOAT> complex<FLOAT>
cos (const complex<FLOAT>& x)
return complex<FLOAT> (cos (real (x)) * cosh (imag (x)),
template <class FLOAT> complex<FLOAT>
cosh (const complex<FLOAT>& x)
return complex<FLOAT> (cosh (real (x)) * cos (imag (x)),
template <class FLOAT> complex<FLOAT>
exp (const complex<FLOAT>& x)
return polar (FLOAT (exp (real (x))), imag (x));
template <class FLOAT> complex<FLOAT>
log (const complex<FLOAT>& x)
return complex<FLOAT> (log (abs (x)), arg (x));
template <class FLOAT> complex<FLOAT>
pow (const complex<FLOAT>& x, const complex<FLOAT>& y)
FLOAT logr = log (abs (x));
FLOAT t = arg (x);
return polar (FLOAT (exp (logr * real (y) - imag (y) * t)),
FLOAT (imag (y) * logr + real (y) * t));
template <class FLOAT> complex<FLOAT>
pow (const complex<FLOAT>& x, FLOAT y)
return exp (FLOAT (y) * log (x));
template <class FLOAT> complex<FLOAT>
pow (FLOAT x, const complex<FLOAT>& y)
return exp (y * FLOAT (log (x)));
template <class FLOAT> complex<FLOAT>
sin (const complex<FLOAT>& x)
return complex<FLOAT> (sin (real (x)) * cosh (imag (x)),
template <class FLOAT> complex<FLOAT>
sinh (const complex<FLOAT>& x)
return complex<FLOAT> (sinh (real (x)) * cos (imag (x)),
template <class FLOAT> istream&
operator >> (istream& is, complex<FLOAT>& x)
FLOAT re, im = 0;
vers_1: VERS_1 FLOAT
%token STRING NUMBER FLOAT VOLTAGE CURRENT SIZE
%type <flt> FLOAT
%token <f> FLOAT
: FLOAT { $$ = $1; }
| '-' FLOAT { $$ = -($2); }
extern FLOAT MPN2FLOAT (mp_srcptr mpn, int exponent, int negative);
FLOAT
static inline FLOAT
#ifndef FLOAT
FLOAT
FLOAT retval = NAN;
FLOAT result;