diff --git a/EgtNumKernel.rc b/EgtNumKernel.rc index 5082d3e..fd0f54d 100644 Binary files a/EgtNumKernel.rc and b/EgtNumKernel.rc differ diff --git a/EgtNumKernel.vcxproj b/EgtNumKernel.vcxproj index 37d95f4..0505520 100644 --- a/EgtNumKernel.vcxproj +++ b/EgtNumKernel.vcxproj @@ -35,7 +35,7 @@ DynamicLibrary true Unicode - v142 + ClangCL DynamicLibrary @@ -49,7 +49,7 @@ false true Unicode - v142 + ClangCL @@ -124,6 +124,7 @@ copy $(TargetPath) \EgtProg\DllD32 Disabled WIN32;_DEBUG;_WINDOWS;I_AM_ENK;%(PreprocessorDefinitions) true + stdcpp17 Windows @@ -184,6 +185,7 @@ copy $(TargetPath) \EgtProg\Dll32 AdvancedVectorExtensions2 true true + stdcpp17 Windows diff --git a/JenkinsTraub.cpp b/JenkinsTraub.cpp index 1011c16..5e66e38 100644 --- a/JenkinsTraub.cpp +++ b/JenkinsTraub.cpp @@ -1007,7 +1007,7 @@ Cpoly::fxshft( const int l2, double* zr, double* zi, bool* pbConv) // Test for convergence unless stage 3 has failed once or this // is the last H Polynomial - if ( ! ( bBol || ! bTest || j == 12)) + if ( ! ( bBol || ! bTest || j == 12)) { if ( cmod( tr - otr, ti - oti) < 0.5 * cmod( *zr, *zi)) { if ( bPasd) { // The weak convergence test has been passwed twice, start the third stage @@ -1038,6 +1038,7 @@ Cpoly::fxshft( const int l2, double* zr, double* zi, bool* pbConv) } else bPasd = false ; + } } // Attempt an iteration with final H polynomial from second stage diff --git a/JenkinsTraub.h b/JenkinsTraub.h index 49b84a7..bc583b3 100644 --- a/JenkinsTraub.h +++ b/JenkinsTraub.h @@ -39,9 +39,9 @@ class Rpoly { int itercnt ; private : // members - int n, nn, nmi ; - double sr, si, u, v, a, b, c, d, a1, a2 ; - double a3, a6, a7, e, f, g, h, szr, szi, lzr, lzi ; + int n ; + double sr, si, u, v, a, b, c, d, a1, a3, a7 ; + double e, f, g, h, szr, szi, lzr, lzi ; double eta, are, mre ; double p[POLY_MAXDEG+1] ; double qp[POLY_MAXDEG+1] ;