~ubuntu-branches/debian/sid/arpack/sid

« back to all changes in this revision

Viewing changes to SRC/sseupd.f

  • Committer: Package Import Robot
  • Author(s): Sylvestre Ledru
  • Date: 2012-02-22 11:05:03 UTC
  • mfrom: (1.2.5)
  • Revision ID: package-import@ubuntu.com-20120222110503-h6ux3f5ilm5q76w0
Tags: 3.1.0-1
New upstream release

Show diffs side-by-side

added added

removed removed

Lines of Context:
501
501
     &          workl(ibd+jj-1) .le. tol*temp1) then
502
502
               select(jj) = .true.
503
503
               numcnv = numcnv + 1
504
 
               if (jj .gt. nev) reord = .true.
 
504
               if (jj .gt. nconv) reord = .true.
505
505
            endif
506
506
   11    continue
507
507
c