← Back to branch summary

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

« back to all changes in this revision

Viewing changes to PARPACK/SRC/BLACS/pznapps.f

  • Committer: Package Import Robot
  • Author(s): Sylvestre Ledru
  • Date: 2013-05-06 09:18:26 UTC
  • mfrom: (10.1.6 experimental)
  • Revision ID: package-import@ubuntu.com-20130506091826-zn8c7it2jecjbxvb
Tags: 3.1.3-1
* Upload to unstable
* Standards-Version updated to 3.9.4

Show diffs side-by-side

added added

removed removed

Lines of Context:
PARPACK/SRC/BLACS/pznapps.f
243
243
c        | REFERENCE: LAPACK subroutine zlahqr           |
244
244
c        %-----------------------------------------------%
245
245
c
246
 
         unfl = pdlamch( 'safe minimum' )
 
246
         unfl = pdlamch( comm, 'safe minimum' )
247
247
         ovfl = dble(one / unfl)
248
248
         call dlabad( unfl, ovfl )
249
249
         ulp = dlamch( 'precision' )