--- /dev/null
+/*M///////////////////////////////////////////////////////////////////////////////////////
+//
+// IMPORTANT: READ BEFORE DOWNLOADING, COPYING, INSTALLING OR USING.
+//
+// By downloading, copying, installing or using the software you agree to this license.
+// If you do not agree to this license, do not download, install,
+// copy or use the software.
+//
+//
+// License Agreement
+// For Open Source Computer Vision Library
+//
+// Copyright (C) 2000-2008, Intel Corporation, all rights reserved.
+// Copyright (C) 2009, Willow Garage Inc., all rights reserved.
+// Third party copyrights are property of their respective owners.
+//
+// Redistribution and use in source and binary forms, with or without modification,
+// are permitted provided that the following conditions are met:
+//
+// * Redistribution's of source code must retain the above copyright notice,
+// this list of conditions and the following disclaimer.
+//
+// * Redistribution's in binary form must reproduce the above copyright notice,
+// this list of conditions and the following disclaimer in the documentation
+// and/or other materials provided with the distribution.
+//
+// * The name of the copyright holders may not be used to endorse or promote products
+// derived from this software without specific prior written permission.
+//
+// This software is provided by the copyright holders and contributors "as is" and
+// any express or implied warranties, including, but not limited to, the implied
+// warranties of merchantability and fitness for a particular purpose are disclaimed.
+// In no event shall the Intel Corporation or contributors be liable for any direct,
+// indirect, incidental, special, exemplary, or consequential damages
+// (including, but not limited to, procurement of substitute goods or services;
+// loss of use, data, or profits; or business interruption) however caused
+// and on any theory of liability, whether in contract, strict liability,
+// or tort (including negligence or otherwise) arising in any way out of
+// the use of this software, even if advised of the possibility of such damage.
+//
+//M*/
+
+#include "_cxcore.h"
+
+namespace cv
+{
+
+static const int MAX_BLOCK_SIZE = 1024;
+
+typedef CvStatus (CV_STDCALL * MathFunc)(const void* src, void* dst, int len);
+
+#define ICV_MATH_BLOCK_SIZE 256
+
+#define _CV_SQRT_MAGIC 0xbe6f0000
+
+#define _CV_SQRT_MAGIC_DBL CV_BIG_UINT(0xbfcd460000000000)
+
+#define _CV_ATAN_CF0 (-15.8131890796f)
+#define _CV_ATAN_CF1 (61.0941945596f)
+#define _CV_ATAN_CF2 0.f /*(-0.140500406322f)*/
+
+static const float icvAtanTab[8] = { 0.f + _CV_ATAN_CF2, 90.f - _CV_ATAN_CF2,
+ 180.f - _CV_ATAN_CF2, 90.f + _CV_ATAN_CF2,
+ 360.f - _CV_ATAN_CF2, 270.f + _CV_ATAN_CF2,
+ 180.f + _CV_ATAN_CF2, 270.f - _CV_ATAN_CF2
+};
+
+static const int icvAtanSign[8] =
+ { 0, 0x80000000, 0x80000000, 0, 0x80000000, 0, 0, 0x80000000 };
+
+float fastAtan2( float y, float x )
+{
+ double a, x2 = (double)x*x, y2 = (double)y*y;
+ if( y2 <= x2 )
+ {
+ a = (180./CV_PI)*x*y/(x2 + 0.28*y2 + DBL_EPSILON);
+ return (float)(x < 0 ? a + 180 : y >= 0 ? a : 360+a);
+ }
+ a = (180./CV_PI)*x*y/(y2 + 0.28*x2 + DBL_EPSILON);
+ return (float)(y >= 0 ? 90 - a : 270 - a);
+}
+
+static CvStatus CV_STDCALL FastAtan2_32f(const float *Y, const float *X, float *angle, int len, bool angleInDegrees=true )
+{
+ if( !Y || !X || !angle || len < 0 )
+ return CV_BADFACTOR_ERR;
+
+ int i = 0;
+ float scale = angleInDegrees ? (float)(180/CV_PI) : 1.f;
+
+#if CV_SSE2
+ static const int CV_DECL_ALIGNED(16) iabsmask[] = {0x7fffffff, 0x7fffffff, 0x7fffffff, 0x7fffffff};
+ __m128 eps = _mm_set1_ps((float)DBL_EPSILON), absmask = _mm_load_ps((const float*)iabsmask);
+ __m128 _90 = _mm_set1_ps((float)(CV_PI*0.5)), _180 = _mm_set1_ps((float)CV_PI), _360 = _mm_set1_ps((float)(CV_PI*2));
+ __m128 zero = _mm_setzero_ps(), _0_28 = _mm_set1_ps(0.28f), scale4 = _mm_set1_ps(scale);
+
+ for( ; i <= len - 4; i += 4 )
+ {
+ __m128 x4 = _mm_loadu_ps(X + i), y4 = _mm_loadu_ps(Y + i);
+ __m128 xq4 = _mm_mul_ps(x4, x4), yq4 = _mm_mul_ps(y4, y4);
+ __m128 xly = _mm_cmplt_ps(xq4, yq4);
+ __m128 z4 = _mm_div_ps(_mm_mul_ps(x4, y4), _mm_add_ps(_mm_add_ps(_mm_max_ps(xq4, yq4),
+ _mm_mul_ps(_mm_min_ps(xq4, yq4), _0_28)), eps));
+
+ // a4 <- x < y ? 90 : 0;
+ __m128 a4 = _mm_and_ps(xly, _90);
+ // a4 <- (y < 0 ? 360 - a4 : a4) == ((x < y ? y < 0 ? 270 : 90) : (y < 0 ? 360 : 0))
+ __m128 mask = _mm_cmplt_ps(y4, zero);
+ a4 = _mm_or_ps(_mm_and_ps(_mm_sub_ps(_360, a4), mask), _mm_andnot_ps(mask, a4));
+ // a4 <- (x < 0 && !(x < y) ? 180 : a4)
+ mask = _mm_andnot_ps(xly, _mm_cmplt_ps(x4, zero));
+ a4 = _mm_or_ps(_mm_and_ps(_180, mask), _mm_andnot_ps(mask, a4));
+
+ // a4 <- (x < y ? a4 - z4 : a4 + z4)
+ a4 = _mm_mul_ps(_mm_add_ps(_mm_xor_ps(z4, _mm_andnot_ps(absmask, xly)), a4), scale4);
+ _mm_storeu_ps(angle + i, a4);
+ }
+#endif
+
+ for( ; i < len; i++ )
+ {
+ float x = X[i], y = Y[i];
+ float a, x2 = x*x, y2 = y*y;
+ if( y2 <= x2 )
+ a = x*y/(x2 + 0.28f*y2 + (float)DBL_EPSILON) + (float)(x < 0 ? CV_PI : y >= 0 ? 0 : CV_PI*2);
+ else
+ a = (float)(y >= 0 ? CV_PI*0.5 : CV_PI*1.5) - x*y/(y2 + 0.28f*x2 + (float)DBL_EPSILON);
+ angle[i] = a*scale;
+ }
+
+ return CV_OK;
+}
+
+
+/* ************************************************************************** *\
+ Fast cube root by Ken Turkowski
+ (http://www.worldserver.com/turk/computergraphics/papers.html)
+\* ************************************************************************** */
+float cubeRoot( float value )
+{
+ float fr;
+ Cv32suf v, m;
+ int ix, s;
+ int ex, shx;
+
+ v.f = value;
+ ix = v.i & 0x7fffffff;
+ s = v.i & 0x80000000;
+ ex = (ix >> 23) - 127;
+ shx = ex % 3;
+ shx -= shx >= 0 ? 3 : 0;
+ ex = (ex - shx) / 3; /* exponent of cube root */
+ v.i = (ix & ((1<<23)-1)) | ((shx + 127)<<23);
+ fr = v.f;
+
+ /* 0.125 <= fr < 1.0 */
+ /* Use quartic rational polynomial with error < 2^(-24) */
+ fr = (float)(((((45.2548339756803022511987494 * fr +
+ 192.2798368355061050458134625) * fr +
+ 119.1654824285581628956914143) * fr +
+ 13.43250139086239872172837314) * fr +
+ 0.1636161226585754240958355063)/
+ ((((14.80884093219134573786480845 * fr +
+ 151.9714051044435648658557668) * fr +
+ 168.5254414101568283957668343) * fr +
+ 33.9905941350215598754191872) * fr +
+ 1.0));
+
+ /* fr *= 2^ex * sign */
+ m.f = value;
+ v.f = fr;
+ v.i = (v.i + (ex << 23) + s) & (m.i*2 != 0 ? -1 : 0);
+ return v.f;
+}
+
+template<typename T> static CvStatus CV_STDCALL InvSqrt(const T* src, T* dst, int len)
+{
+ for( int i = 0; i < len; i++ )
+ dst[i] = 1/std::sqrt(src[i]);
+ return CV_OK;
+
+}
+
+template<typename T> static CvStatus CV_STDCALL Sqrt(const T* src, T* dst, int len)
+{
+ for( int i = 0; i < len; i++ )
+ dst[i] = std::sqrt(src[i]);
+ return CV_OK;
+}
+
+template<typename T> static CvStatus CV_STDCALL
+Magnitude(const T* x, const T* y, T* mag, int len)
+{
+ int i;
+ for( i = 0; i <= len - 4; i += 4 )
+ {
+ T x0 = x[i], y0 = y[i], x1 = x[i+1], y1 = y[i+1];
+
+ x0 = x0*x0 + y0*y0;
+ x1 = x1*x1 + y1*y1;
+ mag[i] = x0;
+ mag[i+1] = x1;
+ x0 = x[i+2], y0 = y[i+2];
+ x1 = x[i+3], y1 = y[i+3];
+ x0 = x0*x0 + y0*y0;
+ x1 = x1*x1 + y1*y1;
+ mag[i+2] = x0;
+ mag[i+3] = x1;
+ }
+
+ for( ; i < len; i++ )
+ {
+ T x0 = x[i], y0 = y[i];
+ mag[i] = x0*x0 + y0*y0;
+ }
+ Sqrt( mag, mag, len );
+
+ return CV_OK;
+}
+
+
+#if CV_SSE2
+template<> CvStatus CV_STDCALL InvSqrt(const float* src, float* dst, int len)
+{
+ int i = 0;
+ __m128 _0_5 = _mm_set1_ps(0.5f), _1_5 = _mm_set1_ps(1.5f);
+ if( (((size_t)src|(size_t)dst) & 15) == 0 )
+ for( ; i <= len - 8; i += 8 )
+ {
+ __m128 t0 = _mm_load_ps(src + i), t1 = _mm_load_ps(src + i + 4);
+ __m128 h0 = _mm_mul_ps(t0, _0_5), h1 = _mm_mul_ps(t1, _0_5);
+ t0 = _mm_rsqrt_ps(t0); t1 = _mm_rsqrt_ps(t1);
+ t0 = _mm_mul_ps(t0, _mm_sub_ps(_1_5, _mm_mul_ps(_mm_mul_ps(t0,t0),h0)));
+ t1 = _mm_mul_ps(t1, _mm_sub_ps(_1_5, _mm_mul_ps(_mm_mul_ps(t1,t1),h1)));
+ _mm_store_ps(dst + i, t0); _mm_store_ps(dst + i + 4, t1);
+ }
+ else
+ for( ; i <= len - 8; i += 8 )
+ {
+ __m128 t0 = _mm_loadu_ps(src + i), t1 = _mm_loadu_ps(src + i + 4);
+ __m128 h0 = _mm_mul_ps(t0, _0_5), h1 = _mm_mul_ps(t1, _0_5);
+ t0 = _mm_rsqrt_ps(t0); t1 = _mm_rsqrt_ps(t1);
+ t0 = _mm_mul_ps(t0, _mm_sub_ps(_1_5, _mm_mul_ps(_mm_mul_ps(t0,t0),h0)));
+ t1 = _mm_mul_ps(t1, _mm_sub_ps(_1_5, _mm_mul_ps(_mm_mul_ps(t1,t1),h1)));
+ _mm_storeu_ps(dst + i, t0); _mm_storeu_ps(dst + i + 4, t1);
+ }
+ for( ; i < len; i++ )
+ dst[i] = 1/std::sqrt(src[i]);
+ return CV_OK;
+}
+
+template<> CvStatus CV_STDCALL Sqrt(const float* src, float* dst, int len)
+{
+ int i = 0;
+ if( (((size_t)src|(size_t)dst) & 15) == 0 )
+ for( ; i <= len - 8; i += 8 )
+ {
+ __m128 t0 = _mm_load_ps(src + i), t1 = _mm_load_ps(src + i + 4);
+ t0 = _mm_sqrt_ps(t0); t1 = _mm_sqrt_ps(t1);
+ _mm_store_ps(dst + i, t0); _mm_store_ps(dst + i + 4, t1);
+ }
+ else
+ for( ; i <= len - 8; i += 8 )
+ {
+ __m128 t0 = _mm_loadu_ps(src + i), t1 = _mm_loadu_ps(src + i + 4);
+ t0 = _mm_sqrt_ps(t0); t1 = _mm_sqrt_ps(t1);
+ _mm_storeu_ps(dst + i, t0); _mm_storeu_ps(dst + i + 4, t1);
+ }
+ for( ; i < len; i++ )
+ dst[i] = std::sqrt(src[i]);
+ return CV_OK;
+}
+
+template<> CvStatus CV_STDCALL Sqrt(const double* src, double* dst, int len)
+{
+ int i = 0;
+ if( (((size_t)src|(size_t)dst) & 15) == 0 )
+ for( ; i <= len - 4; i += 4 )
+ {
+ __m128d t0 = _mm_load_pd(src + i), t1 = _mm_load_pd(src + i + 2);
+ t0 = _mm_sqrt_pd(t0); t1 = _mm_sqrt_pd(t1);
+ _mm_store_pd(dst + i, t0); _mm_store_pd(dst + i + 2, t1);
+ }
+ else
+ for( ; i <= len - 4; i += 4 )
+ {
+ __m128d t0 = _mm_loadu_pd(src + i), t1 = _mm_loadu_pd(src + i + 2);
+ t0 = _mm_sqrt_pd(t0); t1 = _mm_sqrt_pd(t1);
+ _mm_storeu_pd(dst + i, t0); _mm_storeu_pd(dst + i + 2, t1);
+ }
+ for( ; i < len; i++ )
+ dst[i] = std::sqrt(src[i]);
+ return CV_OK;
+}
+
+template<> CvStatus CV_STDCALL
+Magnitude(const float* x, const float* y, float* mag, int len)
+{
+ int i = 0;
+ for( ; i <= len - 8; i += 8 )
+ {
+ __m128 x0 = _mm_loadu_ps(x + i), x1 = _mm_loadu_ps(x + i + 4);
+ __m128 y0 = _mm_loadu_ps(y + i), y1 = _mm_loadu_ps(y + i + 4);
+ x0 = _mm_add_ps(_mm_mul_ps(x0, x0), _mm_mul_ps(y0, y0));
+ x1 = _mm_add_ps(_mm_mul_ps(x1, x1), _mm_mul_ps(y1, y1));
+ x0 = _mm_sqrt_ps(x0); x1 = _mm_sqrt_ps(x1);
+ _mm_storeu_ps(mag + i, x0); _mm_storeu_ps(mag + i + 4, x1);
+ }
+ for( ; i < len; i++ )
+ {
+ float x0 = x[i], y0 = y[i];
+ mag[i] = std::sqrt(x0*x0 + y0*y0);
+ }
+ return CV_OK;
+}
+#endif
+
+static CvStatus CV_STDCALL Sqrt_32f(const float* src, float* dst, int len)
+{
+ return Sqrt( src, dst, len );
+}
+
+static CvStatus CV_STDCALL InvSqrt_32f(const float* src, float* dst, int len)
+{
+ return InvSqrt( src, dst, len );
+}
+
+static CvStatus CV_STDCALL Sqrt_64f(const double* src, double* dst, int len)
+{
+ return Sqrt( src, dst, len );
+}
+
+static CvStatus CV_STDCALL InvSqrt_64f(const double* src, double* dst, int len)
+{
+ return InvSqrt( src, dst, len );
+}
+
+
+/****************************************************************************************\
+* Cartezian -> Polar *
+\****************************************************************************************/
+
+void magnitude( const Mat& X, const Mat& Y, Mat& Mag )
+{
+ int type = X.type(), depth = X.depth(), cn = X.channels();
+ CV_Assert( X.size() == Y.size() && type == Y.type() && (depth == CV_32F || depth == CV_64F));
+ Mag.create( X.size(), type );
+
+ Size size = getContinuousSize( X, Y, Mag, cn );
+
+ if( depth == CV_32F )
+ {
+ const float *x = (const float*)X.data, *y = (const float*)Y.data;
+ float *mag = (float*)Mag.data;
+ size_t xstep = X.step/sizeof(x[0]), ystep = Y.step/sizeof(y[0]);
+ size_t mstep = Mag.step/sizeof(mag[0]);
+
+ for( ; size.height--; x += xstep, y += ystep, mag += mstep )
+ Magnitude( x, y, mag, size.width );
+ }
+ else
+ {
+ const double *x = (const double*)X.data, *y = (const double*)Y.data;
+ double *mag = (double*)Mag.data;
+ size_t xstep = X.step/sizeof(x[0]), ystep = Y.step/sizeof(y[0]);
+ size_t mstep = Mag.step/sizeof(mag[0]);
+
+ for( ; size.height--; x += xstep, y += ystep, mag += mstep )
+ Magnitude( x, y, mag, size.width );
+ }
+}
+
+void phase( const Mat& X, const Mat& Y, Mat& Angle, bool angleInDegrees )
+{
+ float buf[2][MAX_BLOCK_SIZE];
+ int i, j, type = X.type(), depth = X.depth(), cn = X.channels();
+
+ CV_Assert( X.size() == Y.size() && type == Y.type() && (depth == CV_32F || depth == CV_64F));
+ Angle.create( X.size(), type );
+
+ Size size = getContinuousSize( X, Y, Angle, cn );
+
+ if( depth == CV_32F )
+ {
+ const float *x = (const float*)X.data, *y = (const float*)Y.data;
+ float *angle = (float*)Angle.data;
+ size_t xstep = X.step/sizeof(x[0]), ystep = Y.step/sizeof(y[0]);
+ size_t astep = Angle.step/sizeof(angle[0]);
+
+ for( ; size.height--; x += xstep, y += ystep, angle += astep )
+ FastAtan2_32f( y, x, angle, size.width, angleInDegrees );
+ }
+ else
+ {
+ const double *x = (const double*)X.data, *y = (const double*)Y.data;
+ double *angle = (double*)Angle.data;
+ size_t xstep = X.step/sizeof(x[0]), ystep = Y.step/sizeof(y[0]);
+ size_t astep = Angle.step/sizeof(angle[0]);
+
+ for( ; size.height--; x += xstep, y += ystep, angle += astep )
+ {
+ for( i = 0; i < size.width; i += MAX_BLOCK_SIZE )
+ {
+ int block_size = std::min(MAX_BLOCK_SIZE, size.width - i);
+ for( j = 0; j < block_size; j++ )
+ {
+ buf[0][j] = (float)x[i + j];
+ buf[1][j] = (float)y[i + j];
+ }
+ FastAtan2_32f( buf[1], buf[0], buf[0], block_size, angleInDegrees );
+ for( j = 0; j < block_size; j++ )
+ angle[i + j] = buf[0][j];
+ }
+ }
+ }
+}
+
+void cartToPolar( const Mat& X, const Mat& Y, Mat& Mag, Mat& Angle, bool angleInDegrees )
+{
+ float buf[2][MAX_BLOCK_SIZE];
+ int i, j, type = X.type(), depth = X.depth(), cn = X.channels();
+
+ CV_Assert( X.size() == Y.size() && type == Y.type() && (depth == CV_32F || depth == CV_64F));
+ Mag.create( X.size(), type );
+ Angle.create( X.size(), type );
+
+ Size size = getContinuousSize( X, Y, Mag, Angle, cn );
+ bool inplace = Mag.data == X.data || Mag.data == Y.data;
+
+ if( depth == CV_32F )
+ {
+ const float *x = (const float*)X.data, *y = (const float*)Y.data;
+ float *mag = (float*)Mag.data, *angle = (float*)Angle.data;
+ size_t xstep = X.step/sizeof(x[0]), ystep = Y.step/sizeof(y[0]);
+ size_t mstep = Mag.step/sizeof(mag[0]), astep = Angle.step/sizeof(angle[0]);
+
+ for( ; size.height--; x += xstep, y += ystep, mag += mstep, angle += astep )
+ {
+ for( i = 0; i < size.width; i += MAX_BLOCK_SIZE )
+ {
+ int block_size = std::min(MAX_BLOCK_SIZE, size.width - i);
+ Magnitude( x + i, y + i, inplace ? buf[0] : mag + i, block_size );
+ FastAtan2_32f( y + i, x + i, angle + i, block_size, angleInDegrees );
+ if( inplace )
+ for( j = 0; j < block_size; j++ )
+ mag[i + j] = buf[0][j];
+ }
+ }
+ }
+ else
+ {
+ const double *x = (const double*)X.data, *y = (const double*)Y.data;
+ double *mag = (double*)Mag.data, *angle = (double*)Angle.data;
+ size_t xstep = X.step/sizeof(x[0]), ystep = Y.step/sizeof(y[0]);
+ size_t mstep = Mag.step/sizeof(mag[0]), astep = Angle.step/sizeof(angle[0]);
+
+ for( ; size.height--; x += xstep, y += ystep, mag += mstep, angle += astep )
+ {
+ for( i = 0; i < size.width; i += MAX_BLOCK_SIZE )
+ {
+ int block_size = std::min(MAX_BLOCK_SIZE, size.width - i);
+ for( j = 0; j < block_size; j++ )
+ {
+ buf[0][j] = (float)x[i + j];
+ buf[1][j] = (float)y[i + j];
+ }
+ FastAtan2_32f( buf[1], buf[0], buf[0], block_size, angleInDegrees );
+ Magnitude( x + i, y + i, mag + i, block_size );
+ for( j = 0; j < block_size; j++ )
+ angle[i + j] = buf[0][j];
+ }
+ }
+ }
+}
+
+
+/****************************************************************************************\
+* Polar -> Cartezian *
+\****************************************************************************************/
+
+static CvStatus CV_STDCALL
+SinCos_32f( const float *angle,float *sinval, float* cosval,
+ int len, int angle_in_degrees )
+{
+ const int N = 64;
+
+ static const double sin_table[] =
+ {
+ 0.00000000000000000000, 0.09801714032956060400,
+ 0.19509032201612825000, 0.29028467725446233000,
+ 0.38268343236508978000, 0.47139673682599764000,
+ 0.55557023301960218000, 0.63439328416364549000,
+ 0.70710678118654746000, 0.77301045336273699000,
+ 0.83146961230254524000, 0.88192126434835494000,
+ 0.92387953251128674000, 0.95694033573220894000,
+ 0.98078528040323043000, 0.99518472667219682000,
+ 1.00000000000000000000, 0.99518472667219693000,
+ 0.98078528040323043000, 0.95694033573220894000,
+ 0.92387953251128674000, 0.88192126434835505000,
+ 0.83146961230254546000, 0.77301045336273710000,
+ 0.70710678118654757000, 0.63439328416364549000,
+ 0.55557023301960218000, 0.47139673682599786000,
+ 0.38268343236508989000, 0.29028467725446239000,
+ 0.19509032201612861000, 0.09801714032956082600,
+ 0.00000000000000012246, -0.09801714032956059000,
+ -0.19509032201612836000, -0.29028467725446211000,
+ -0.38268343236508967000, -0.47139673682599764000,
+ -0.55557023301960196000, -0.63439328416364527000,
+ -0.70710678118654746000, -0.77301045336273666000,
+ -0.83146961230254524000, -0.88192126434835494000,
+ -0.92387953251128652000, -0.95694033573220882000,
+ -0.98078528040323032000, -0.99518472667219693000,
+ -1.00000000000000000000, -0.99518472667219693000,
+ -0.98078528040323043000, -0.95694033573220894000,
+ -0.92387953251128663000, -0.88192126434835505000,
+ -0.83146961230254546000, -0.77301045336273688000,
+ -0.70710678118654768000, -0.63439328416364593000,
+ -0.55557023301960218000, -0.47139673682599792000,
+ -0.38268343236509039000, -0.29028467725446250000,
+ -0.19509032201612872000, -0.09801714032956050600,
+ };
+
+ static const double k2 = (2*CV_PI)/N;
+
+ static const double sin_a0 = -0.166630293345647*k2*k2*k2;
+ static const double sin_a2 = k2;
+
+ static const double cos_a0 = -0.499818138450326*k2*k2;
+ /*static const double cos_a2 = 1;*/
+
+ double k1;
+ int i;
+
+ if( !angle_in_degrees )
+ k1 = N/(2*CV_PI);
+ else
+ k1 = N/360.;
+
+ for( i = 0; i < len; i++ )
+ {
+ double t = angle[i]*k1;
+ int it = cvRound(t);
+ t -= it;
+ int sin_idx = it & (N - 1);
+ int cos_idx = (N/4 - sin_idx) & (N - 1);
+
+ double sin_b = (sin_a0*t*t + sin_a2)*t;
+ double cos_b = cos_a0*t*t + 1;
+
+ double sin_a = sin_table[sin_idx];
+ double cos_a = sin_table[cos_idx];
+
+ double sin_val = sin_a*cos_b + cos_a*sin_b;
+ double cos_val = cos_a*cos_b - sin_a*sin_b;
+
+ sinval[i] = (float)sin_val;
+ cosval[i] = (float)cos_val;
+ }
+
+ return CV_OK;
+}
+
+
+void polarToCart( const Mat& Mag, const Mat& Angle, Mat& X, Mat& Y, bool angleInDegrees )
+{
+ int i, j, type = Angle.type(), depth = Angle.depth();
+ Size size;
+
+ CV_Assert( depth == CV_32F || depth == CV_64F );
+ X.create( Angle.size(), type );
+ Y.create( Angle.size(), type );
+
+ if( Mag.data )
+ {
+ CV_Assert( Mag.size() == Angle.size() && Mag.type() == Angle.type() );
+ size = getContinuousSize( Mag, Angle, X, Y, Angle.channels() );
+ }
+ else
+ size = getContinuousSize( Angle, X, Y, Angle.channels() );
+
+ if( depth == CV_32F )
+ {
+ float *x = (float*)X.data, *y = (float*)Y.data;
+ const float *mag = (const float*)Mag.data, *angle = (const float*)Angle.data;
+ size_t xstep = X.step/sizeof(x[0]), ystep = Y.step/sizeof(y[0]);
+ size_t mstep = Mag.step/sizeof(mag[0]), astep = Angle.step/sizeof(angle[0]);
+
+ for( ; size.height--; x += xstep, y += ystep, mag += mstep, angle += astep )
+ {
+ for( i = 0; i < size.width; i += MAX_BLOCK_SIZE )
+ {
+ int block_size = std::min(MAX_BLOCK_SIZE, size.width - i);
+ SinCos_32f( angle + i, y + i, x + i, block_size, angleInDegrees );
+ for( j = 0; j < block_size; j++ )
+ {
+ float m = mag ? mag[i + j] : 1.f;
+ float t0 = x[i + j]*m, t1 = y[i + j]*m;
+ x[i + j] = t0; y[i + j] = t1;
+ }
+ }
+ }
+ }
+ else
+ {
+ double *x = (double*)X.data, *y = (double*)Y.data;
+ const double *mag = (const double*)Mag.data, *angle = (const double*)Angle.data;
+ size_t xstep = X.step/sizeof(x[0]), ystep = Y.step/sizeof(y[0]);
+ size_t mstep = Mag.step/sizeof(mag[0]), astep = Angle.step/sizeof(angle[0]);
+ double ascale = angleInDegrees ? CV_PI/180. : 1;
+
+ for( ; size.height--; x += xstep, y += ystep, mag += mstep, angle += astep )
+ {
+ for( j = 0; j < size.width; j++ )
+ {
+ double alpha = angle[j]*ascale, m = mag ? mag[j] : 1.;
+ double a = cos(alpha), b = sin(alpha);
+ x[j] = m*a; y[j] = m*b;
+ }
+ }
+ }
+}
+
+/****************************************************************************************\
+* E X P *
+\****************************************************************************************/
+
+typedef union
+{
+ struct {
+#if ( defined( WORDS_BIGENDIAN ) && !defined( OPENCV_UNIVERSAL_BUILD ) ) || defined( __BIG_ENDIAN__ )
+ int hi;
+ int lo;
+#else
+ int lo;
+ int hi;
+#endif
+ } i;
+ double d;
+}
+DBLINT;
+
+#ifndef HAVE_IPP
+
+#define EXPTAB_SCALE 6
+#define EXPTAB_MASK ((1 << EXPTAB_SCALE) - 1)
+
+#define EXPPOLY_32F_A0 .9670371139572337719125840413672004409288e-2
+
+static const double expTab[] = {
+ 1.0 * EXPPOLY_32F_A0,
+ 1.0108892860517004600204097905619 * EXPPOLY_32F_A0,
+ 1.0218971486541166782344801347833 * EXPPOLY_32F_A0,
+ 1.0330248790212284225001082839705 * EXPPOLY_32F_A0,
+ 1.0442737824274138403219664787399 * EXPPOLY_32F_A0,
+ 1.0556451783605571588083413251529 * EXPPOLY_32F_A0,
+ 1.0671404006768236181695211209928 * EXPPOLY_32F_A0,
+ 1.0787607977571197937406800374385 * EXPPOLY_32F_A0,
+ 1.0905077326652576592070106557607 * EXPPOLY_32F_A0,
+ 1.1023825833078409435564142094256 * EXPPOLY_32F_A0,
+ 1.1143867425958925363088129569196 * EXPPOLY_32F_A0,
+ 1.126521618608241899794798643787 * EXPPOLY_32F_A0,
+ 1.1387886347566916537038302838415 * EXPPOLY_32F_A0,
+ 1.151189229952982705817759635202 * EXPPOLY_32F_A0,
+ 1.1637248587775775138135735990922 * EXPPOLY_32F_A0,
+ 1.1763969916502812762846457284838 * EXPPOLY_32F_A0,
+ 1.1892071150027210667174999705605 * EXPPOLY_32F_A0,
+ 1.2021567314527031420963969574978 * EXPPOLY_32F_A0,
+ 1.2152473599804688781165202513388 * EXPPOLY_32F_A0,
+ 1.2284805361068700056940089577928 * EXPPOLY_32F_A0,
+ 1.2418578120734840485936774687266 * EXPPOLY_32F_A0,
+ 1.2553807570246910895793906574423 * EXPPOLY_32F_A0,
+ 1.2690509571917332225544190810323 * EXPPOLY_32F_A0,
+ 1.2828700160787782807266697810215 * EXPPOLY_32F_A0,
+ 1.2968395546510096659337541177925 * EXPPOLY_32F_A0,
+ 1.3109612115247643419229917863308 * EXPPOLY_32F_A0,
+ 1.3252366431597412946295370954987 * EXPPOLY_32F_A0,
+ 1.3396675240533030053600306697244 * EXPPOLY_32F_A0,
+ 1.3542555469368927282980147401407 * EXPPOLY_32F_A0,
+ 1.3690024229745906119296011329822 * EXPPOLY_32F_A0,
+ 1.3839098819638319548726595272652 * EXPPOLY_32F_A0,
+ 1.3989796725383111402095281367152 * EXPPOLY_32F_A0,
+ 1.4142135623730950488016887242097 * EXPPOLY_32F_A0,
+ 1.4296133383919700112350657782751 * EXPPOLY_32F_A0,
+ 1.4451808069770466200370062414717 * EXPPOLY_32F_A0,
+ 1.4609177941806469886513028903106 * EXPPOLY_32F_A0,
+ 1.476826145939499311386907480374 * EXPPOLY_32F_A0,
+ 1.4929077282912648492006435314867 * EXPPOLY_32F_A0,
+ 1.5091644275934227397660195510332 * EXPPOLY_32F_A0,
+ 1.5255981507445383068512536895169 * EXPPOLY_32F_A0,
+ 1.5422108254079408236122918620907 * EXPPOLY_32F_A0,
+ 1.5590044002378369670337280894749 * EXPPOLY_32F_A0,
+ 1.5759808451078864864552701601819 * EXPPOLY_32F_A0,
+ 1.5931421513422668979372486431191 * EXPPOLY_32F_A0,
+ 1.6104903319492543081795206673574 * EXPPOLY_32F_A0,
+ 1.628027421857347766848218522014 * EXPPOLY_32F_A0,
+ 1.6457554781539648445187567247258 * EXPPOLY_32F_A0,
+ 1.6636765803267364350463364569764 * EXPPOLY_32F_A0,
+ 1.6817928305074290860622509524664 * EXPPOLY_32F_A0,
+ 1.7001063537185234695013625734975 * EXPPOLY_32F_A0,
+ 1.7186192981224779156293443764563 * EXPPOLY_32F_A0,
+ 1.7373338352737062489942020818722 * EXPPOLY_32F_A0,
+ 1.7562521603732994831121606193753 * EXPPOLY_32F_A0,
+ 1.7753764925265212525505592001993 * EXPPOLY_32F_A0,
+ 1.7947090750031071864277032421278 * EXPPOLY_32F_A0,
+ 1.8142521755003987562498346003623 * EXPPOLY_32F_A0,
+ 1.8340080864093424634870831895883 * EXPPOLY_32F_A0,
+ 1.8539791250833855683924530703377 * EXPPOLY_32F_A0,
+ 1.8741676341102999013299989499544 * EXPPOLY_32F_A0,
+ 1.8945759815869656413402186534269 * EXPPOLY_32F_A0,
+ 1.9152065613971472938726112702958 * EXPPOLY_32F_A0,
+ 1.9360617934922944505980559045667 * EXPPOLY_32F_A0,
+ 1.9571441241754002690183222516269 * EXPPOLY_32F_A0,
+ 1.9784560263879509682582499181312 * EXPPOLY_32F_A0,
+};
+
+static const double exp_prescale = 1.4426950408889634073599246810019 * (1 << EXPTAB_SCALE);
+static const double exp_postscale = 1./(1 << EXPTAB_SCALE);
+static const double exp_max_val = 3000.*(1 << EXPTAB_SCALE); // log10(DBL_MAX) < 3000
+
+static CvStatus CV_STDCALL Exp_32f( const float *_x, float *y, int n )
+{
+ static const double
+ EXPPOLY_32F_A4 = 1.000000000000002438532970795181890933776 / EXPPOLY_32F_A0,
+ EXPPOLY_32F_A3 = .6931471805521448196800669615864773144641 / EXPPOLY_32F_A0,
+ EXPPOLY_32F_A2 = .2402265109513301490103372422686535526573 / EXPPOLY_32F_A0,
+ EXPPOLY_32F_A1 = .5550339366753125211915322047004666939128e-1 / EXPPOLY_32F_A0;
+
+ #undef EXPPOLY
+ #define EXPPOLY(x) \
+ (((((x) + EXPPOLY_32F_A1)*(x) + EXPPOLY_32F_A2)*(x) + EXPPOLY_32F_A3)*(x) + EXPPOLY_32F_A4)
+
+ int i = 0;
+ DBLINT buf[4];
+ const Cv32suf* x = (const Cv32suf*)_x;
+
+ if( !x || !y )
+ return CV_NULLPTR_ERR;
+ if( n <= 0 )
+ return CV_BADSIZE_ERR;
+
+ buf[0].i.lo = buf[1].i.lo = buf[2].i.lo = buf[3].i.lo = 0;
+
+ for( ; i <= n - 4; i += 4 )
+ {
+ double x0 = x[i].f * exp_prescale;
+ double x1 = x[i + 1].f * exp_prescale;
+ double x2 = x[i + 2].f * exp_prescale;
+ double x3 = x[i + 3].f * exp_prescale;
+ int val0, val1, val2, val3, t;
+
+ if( ((x[i].i >> 23) & 255) > 127 + 10 )
+ x0 = x[i].i < 0 ? -exp_max_val : exp_max_val;
+
+ if( ((x[i+1].i >> 23) & 255) > 127 + 10 )
+ x1 = x[i+1].i < 0 ? -exp_max_val : exp_max_val;
+
+ if( ((x[i+2].i >> 23) & 255) > 127 + 10 )
+ x2 = x[i+2].i < 0 ? -exp_max_val : exp_max_val;
+
+ if( ((x[i+3].i >> 23) & 255) > 127 + 10 )
+ x3 = x[i+3].i < 0 ? -exp_max_val : exp_max_val;
+
+ val0 = cvRound(x0);
+ val1 = cvRound(x1);
+ val2 = cvRound(x2);
+ val3 = cvRound(x3);
+
+ x0 = (x0 - val0)*exp_postscale;
+ x1 = (x1 - val1)*exp_postscale;
+ x2 = (x2 - val2)*exp_postscale;
+ x3 = (x3 - val3)*exp_postscale;
+
+ t = (val0 >> EXPTAB_SCALE) + 1023;
+ t = (t | ((t < 2047) - 1)) & (((t < 0) - 1) & 2047);
+ buf[0].i.hi = t << 20;
+
+ t = (val1 >> EXPTAB_SCALE) + 1023;
+ t = (t | ((t < 2047) - 1)) & (((t < 0) - 1) & 2047);
+ buf[1].i.hi = t << 20;
+
+ t = (val2 >> EXPTAB_SCALE) + 1023;
+ t = (t | ((t < 2047) - 1)) & (((t < 0) - 1) & 2047);
+ buf[2].i.hi = t << 20;
+
+ t = (val3 >> EXPTAB_SCALE) + 1023;
+ t = (t | ((t < 2047) - 1)) & (((t < 0) - 1) & 2047);
+ buf[3].i.hi = t << 20;
+
+ x0 = buf[0].d * expTab[val0 & EXPTAB_MASK] * EXPPOLY( x0 );
+ x1 = buf[1].d * expTab[val1 & EXPTAB_MASK] * EXPPOLY( x1 );
+
+ y[i] = (float)x0;
+ y[i + 1] = (float)x1;
+
+ x2 = buf[2].d * expTab[val2 & EXPTAB_MASK] * EXPPOLY( x2 );
+ x3 = buf[3].d * expTab[val3 & EXPTAB_MASK] * EXPPOLY( x3 );
+
+ y[i + 2] = (float)x2;
+ y[i + 3] = (float)x3;
+ }
+
+ for( ; i < n; i++ )
+ {
+ double x0 = x[i].f * exp_prescale;
+ int val0, t;
+
+ if( ((x[i].i >> 23) & 255) > 127 + 10 )
+ x0 = x[i].i < 0 ? -exp_max_val : exp_max_val;
+
+ val0 = cvRound(x0);
+ t = (val0 >> EXPTAB_SCALE) + 1023;
+ t = (t | ((t < 2047) - 1)) & (((t < 0) - 1) & 2047);
+
+ buf[0].i.hi = t << 20;
+ x0 = (x0 - val0)*exp_postscale;
+
+ y[i] = (float)(buf[0].d * expTab[val0 & EXPTAB_MASK] * EXPPOLY(x0));
+ }
+
+ return CV_OK;
+}
+
+
+static CvStatus CV_STDCALL Exp_64f( const double *_x, double *y, int n )
+{
+ static const double
+ A5 = .99999999999999999998285227504999 / EXPPOLY_32F_A0,
+ A4 = .69314718055994546743029643825322 / EXPPOLY_32F_A0,
+ A3 = .24022650695886477918181338054308 / EXPPOLY_32F_A0,
+ A2 = .55504108793649567998466049042729e-1 / EXPPOLY_32F_A0,
+ A1 = .96180973140732918010002372686186e-2 / EXPPOLY_32F_A0,
+ A0 = .13369713757180123244806654839424e-2 / EXPPOLY_32F_A0;
+
+ #undef EXPPOLY
+ #define EXPPOLY(x) (((((A0*(x) + A1)*(x) + A2)*(x) + A3)*(x) + A4)*(x) + A5)
+
+ int i = 0;
+ DBLINT buf[4];
+ const Cv64suf* x = (const Cv64suf*)_x;
+
+ if( !x || !y )
+ return CV_NULLPTR_ERR;
+ if( n <= 0 )
+ return CV_BADSIZE_ERR;
+
+ buf[0].i.lo = buf[1].i.lo = buf[2].i.lo = buf[3].i.lo = 0;
+
+ for( ; i <= n - 4; i += 4 )
+ {
+ double x0 = x[i].f * exp_prescale;
+ double x1 = x[i + 1].f * exp_prescale;
+ double x2 = x[i + 2].f * exp_prescale;
+ double x3 = x[i + 3].f * exp_prescale;
+
+ double y0, y1, y2, y3;
+ int val0, val1, val2, val3, t;
+
+ t = (int)(x[i].i >> 52);
+ if( (t & 2047) > 1023 + 10 )
+ x0 = t < 0 ? -exp_max_val : exp_max_val;
+
+ t = (int)(x[i+1].i >> 52);
+ if( (t & 2047) > 1023 + 10 )
+ x1 = t < 0 ? -exp_max_val : exp_max_val;
+
+ t = (int)(x[i+2].i >> 52);
+ if( (t & 2047) > 1023 + 10 )
+ x2 = t < 0 ? -exp_max_val : exp_max_val;
+
+ t = (int)(x[i+3].i >> 52);
+ if( (t & 2047) > 1023 + 10 )
+ x3 = t < 0 ? -exp_max_val : exp_max_val;
+
+ val0 = cvRound(x0);
+ val1 = cvRound(x1);
+ val2 = cvRound(x2);
+ val3 = cvRound(x3);
+
+ x0 = (x0 - val0)*exp_postscale;
+ x1 = (x1 - val1)*exp_postscale;
+ x2 = (x2 - val2)*exp_postscale;
+ x3 = (x3 - val3)*exp_postscale;
+
+ t = (val0 >> EXPTAB_SCALE) + 1023;
+ t = (t | ((t < 2047) - 1)) & (((t < 0) - 1) & 2047);
+ buf[0].i.hi = t << 20;
+
+ t = (val1 >> EXPTAB_SCALE) + 1023;
+ t = (t | ((t < 2047) - 1)) & (((t < 0) - 1) & 2047);
+ buf[1].i.hi = t << 20;
+
+ t = (val2 >> EXPTAB_SCALE) + 1023;
+ t = (t | ((t < 2047) - 1)) & (((t < 0) - 1) & 2047);
+ buf[2].i.hi = t << 20;
+
+ t = (val3 >> EXPTAB_SCALE) + 1023;
+ t = (t | ((t < 2047) - 1)) & (((t < 0) - 1) & 2047);
+ buf[3].i.hi = t << 20;
+
+ y0 = buf[0].d * expTab[val0 & EXPTAB_MASK] * EXPPOLY( x0 );
+ y1 = buf[1].d * expTab[val1 & EXPTAB_MASK] * EXPPOLY( x1 );
+
+ y[i] = y0;
+ y[i + 1] = y1;
+
+ y2 = buf[2].d * expTab[val2 & EXPTAB_MASK] * EXPPOLY( x2 );
+ y3 = buf[3].d * expTab[val3 & EXPTAB_MASK] * EXPPOLY( x3 );
+
+ y[i + 2] = y2;
+ y[i + 3] = y3;
+ }
+
+ for( ; i < n; i++ )
+ {
+ double x0 = x[i].f * exp_prescale;
+ int val0, t;
+
+ t = (int)(x[i].i >> 52);
+ if( (t & 2047) > 1023 + 10 )
+ x0 = t < 0 ? -exp_max_val : exp_max_val;
+
+ val0 = cvRound(x0);
+ t = (val0 >> EXPTAB_SCALE) + 1023;
+ t = (t | ((t < 2047) - 1)) & (((t < 0) - 1) & 2047);
+
+ buf[0].i.hi = t << 20;
+ x0 = (x0 - val0)*exp_postscale;
+
+ y[i] = buf[0].d * expTab[val0 & EXPTAB_MASK] * EXPPOLY( x0 );
+ }
+
+ return CV_OK;
+}
+
+#undef EXPTAB_SCALE
+#undef EXPTAB_MASK
+#undef EXPPOLY_32F_A0
+
+#else
+
+#define Exp_32f ippsExp_32f_A21
+#define Exp_64f ippsExp_64f_A50
+
+#endif
+
+void exp( const Mat& src, Mat& dst )
+{
+ int depth = src.depth();
+ dst.create( src.size(), src.type() );
+ Size size = getContinuousSize( src, dst, src.channels() );
+
+ MathFunc func = depth == CV_32F ? (MathFunc)Exp_32f : depth == CV_64F ? (MathFunc)Exp_64f : 0;
+ CV_Assert(func != 0);
+
+ for( int y = 0; y < size.height; y++ )
+ func( src.data + src.step*y, dst.data + dst.step*y, size.width );
+}
+
+
+/****************************************************************************************\
+* L O G *
+\****************************************************************************************/
+
+#ifndef HAVE_IPP
+
+#define LOGTAB_SCALE 8
+#define LOGTAB_MASK ((1 << LOGTAB_SCALE) - 1)
+#define LOGTAB_MASK2 ((1 << (20 - LOGTAB_SCALE)) - 1)
+#define LOGTAB_MASK2_32F ((1 << (23 - LOGTAB_SCALE)) - 1)
+
+static const double icvLogTab[] = {
+0.0000000000000000000000000000000000000000, 1.000000000000000000000000000000000000000,
+.00389864041565732288852075271279318258166, .9961089494163424124513618677042801556420,
+.00778214044205494809292034119607706088573, .9922480620155038759689922480620155038760,
+.01165061721997527263705585198749759001657, .9884169884169884169884169884169884169884,
+.01550418653596525274396267235488267033361, .9846153846153846153846153846153846153846,
+.01934296284313093139406447562578250654042, .9808429118773946360153256704980842911877,
+.02316705928153437593630670221500622574241, .9770992366412213740458015267175572519084,
+.02697658769820207233514075539915211265906, .9733840304182509505703422053231939163498,
+.03077165866675368732785500469617545604706, .9696969696969696969696969696969696969697,
+.03455238150665972812758397481047722976656, .9660377358490566037735849056603773584906,
+.03831886430213659461285757856785494368522, .9624060150375939849624060150375939849624,
+.04207121392068705056921373852674150839447, .9588014981273408239700374531835205992509,
+.04580953603129420126371940114040626212953, .9552238805970149253731343283582089552239,
+.04953393512227662748292900118940451648088, .9516728624535315985130111524163568773234,
+.05324451451881227759255210685296333394944, .9481481481481481481481481481481481481481,
+.05694137640013842427411105973078520037234, .9446494464944649446494464944649446494465,
+.06062462181643483993820353816772694699466, .9411764705882352941176470588235294117647,
+.06429435070539725460836422143984236754475, .9377289377289377289377289377289377289377,
+.06795066190850773679699159401934593915938, .9343065693430656934306569343065693430657,
+.07159365318700880442825962290953611955044, .9309090909090909090909090909090909090909,
+.07522342123758751775142172846244648098944, .9275362318840579710144927536231884057971,
+.07884006170777602129362549021607264876369, .9241877256317689530685920577617328519856,
+.08244366921107458556772229485432035289706, .9208633093525179856115107913669064748201,
+.08603433734180314373940490213499288074675, .9175627240143369175627240143369175627240,
+.08961215868968712416897659522874164395031, .9142857142857142857142857142857142857143,
+.09317722485418328259854092721070628613231, .9110320284697508896797153024911032028470,
+.09672962645855109897752299730200320482256, .9078014184397163120567375886524822695035,
+.10026945316367513738597949668474029749630, .9045936395759717314487632508833922261484,
+.10379679368164355934833764649738441221420, .9014084507042253521126760563380281690141,
+.10731173578908805021914218968959175981580, .8982456140350877192982456140350877192982,
+.11081436634029011301105782649756292812530, .8951048951048951048951048951048951048951,
+.11430477128005862852422325204315711744130, .8919860627177700348432055749128919860627,
+.11778303565638344185817487641543266363440, .8888888888888888888888888888888888888889,
+.12124924363286967987640707633545389398930, .8858131487889273356401384083044982698962,
+.12470347850095722663787967121606925502420, .8827586206896551724137931034482758620690,
+.12814582269193003360996385708858724683530, .8797250859106529209621993127147766323024,
+.13157635778871926146571524895989568904040, .8767123287671232876712328767123287671233,
+.13499516453750481925766280255629681050780, .8737201365187713310580204778156996587031,
+.13840232285911913123754857224412262439730, .8707482993197278911564625850340136054422,
+.14179791186025733629172407290752744302150, .8677966101694915254237288135593220338983,
+.14518200984449788903951628071808954700830, .8648648648648648648648648648648648648649,
+.14855469432313711530824207329715136438610, .8619528619528619528619528619528619528620,
+.15191604202584196858794030049466527998450, .8590604026845637583892617449664429530201,
+.15526612891112392955683674244937719777230, .8561872909698996655518394648829431438127,
+.15860503017663857283636730244325008243330, .8533333333333333333333333333333333333333,
+.16193282026931324346641360989451641216880, .8504983388704318936877076411960132890365,
+.16524957289530714521497145597095368430010, .8476821192052980132450331125827814569536,
+.16855536102980664403538924034364754334090, .8448844884488448844884488448844884488449,
+.17185025692665920060697715143760433420540, .8421052631578947368421052631578947368421,
+.17513433212784912385018287750426679849630, .8393442622950819672131147540983606557377,
+.17840765747281828179637841458315961062910, .8366013071895424836601307189542483660131,
+.18167030310763465639212199675966985523700, .8338762214983713355048859934853420195440,
+.18492233849401198964024217730184318497780, .8311688311688311688311688311688311688312,
+.18816383241818296356839823602058459073300, .8284789644012944983818770226537216828479,
+.19139485299962943898322009772527962923050, .8258064516129032258064516129032258064516,
+.19461546769967164038916962454095482826240, .8231511254019292604501607717041800643087,
+.19782574332991986754137769821682013571260, .8205128205128205128205128205128205128205,
+.20102574606059073203390141770796617493040, .8178913738019169329073482428115015974441,
+.20421554142869088876999228432396193966280, .8152866242038216560509554140127388535032,
+.20739519434607056602715147164417430758480, .8126984126984126984126984126984126984127,
+.21056476910734961416338251183333341032260, .8101265822784810126582278481012658227848,
+.21372432939771812687723695489694364368910, .8075709779179810725552050473186119873817,
+.21687393830061435506806333251006435602900, .8050314465408805031446540880503144654088,
+.22001365830528207823135744547471404075630, .8025078369905956112852664576802507836991,
+.22314355131420973710199007200571941211830, .8000000000000000000000000000000000000000,
+.22626367865045338145790765338460914790630, .7975077881619937694704049844236760124611,
+.22937410106484582006380890106811420992010, .7950310559006211180124223602484472049689,
+.23247487874309405442296849741978803649550, .7925696594427244582043343653250773993808,
+.23556607131276688371634975283086532726890, .7901234567901234567901234567901234567901,
+.23864773785017498464178231643018079921600, .7876923076923076923076923076923076923077,
+.24171993688714515924331749374687206000090, .7852760736196319018404907975460122699387,
+.24478272641769091566565919038112042471760, .7828746177370030581039755351681957186544,
+.24783616390458124145723672882013488560910, .7804878048780487804878048780487804878049,
+.25088030628580937353433455427875742316250, .7781155015197568389057750759878419452888,
+.25391520998096339667426946107298135757450, .7757575757575757575757575757575757575758,
+.25694093089750041913887912414793390780680, .7734138972809667673716012084592145015106,
+.25995752443692604627401010475296061486000, .7710843373493975903614457831325301204819,
+.26296504550088134477547896494797896593800, .7687687687687687687687687687687687687688,
+.26596354849713793599974565040611196309330, .7664670658682634730538922155688622754491,
+.26895308734550393836570947314612567424780, .7641791044776119402985074626865671641791,
+.27193371548364175804834985683555714786050, .7619047619047619047619047619047619047619,
+.27490548587279922676529508862586226314300, .7596439169139465875370919881305637982196,
+.27786845100345625159121709657483734190480, .7573964497041420118343195266272189349112,
+.28082266290088775395616949026589281857030, .7551622418879056047197640117994100294985,
+.28376817313064456316240580235898960381750, .7529411764705882352941176470588235294118,
+.28670503280395426282112225635501090437180, .7507331378299120234604105571847507331378,
+.28963329258304265634293983566749375313530, .7485380116959064327485380116959064327485,
+.29255300268637740579436012922087684273730, .7463556851311953352769679300291545189504,
+.29546421289383584252163927885703742504130, .7441860465116279069767441860465116279070,
+.29836697255179722709783618483925238251680, .7420289855072463768115942028985507246377,
+.30126133057816173455023545102449133992200, .7398843930635838150289017341040462427746,
+.30414733546729666446850615102448500692850, .7377521613832853025936599423631123919308,
+.30702503529491181888388950937951449304830, .7356321839080459770114942528735632183908,
+.30989447772286465854207904158101882785550, .7335243553008595988538681948424068767908,
+.31275571000389684739317885942000430077330, .7314285714285714285714285714285714285714,
+.31560877898630329552176476681779604405180, .7293447293447293447293447293447293447293,
+.31845373111853458869546784626436419785030, .7272727272727272727272727272727272727273,
+.32129061245373424782201254856772720813750, .7252124645892351274787535410764872521246,
+.32411946865421192853773391107097268104550, .7231638418079096045197740112994350282486,
+.32694034499585328257253991068864706903700, .7211267605633802816901408450704225352113,
+.32975328637246797969240219572384376078850, .7191011235955056179775280898876404494382,
+.33255833730007655635318997155991382896900, .7170868347338935574229691876750700280112,
+.33535554192113781191153520921943709254280, .7150837988826815642458100558659217877095,
+.33814494400871636381467055798566434532400, .7130919220055710306406685236768802228412,
+.34092658697059319283795275623560883104800, .7111111111111111111111111111111111111111,
+.34370051385331840121395430287520866841080, .7091412742382271468144044321329639889197,
+.34646676734620857063262633346312213689100, .7071823204419889502762430939226519337017,
+.34922538978528827602332285096053965389730, .7052341597796143250688705234159779614325,
+.35197642315717814209818925519357435405250, .7032967032967032967032967032967032967033,
+.35471990910292899856770532096561510115850, .7013698630136986301369863013698630136986,
+.35745588892180374385176833129662554711100, .6994535519125683060109289617486338797814,
+.36018440357500774995358483465679455548530, .6975476839237057220708446866485013623978,
+.36290549368936841911903457003063522279280, .6956521739130434782608695652173913043478,
+.36561919956096466943762379742111079394830, .6937669376693766937669376693766937669377,
+.36832556115870762614150635272380895912650, .6918918918918918918918918918918918918919,
+.37102461812787262962487488948681857436900, .6900269541778975741239892183288409703504,
+.37371640979358405898480555151763837784530, .6881720430107526881720430107526881720430,
+.37640097516425302659470730759494472295050, .6863270777479892761394101876675603217158,
+.37907835293496944251145919224654790014030, .6844919786096256684491978609625668449198,
+.38174858149084833769393299007788300514230, .6826666666666666666666666666666666666667,
+.38441169891033200034513583887019194662580, .6808510638297872340425531914893617021277,
+.38706774296844825844488013899535872042180, .6790450928381962864721485411140583554377,
+.38971675114002518602873692543653305619950, .6772486772486772486772486772486772486772,
+.39235876060286384303665840889152605086580, .6754617414248021108179419525065963060686,
+.39499380824086893770896722344332374632350, .6736842105263157894736842105263157894737,
+.39762193064713846624158577469643205404280, .6719160104986876640419947506561679790026,
+.40024316412701266276741307592601515352730, .6701570680628272251308900523560209424084,
+.40285754470108348090917615991202183067800, .6684073107049608355091383812010443864230,
+.40546510810816432934799991016916465014230, .6666666666666666666666666666666666666667,
+.40806588980822172674223224930756259709600, .6649350649350649350649350649350649350649,
+.41065992498526837639616360320360399782650, .6632124352331606217616580310880829015544,
+.41324724855021932601317757871584035456180, .6614987080103359173126614987080103359173,
+.41582789514371093497757669865677598863850, .6597938144329896907216494845360824742268,
+.41840189913888381489925905043492093682300, .6580976863753213367609254498714652956298,
+.42096929464412963239894338585145305842150, .6564102564102564102564102564102564102564,
+.42353011550580327293502591601281892508280, .6547314578005115089514066496163682864450,
+.42608439531090003260516141381231136620050, .6530612244897959183673469387755102040816,
+.42863216738969872610098832410585600882780, .6513994910941475826972010178117048346056,
+.43117346481837132143866142541810404509300, .6497461928934010152284263959390862944162,
+.43370832042155937902094819946796633303180, .6481012658227848101265822784810126582278,
+.43623676677491801667585491486534010618930, .6464646464646464646464646464646464646465,
+.43875883620762790027214350629947148263450, .6448362720403022670025188916876574307305,
+.44127456080487520440058801796112675219780, .6432160804020100502512562814070351758794,
+.44378397241030093089975139264424797147500, .6416040100250626566416040100250626566416,
+.44628710262841947420398014401143882423650, .6400000000000000000000000000000000000000,
+.44878398282700665555822183705458883196130, .6384039900249376558603491271820448877805,
+.45127464413945855836729492693848442286250, .6368159203980099502487562189054726368159,
+.45375911746712049854579618113348260521900, .6352357320099255583126550868486352357320,
+.45623743348158757315857769754074979573500, .6336633663366336633663366336633663366337,
+.45870962262697662081833982483658473938700, .6320987654320987654320987654320987654321,
+.46117571512217014895185229761409573256980, .6305418719211822660098522167487684729064,
+.46363574096303250549055974261136725544930, .6289926289926289926289926289926289926290,
+.46608972992459918316399125615134835243230, .6274509803921568627450980392156862745098,
+.46853771156323925639597405279346276074650, .6259168704156479217603911980440097799511,
+.47097971521879100631480241645476780831830, .6243902439024390243902439024390243902439,
+.47341577001667212165614273544633761048330, .6228710462287104622871046228710462287105,
+.47584590486996386493601107758877333253630, .6213592233009708737864077669902912621359,
+.47827014848147025860569669930555392056700, .6198547215496368038740920096852300242131,
+.48068852934575190261057286988943815231330, .6183574879227053140096618357487922705314,
+.48310107575113581113157579238759353756900, .6168674698795180722891566265060240963855,
+.48550781578170076890899053978500887751580, .6153846153846153846153846153846153846154,
+.48790877731923892879351001283794175833480, .6139088729016786570743405275779376498801,
+.49030398804519381705802061333088204264650, .6124401913875598086124401913875598086124,
+.49269347544257524607047571407747454941280, .6109785202863961813842482100238663484487,
+.49507726679785146739476431321236304938800, .6095238095238095238095238095238095238095,
+.49745538920281889838648226032091770321130, .6080760095011876484560570071258907363420,
+.49982786955644931126130359189119189977650, .6066350710900473933649289099526066350711,
+.50219473456671548383667413872899487614650, .6052009456264775413711583924349881796690,
+.50455601075239520092452494282042607665050, .6037735849056603773584905660377358490566,
+.50691172444485432801997148999362252652650, .6023529411764705882352941176470588235294,
+.50926190178980790257412536448100581765150, .6009389671361502347417840375586854460094,
+.51160656874906207391973111953120678663250, .5995316159250585480093676814988290398126,
+.51394575110223428282552049495279788970950, .5981308411214953271028037383177570093458,
+.51627947444845445623684554448118433356300, .5967365967365967365967365967365967365967,
+.51860776420804555186805373523384332656850, .5953488372093023255813953488372093023256,
+.52093064562418522900344441950437612831600, .5939675174013921113689095127610208816705,
+.52324814376454775732838697877014055848100, .5925925925925925925925925925925925925926,
+.52556028352292727401362526507000438869000, .5912240184757505773672055427251732101617,
+.52786708962084227803046587723656557500350, .5898617511520737327188940092165898617512,
+.53016858660912158374145519701414741575700, .5885057471264367816091954022988505747126,
+.53246479886947173376654518506256863474850, .5871559633027522935779816513761467889908,
+.53475575061602764748158733709715306758900, .5858123569794050343249427917620137299771,
+.53704146589688361856929077475797384977350, .5844748858447488584474885844748858447489,
+.53932196859560876944783558428753167390800, .5831435079726651480637813211845102505695,
+.54159728243274429804188230264117009937750, .5818181818181818181818181818181818181818,
+.54386743096728351609669971367111429572100, .5804988662131519274376417233560090702948,
+.54613243759813556721383065450936555862450, .5791855203619909502262443438914027149321,
+.54839232556557315767520321969641372561450, .5778781038374717832957110609480812641084,
+.55064711795266219063194057525834068655950, .5765765765765765765765765765765765765766,
+.55289683768667763352766542084282264113450, .5752808988764044943820224719101123595506,
+.55514150754050151093110798683483153581600, .5739910313901345291479820627802690582960,
+.55738115013400635344709144192165695130850, .5727069351230425055928411633109619686801,
+.55961578793542265941596269840374588966350, .5714285714285714285714285714285714285714,
+.56184544326269181269140062795486301183700, .5701559020044543429844097995545657015590,
+.56407013828480290218436721261241473257550, .5688888888888888888888888888888888888889,
+.56628989502311577464155334382667206227800, .5676274944567627494456762749445676274945,
+.56850473535266865532378233183408156037350, .5663716814159292035398230088495575221239,
+.57071468100347144680739575051120482385150, .5651214128035320088300220750551876379691,
+.57291975356178548306473885531886480748650, .5638766519823788546255506607929515418502,
+.57511997447138785144460371157038025558000, .5626373626373626373626373626373626373626,
+.57731536503482350219940144597785547375700, .5614035087719298245614035087719298245614,
+.57950594641464214795689713355386629700650, .5601750547045951859956236323851203501094,
+.58169173963462239562716149521293118596100, .5589519650655021834061135371179039301310,
+.58387276558098266665552955601015128195300, .5577342047930283224400871459694989106754,
+.58604904500357812846544902640744112432000, .5565217391304347826086956521739130434783,
+.58822059851708596855957011939608491957200, .5553145336225596529284164859002169197397,
+.59038744660217634674381770309992134571100, .5541125541125541125541125541125541125541,
+.59254960960667157898740242671919986605650, .5529157667386609071274298056155507559395,
+.59470710774669277576265358220553025603300, .5517241379310344827586206896551724137931,
+.59685996110779382384237123915227130055450, .5505376344086021505376344086021505376344,
+.59900818964608337768851242799428291618800, .5493562231759656652360515021459227467811,
+.60115181318933474940990890900138765573500, .5481798715203426124197002141327623126338,
+.60329085143808425240052883964381180703650, .5470085470085470085470085470085470085470,
+.60542532396671688843525771517306566238400, .5458422174840085287846481876332622601279,
+.60755525022454170969155029524699784815300, .5446808510638297872340425531914893617021,
+.60968064953685519036241657886421307921400, .5435244161358811040339702760084925690021,
+.61180154110599282990534675263916142284850, .5423728813559322033898305084745762711864,
+.61391794401237043121710712512140162289150, .5412262156448202959830866807610993657505,
+.61602987721551394351138242200249806046500, .5400843881856540084388185654008438818565,
+.61813735955507864705538167982012964785100, .5389473684210526315789473684210526315789,
+.62024040975185745772080281312810257077200, .5378151260504201680672268907563025210084,
+.62233904640877868441606324267922900617100, .5366876310272536687631027253668763102725,
+.62443328801189346144440150965237990021700, .5355648535564853556485355648535564853556,
+.62652315293135274476554741340805776417250, .5344467640918580375782881002087682672234,
+.62860865942237409420556559780379757285100, .5333333333333333333333333333333333333333,
+.63068982562619868570408243613201193511500, .5322245322245322245322245322245322245322,
+.63276666957103777644277897707070223987100, .5311203319502074688796680497925311203320,
+.63483920917301017716738442686619237065300, .5300207039337474120082815734989648033126,
+.63690746223706917739093569252872839570050, .5289256198347107438016528925619834710744,
+.63897144645792069983514238629140891134750, .5278350515463917525773195876288659793814,
+.64103117942093124081992527862894348800200, .5267489711934156378600823045267489711934,
+.64308667860302726193566513757104985415950, .5256673511293634496919917864476386036961,
+.64513796137358470073053240412264131009600, .5245901639344262295081967213114754098361,
+.64718504499530948859131740391603671014300, .5235173824130879345603271983640081799591,
+.64922794662510974195157587018911726772800, .5224489795918367346938775510204081632653,
+.65126668331495807251485530287027359008800, .5213849287169042769857433808553971486762,
+.65330127201274557080523663898929953575150, .5203252032520325203252032520325203252033,
+.65533172956312757406749369692988693714150, .5192697768762677484787018255578093306288,
+.65735807270835999727154330685152672231200, .5182186234817813765182186234817813765182,
+.65938031808912778153342060249997302889800, .5171717171717171717171717171717171717172,
+.66139848224536490484126716182800009846700, .5161290322580645161290322580645161290323,
+.66341258161706617713093692145776003599150, .5150905432595573440643863179074446680080,
+.66542263254509037562201001492212526500250, .5140562248995983935742971887550200803213,
+.66742865127195616370414654738851822912700, .5130260521042084168336673346693386773547,
+.66943065394262923906154583164607174694550, .5120000000000000000000000000000000000000,
+.67142865660530226534774556057527661323550, .5109780439121756487025948103792415169661,
+.67342267521216669923234121597488410770900, .5099601593625498007968127490039840637450,
+.67541272562017662384192817626171745359900, .5089463220675944333996023856858846918489,
+.67739882359180603188519853574689477682100, .5079365079365079365079365079365079365079,
+.67938098479579733801614338517538271844400, .5069306930693069306930693069306930693069,
+.68135922480790300781450241629499942064300, .5059288537549407114624505928853754940711,
+.68333355911162063645036823800182901322850, .5049309664694280078895463510848126232742,
+.68530400309891936760919861626462079584600, .5039370078740157480314960629921259842520,
+.68727057207096020619019327568821609020250, .5029469548133595284872298624754420432220,
+.68923328123880889251040571252815425395950, .5019607843137254901960784313725490196078,
+.69314718055994530941723212145818, 5.0e-01,
+};
+
+
+
+#define LOGTAB_TRANSLATE(x,h) (((x) - 1.)*icvLogTab[(h)+1])
+static const double ln_2 = 0.69314718055994530941723212145818;
+
+static CvStatus CV_STDCALL Log_32f( const float *_x, float *y, int n )
+{
+ static const double shift[] = { 0, -1./512 };
+ static const double
+ A0 = 0.3333333333333333333333333,
+ A1 = -0.5,
+ A2 = 1;
+
+ #undef LOGPOLY
+ #define LOGPOLY(x,k) ((x)+=shift[k],((A0*(x) + A1)*(x) + A2)*(x))
+
+ int i = 0;
+ union
+ {
+ int i;
+ float f;
+ }
+ buf[4];
+
+ const int* x = (const int*)_x;
+
+ if( !x || !y )
+ return CV_NULLPTR_ERR;
+ if( n <= 0 )
+ return CV_BADSIZE_ERR;
+
+ for( i = 0; i <= n - 4; i += 4 )
+ {
+ double x0, x1, x2, x3;
+ double y0, y1, y2, y3;
+ int h0, h1, h2, h3;
+
+ h0 = x[i];
+ h1 = x[i+1];
+ buf[0].i = (h0 & LOGTAB_MASK2_32F) | (127 << 23);
+ buf[1].i = (h1 & LOGTAB_MASK2_32F) | (127 << 23);
+
+ y0 = (((h0 >> 23) & 0xff) - 127) * ln_2;
+ y1 = (((h1 >> 23) & 0xff) - 127) * ln_2;
+
+ h0 = (h0 >> (23 - LOGTAB_SCALE - 1)) & LOGTAB_MASK * 2;
+ h1 = (h1 >> (23 - LOGTAB_SCALE - 1)) & LOGTAB_MASK * 2;
+
+ y0 += icvLogTab[h0];
+ y1 += icvLogTab[h1];
+
+ h2 = x[i+2];
+ h3 = x[i+3];
+
+ x0 = LOGTAB_TRANSLATE( buf[0].f, h0 );
+ x1 = LOGTAB_TRANSLATE( buf[1].f, h1 );
+
+ buf[2].i = (h2 & LOGTAB_MASK2_32F) | (127 << 23);
+ buf[3].i = (h3 & LOGTAB_MASK2_32F) | (127 << 23);
+
+ y2 = (((h2 >> 23) & 0xff) - 127) * ln_2;
+ y3 = (((h3 >> 23) & 0xff) - 127) * ln_2;
+
+ h2 = (h2 >> (23 - LOGTAB_SCALE - 1)) & LOGTAB_MASK * 2;
+ h3 = (h3 >> (23 - LOGTAB_SCALE - 1)) & LOGTAB_MASK * 2;
+
+ y2 += icvLogTab[h2];
+ y3 += icvLogTab[h3];
+
+ x2 = LOGTAB_TRANSLATE( buf[2].f, h2 );
+ x3 = LOGTAB_TRANSLATE( buf[3].f, h3 );
+
+ y0 += LOGPOLY( x0, h0 == 510 );
+ y1 += LOGPOLY( x1, h1 == 510 );
+
+ y[i] = (float) y0;
+ y[i + 1] = (float) y1;
+
+ y2 += LOGPOLY( x2, h2 == 510 );
+ y3 += LOGPOLY( x3, h3 == 510 );
+
+ y[i + 2] = (float) y2;
+ y[i + 3] = (float) y3;
+ }
+
+ for( ; i < n; i++ )
+ {
+ int h0 = x[i];
+ double x0, y0;
+
+ y0 = (((h0 >> 23) & 0xff) - 127) * ln_2;
+
+ buf[0].i = (h0 & LOGTAB_MASK2_32F) | (127 << 23);
+ h0 = (h0 >> (23 - LOGTAB_SCALE - 1)) & LOGTAB_MASK * 2;
+
+ y0 += icvLogTab[h0];
+ x0 = LOGTAB_TRANSLATE( buf[0].f, h0 );
+ y0 += LOGPOLY( x0, h0 == 510 );
+
+ y[i] = (float)y0;
+ }
+
+ return CV_OK;
+}
+
+
+static CvStatus CV_STDCALL Log_64f( const double *x, double *y, int n )
+{
+ static const double shift[] = { 0, -1./512 };
+ static const double
+ A7 = 1.0,
+ A6 = -0.5,
+ A5 = 0.333333333333333314829616256247390992939472198486328125,
+ A4 = -0.25,
+ A3 = 0.2,
+ A2 = -0.1666666666666666574148081281236954964697360992431640625,
+ A1 = 0.1428571428571428769682682968777953647077083587646484375,
+ A0 = -0.125;
+
+ #undef LOGPOLY
+ #define LOGPOLY(x,k) ((x)+=shift[k], xq = (x)*(x),\
+ (((A0*xq + A2)*xq + A4)*xq + A6)*xq + \
+ (((A1*xq + A3)*xq + A5)*xq + A7)*(x))
+
+ int i = 0;
+ DBLINT buf[4];
+ DBLINT *X = (DBLINT *) x;
+
+ if( !x || !y )
+ return CV_NULLPTR_ERR;
+ if( n <= 0 )
+ return CV_BADSIZE_ERR;
+
+ for( ; i <= n - 4; i += 4 )
+ {
+ double xq;
+ double x0, x1, x2, x3;
+ double y0, y1, y2, y3;
+ int h0, h1, h2, h3;
+
+ h0 = X[i].i.lo;
+ h1 = X[i + 1].i.lo;
+ buf[0].i.lo = h0;
+ buf[1].i.lo = h1;
+
+ h0 = X[i].i.hi;
+ h1 = X[i + 1].i.hi;
+ buf[0].i.hi = (h0 & LOGTAB_MASK2) | (1023 << 20);
+ buf[1].i.hi = (h1 & LOGTAB_MASK2) | (1023 << 20);
+
+ y0 = (((h0 >> 20) & 0x7ff) - 1023) * ln_2;
+ y1 = (((h1 >> 20) & 0x7ff) - 1023) * ln_2;
+
+ h2 = X[i + 2].i.lo;
+ h3 = X[i + 3].i.lo;
+ buf[2].i.lo = h2;
+ buf[3].i.lo = h3;
+
+ h0 = (h0 >> (20 - LOGTAB_SCALE - 1)) & LOGTAB_MASK * 2;
+ h1 = (h1 >> (20 - LOGTAB_SCALE - 1)) & LOGTAB_MASK * 2;
+
+ y0 += icvLogTab[h0];
+ y1 += icvLogTab[h1];
+
+ h2 = X[i + 2].i.hi;
+ h3 = X[i + 3].i.hi;
+
+ x0 = LOGTAB_TRANSLATE( buf[0].d, h0 );
+ x1 = LOGTAB_TRANSLATE( buf[1].d, h1 );
+
+ buf[2].i.hi = (h2 & LOGTAB_MASK2) | (1023 << 20);
+ buf[3].i.hi = (h3 & LOGTAB_MASK2) | (1023 << 20);
+
+ y2 = (((h2 >> 20) & 0x7ff) - 1023) * ln_2;
+ y3 = (((h3 >> 20) & 0x7ff) - 1023) * ln_2;
+
+ h2 = (h2 >> (20 - LOGTAB_SCALE - 1)) & LOGTAB_MASK * 2;
+ h3 = (h3 >> (20 - LOGTAB_SCALE - 1)) & LOGTAB_MASK * 2;
+
+ y2 += icvLogTab[h2];
+ y3 += icvLogTab[h3];
+
+ x2 = LOGTAB_TRANSLATE( buf[2].d, h2 );
+ x3 = LOGTAB_TRANSLATE( buf[3].d, h3 );
+
+ y0 += LOGPOLY( x0, h0 == 510 );
+ y1 += LOGPOLY( x1, h1 == 510 );
+
+ y[i] = y0;
+ y[i + 1] = y1;
+
+ y2 += LOGPOLY( x2, h2 == 510 );
+ y3 += LOGPOLY( x3, h3 == 510 );
+
+ y[i + 2] = y2;
+ y[i + 3] = y3;
+ }
+
+ for( ; i < n; i++ )
+ {
+ int h0 = X[i].i.hi;
+ double xq;
+ double x0, y0 = (((h0 >> 20) & 0x7ff) - 1023) * ln_2;
+
+ buf[0].i.hi = (h0 & LOGTAB_MASK2) | (1023 << 20);
+ buf[0].i.lo = X[i].i.lo;
+ h0 = (h0 >> (20 - LOGTAB_SCALE - 1)) & LOGTAB_MASK * 2;
+
+ y0 += icvLogTab[h0];
+ x0 = LOGTAB_TRANSLATE( buf[0].d, h0 );
+ y0 += LOGPOLY( x0, h0 == 510 );
+ y[i] = y0;
+ }
+
+ return CV_OK;
+}
+
+#else
+
+#define Log_32f ippsLn_32f_A21
+#define Log_64f ippsLn_64f_A50
+
+#endif
+
+void log( const Mat& src, Mat& dst )
+{
+ int depth = src.depth();
+ dst.create( src.size(), src.type() );
+ Size size = getContinuousSize( src, dst, src.channels() );
+
+ MathFunc func = depth == CV_32F ? (MathFunc)Log_32f : depth == CV_64F ? (MathFunc)Log_64f : 0;
+ CV_Assert(func != 0);
+
+ for( int y = 0; y < size.height; y++ )
+ func( src.data + src.step*y, dst.data + dst.step*y, size.width );
+}
+
+
+/****************************************************************************************\
+* P O W E R *
+\****************************************************************************************/
+
+template<typename T, typename WT>
+static CvStatus CV_STDCALL
+IPow( const void* _src, void* _dst, int len, int power )
+{
+ int i;
+ const T* src = (const T*)_src;
+ T* dst = (T*)_dst;
+ for( i = 0; i < len; i++ )
+ {
+ WT a = 1, b = src[i];
+ int p = power;
+ while( p > 1 )
+ {
+ if( p & 1 )
+ a *= b;
+ b *= b;
+ p >>= 1;
+ }
+
+ a *= b;
+ dst[i] = saturate_cast<T>(a);
+ }
+ return CV_OK;
+}
+
+typedef CvStatus (CV_STDCALL * IPowFunc)( const void* src, void* dst, int len, int power );
+
+void pow( const Mat& _src, double power, Mat& dst )
+{
+ int ipower = cvRound( power ), i, j;
+ bool is_ipower = 0;
+ int depth = _src.depth();
+ const Mat* src = &_src;
+
+ dst.create( _src.size(), _src.type() );
+
+ if( fabs(ipower - power) < DBL_EPSILON )
+ {
+ if( ipower < 0 )
+ {
+ divide( 1., _src, dst );
+ if( ipower == -1 )
+ return;
+ ipower = -ipower;
+ src = &dst;
+ }
+
+ switch( ipower )
+ {
+ case 0:
+ dst = Scalar::all(1);
+ return;
+ case 1:
+ src->copyTo(dst);
+ return;
+ case 2:
+ multiply(*src, *src, dst);
+ return;
+ default:
+ is_ipower = true;
+ }
+ }
+ else
+ CV_Assert( depth == CV_32F || depth == CV_64F );
+
+ Size size = getContinuousSize( *src, dst, src->channels() );
+
+ if( is_ipower )
+ {
+ static IPowFunc tab[] =
+ {
+ IPow<uchar, int>, 0, IPow<ushort, int>, IPow<short, int>, IPow<int, int>,
+ IPow<float, float>, IPow<double, double>, 0
+ };
+
+ IPowFunc func = tab[depth];
+ CV_Assert( func != 0 );
+ for( i = 0; i < size.height; i++ )
+ func( src->data + src->step*i, dst.data + dst.step*i, size.width, ipower );
+ }
+ else if( fabs(fabs(power) - 0.5) < DBL_EPSILON )
+ {
+ MathFunc func = power < 0 ?
+ (depth == CV_32F ? (MathFunc)InvSqrt_32f : (MathFunc)InvSqrt_64f) :
+ (depth == CV_32F ? (MathFunc)Sqrt_32f : (MathFunc)Sqrt_64f);
+
+ for( i = 0; i < size.height; i++ )
+ func( src->data + src->step*i, dst.data + dst.step*i, size.width );
+ }
+ else if( depth == CV_32F )
+ {
+ const float *x = (const float*)src->data;
+ float *y = (float*)dst.data;
+ size_t xstep = src->step/sizeof(x[0]), ystep = dst.step/sizeof(y[0]);
+ float p = (float)power;
+
+ for( ; size.height--; x += xstep, y += ystep )
+ {
+ for( i = 0; i < size.width; i += MAX_BLOCK_SIZE )
+ {
+ int block_size = std::min(MAX_BLOCK_SIZE, size.width - i);
+ Log_32f(x + i, y + i, block_size);
+ for( j = 0; j < block_size; j++ )
+ y[i + j] *= p;
+ Exp_32f(y + i, y + i, block_size);
+ }
+ }
+ }
+ else
+ {
+ const double *x = (const double*)src->data;
+ double *y = (double*)dst.data;
+ size_t xstep = src->step/sizeof(x[0]), ystep = dst.step/sizeof(y[0]);
+
+ for( ; size.height--; x += xstep, y += ystep )
+ {
+ for( i = 0; i < size.width; i += MAX_BLOCK_SIZE )
+ {
+ int block_size = std::min(MAX_BLOCK_SIZE, size.width - i);
+ Log_64f(x + i, y + i, block_size);
+ for( j = 0; j < block_size; j++ )
+ y[i + j] *= power;
+ Exp_64f(y + i, y + i, block_size);
+ }
+ }
+ }
+}
+
+void sqrt(const Mat& a, Mat& b)
+{
+ pow(a, 0.5, b);
+}
+
+/************************** CheckArray for NaN's, Inf's *********************************/
+
+bool checkRange(const Mat& src, bool quiet, Point* pt,
+ double minVal, double maxVal)
+{
+ int depth = src.depth();
+ Point badPt(-1, -1);
+ double badValue = 0;
+
+ if( depth < CV_32F )
+ {
+ double m = 0, M = 0, badValue = 0;
+ Point mp, MP, badPt(-1,-1);
+ minMaxLoc(src.reshape(1,0), &m, &M, &mp, &MP);
+ if( M >= maxVal )
+ {
+ badPt = MP;
+ badValue = M;
+ }
+ else if( m < minVal )
+ {
+ badPt = mp;
+ badValue = m;
+ }
+ }
+ else
+ {
+ int i, loc = 0;
+ Size size = getContinuousSize( src, src.channels() );
+
+ if( depth == CV_32F )
+ {
+ Cv32suf a, b;
+ int ia, ib;
+ const int* isrc = (const int*)src.data;
+ size_t step = src.step/sizeof(isrc[0]);
+
+ a.f = (float)std::max(minVal, (double)-FLT_MAX);
+ b.f = (float)std::min(maxVal, (double)FLT_MAX);
+
+ ia = CV_TOGGLE_FLT(a.i);
+ ib = CV_TOGGLE_FLT(b.i);
+
+ for( ; badPt.x < 0 && size.height--; loc += size.width, isrc += step )
+ {
+ for( i = 0; i < size.width; i++ )
+ {
+ int val = isrc[i];
+ val = CV_TOGGLE_FLT(val);
+
+ if( val < ia || val >= ib )
+ {
+ badPt = Point((loc + i) % src.cols, (loc + i) / src.cols);
+ badValue = ((const float*)isrc)[i];
+ break;
+ }
+ }
+ }
+ }
+ else
+ {
+ Cv64suf a, b;
+ int64 ia, ib;
+ const int64* isrc = (const int64*)src.data;
+ size_t step = src.step/sizeof(isrc[0]);
+
+ a.f = minVal;
+ b.f = maxVal;
+
+ ia = CV_TOGGLE_DBL(a.i);
+ ib = CV_TOGGLE_DBL(b.i);
+
+ for( ; badPt.x < 0 && size.height--; loc += size.width, isrc += step )
+ {
+ for( i = 0; i < size.width; i++ )
+ {
+ int64 val = isrc[i];
+ val = CV_TOGGLE_DBL(val);
+
+ if( val < ia || val >= ib )
+ {
+ badPt = Point((loc + i) % src.cols, (loc + i) / src.cols);
+ badValue = ((const double*)isrc)[i];
+ break;
+ }
+ }
+ }
+ }
+ }
+
+ if( badPt.x >= 0 )
+ {
+ if( pt )
+ *pt = badPt;
+ if( !quiet )
+ CV_Error_( CV_StsOutOfRange,
+ ("the value at (%d, %d)=%g is out of range", badPt.x, badPt.y, badValue));
+ }
+ return badPt.x < 0;
+}
+
+}
+
+CV_IMPL float cvCbrt(float value) { return cv::cubeRoot(value); }
+CV_IMPL float cvFastArctan(float y, float x) { return cv::fastAtan2(y, x); }
+
+CV_IMPL void
+cvCartToPolar( const CvArr* xarr, const CvArr* yarr,
+ CvArr* magarr, CvArr* anglearr,
+ int angle_in_degrees )
+{
+ cv::Mat X = cv::cvarrToMat(xarr), Y = cv::cvarrToMat(yarr), Mag, Angle;
+ if( magarr )
+ {
+ Mag = cv::cvarrToMat(magarr);
+ CV_Assert( Mag.size() == X.size() && Mag.type() == X.type() );
+ }
+ if( anglearr )
+ {
+ Angle = cv::cvarrToMat(anglearr);
+ CV_Assert( Angle.size() == X.size() && Angle.type() == X.type() );
+ }
+ if( magarr )
+ {
+ if( anglearr )
+ cv::cartToPolar( X, Y, Mag, Angle, angle_in_degrees != 0 );
+ else
+ cv::magnitude( X, Y, Mag );
+ }
+ else
+ cv::phase( X, Y, Angle, angle_in_degrees != 0 );
+}
+
+CV_IMPL void
+cvPolarToCart( const CvArr* magarr, const CvArr* anglearr,
+ CvArr* xarr, CvArr* yarr, int angle_in_degrees )
+{
+ cv::Mat X, Y, Angle = cv::cvarrToMat(anglearr), Mag;
+ if( magarr )
+ {
+ Mag = cv::cvarrToMat(magarr);
+ CV_Assert( Mag.size() == Angle.size() && Mag.type() == Angle.type() );
+ }
+ if( xarr )
+ {
+ X = cv::cvarrToMat(xarr);
+ CV_Assert( X.size() == Angle.size() && X.type() == Angle.type() );
+ }
+ if( yarr )
+ {
+ Y = cv::cvarrToMat(yarr);
+ CV_Assert( Y.size() == Angle.size() && Y.type() == Angle.type() );
+ }
+
+ cv::polarToCart( Mag, Angle, X, Y, angle_in_degrees != 0 );
+}
+
+CV_IMPL void cvExp( const CvArr* srcarr, CvArr* dstarr )
+{
+ cv::Mat src = cv::cvarrToMat(srcarr), dst = cv::cvarrToMat(dstarr);
+ CV_Assert( src.type() == dst.type() && src.size() == dst.size() );
+ cv::exp( src, dst );
+}
+
+CV_IMPL void cvLog( const CvArr* srcarr, CvArr* dstarr )
+{
+ cv::Mat src = cv::cvarrToMat(srcarr), dst = cv::cvarrToMat(dstarr);
+ CV_Assert( src.type() == dst.type() && src.size() == dst.size() );
+ cv::log( src, dst );
+}
+
+CV_IMPL void cvPow( const CvArr* srcarr, CvArr* dstarr, double power )
+{
+ cv::Mat src = cv::cvarrToMat(srcarr), dst = cv::cvarrToMat(dstarr);
+ CV_Assert( src.type() == dst.type() && src.size() == dst.size() );
+ cv::pow( src, power, dst );
+}
+
+CV_IMPL int cvCheckArr( const CvArr* arr, int flags,
+ double minVal, double maxVal )
+{
+ if( (flags & CV_CHECK_RANGE) == 0 )
+ minVal = -DBL_MAX, maxVal = DBL_MAX;
+ return cv::checkRange(cv::cvarrToMat(arr), (flags & CV_CHECK_QUIET) != 0, 0, minVal, maxVal );
+}
+
+
+/*
+ Finds real roots of cubic, quadratic or linear equation.
+ The original code has been taken from Ken Turkowski web page
+ (http://www.worldserver.com/turk/opensource/) and adopted for OpenCV.
+ Here is the copyright notice.
+
+ -----------------------------------------------------------------------
+ Copyright (C) 1978-1999 Ken Turkowski. <turk@computer.org>
+
+ All rights reserved.
+
+ Warranty Information
+ Even though I have reviewed this software, I make no warranty
+ or representation, either express or implied, with respect to this
+ software, its quality, accuracy, merchantability, or fitness for a
+ particular purpose. As a result, this software is provided "as is,"
+ and you, its user, are assuming the entire risk as to its quality
+ and accuracy.
+
+ This code may be used and freely distributed as long as it includes
+ this copyright notice and the above warranty information.
+ -----------------------------------------------------------------------
+*/
+CV_IMPL int
+cvSolveCubic( const CvMat* coeffs, CvMat* roots )
+{
+ int n = 0;
+
+ double a0 = 1., a1, a2, a3;
+ double x0 = 0., x1 = 0., x2 = 0.;
+ size_t step = 1;
+ int coeff_count;
+
+ if( !CV_IS_MAT(coeffs) )
+ CV_Error( !coeffs ? CV_StsNullPtr : CV_StsBadArg, "Input parameter is not a valid matrix" );
+
+ if( !CV_IS_MAT(roots) )
+ CV_Error( !roots ? CV_StsNullPtr : CV_StsBadArg, "Output parameter is not a valid matrix" );
+
+ if( (CV_MAT_TYPE(coeffs->type) != CV_32FC1 && CV_MAT_TYPE(coeffs->type) != CV_64FC1) ||
+ (CV_MAT_TYPE(roots->type) != CV_32FC1 && CV_MAT_TYPE(roots->type) != CV_64FC1) )
+ CV_Error( CV_StsUnsupportedFormat,
+ "Both matrices should be floating-point (single or double precision)" );
+
+ coeff_count = coeffs->rows + coeffs->cols - 1;
+
+ if( (coeffs->rows != 1 && coeffs->cols != 1) || (coeff_count != 3 && coeff_count != 4) )
+ CV_Error( CV_StsBadSize,
+ "The matrix of coefficients must be 1-dimensional vector of 3 or 4 elements" );
+
+ if( (roots->rows != 1 && roots->cols != 1) ||
+ roots->rows + roots->cols - 1 != 3 )
+ CV_Error( CV_StsBadSize,
+ "The matrix of roots must be 1-dimensional vector of 3 elements" );
+
+ if( CV_MAT_TYPE(coeffs->type) == CV_32FC1 )
+ {
+ const float* c = coeffs->data.fl;
+ if( coeffs->rows > 1 )
+ step = coeffs->step/sizeof(c[0]);
+ if( coeff_count == 4 )
+ a0 = c[0], c += step;
+ a1 = c[0];
+ a2 = c[step];
+ a3 = c[step*2];
+ }
+ else
+ {
+ const double* c = coeffs->data.db;
+ if( coeffs->rows > 1 )
+ step = coeffs->step/sizeof(c[0]);
+ if( coeff_count == 4 )
+ a0 = c[0], c += step;
+ a1 = c[0];
+ a2 = c[step];
+ a3 = c[step*2];
+ }
+
+ if( a0 == 0 )
+ {
+ if( a1 == 0 )
+ {
+ if( a2 == 0 )
+ n = a3 == 0 ? -1 : 0;
+ else
+ {
+ // linear equation
+ x0 = a3/a2;
+ n = 1;
+ }
+ }
+ else
+ {
+ // quadratic equation
+ double d = a2*a2 - 4*a1*a3;
+ if( d >= 0 )
+ {
+ d = sqrt(d);
+ double q = (-a2 + (a2 < 0 ? -d : d)) * 0.5;
+ x0 = q / a1;
+ x1 = a3 / q;
+ n = d > 0 ? 2 : 1;
+ }
+ }
+ }
+ else
+ {
+ a0 = 1./a0;
+ a1 *= a0;
+ a2 *= a0;
+ a3 *= a0;
+
+ double Q = (a1 * a1 - 3 * a2) * (1./9);
+ double R = (2 * a1 * a1 * a1 - 9 * a1 * a2 + 27 * a3) * (1./54);
+ double Qcubed = Q * Q * Q;
+ double d = Qcubed - R * R;
+
+ if( d >= 0 )
+ {
+ double theta = acos(R / sqrt(Qcubed));
+ double sqrtQ = sqrt(Q);
+ double t0 = -2 * sqrtQ;
+ double t1 = theta * (1./3);
+ double t2 = a1 * (1./3);
+ x0 = t0 * cos(t1) - t2;
+ x1 = t0 * cos(t1 + (2.*CV_PI/3)) - t2;
+ x2 = t0 * cos(t1 + (4.*CV_PI/3)) - t2;
+ n = 3;
+ }
+ else
+ {
+ double e;
+ d = sqrt(-d);
+ e = pow(d + fabs(R), 0.333333333333);
+ if( R > 0 )
+ e = -e;
+ x0 = (e + Q / e) - a1 * (1./3);
+ n = 1;
+ }
+ }
+
+ step = 1;
+
+ if( CV_MAT_TYPE(roots->type) == CV_32FC1 )
+ {
+ float* r = roots->data.fl;
+ if( roots->rows > 1 )
+ step = roots->step/sizeof(r[0]);
+ r[0] = (float)x0;
+ r[step] = (float)x1;
+ r[step*2] = (float)x2;
+ }
+ else
+ {
+ double* r = roots->data.db;
+ if( roots->rows > 1 )
+ step = roots->step/sizeof(r[0]);
+ r[0] = x0;
+ r[step] = x1;
+ r[step*2] = x2;
+ }
+
+ return n;
+}
+
+
+/*
+ Finds real and complex roots of polynomials of any degree with real
+ coefficients. The original code has been taken from Ken Turkowski's web
+ page (http://www.worldserver.com/turk/opensource/) and adopted for OpenCV.
+ Here is the copyright notice.
+
+ -----------------------------------------------------------------------
+ Copyright (C) 1981-1999 Ken Turkowski. <turk@computer.org>
+
+ All rights reserved.
+
+ Warranty Information
+ Even though I have reviewed this software, I make no warranty
+ or representation, either express or implied, with respect to this
+ software, its quality, accuracy, merchantability, or fitness for a
+ particular purpose. As a result, this software is provided "as is,"
+ and you, its user, are assuming the entire risk as to its quality
+ and accuracy.
+
+ This code may be used and freely distributed as long as it includes
+ this copyright notice and the above warranty information.
+*/
+
+
+/*******************************************************************************
+ * FindPolynomialRoots
+ *
+ * The Bairstow and Newton correction formulae are used for a simultaneous
+ * linear and quadratic iterated synthetic division. The coefficients of
+ * a polynomial of degree n are given as a[i] (i=0,i,..., n) where a[0] is
+ * the constant term. The coefficients are scaled by dividing them by
+ * their geometric mean. The Bairstow or Newton iteration method will
+ * nearly always converge to the number of figures carried, fig, either to
+ * root values or to their reciprocals. If the simultaneous Newton and
+ * Bairstow iteration fails to converge on root values or their
+ * reciprocals in maxiter iterations, the convergence requirement will be
+ * successively reduced by one decimal figure. This program anticipates
+ * and protects against loss of significance in the quadratic synthetic
+ * division. (Refer to "On Programming the Numerical Solution of
+ * Polynomial Equations," by K. W. Ellenberger, Commun. ACM 3 (Dec. 1960),
+ * 644-647.) The real and imaginary part of each root is stated as u[i]
+ * and v[i], respectively.
+ *
+ * ACM algorithm #30 - Numerical Solution of the Polynomial Equation
+ * K. W. Ellenberger
+ * Missle Division, North American Aviation, Downey, California
+ * Converted to C, modified, optimized, and structured by
+ * Ken Turkowski
+ * CADLINC, Inc., Palo Alto, California
+ *******************************************************************************/
+
+#define MAXN 16
+
+static void icvFindPolynomialRoots(const double *a, double *u, int n, int maxiter, int fig)
+{
+ int i;
+ int j;
+ double h[MAXN + 3], b[MAXN + 3], c[MAXN + 3], d[MAXN + 3], e[MAXN + 3];
+ // [-2 : n]
+ double K, ps, qs, pt, qt, s, rev, r = 0;
+ int t;
+ double p = 0, q = 0, qq;
+
+ // Zero elements with negative indices
+ b[2 + -1] = b[2 + -2] =
+ c[2 + -1] = c[2 + -2] =
+ d[2 + -1] = d[2 + -2] =
+ e[2 + -1] = e[2 + -2] =
+ h[2 + -1] = h[2 + -2] = 0.0;
+
+ // Copy polynomial coefficients to working storage
+ for (j = n; j >= 0; j--)
+ h[2 + j] = *a++; // Note reversal of coefficients
+
+ t = 1;
+ K = pow(10.0, (double)(fig)); // Relative accuracy
+
+ for (; h[2 + n] == 0.0; n--) { // Look for zero high-order coeff.
+ *u++ = 0.0;
+ *u++ = 0.0;
+ }
+
+ INIT:
+ if (n == 0)
+ return;
+
+ ps = qs = pt = qt = s = 0.0;
+ rev = 1.0;
+ K = pow(10.0, (double)(fig));
+
+ if (n == 1) {
+ r = -h[2 + 1] / h[2 + 0];
+ goto LINEAR;
+ }
+
+ for (j = n; j >= 0; j--) // Find geometric mean of coeff's
+ if (h[2 + j] != 0.0)
+ s += log(fabs(h[2 + j]));
+ s = exp(s / (n + 1));
+
+ for (j = n; j >= 0; j--) // Normalize coeff's by mean
+ h[2 + j] /= s;
+
+ if (fabs(h[2 + 1] / h[2 + 0]) < fabs(h[2 + n - 1] / h[2 + n])) {
+ REVERSE:
+ t = -t;
+ for (j = (n - 1) / 2; j >= 0; j--) {
+ s = h[2 + j];
+ h[2 + j] = h[2 + n - j];
+ h[2 + n - j] = s;
+ }
+ }
+ if (qs != 0.0) {
+ p = ps;
+ q = qs;
+ } else {
+ if (h[2 + n - 2] == 0.0) {
+ q = 1.0;
+ p = -2.0;
+ } else {
+ q = h[2 + n] / h[2 + n - 2];
+ p = (h[2 + n - 1] - q * h[2 + n - 3]) / h[2 + n - 2];
+ }
+ if (n == 2)
+ goto QADRTIC;
+ r = 0.0;
+ }
+ ITERATE:
+ for (i = maxiter; i > 0; i--) {
+
+ for (j = 0; j <= n; j++) { // BAIRSTOW
+ b[2 + j] = h[2 + j] - p * b[2 + j - 1] - q * b[2 + j - 2];
+ c[2 + j] = b[2 + j] - p * c[2 + j - 1] - q * c[2 + j - 2];
+ }
+ if ((h[2 + n - 1] != 0.0) && (b[2 + n - 1] != 0.0)) {
+ if (fabs(h[2 + n - 1] / b[2 + n - 1]) >= K) {
+ b[2 + n] = h[2 + n] - q * b[2 + n - 2];
+ }
+ if (b[2 + n] == 0.0)
+ goto QADRTIC;
+ if (K < fabs(h[2 + n] / b[2 + n]))
+ goto QADRTIC;
+ }
+
+ for (j = 0; j <= n; j++) { // NEWTON
+ d[2 + j] = h[2 + j] + r * d[2 + j - 1]; // Calculate polynomial at r
+ e[2 + j] = d[2 + j] + r * e[2 + j - 1]; // Calculate derivative at r
+ }
+ if (d[2 + n] == 0.0)
+ goto LINEAR;
+ if (K < fabs(h[2 + n] / d[2 + n]))
+ goto LINEAR;
+
+ c[2 + n - 1] = -p * c[2 + n - 2] - q * c[2 + n - 3];
+ s = c[2 + n - 2] * c[2 + n - 2] - c[2 + n - 1] * c[2 + n - 3];
+ if (s == 0.0) {
+ p -= 2.0;
+ q *= (q + 1.0);
+ } else {
+ p += (b[2 + n - 1] * c[2 + n - 2] - b[2 + n] * c[2 + n - 3]) / s;
+ q += (-b[2 + n - 1] * c[2 + n - 1] + b[2 + n] * c[2 + n - 2]) / s;
+ }
+ if (e[2 + n - 1] == 0.0)
+ r -= 1.0; // Minimum step
+ else
+ r -= d[2 + n] / e[2 + n - 1]; // Newton's iteration
+ }
+ ps = pt;
+ qs = qt;
+ pt = p;
+ qt = q;
+ if (rev < 0.0)
+ K /= 10.0;
+ rev = -rev;
+ goto REVERSE;
+
+ LINEAR:
+ if (t < 0)
+ r = 1.0 / r;
+ n--;
+ *u++ = r;
+ *u++ = 0.0;
+
+ for (j = n; j >= 0; j--) { // Polynomial deflation by lin-nomial
+ if ((d[2 + j] != 0.0) && (fabs(h[2 + j] / d[2 + j]) < K))
+ h[2 + j] = d[2 + j];
+ else
+ h[2 + j] = 0.0;
+ }
+
+ if (n == 0)
+ return;
+ goto ITERATE;
+
+ QADRTIC:
+ if (t < 0) {
+ p /= q;
+ q = 1.0 / q;
+ }
+ n -= 2;
+
+ if (0.0 < (q - (p * p / 4.0))) { // Two complex roots
+ s = sqrt(q - (p * p / 4.0));
+ *u++ = -p / 2.0;
+ *u++ = s;
+ *u++ = -p / 2.0;
+ *u++ = -s;
+ } else { // Two real roots
+ s = sqrt(((p * p / 4.0)) - q);
+ if (p < 0.0)
+ *u++ = qq = -p / 2.0 + s;
+ else
+ *u++ = qq = -p / 2.0 - s;
+ *u++ = 0.0;
+ *u++ = q / qq;
+ *u++ = 0.0;
+ }
+
+ for (j = n; j >= 0; j--) { // Polynomial deflation by quadratic
+ if ((b[2 + j] != 0.0) && (fabs(h[2 + j] / b[2 + j]) < K))
+ h[2 + j] = b[2 + j];
+ else
+ h[2 + j] = 0.0;
+ }
+ goto INIT;
+}
+
+#undef MAXN
+
+void cvSolvePoly(const CvMat* a, CvMat *r, int maxiter, int fig)
+{
+ __BEGIN__;
+
+ int m, n;
+ double *ad = 0, *rd = 0;
+
+ CV_FUNCNAME("cvSolvePoly");
+
+ CV_ASSERT(maxiter > 0);
+ if (CV_MAT_TYPE(a->type) != CV_32FC1 &&
+ CV_MAT_TYPE(a->type) != CV_64FC1)
+ CV_Error(CV_StsUnsupportedFormat, "coeffs must be either CV_32FC1 or CV_64FC1");
+ if (CV_MAT_TYPE(r->type) != CV_32FC2 &&
+ CV_MAT_TYPE(r->type) != CV_64FC2)
+ CV_Error(CV_StsUnsupportedFormat, "roots must be either CV_32FC2 or CV_64FC2");
+ m = a->rows * a->cols;
+ n = r->rows * r->cols;
+
+ if (m - 1 != n)
+ CV_Error(CV_StsUnmatchedFormats, "must have n + 1 coefficients");
+
+ if( CV_MAT_DEPTH(a->type) == CV_32F || !CV_IS_MAT_CONT(a->type))
+ {
+ ad = (double*)cvStackAlloc(m*sizeof(ad[0]));
+ CvMat _a = cvMat( a->rows, a->cols, CV_64F, ad );
+ cvConvert( a, &_a );
+ }
+ else
+ ad = a->data.db;
+
+ if( CV_MAT_DEPTH(r->type) == CV_32F || !CV_IS_MAT_CONT(r->type))
+ rd = (double*)cvStackAlloc(n*sizeof(ad[0]));
+ else
+ rd = r->data.db;
+
+ icvFindPolynomialRoots( ad, rd, n, maxiter, fig);
+ if( rd != r->data.db )
+ {
+ CvMat _r = cvMat( r->rows, r->cols, CV_64FC2, rd );
+ cvConvert( &_r, r );
+ }
+
+ __END__;
+}
+
+
+/* End of file. */