Skip to content

Commit

Permalink
remove trailing spaces + minor update of the doc
Browse files Browse the repository at this point in the history
  • Loading branch information
@sylvestre
sylvestre committed Oct 12, 2015
1 parent 5c2d41f commit b0f7a60
Show file tree
Hide file tree
Showing 3 changed files with 74 additions and 77 deletions.
19 changes: 9 additions & 10 deletions COPYING
View file
Original file line number Diff line number Diff line change
Expand Up @@ -3,7 +3,7 @@ BSD Software License

Pertains to ARPACK and P_ARPACK

Copyright (c) 1996-2008 Rice University.
Copyright (c) 1996-2008 Rice University.
Developed by D.C. Sorensen, R.B. Lehoucq, C. Yang, and K. Maschhoff.
All rights reserved.

Expand All @@ -21,26 +21,25 @@ modification, are permitted provided that the following conditions are
met:

- Redistributions of source code must retain the above copyright
notice, this list of conditions and the following disclaimer.
notice, this list of conditions and the following disclaimer.

- Redistributions in binary form must reproduce the above copyright
notice, this list of conditions and the following disclaimer listed
in this license in the documentation and/or other materials
provided with the distribution.

- Neither the name of the copyright holders nor the names of its
contributors may 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
"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 COPYRIGHT
A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
OWNER 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
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.

OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
129 changes: 64 additions & 65 deletions PARPACK_CHANGES
View file
Original file line number Diff line number Diff line change
Expand Up @@ -9,7 +9,7 @@ Theses changes were released under the "ppatch.tar.gz" filename.
[s,d]sapps.f: Loop 50 (line 375) has an incorrect upper bound:
replace
do 50 j = 1, min( j+jj, kplusp )
^^^
^^^
with
do 50 j = 1, min( i+jj, kplusp )
^^^
Expand All @@ -32,17 +32,17 @@ Theses changes were released under the "ppatch.tar.gz" filename.
^^^

Without the change the code will not compile on NEC.
The parallel version of these routine needs to be modified
The parallel version of these routine needs to be modified
as well.

2. 03/28/97:

In [s,d]ndrv4.f [s,d]ndrv5.f [s,d]ndrv6.f, the array SELECT
is delecared as
is delecared as

select(maxnev)

It should be changed to
It should be changed to

select(maxncv)

Expand All @@ -68,7 +68,7 @@ c %-----------------%
5. 03/28/97:

all banded drivers in EXAMPLES/BAND directory have not been
checked in. Although these are the current version, the SCCS
checked in. Although these are the current version, the SCCS
infomartion do not show the correct version number and dates.

6. 03/28/97:
Expand All @@ -91,7 +91,7 @@ c %-----------------%
else if (mode .lt. 1 .or. mode .gt. 5) then
^^
ierr = -10

should be changed to

else if (mode .lt. 1 .or. mode .gt. 3) then
Expand All @@ -100,20 +100,20 @@ c %-----------------%

7. 04/02/97:

The mass matrix in the drivers
The mass matrix in the drivers

[s,d]ndrv4.f (NONSYM)
[s,d]nbdr4.f (BAND)
[c,z]ndrv4.f (COMPLEX)
[c,z]nbdr4.f (BAND)

needs to be scaled by 1/6 to match the piecewise
linear finite element discretization of the 1-d
needs to be scaled by 1/6 to match the piecewise
linear finite element discretization of the 1-d
convection-diffusion operator as explained in the
documentation.

8. 04/03/97:

The documentation for the SELECT array in [s,d]seupd.f should
say:

Expand Down Expand Up @@ -154,13 +154,13 @@ c SELECT Logical array of dimension NCV. (INPUT/WORKSPACE)
A print statement (*mout) in p*neupd.f went over the 72nd column.

14. 04/17/99
Modified p*larnv.f and p*getv0.f in PARPACK to fix a bug in
Modified p*larnv.f and p*getv0.f in PARPACK to fix a bug in
generating a random starting vector in parallel. Now each processor
generates its portion of the starting vector using a different seed.

15. 11/05/99
The do 10 loop in [c,z]neupd.f and p[c,z]neupd.f had incorrect index
to workl(irz). Since the loop count j starts from 0, the reference to
The do 10 loop in [c,z]neupd.f and p[c,z]neupd.f had incorrect index
to workl(irz). Since the loop count j starts from 0, the reference to
workl(irz) should be expressed by workl(irz+j) instead of workl(irz+j-1).

16. 06/01/2000
Expand All @@ -179,63 +179,63 @@ c SELECT Logical array of dimension NCV. (INPUT/WORKSPACE)
a) find a threshold value from the sorted Ritz value array
b) compare all eigenvalues returned directly from dense eigenvalue
calculation routine against this threshold value.
2. For each desired Ritz value, check the Ritz estimate.
Mark the j-th element of the select array if the j-th eigenvalue
2. For each desired Ritz value, check the Ritz estimate.
Mark the j-th element of the select array if the j-th eigenvalue
satisfies the convergence criteria.


18. 08/08/2000
In _saitr.f and _naitr.f, add a check for NP = 0 at the very begining of
this routine
In _saitr.f and _naitr.f, add a check for NP = 0 at the very begining of
this routine

19. 09/21/2000
In [c,z]neupd.f, the IF statement:
if (numcnv .lt. nev .and.
^^^
& slapy2( m_real(workl(ibd+jj-1)),
& aimag(workl(ibd+jj-1)) )
& .le. tol*rtemp) then

is changed to
if (numcnv .lt. nconv .and.
^^^^^
& slapy2( m_real(workl(ibd+jj-1)),
& aimag(workl(ibd+jj-1)) )
& .le. tol*rtemp) then

NEV is the number of eigenvalues requested;
NCONV is the number of converged eigenvalues;
NUMCNV counts the number of converged eigenvalues;
The original IF statement will cause NUMCNV to be
inconsistent with NCONV, when fewer than NEV wanted
eigenvalues have converged but there are many converged
but unwanted Ritz values.
if (numcnv .lt. nev .and.
^^^
& slapy2( m_real(workl(ibd+jj-1)),
& aimag(workl(ibd+jj-1)) )
& .le. tol*rtemp) then

is changed to
if (numcnv .lt. nconv .and.
^^^^^
& slapy2( m_real(workl(ibd+jj-1)),
& aimag(workl(ibd+jj-1)) )
& .le. tol*rtemp) then

NEV is the number of eigenvalues requested;
NCONV is the number of converged eigenvalues;
NUMCNV counts the number of converged eigenvalues;

The original IF statement will cause NUMCNV to be
inconsistent with NCONV, when fewer than NEV wanted
eigenvalues have converged but there are many converged
but unwanted Ritz values.

20. In [s,d][s,n]eupd.f, the IF statement
if (numcnv .lt. nev .and.
^^^
& workl(ibd+jj-1) .le. tol*temp1) then
is changed to
if (numcnv .lt. nconv .and.
^^^^^
& workl(ibd+jj-1) .le. tol*temp1) then
NEV is the number of eigenvalues requested;
NCONV is the number of converged eigenvalues;
NUMCNV counts the number of converged eigenvalues;
The original IF statement will cause NUMCNV to be
inconsistent with NCONV, when fewer than NEV wanted
eigenvalues have converged but there are many converged
if (numcnv .lt. nev .and.
^^^
& workl(ibd+jj-1) .le. tol*temp1) then
is changed to
if (numcnv .lt. nconv .and.
^^^^^
& workl(ibd+jj-1) .le. tol*temp1) then
NEV is the number of eigenvalues requested;
NCONV is the number of converged eigenvalues;
NUMCNV counts the number of converged eigenvalues;

The original IF statement will cause NUMCNV to be
inconsistent with NCONV, when fewer than NEV wanted
eigenvalues have converged but there are many converged
but unwanted Ritz values.

21. 10/16/2000
Line 238 of [s,d]naup2.f went past the 72nd column. This
was caused by the extra space inserted by new Solaris cpp
when ARPACK single and double precision source codes are generate
from the naup2.F code. This line is fixed by wrapping it around
was caused by the extra space inserted by new Solaris cpp
when ARPACK single and double precision source codes are generate
from the naup2.F code. This line is fixed by wrapping it around
the next line.

22. 10/20/2000
Updated SCCS information for drivers in BAND, SIMPLE.
Fixed miscellaneous minor problems caused by cpp.
Expand All @@ -246,7 +246,7 @@ c SELECT Logical array of dimension NCV. (INPUT/WORKSPACE)
in p[s,d,c,n][s,n]eupd.f

24. 04/10/2001 (reported by David Day, SNL)
There was a mistake in the orthogonalization step in
There was a mistake in the orthogonalization step in
the MPI version of p[c,z]getv0.f. The original code had

call zgemv ('N', n, j-1, -one, v, ldv, workd(n+1), 1,
Expand All @@ -259,7 +259,7 @@ c SELECT Logical array of dimension NCV. (INPUT/WORKSPACE)
^^^^^

Also, p[c,z]vout() was used to print out `rnorm', which
is potential problematic. The following code has been
is potential problematic. The following code has been
added to correct that.

cnorm2 = cmplx(rnorm,rzero)
Expand All @@ -270,7 +270,7 @@ c SELECT Logical array of dimension NCV. (INPUT/WORKSPACE)
In all _aupd.f codes, iparam(2) and/or iparam(4) are used to
define NB or LEVEC. Since NB=1 is the only block size and since
LEVEC is no longer used, the statements

levec = iparam(2)
nb = iparam(4)

Expand All @@ -294,7 +294,7 @@ c SELECT Logical array of dimension NCV. (INPUT/WORKSPACE)

27. 07/21/2002

In pzneupd.f, loop 11, the intrinsic precision conversion
In pzneupd.f, loop 11, the intrinsic precision conversion
function 'real' should be changed to 'dble'


Expand All @@ -313,11 +313,11 @@ c SELECT Logical array of dimension NCV. (INPUT/WORKSPACE)
29. 07/21/2002
modified the comment in [c,z]naupd regarding the size of
NCV. NCV is only required to be at least NEV+1 (instead of
NEV+2) in the complex version.
NEV+2) in the complex version.

30. 07/21/2002
In [s,d]sbdr2.f, lworkl is incorrectly set to ncv*ncv+6*ncv.
Changed it to ncv*ncv+8*ncv.
In [s,d]sbdr2.f, lworkl is incorrectly set to ncv*ncv+6*ncv.
Changed it to ncv*ncv+8*ncv.

31. 10/24/2003
There was a typo in p[c,z]neupd. The call to '[c,z]ngets' is
Expand All @@ -331,4 +331,3 @@ c SELECT Logical array of dimension NCV. (INPUT/WORKSPACE)

35. 10/24/2003 p[c,z]naup2.f contain some lines that were incorrectly
generated by cpp. These lines have been removed in the new patch.

3 changes: 1 addition & 2 deletions README
View file
Original file line number Diff line number Diff line change
Expand Up @@ -21,8 +21,7 @@ few years and since many software (Octave, Scilab, R, Matlab...) forked it and
implemented their own modifications, arpack-ng aims to tackle this by providing
a common repository and maintained versions.

arpack-ng is replacing arpack in Debian & Ubuntu. Fink, Fedora and Redhat are
currently doing the same move.
arpack-ng is replacing arpack almost everywhere.


1. You have successfully unbundled ARPACK-NG and are now in the ARPACK-NG
Expand Down

0 comments on commit b0f7a60

Please sign in to comment.