[Arnoldi] made internal. eigs() moved to [linear_algebra] 86/21686/4
Samuel GOUGEON [Fri, 22 Jan 2021 01:11:04 +0000 (02:11 +0100)]
  http://bugzilla.scilab.org/11677

Change-Id: I56e6724a96c99a244f4d3e34121ea76fba5ab3b5

34 files changed:
scilab/CHANGES.md
scilab/modules/arnoldi/arnoldi.iss
scilab/modules/arnoldi/etc/arnoldi.start
scilab/modules/arnoldi/help/en_US/addchapter.sce
scilab/modules/arnoldi/help/fr_FR/addchapter.sce
scilab/modules/arnoldi/help/ja_JP/addchapter.sce
scilab/modules/arnoldi/help/pt_BR/addchapter.sce
scilab/modules/arnoldi/help/ru_RU/addchapter.sce
scilab/modules/linear_algebra/help/en_US/eigen/eigs.xml [moved from scilab/modules/arnoldi/help/en_US/eigs.xml with 98% similarity]
scilab/modules/linear_algebra/help/ja_JP/eigen/eigs.xml [moved from scilab/modules/arnoldi/help/ja_JP/eigs.xml with 98% similarity]
scilab/modules/linear_algebra/macros/eigs.sci [moved from scilab/modules/arnoldi/macros/eigs.sci with 99% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_11653.dia.ref [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_11653.dia.ref with 100% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_11653.tst [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_11653.tst with 100% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_12120.dia.ref [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_12120.dia.ref with 100% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_12120.tst [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_12120.tst with 100% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_12137.dia.ref [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_12137.dia.ref with 100% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_12137.tst [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_12137.tst with 100% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_12138.dia.ref [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_12138.dia.ref with 100% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_12138.tst [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_12138.tst with 100% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_12139.dia.ref [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_12139.dia.ref with 100% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_12139.tst [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_12139.tst with 100% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_12238.dia.ref [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_12238.dia.ref with 100% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_12238.tst [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_12238.tst with 100% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_12772.dia.ref [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_12772.dia.ref with 100% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_12772.tst [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_12772.tst with 100% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_12992.dia.ref [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_12992.dia.ref with 100% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_12992.tst [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_12992.tst with 100% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_13058.dia.ref [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_13058.dia.ref with 100% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_13058.tst [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_13058.tst with 100% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_13381.dia.ref [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_13381.dia.ref with 100% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_13381.tst [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_13381.tst with 100% similarity]
scilab/modules/linear_algebra/tests/nonreg_tests/bug_13480.tst [moved from scilab/modules/arnoldi/tests/nonreg_tests/bug_13480.tst with 100% similarity]
scilab/modules/linear_algebra/tests/unit_tests/eigs.dia.ref [moved from scilab/modules/arnoldi/tests/unit_tests/eigs.dia.ref with 100% similarity]
scilab/modules/linear_algebra/tests/unit_tests/eigs.tst [moved from scilab/modules/arnoldi/tests/unit_tests/eigs.tst with 100% similarity]

index c78b86b..0740fdd 100644 (file)
@@ -212,7 +212,7 @@ Feature changes and additions on 6.1.1
   - Extended to all signed integers.
   - Decimal positive integers > 2^52 up to 2^1024 = number_properties("huge") can now be processed, with bitnum up to 1024 instead of 52.
   - bitnum can actually be an array. It is now optional as well for input decimal integers.
-
+* The `Arnoldi` module is now internal.
 
 Help pages:
 -----------
@@ -298,6 +298,7 @@ Bug Fixes
 * [#9221](https://bugzilla.scilab.org/9221): There was no way in Scilab to easily access to sets of unicode symbols like greek letters, etc.
 * [#9909](https://bugzilla.scilab.org/9909): In the help browser, add a way to open the online version of the current page.
 * [#10476](https://bugzilla.scilab.org/10476): From `browsevar`, displaying the content of lists, structures, cells, or other custom tlists or mlists was not possible.
+* [#11677](https://bugzilla.scilab.org/11677): The original Arnoldi functions were obsolete.
 * [#12418](https://bugzilla.scilab.org/12418): Using bvode() with "continuation", i.e. `ipar(9) > 1` led to an error.
 * [#12516](https://bugzilla.scilab.org/12516): From `browsevar`, clicking on any graphical handle did not edit its figure with `ged`.
 * [#12532](https://bugzilla.scilab.org/12532): From `browsevar`, clicking on any function did not edit it with `edit`. The content of libraries could not be displayed either.
index aeaea69..af4cab7 100644 (file)
@@ -32,12 +32,12 @@ Source: modules\{#ARNOLDI}\sci_gateway\{#ARNOLDI}_gateway.xml; DestDir: {app}\mo
 Source: modules\{#ARNOLDI}\etc\{#ARNOLDI}.quit; DestDir: {app}\modules\{#ARNOLDI}\etc; Components: {#COMPN_SCILAB}
 Source: modules\{#ARNOLDI}\etc\{#ARNOLDI}.start; DestDir: {app}\modules\{#ARNOLDI}\etc; Components: {#COMPN_SCILAB}
 ;
-Source: modules\{#ARNOLDI}\macros\*.sci; DestDir: {app}\modules\{#ARNOLDI}\macros; Components: {#COMPN_SCILAB}
-Source: modules\{#ARNOLDI}\macros\*.bin; DestDir: {app}\modules\{#ARNOLDI}\macros; Components: {#COMPN_SCILAB}
+;Source: modules\{#ARNOLDI}\macros\*.sci; DestDir: {app}\modules\{#ARNOLDI}\macros; Components: {#COMPN_SCILAB}
+;Source: modules\{#ARNOLDI}\macros\*.bin; DestDir: {app}\modules\{#ARNOLDI}\macros; Components: {#COMPN_SCILAB}
 Source: modules\{#ARNOLDI}\macros\buildmacros.sce; DestDir: {app}\modules\{#ARNOLDI}\macros; Components: {#COMPN_SCILAB}
 Source: modules\{#ARNOLDI}\macros\buildmacros.bat; DestDir: {app}\modules\{#ARNOLDI}\macros; Components: {#COMPN_SCILAB}
 Source: modules\{#ARNOLDI}\macros\cleanmacros.bat; DestDir: {app}\modules\{#ARNOLDI}\macros; Components: {#COMPN_SCILAB}
-Source: modules\{#ARNOLDI}\macros\lib; DestDir: {app}\modules\{#ARNOLDI}\macros; Components: {#COMPN_SCILAB}
+;Source: modules\{#ARNOLDI}\macros\lib; DestDir: {app}\modules\{#ARNOLDI}\macros; Components: {#COMPN_SCILAB}
 ;
 Source: modules\{#ARNOLDI}\tests\*.*; DestDir: {app}\modules\{#ARNOLDI}\tests; Flags: recursesubdirs; Components: {#COMPN_SCILAB} and {#COMPN_TESTS}
 ;
index 08372e1..fcc0511 100644 (file)
@@ -12,4 +12,4 @@
 
 //Load  functions libraries
 // =============================================================================
-load('SCI/modules/arnoldi/macros/lib');
\ No newline at end of file
+//load('SCI/modules/arnoldi/macros/lib');
\ No newline at end of file
index bca9f8a..357a0df 100644 (file)
@@ -10,5 +10,5 @@
 // For more information, see the COPYING file which you should have received
 // along with this program.
 
-add_help_chapter("ARnoldi PACKage (ARPACK binding)",SCI+"/modules/arnoldi/help/en_US",%T);
+//add_help_chapter("ARnoldi PACKage (ARPACK binding)",SCI+"/modules/arnoldi/help/en_US",%T);
 
index 6addfce..1488e19 100644 (file)
@@ -10,5 +10,5 @@
 // For more information, see the COPYING file which you should have received
 // along with this program.
 
-add_help_chapter("ARnoldi PACKage (binding de ARPACK)",SCI+"/modules/arnoldi/help/fr_FR",%T);
+//add_help_chapter("ARnoldi PACKage (binding de ARPACK)",SCI+"/modules/arnoldi/help/fr_FR",%T);
 
index 75b8353..d6414c7 100755 (executable)
@@ -10,5 +10,5 @@
 // For more information, see the COPYING file which you should have received
 // along with this program.
 
-add_help_chapter("ARnoldi PACKage",SCI+"/modules/arnoldi/help/ja_JP",%T);
+//add_help_chapter("ARnoldi PACKage",SCI+"/modules/arnoldi/help/ja_JP",%T);
 
index 00d30d4..b892e3c 100644 (file)
@@ -10,5 +10,5 @@
 // For more information, see the COPYING file which you should have received
 // along with this program.
 
-add_help_chapter("ARnoldi PACKage",SCI+"/modules/arnoldi/help/pt_BR",%T);
+//add_help_chapter("ARnoldi PACKage",SCI+"/modules/arnoldi/help/pt_BR",%T);
 
index 7124ff5..d3acf46 100644 (file)
@@ -10,5 +10,5 @@
 // For more information, see the COPYING file which you should have received
 // along with this program.
 
-add_help_chapter("ARnoldi PACKage",SCI+"/modules/arnoldi/help/ru_RU",%T);
+//add_help_chapter("ARnoldi PACKage",SCI+"/modules/arnoldi/help/ru_RU",%T);
 
@@ -530,7 +530,13 @@ d = eigs(fn, 10, [], k, 4, opts)
         <revhistory>
             <revision>
                 <revnumber>5.4.0</revnumber>
-                <revremark>Function introduced. Deprecates dnaupd, dneupd, dsaupd, dseupd, znaupd and zneupd.</revremark>
+                <revremark>Function introduced.</revremark>
+            </revision>
+            <revision>
+                <revnumber>6.1.1</revnumber>
+                <revremark>
+                    dnaupd, dneupd, dsaupd, dseupd, znaupd and zneupd become internal.
+                </revremark>
             </revision>
         </revhistory>
     </refsection>
@@ -427,7 +427,7 @@ d = eigs(fn, 10, [], k, 4, opts)
         <title>実非対称問題の例</title>
         <programlisting role="example">
             <![CDATA[
-       clear opts
+    clear opts
     A            = diag(10*ones(10,1));
     A(1:$-1,2:$) = A(1:$-1,2:$) + diag(6*ones(9,1));
     A(2:$,1:$-1) = A(2:$,1:$-1) + diag(-6*ones(9,1));
@@ -473,7 +473,7 @@ d = eigs(fn, 10, [], k, 4, opts)
         <title>複素問題の例</title>
         <programlisting role="example">
             <![CDATA[
-       clear opts
+    clear opts
     A            = diag(10*ones(10,1) + %i * ones(10,1));
     A(1:$-1,2:$) = A(1:$-1,2:$) + diag(6*ones(9,1));
     A(2:$,1:$-1) = A(2:$,1:$-1) + diag(-6*ones(9,1));
@@ -530,7 +530,12 @@ d = eigs(fn, 10, [], k, 4, opts)
                 <revnumber>5.4.0</revnumber>
                 <revremark>
                     関数が導入されました.
-                    dnaupd, dneupd, dsaupd, dseupd, znaupd および zneupdは廃止されました.
+                </revremark>
+            </revision>
+            <revision>
+                <revnumber>6.1.1</revnumber>
+                <revremark>
+                    dnaupd, dneupd, dsaupd, dseupd, znaupd and zneupd become internal.
                 </revremark>
             </revision>
         </revhistory>
similarity index 99%
rename from scilab/modules/arnoldi/macros/eigs.sci
rename to scilab/modules/linear_algebra/macros/eigs.sci
index 3d07b20..1120633 100644 (file)
@@ -507,12 +507,14 @@ function [res_d, res_v] = speigs(A, %_B, nev, which, maxiter, tol, ncv, cholB, r
                 end
             else
                 [ido, resid, v, iparam, ipntr, workd, workl, info] = dnaupd(ido, bmat, nA, which, nev, tol, resid, ncv, v, iparam, ipntr, workd, workl, info);
+                // [arnoldi] https://help.scilab.org/docs/6.1.0/en_US/dnaupd.html
                 if(info < 0)
                     error(msprintf(gettext("%s: Error with %s: info = %d.\n"), "eigs", "DNAUPD", info));
                 end
             end
         else
             [ido, resid, v, iparam, ipntr, workd, workl, rwork, info] = znaupd(ido, bmat, nA, which, nev, tol, resid, ncv, v, iparam, ipntr, workd, workl, rwork, info);
+            // [arnoldi] https://help.scilab.org/docs/6.1.0/en_US/znaupd.html
             if(info < 0)
                 error(msprintf(gettext("%s: Error with %s: info = %d.\n"), "eigs", "ZNAUPD", info));
             end
@@ -584,6 +586,7 @@ function [res_d, res_v] = speigs(A, %_B, nev, which, maxiter, tol, ncv, cholB, r
     if(Areal & Breal)
         if(Asym)
             [d, z, resid, v, iparam, iptnr, workd, workl, info_eupd] = dseupd(rvec, howmny, _select, d, z, sigma, bmat, nA, which, nev, tol, resid, ncv, v, iparam, ipntr, workd, workl, info_eupd);
+            // [arnoldi] https://help.scilab.org/docs/6.1.0/en_US/dseupd.html
             if(info_eupd <> 0)
                 error(msprintf(gettext("%s: Error with %s: info = %d.\n"), "eigs", "DSEUPD", info_eupd));
             else
@@ -601,6 +604,7 @@ function [res_d, res_v] = speigs(A, %_B, nev, which, maxiter, tol, ncv, cholB, r
                 computevec = 1;
             end
             [dr, di, z, resid, v, iparam, ipntr, workd, workl, info_eupd] = dneupd(computevec, howmny, _select, dr, di, z, sigmar, sigmai, workev, bmat, nA, which, nev, tol, resid, ncv, v, iparam, ipntr, workd, workl, info_eupd);
+            // [arnoldi] https://help.scilab.org/docs/6.1.0/en_US/dneupd.html
             if(info_eupd <> 0)
                 error(msprintf(gettext("%s: Error with %s: info = %d.\n"), "eigs", "DNEUPD", info_eupd));
             else
@@ -637,6 +641,7 @@ function [res_d, res_v] = speigs(A, %_B, nev, which, maxiter, tol, ncv, cholB, r
         end
     else
         [d, z, resid, iparam, ipntr, workd, workl, rwork, info_eupd] = zneupd(rvec, howmny, _select, d, z, sigma, workev, bmat, nA, which, nev, tol, resid, ncv, v, iparam, ipntr, workd, workl, rwork, info_eupd);
+        // [arnoldi] https://help.scilab.org/docs/6.1.0/en_US/zneupd.html
         if(info_eupd <> 0)
             error(msprintf(gettext("%s: Error with %s: info = %d.\n"), "eigs", "ZNEUPD", info_eupd));
         else