--- arpack-2.1+parpack96.dfsg.orig/debian/rules +++ arpack-2.1+parpack96.dfsg/debian/rules @@ -0,0 +1,65 @@ +#!/usr/bin/make -f + +OPENMPI_ARCH = alpha amd64 i386 ia64 powerpc sparc kfreebsd-i386 kfreebsd-amd64 hurd-i386 + +#DEB_TAR_SRCDIR := suitesparse-1.2 + +include /usr/share/cdbs/1/class/makefile.mk +include /usr/share/cdbs/1/rules/debhelper.mk +#include /usr/share/cdbs/1/rules/tarball.mk +#include /usr/share/cdbs/1/rules/simple-patchsys.mk +include /usr/share/cdbs/1/rules/patchsys-quilt.mk + +DEB_AUTO_CLEANUP_RCS := yes +DEB_SRCDIR := $(CURDIR)/ +DEB_BUILDDIR := $(DEB_SRCDIR)/ + +DEB_MAKE_CLEAN_TARGET := clean PSRCdir=SRC PUTILdir=UTIL +DEB_MAKE_BUILD_TARGET := default +DEB_COMPRESS_EXCLUDE := .pdf +#DH_COMPAT=5 + +DEB_INSTALL_EXAMPLES_libarpack2-dev := EXAMPLES/* -X.svn + +CFLAGS=-fPIC -fexceptions -Wall -O3 +ifeq ($(DEB_HOST_ARCH_CPU),amd64) + CFLAGS+=-m64 +endif + +ifneq (,$(findstring $(DEB_HOST_ARCH),$(OPENMPI_ARCH))) + openmpilib = -lmpi_f77 +endif + +package=arpack + +version=2.1 #$(shell expr `pwd` : '.*-\([0-9.]*\)') +version_major=2 #$(shell expr `pwd` : '.*-\([0-9]*\).[0-9.]*') + +build/libarpack2:: + -mkdir -p objs pobjs + -(cd objs && $(MAKE) -f ../UTIL/Makefile VPATH="../UTIL" srcdir="../UTIL" FFLAGS="-O3 -fPIC -pipe" single double complex complex16; ) + -(cd objs && $(MAKE) -f ../SRC/Makefile VPATH="../SRC" srcdir="../SRC" FFLAGS="-O3 -fPIC -pipe" single double complex complex16; ) + -(cd objs && gcc -shared -Wl,-soname,lib$(package).so.$(version_major) -o lib$(package).so.$(version) `ls *.o` -L/usr/lib/atlas -llapack -lblas -lm -lgfortran) + -(cd objs && ln -sf lib$(package).so.$(version) lib$(package).so.$(version_major) ) + -(cd objs && ln -sf lib$(package).so.$(version) lib$(package).so ) + -(cd objs && ar rv lib$(package).a `ls *.o`; ranlib lib$(package).a ) + -(cd pobjs && $(MAKE) -f ../PARPACK/UTIL/MPI/Makefile VPATH="../PARPACK/UTIL/MPI/" srcdir="../PARPACK/UTIL/MPI/" FFLAGS="-O3 -fPIC -pipe" single double complex complex16; ) + -(cd pobjs && $(MAKE) -f ../PARPACK/SRC/MPI/Makefile VPATH="../PARPACK/SRC/MPI/" srcdir="../PARPACK/SRC/MPI/" FFLAGS="-O3 -fPIC -pipe" single double complex complex16; ) + -(cd pobjs && gcc -shared -Wl,-soname,libp$(package).so.$(version_major) -o libp$(package).so.$(version) `ls *.o` -L/usr/lib/atlas -llapack -lblas -lmpi $(openmpilib) -lm -lgfortran -L../objs -l$(package) ) + -(cd pobjs && ln -sf libp$(package).so.$(version) libp$(package).so.$(version_major) ) + -(cd pobjs && ln -sf libp$(package).so.$(version) libp$(package).so ) + -(cd pobjs && ar rv libp$(package).a `ls *.o`; ranlib libp$(package).a ) + + + +#build/libarpack2-dev:: + + +clean:: + -rm -rf objs pobjs + -find $(DEB_BUILDDIR) -name "*.a" | xargs rm + -find $(DEB_BUILDDIR) -name "*.so*" | xargs rm + + + + --- arpack-2.1+parpack96.dfsg.orig/debian/control +++ arpack-2.1+parpack96.dfsg/debian/control @@ -0,0 +1,108 @@ +Source: arpack +Section: math +Priority: optional +Maintainer: Debian Scientific Computing Team +Uploaders: Christophe Prud'homme , + Rafael Laboissiere , + Daniel Leidert (dale) , + "Adam C. Powell, IV" +DM-Upload-Allowed: yes +Build-Depends: quilt, cdbs, debhelper (>= 5), gfortran (>= 4.3.0-3), libblas-dev, liblapack-dev, + libopenmpi-dev [alpha amd64 i386 ia64 powerpc sparc kfreebsd-i386 kfreebsd-amd64 hurd-i386], + libmpich1.0-dev [!alpha !amd64 !i386 !ia64 !powerpc !sparc !kfreebsd-i386 !kfreebsd-amd64 !hurd-i386], +Standards-Version: 3.8.0 +Vcs-Svn: svn://svn.debian.org/svn/pkg-scicomp/arpack/ +Vcs-Browser: http://svn.debian.org/wsvn/pkg-scicomp/arpack/ + +Package: libarpack2 +Section: libs +Architecture: any +Depends: libblas3gf, liblapack3gf, libopenmpi1 | libmpich1.0gf, ${shlibs:Depends} +Recommends: atlas3-base +Replaces: arpack2 +Conflicts: arpack2 +Description: Fortran77 subroutines to solve large scale eigenvalue problems + ARPACK software is capable of solving large scale symmetric, + nonsymmetric, and generalized eigenproblems from significant + application areas. The software is designed to compute a few (k) + eigenvalues with user specified features such as those of largest + real part or largest magnitude. Storage requirements are on the order + of n*k locations. No auxiliary storage is required. A set of Schur + basis vectors for the desired k-dimensional eigen-space is computed + which is numerically orthogonal to working precision. Numerically + accurate eigenvectors are available on request. + . + Important Features: + . + o Reverse Communication Interface. + o Single and Double Precision Real Arithmetic Versions for Symmetric, + Non-symmetric, + o Standard or Generalized Problems. + o Single and Double Precision Complex Arithmetic Versions for Standard or + Generalized Problems. + o Routines for Banded Matrices - Standard or Generalized Problems. + o Routines for The Singular Value Decomposition. + o Example driver routines that may be used as templates to implement + numerous Shift-Invert strategies for all problem types, data types and + precision. + +Package: libarpack2-dev +Section: libdevel +Architecture: any +Depends: libarpack2, libblas-dev, liblapack-dev, libopenmpi-dev | libmpich1.0-dev +Replaces: arpack2-dev +Conflicts: arpack2-dev +Description: Fortran77 subroutines to solve large scale eigenvalue problems + ARPACK software is capable of solving large scale symmetric, + nonsymmetric, and generalized eigenproblems from significant + application areas. The software is designed to compute a few (k) + eigenvalues with user specified features such as those of largest + real part or largest magnitude. Storage requirements are on the order + of n*k locations. No auxiliary storage is required. A set of Schur + basis vectors for the desired k-dimensional eigen-space is computed + which is numerically orthogonal to working precision. Numerically + accurate eigenvectors are available on request. + . + Important Features: + . + o Reverse Communication Interface. + o Single and Double Precision Real Arithmetic Versions for Symmetric, + Non-symmetric, + o Standard or Generalized Problems. + o Single and Double Precision Complex Arithmetic Versions for Standard or + Generalized Problems. + o Routines for Banded Matrices - Standard or Generalized Problems. + o Routines for The Singular Value Decomposition. + o Example driver routines that may be used as templates to implement + numerous Shift-Invert strategies for all problem types, data types and + precision. + +Package: libarpack2-dbg +Section: libdevel +Architecture: any +Priority: extra +Depends: libarpack2 (= ${binary:Version}), libblas-dev, liblapack-dev, libopenmpi-dev | libmpich1.0-dev +Description: Fortran77 subroutines to solve large scale eigenvalue problems + ARPACK software is capable of solving large scale symmetric, + nonsymmetric, and generalized eigenproblems from significant + application areas. The software is designed to compute a few (k) + eigenvalues with user specified features such as those of largest + real part or largest magnitude. Storage requirements are on the order + of n*k locations. No auxiliary storage is required. A set of Schur + basis vectors for the desired k-dimensional eigen-space is computed + which is numerically orthogonal to working precision. Numerically + accurate eigenvectors are available on request. + . + Important Features: + . + o Reverse Communication Interface. + o Single and Double Precision Real Arithmetic Versions for Symmetric, + Non-symmetric, + o Standard or Generalized Problems. + o Single and Double Precision Complex Arithmetic Versions for Standard or + Generalized Problems. + o Routines for Banded Matrices - Standard or Generalized Problems. + o Routines for The Singular Value Decomposition. + o Example driver routines that may be used as templates to implement + numerous Shift-Invert strategies for all problem types, data types and + precision. --- arpack-2.1+parpack96.dfsg.orig/debian/libarpack2-dev.install +++ arpack-2.1+parpack96.dfsg/debian/libarpack2-dev.install @@ -0,0 +1,8 @@ +objs/libarpack.a usr/lib +objs/libarpack.so usr/lib +pobjs/libparpack.a usr/lib +pobjs/libparpack.so usr/lib +ARmake.inc usr/share/doc/libarpack2-dev/ +DOCUMENTS/* usr/share/doc/libarpack2-dev +debian/ARPACK_License_Question.eml usr/share/doc/libarpack2-dev +debian/RiceBSD.txt usr/share/doc/libarpack2-dev --- arpack-2.1+parpack96.dfsg.orig/debian/arpack2.prerm +++ arpack-2.1+parpack96.dfsg/debian/arpack2.prerm @@ -0,0 +1,13 @@ +#! /bin/sh -e + +set -e + +# dh_installdeb will replace this with shell code automatically +# generated by other debhelper scripts. + +#DEBHELPER# + + + + +exit 0 \ No newline at end of file --- arpack-2.1+parpack96.dfsg.orig/debian/arpack2-dev.doc-base +++ arpack-2.1+parpack96.dfsg/debian/arpack2-dev.doc-base @@ -0,0 +1,8 @@ +Document: arpack +Title: ARPACK Documentation +Author: Rich Lehoucq, Kristi Maschhoff, Danny Sorensen, Chao Yang +Abstract: ARPACK is a collection of Fortran77 subroutines designed to solve large scale eigenvalue problems. +Section: Programming + +Format: Postscript +Files: /usr/share/doc/arpack2-dev/ug.ps.gz --- arpack-2.1+parpack96.dfsg.orig/debian/arpack2.files +++ arpack-2.1+parpack96.dfsg/debian/arpack2.files @@ -0,0 +1 @@ +usr/lib/*.so.* --- arpack-2.1+parpack96.dfsg.orig/debian/ARPACK_License_Question.eml +++ arpack-2.1+parpack96.dfsg/debian/ARPACK_License_Question.eml @@ -0,0 +1,102 @@ +X-Mozilla-Status: 0011 +X-Mozilla-Status2: 00000000 +Received: from zuk35exm65.ds.mot.com ([10.178.1.44]) by zuk35exm62.ds.mot.com with Microsoft SMTPSVC(6.0.3790.2709); + Tue, 13 Feb 2007 19:53:15 +0000 +Received: from az33exr02.mot.com ([10.64.251.232]) by zuk35exm65.ds.mot.com with Microsoft SMTPSVC(6.0.3790.2709); + Tue, 13 Feb 2007 19:53:14 +0000 +Received: from motgate3.mot.com (motgate3.mot.com [144.189.100.103]) + by az33exr02.mot.com (8.13.1/8.13.0) with ESMTP id l1DJrDDS020683 + for ; Tue, 13 Feb 2007 13:53:13 -0600 (CST) +Received: from mail128.messagelabs.com (mail128.messagelabs.com [216.82.250.131]) + by motgate3.mot.com (8.12.11/Motorola) with SMTP id l1DJr8gl023906 + for ; Tue, 13 Feb 2007 12:53:11 -0700 (MST) +X-VirusChecked: Checked +X-Env-Sender: sorensen@rice.edu +X-Msg-Ref: server-6.tower-128.messagelabs.com!1171396385!13383447!1 +X-StarScan-Version: 5.5.10.7.1; banners=-,-,- +X-Originating-IP: [128.42.17.10] +X-SpamReason: No, hits=0.0 required=7.0 tests= +Received: (qmail 3872 invoked from network); 13 Feb 2007 19:53:05 -0000 +Received: from caam.rice.edu (HELO caam.rice.edu) (128.42.17.10) + by server-6.tower-128.messagelabs.com with SMTP; 13 Feb 2007 19:53:05 -0000 +Received: from localhost (localhost [127.0.0.1]) + by caam.rice.edu (Postfix) with ESMTP id 64341153A7 + for ; Tue, 13 Feb 2007 13:53:04 -0600 (CST) +Received: from caam.rice.edu ([127.0.0.1]) + by localhost (caam.rice.edu [127.0.0.1]) (amavisd-new, port 10024) with LMTP + id 23777-01-16 for ; + Tue, 13 Feb 2007 13:52:59 -0600 (CST) +Received: from [128.42.21.177] (sorensenl400.caam.rice.edu [128.42.21.177]) + by caam.rice.edu (Postfix) with ESMTP id 494E81539F + for ; Tue, 13 Feb 2007 13:52:59 -0600 (CST) +Message-ID: <45D2171B.8030109@rice.edu> +Date: Tue, 13 Feb 2007 13:52:59 -0600 +From: Dan Sorensen +User-Agent: Thunderbird 1.5.0.9 (Windows/20061207) +MIME-Version: 1.0 +To: David Bateman +Subject: Re: ARPACK License Question +References: <457EE5B3.70402@ieee.org> <20070105114426.GI4860@neu.nirvana> <45B8CB2F.9030904@motorola.com> +In-Reply-To: <45B8CB2F.9030904@motorola.com> +Content-Type: text/plain; charset=ISO-8859-1; format=flowed +Content-Transfer-Encoding: 7bit +X-Virus-Scanned: by amavis-2.2.1 at caam.rice.edu +Return-Path: sorensen@rice.edu +X-OriginalArrivalTime: 13 Feb 2007 19:53:14.0831 (UTC) FILETIME=[994B7DF0:01C74FA8] + +Dear Mr. Bateman + +I apologize for not responding to this previously. + +The clarification we discussed is the following + + +The clause in the license statement that states + +>>Written notification is provided to the developers of intent to use this +>> software. Also, we ask that use of ARPACK is properly cited in any +>> resulting publications or software documentation. + +has the following intension in your case. + +We are asking for acknowledgment in FEDORA that ARPACK is +the software that underlies what corresponds to the "eigs" command. +There is no intention to pass on a requirement of notification of use +from users of FEDORA. + +This is the understanding we have with MATLAB for example. + +If the above note or a slight modification of it is not acceptable +for the purposes of using ARPACK in FEDORA, I will have to refer +you to the tech transfer department of Rice University as I explained +during our phone conversation. + +Once again my apologies for the delay and I thank you for your +interest in ARPACK. + +Best Regards +Dan Sorensen + + + + + + + +David Bateman wrote: +> Dear Professor Sorensen, +> +> Perhaps you have not yet seen the e-mail below, and so I draw it to your +> attention. Can you please examine the request to modify the license of +> ARPACK in this mail belong to allow its inclusion in FEDORA and other +> similar open source linux distributions? +> +> As the author of the eigs function for Octave (www.octave.org) that uses +> ARPACK for its functionality, I'd hate to see my work not included in +> Octave due to this question not being resolved. +> +> Best Regards +> David +> +> + --- arpack-2.1+parpack96.dfsg.orig/debian/arpack2.shlibs +++ arpack-2.1+parpack96.dfsg/debian/arpack2.shlibs @@ -0,0 +1 @@ +libarpack 2 libarpack \ No newline at end of file --- arpack-2.1+parpack96.dfsg.orig/debian/dirs +++ arpack-2.1+parpack96.dfsg/debian/dirs @@ -0,0 +1,3 @@ +usr/lib +usr/include +usr/share/man/man3 --- arpack-2.1+parpack96.dfsg.orig/debian/RiceBSD.txt +++ arpack-2.1+parpack96.dfsg/debian/RiceBSD.txt @@ -0,0 +1,43 @@ +Rice BSD Software License + +Permits source and binary redistribution of the software ARPACK and +P_ARPACK for both non-commercial and commercial use. + + Copyright (©) 2001, Rice University + Developed by D.C. Sorensen, R.B. Lehoucq, C. Yang, and K. Maschhoff. + All rights reserved. + +Redistribution and use in source and binary forms, with or without +modification, are permitted provided that the following conditions are +met: + +o Redistributions of source code must retain the above copyright + notice, this list of conditions and the following disclaimer. + +o Redistributions in binary form must reproduce the above copyright + notice, this list of conditions and the following disclaimer in the + documentation and/or other materials provided with the distribution. + +o If you modify the source for these routines we ask that you change + the name of the routine and comment the changes made to the + original. + +o Written notification is provided to the developers of intent to use + this software. Also, we ask that use of ARPACK is properly cited in + any resulting publications or software documentation. + +o Neither the name of Rice University (RICE) 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 RICE AND CONTRIBUTORS "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 RICE 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 (INCLUDING NEGLIGENCE +OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN +IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. --- arpack-2.1+parpack96.dfsg.orig/debian/copyright +++ arpack-2.1+parpack96.dfsg/debian/copyright @@ -0,0 +1,44 @@ +# -*- coding: utf-8 -*- +This package was debianized by Christophe Prud'homme prudhomm@debian.org on +Mon, 4 Feb 2002 15:06:42 -0500. + +It was downloaded from http://www.caam.rice.edu/software/ARPACK/ + +Copyright and License (downloaded on 2008-11-12 by Adam C. Powell, IV +from http://www.caam.rice.edu/software/ARPACK/RiceBSD.txt): + +BSD Software License + +Pertains to ARPACK and P_ARPACK + +Copyright (c) 1996-2008 Rice University. +Developed by D.C. Sorensen, R.B. Lehoucq, C. Yang, and K. Maschhoff. +All rights reserved. + +Redistribution and use in source and binary forms, with or without +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. + +- 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 +LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR +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 +(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE +OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. --- arpack-2.1+parpack96.dfsg.orig/debian/libarpack2.install +++ arpack-2.1+parpack96.dfsg/debian/libarpack2.install @@ -0,0 +1,4 @@ +objs/libarpack.so.* usr/lib +pobjs/libparpack.so.* usr/lib +debian/ARPACK_License_Question.eml usr/share/doc/libarpack2 +debian/RiceBSD.txt usr/share/doc/libarpack2 --- arpack-2.1+parpack96.dfsg.orig/debian/changelog +++ arpack-2.1+parpack96.dfsg/debian/changelog @@ -0,0 +1,196 @@ +arpack (2.1+parpack96.dfsg-1) unstable; urgency=low + + * New tarball without non-free ug.ps file, now qualifies for main + (closes: #491794). + * Removed libarpack2-dev.doc-base because this was its only file. + * Modified copyright to indicate downloader and date for current + copyright/license. + + -- Adam C. Powell, IV Sun, 30 Nov 2008 11:09:12 -0500 + +arpack (2.1+parpack96-9) unstable; urgency=low + + * Moved back to main because of change to 3-clause BSD license + (closes: #491794). + + -- Adam C. Powell, IV Mon, 24 Nov 2008 18:03:41 -0500 + +arpack (2.1+parpack96-8) unstable; urgency=low + + * Moved to non-free because of non-DFSG license (closes: #491794). + * Added Adam Powell to the list of uploaders. + * Added PARPACKLIB parameter to ARmake.inc. + + -- Adam C. Powell, IV Mon, 10 Nov 2008 10:58:23 -0500 + +arpack (2.1+parpack96-7) unstable; urgency=low + + [ Daniel Leidert ] + * debian/control (Depends): libarpack2-dbg needs a strict versioned + dependency on libarpack2 (LP: #206294). + + [ Rafael Laboissiere ] + * debian/control: Force build-dependency on gfortran to be >= 4.3.0-3. + In previous versions of this package, the /usr/lib/libgfortran.so + symlink was lacking on alpha, amd64, i386, and hppa, resulting in an + empty libarpack2 package on these architectures (closes: #474342). + + -- Rafael Laboissiere Sun, 06 Apr 2008 22:09:44 +0200 + +arpack (2.1+parpack96-6) unstable; urgency=low + + [ Rafael Laboissiere ] + * debian/control: Add versioned build-dependency on debhelper >= 5 and + make Lintian happy + + [ Daniel Leidert ] + * debian/control (Depends): libarpack2-dbg needs a strict versioned + dependency on libarpack2 (LP: #206294). + + -- Daniel Leidert (dale) Tue, 25 Mar 2008 14:09:50 +0100 + +arpack (2.1+parpack96-5) unstable; urgency=low + + [ Daniel Leidert ] + * debian/arpack2-dev.doc-base (Section): Fixed accordingly to latest + doc-base policy. + * debian/libarpack2-dev.doc-base (Section): Ditto. + * debian/control (Build-Depends): Use libopenmpi-dev on kfreebsd-i386, + kfreebsd-amd64 and hurd-i386 too. + * debian/rules (build/libarpack2): Build and link files in UTIL/ to avoid + missing symbols (closes: #470415). Add -lgfortran to resolve gfortran + symbols. Link with -lmpi_f77 on libopenmpi enabled architectures. Link + with -larpack for svout and other functions used in libparapack. + * debian/patches/no_external_etime.patch: Added. + - ARPACK/UTIL/second.f, UTIL/second.f: EXTERNAL for etime() is wrong here. + * debian/patches/series: Adjusted. + + [ Rafael Laboissiere ] + * Add Daniel Leidert to the list of Uploaders + * Allow upload by Debian Maintainers + + -- Daniel Leidert (dale) Tue, 11 Mar 2008 02:49:46 +0100 + +arpack (2.1+parpack96-4) unstable; urgency=low + + * debian/libarpack2-dev.install: Install doc files in proper directory, + avoiding conflicts with the libarpack2 package (closes: #469286) + + -- Rafael Laboissiere Tue, 04 Mar 2008 14:22:55 +0100 + +arpack (2.1+parpack96-3) unstable; urgency=low + + * debian/rules: Set variables PSRCdir and PUTILdir for the invocation of + "make clean". We cannot rely on parpack-clean-dirs.patch for doing + this and the previous version was still causing problems with the + buildds. + + -- Rafael Laboissiere Sat, 01 Mar 2008 18:58:19 +0100 + +arpack (2.1+parpack96-2) unstable; urgency=low + + [ Christophe Prud'homme ] + * debian/control: fixed liblapack3gf dep (closes: #467576) + + [ Rafael Laboissiere ] + * debian/dirs: Delete this unnecessary file, avoiding some Lintian warnings + * debian/control: + + Add my name to the list of Uploaders + + Build-depends on libopenmpi-dev only on some selected architectures + (closes: #468795) + * debian/rules: Reactivate CDBS' quilt support + * debian/patches/use-gfortran.patch: New patch for using gfortran + instead of g77. This patch was integrated in the .diff.gz file of the + previous release, so that Bug#463926 was effectively closed. + * debian/patches/parpack-clean-dirs.patch: New patch to avoid doing cd + commands on non-existent directories. This was causing problems with + the autobuilders (closes: #467327) + + -- Rafael Laboissiere Sat, 01 Mar 2008 12:22:32 +0100 + +arpack (2.1+parpack96-1) unstable; urgency=low + + [ Rafael Laboissiere ] + * debian/control: Added XS-Vcs-Svn and XS-Vcs-Browser fields to the Source + section + + [Christophe Prud'homme] + * RiceBSD.*: added license clarification + * Bug fix: "Wishlist: parpack", thanks to Viral Shah (Closes: #195579). + * debian/control: use gfortran + * Bug fix: "arpack -- please Build-Depend on gfortran based lapack and + blas.", thanks to Kumar Appaiah (Closes: #463926). + * Bug fix: "libarpack2: symbol duplication with LAPACK", thanks to + Andreas Kloeckner (Closes: #315570). + * Bug fix: "libarpack2: cnapps.f not included on alpha (internal + compiler error)", thanks to Niko Tyni (Closes: #390368). + + -- Christophe Prud'homme Fri, 15 Feb 2008 10:58:51 +0100 + +arpack (2.1-9) unstable; urgency=low + + * Bug fix: "libarpack2: symbol duplication with LAPACK", thanks to + Andreas Kloeckner (Closes: #315570). + * Update Standards-Version to 3.7.2 (no change) + * Changed maintainership to pkg-scicomp + + -- Christophe Prud'homme Sun, 24 Dec 2006 14:28:06 +0100 + +arpack (2.1-8) unstable; urgency=low + + * added refblas3 as blas alternative + + -- Christophe Prud'homme Tue, 10 Aug 2004 16:45:08 +0200 + +arpack (2.1-7) unstable; urgency=low + + * Bug fix: "arpack: FTBFS: Missing depedency?", thanks to Kurt Roeckx + (Closes: #260650). + + -- Christophe Prud'homme Wed, 21 Jul 2004 17:38:50 +0200 + +arpack (2.1-6) unstable; urgency=low + + * Depends (alternatively) on all atlas flavors + * Bug fix: "libarpack2: should depend on lapack3", thanks to Paul + Kienzle (Closes: #257159). + + -- Christophe Prud'homme Sun, 18 Jul 2004 14:19:29 +0200 + +arpack (2.1-5) unstable; urgency=low + + * added Conflicts with arpack and arpack-dev + * Bug fix: "libarpack2-dev: bad dependencies", thanks to Ralf Wildenhues + (Closes: #249687). + + -- Christophe Prud'homme Wed, 19 May 2004 10:28:11 +0200 + +arpack (2.1-4) unstable; urgency=low + + * use dh_install now + * Finally close this bug: added ARmake.inc to toplevel doc directory to + allow compilation of the examples (closes: #153186) + * renamed libarpack2(section:libs) and libarpack2-dev(section:libdevel) + * checked by linda and lintian + + -- Christophe Prud'homme Fri, 24 Oct 2003 12:21:59 +0200 + +arpack (2.1-3) unstable; urgency=low + + * the Provides field was at the wrong place + + -- Christophe Prud'homme Mon, 11 Mar 2002 20:46:15 -0500 + +arpack (2.1-2) unstable; urgency=low + + * added a Provides field to control file + + -- Christophe Prud'homme Mon, 11 Mar 2002 18:41:50 -0500 + +arpack (2.1-1) unstable; urgency=low + + * Initial release. + + -- Christophe Prud'homme Wed, 6 Feb 2002 14:39:03 -0500 + + --- arpack-2.1+parpack96.dfsg.orig/debian/arpack2.postinst +++ arpack-2.1+parpack96.dfsg/debian/arpack2.postinst @@ -0,0 +1,23 @@ +#! /bin/sh -e + +set -e + +if [ "$1" = "configure" ]; then + if [ -d /usr/doc -a ! -e /usr/doc/arpack1 -a -d /usr/share/doc/arpack1 ]; then + ln -sf ../share/doc/arpack1 /usr/doc/arpack1 + fi +fi + +if [ -x /sbin/ldconfig ]; then + /sbin/ldconfig +fi + + +# dh_installdeb will replace this with shell code automatically +# generated by other debhelper scripts. + +#DEBHELPER# + + + +exit 0 \ No newline at end of file --- arpack-2.1+parpack96.dfsg.orig/debian/README.debian +++ arpack-2.1+parpack96.dfsg/debian/README.debian @@ -0,0 +1,6 @@ +arpack for Debian +----------------- + +Nothing special here. + + -- Christophe Prud'homme , Sun, 24 Dec 2006 14:26:00 +0100 --- arpack-2.1+parpack96.dfsg.orig/debian/patches/series +++ arpack-2.1+parpack96.dfsg/debian/patches/series @@ -0,0 +1,4 @@ +no_external_etime.patch +use-gfortran.patch +parpack-clean-dirs.patch +parpacklib.patch --- arpack-2.1+parpack96.dfsg.orig/debian/patches/parpack-clean-dirs.patch +++ arpack-2.1+parpack96.dfsg/debian/patches/parpack-clean-dirs.patch @@ -0,0 +1,13 @@ +Index: arpack-2.1+parpack96/Makefile +=================================================================== +--- arpack-2.1+parpack96.orig/Makefile 2008-03-01 12:30:05.000000000 +0000 ++++ arpack-2.1+parpack96/Makefile 2008-03-01 12:30:18.000000000 +0000 +@@ -75,8 +75,6 @@ + ( cd $(LAPACKdir); $(MAKE) clean ) + ( cd $(UTILdir); $(MAKE) clean ) + ( cd $(SRCdir); $(MAKE) clean ) +- ( cd $(PUTILdir); $(MAKE) clean ) +- ( cd $(PSRCdir); $(MAKE) clean ) + + help: + @$(ECHO) "usage: make ?" --- arpack-2.1+parpack96.dfsg.orig/debian/patches/arpack-second-bug.patch +++ arpack-2.1+parpack96.dfsg/debian/patches/arpack-second-bug.patch @@ -0,0 +1,1829 @@ +diff -up ARPACK/UTIL/second.f.sb ARPACK/UTIL/second.f +--- ARPACK/UTIL/second.f.sb 1995-10-02 19:56:44.000000000 +0100 ++++ ARPACK/UTIL/second.f 2007-10-24 02:50:57.000000000 +0200 +@@ -1,4 +1,4 @@ +- SUBROUTINE SECOND( T ) ++ SUBROUTINE secnd2( T ) + * + REAL T + * +diff -up ARPACK/SRC/znaupd.f.sb ARPACK/SRC/znaupd.f +--- ARPACK/SRC/znaupd.f.sb 2002-08-15 07:50:57.000000000 +0200 ++++ ARPACK/SRC/znaupd.f 2007-10-24 02:50:57.000000000 +0200 +@@ -451,7 +451,7 @@ c | & message level for debugging + c %-------------------------------% + c + call zstatn +- call second (t0) ++ call secnd2 (t0) + msglvl = mcaupd + c + c %----------------% +@@ -611,7 +611,7 @@ c + & '_naupd: Associated Ritz estimates') + end if + c +- call second (t1) ++ call secnd2 (t1) + tcaupd = t1 - t0 + c + if (msglvl .gt. 0) then +diff -up ARPACK/SRC/dgetv0.f.sb ARPACK/SRC/dgetv0.f +--- ARPACK/SRC/dgetv0.f.sb 1999-04-08 00:42:47.000000000 +0200 ++++ ARPACK/SRC/dgetv0.f 2007-10-24 02:50:57.000000000 +0200 +@@ -214,7 +214,7 @@ c | Initialize timing statistics + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mgetv0 + c + ierr = 0 +@@ -241,7 +241,7 @@ c | Force the starting vector int + c | the generalized problem when B is possibly (singular). | + c %----------------------------------------------------------% + c +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nopx = nopx + 1 + ipntr(1) = 1 +@@ -265,7 +265,7 @@ c + if (orth) go to 40 + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvopx = tmvopx + (t3 - t2) + end if + c +@@ -274,7 +274,7 @@ c | Starting vector is now in the ra + c | Compute B-norm of starting vector. | + c %------------------------------------------------------% + c +- call second (t2) ++ call secnd2 (t2) + first = .TRUE. + if (bmat .eq. 'G') then + nbx = nbx + 1 +@@ -290,7 +290,7 @@ c + 20 continue + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -333,7 +333,7 @@ c %--------------------------------- + c | Compute the B-norm of the orthogonalized starting vector | + c %----------------------------------------------------------% + c +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call dcopy (n, resid, 1, workd(n+1), 1) +@@ -348,7 +348,7 @@ c + 40 continue + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -406,7 +406,7 @@ c + end if + ido = 99 + c +- call second (t1) ++ call secnd2 (t1) + tgetv0 = tgetv0 + (t1 - t0) + c + 9000 continue +diff -up ARPACK/SRC/ssgets.f.sb ARPACK/SRC/ssgets.f +--- ARPACK/SRC/ssgets.f.sb 1996-04-20 18:27:30.000000000 +0200 ++++ ARPACK/SRC/ssgets.f 2007-10-24 02:50:57.000000000 +0200 +@@ -148,7 +148,7 @@ c | Initialize timing statistics | + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = msgets + c + if (which .eq. 'BE') then +@@ -198,7 +198,7 @@ c + call scopy (np, ritz, 1, shifts, 1) + end if + c +- call second (t1) ++ call secnd2 (t1) + tsgets = tsgets + (t1 - t0) + c + if (msglvl .gt. 0) then +diff -up ARPACK/SRC/snaup2.f.sb ARPACK/SRC/snaup2.f +--- ARPACK/SRC/snaup2.f.sb 2002-08-23 07:31:49.000000000 +0200 ++++ ARPACK/SRC/snaup2.f 2007-10-24 02:50:57.000000000 +0200 +@@ -258,7 +258,7 @@ c %-----------------------% + c + if (ido .eq. 0) then + c +- call second (t0) ++ call secnd2 (t0) + c + msglvl = mnaup2 + c +@@ -758,7 +758,7 @@ c | the first step of the next ca + c %---------------------------------------------% + c + cnorm = .true. +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call scopy (n, resid, 1, workd(n+1), 1) +@@ -783,7 +783,7 @@ c | WORKD(1:N) := B*RESID + c %----------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -822,7 +822,7 @@ c %------------% + c | Error Exit | + c %------------% + c +- call second (t1) ++ call secnd2 (t1) + tnaup2 = t1 - t0 + c + 9000 continue +diff -up ARPACK/SRC/dsgets.f.sb ARPACK/SRC/dsgets.f +--- ARPACK/SRC/dsgets.f.sb 1996-04-20 18:27:14.000000000 +0200 ++++ ARPACK/SRC/dsgets.f 2007-10-24 02:50:57.000000000 +0200 +@@ -148,7 +148,7 @@ c | Initialize timing statistics | + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = msgets + c + if (which .eq. 'BE') then +@@ -198,7 +198,7 @@ c + call dcopy (np, ritz, 1, shifts, 1) + end if + c +- call second (t1) ++ call secnd2 (t1) + tsgets = tsgets + (t1 - t0) + c + if (msglvl .gt. 0) then +diff -up ARPACK/SRC/dsconv.f.sb ARPACK/SRC/dsconv.f +--- ARPACK/SRC/dsconv.f.sb 1996-04-20 18:27:11.000000000 +0200 ++++ ARPACK/SRC/dsconv.f 2007-10-24 02:50:57.000000000 +0200 +@@ -106,7 +106,7 @@ c %-----------------------% + c | Executable Statements | + c %-----------------------% + c +- call second (t0) ++ call secnd2 (t0) + c + eps23 = dlamch('Epsilon-Machine') + eps23 = eps23**(2.0D+0 / 3.0D+0) +@@ -126,7 +126,7 @@ c + c + 10 continue + c +- call second (t1) ++ call secnd2 (t1) + tsconv = tsconv + (t1 - t0) + c + return +diff -up ARPACK/SRC/dneigh.f.sb ARPACK/SRC/dneigh.f +--- ARPACK/SRC/dneigh.f.sb 1996-04-20 18:27:06.000000000 +0200 ++++ ARPACK/SRC/dneigh.f 2007-10-24 02:50:57.000000000 +0200 +@@ -170,7 +170,7 @@ c | Initialize timing statistics | + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mneigh + c + if (msglvl .gt. 2) then +@@ -301,7 +301,7 @@ c + & '_neigh: Ritz estimates for the eigenvalues of H') + end if + c +- call second (t1) ++ call secnd2 (t1) + tneigh = tneigh + (t1 - t0) + c + 9000 continue +diff -up ARPACK/SRC/dsaitr.f.sb ARPACK/SRC/dsaitr.f +--- ARPACK/SRC/dsaitr.f.sb 1996-08-28 16:21:43.000000000 +0200 ++++ ARPACK/SRC/dsaitr.f 2007-10-24 02:50:57.000000000 +0200 +@@ -300,7 +300,7 @@ c | Initialize timing statistics + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = msaitr + c + c %------------------------------% +@@ -420,7 +420,7 @@ c | which spans OP and exit + c %------------------------------------------------% + c + info = j - 1 +- call second (t1) ++ call secnd2 (t1) + tsaitr = tsaitr + (t1 - t0) + ido = 99 + go to 9000 +@@ -460,7 +460,7 @@ c %------------------------------ + c + step3 = .true. + nopx = nopx + 1 +- call second (t2) ++ call secnd2 (t2) + call dcopy (n, v(1,j), 1, workd(ivj), 1) + ipntr(1) = ivj + ipntr(2) = irj +@@ -479,7 +479,7 @@ c | Back from reverse communicati + c | WORKD(IRJ:IRJ+N-1) := OP*v_{j}. | + c %-----------------------------------% + c +- call second (t3) ++ call secnd2 (t3) + tmvopx = tmvopx + (t3 - t2) + c + step3 = .false. +@@ -500,7 +500,7 @@ c | assumed to have A*v_{j}. + c %-------------------------------------------% + c + if (mode .eq. 2) go to 65 +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + step4 = .true. +@@ -524,7 +524,7 @@ c | WORKD(IPJ:IPJ+N-1) := B*OP*v_ + c %-----------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -592,12 +592,12 @@ c + else + h(j,1) = rnorm + end if +- call second (t4) ++ call secnd2 (t4) + c + orth1 = .true. + iter = 0 + c +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call dcopy (n, resid, 1, workd(irj), 1) +@@ -621,7 +621,7 @@ c | WORKD(IPJ:IPJ+N-1) := B*r_{j} + c %---------------------------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -695,7 +695,7 @@ c + h(j,2) = h(j,2) + workd(irj + j - 1) + c + orth2 = .true. +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call dcopy (n, resid, 1, workd(irj), 1) +@@ -719,7 +719,7 @@ c | Back from reverse communicati + c %---------------------------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -791,7 +791,7 @@ c + rstart = .false. + orth2 = .false. + c +- call second (t5) ++ call secnd2 (t5) + titref = titref + (t5 - t4) + c + c %----------------------------------------------------------% +@@ -815,7 +815,7 @@ c %------------------------------ + c + j = j + 1 + if (j .gt. k+np) then +- call second (t1) ++ call secnd2 (t1) + tsaitr = tsaitr + (t1 - t0) + ido = 99 + c +diff -up ARPACK/SRC/dnaup2.f.sb ARPACK/SRC/dnaup2.f +--- ARPACK/SRC/dnaup2.f.sb 2002-08-23 07:31:50.000000000 +0200 ++++ ARPACK/SRC/dnaup2.f 2007-10-24 02:50:57.000000000 +0200 +@@ -258,7 +258,7 @@ c %-----------------------% + c + if (ido .eq. 0) then + c +- call second (t0) ++ call secnd2 (t0) + c + msglvl = mnaup2 + c +@@ -758,7 +758,7 @@ c | the first step of the next ca + c %---------------------------------------------% + c + cnorm = .true. +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call dcopy (n, resid, 1, workd(n+1), 1) +@@ -783,7 +783,7 @@ c | WORKD(1:N) := B*RESID + c %----------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -822,7 +822,7 @@ c %------------% + c | Error Exit | + c %------------% + c +- call second (t1) ++ call secnd2 (t1) + tnaup2 = t1 - t0 + c + 9000 continue +diff -up ARPACK/SRC/cneigh.f.sb ARPACK/SRC/cneigh.f +--- ARPACK/SRC/cneigh.f.sb 1996-04-20 19:15:53.000000000 +0200 ++++ ARPACK/SRC/cneigh.f 2007-10-24 02:50:57.000000000 +0200 +@@ -171,7 +171,7 @@ c | Initialize timing statistics | + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mceigh + c + if (msglvl .gt. 2) then +@@ -244,7 +244,7 @@ c + & '_neigh: Ritz estimates for the eigenvalues of H') + end if + c +- call second(t1) ++ call secnd2(t1) + tceigh = tceigh + (t1 - t0) + c + 9000 continue +diff -up ARPACK/SRC/zngets.f.sb ARPACK/SRC/zngets.f +--- ARPACK/SRC/zngets.f.sb 1996-04-20 19:16:02.000000000 +0200 ++++ ARPACK/SRC/zngets.f 2007-10-24 02:50:57.000000000 +0200 +@@ -137,7 +137,7 @@ c | Initialize timing statistics | + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mcgets + c + call zsortc (which, .true., kev+np, ritz, bounds) +@@ -157,7 +157,7 @@ c + c + end if + c +- call second (t1) ++ call secnd2 (t1) + tcgets = tcgets + (t1 - t0) + c + if (msglvl .gt. 0) then +diff -up ARPACK/SRC/sseigt.f.sb ARPACK/SRC/sseigt.f +--- ARPACK/SRC/sseigt.f.sb 1996-08-27 07:29:04.000000000 +0200 ++++ ARPACK/SRC/sseigt.f 2007-10-24 02:50:57.000000000 +0200 +@@ -138,7 +138,7 @@ c | Initialize timing statistics | + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mseigt + c + if (msglvl .gt. 0) then +@@ -168,7 +168,7 @@ c + bounds(k) = rnorm*abs(bounds(k)) + 30 continue + c +- call second (t1) ++ call secnd2 (t1) + tseigt = tseigt + (t1 - t0) + c + 9000 continue +diff -up ARPACK/SRC/dnapps.f.sb ARPACK/SRC/dnapps.f +--- ARPACK/SRC/dnapps.f.sb 1998-05-20 16:58:56.000000000 +0200 ++++ ARPACK/SRC/dnapps.f 2007-10-24 02:50:57.000000000 +0200 +@@ -237,7 +237,7 @@ c | Initialize timing statistics | + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mnapps + kplusp = kev + np + c +@@ -635,7 +635,7 @@ c + end if + c + 9000 continue +- call second (t1) ++ call secnd2 (t1) + tnapps = tnapps + (t1 - t0) + c + return +diff -up ARPACK/SRC/dsapps.f.sb ARPACK/SRC/dsapps.f +--- ARPACK/SRC/dsapps.f.sb 1998-05-20 16:58:59.000000000 +0200 ++++ ARPACK/SRC/dsapps.f 2007-10-24 02:50:57.000000000 +0200 +@@ -213,7 +213,7 @@ c | Initialize timing statistics | + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = msapps + c + kplusp = kev + np +@@ -503,7 +503,7 @@ c + end if + end if + c +- call second (t1) ++ call secnd2 (t1) + tsapps = tsapps + (t1 - t0) + c + 9000 continue +diff -up ARPACK/SRC/ssaup2.f.sb ARPACK/SRC/ssaup2.f +--- ARPACK/SRC/ssaup2.f.sb 1998-05-20 16:58:59.000000000 +0200 ++++ ARPACK/SRC/ssaup2.f 2007-10-24 02:50:57.000000000 +0200 +@@ -262,7 +262,7 @@ c | Initialize timing statistics + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = msaup2 + c + c %---------------------------------% +@@ -770,7 +770,7 @@ c | the first step of the next ca + c %---------------------------------------------% + c + cnorm = .true. +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call scopy (n, resid, 1, workd(n+1), 1) +@@ -795,7 +795,7 @@ c | WORKD(1:N) := B*RESID + c %----------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -837,7 +837,7 @@ c %------------% + c | Error exit | + c %------------% + c +- call second (t1) ++ call secnd2 (t1) + tsaup2 = t1 - t0 + c + 9000 continue +diff -up ARPACK/SRC/ssaitr.f.sb ARPACK/SRC/ssaitr.f +--- ARPACK/SRC/ssaitr.f.sb 1996-08-28 16:21:43.000000000 +0200 ++++ ARPACK/SRC/ssaitr.f 2007-10-24 02:50:57.000000000 +0200 +@@ -300,7 +300,7 @@ c | Initialize timing statistics + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = msaitr + c + c %------------------------------% +@@ -420,7 +420,7 @@ c | which spans OP and exit + c %------------------------------------------------% + c + info = j - 1 +- call second (t1) ++ call secnd2 (t1) + tsaitr = tsaitr + (t1 - t0) + ido = 99 + go to 9000 +@@ -460,7 +460,7 @@ c %------------------------------ + c + step3 = .true. + nopx = nopx + 1 +- call second (t2) ++ call secnd2 (t2) + call scopy (n, v(1,j), 1, workd(ivj), 1) + ipntr(1) = ivj + ipntr(2) = irj +@@ -479,7 +479,7 @@ c | Back from reverse communicati + c | WORKD(IRJ:IRJ+N-1) := OP*v_{j}. | + c %-----------------------------------% + c +- call second (t3) ++ call secnd2 (t3) + tmvopx = tmvopx + (t3 - t2) + c + step3 = .false. +@@ -500,7 +500,7 @@ c | assumed to have A*v_{j}. + c %-------------------------------------------% + c + if (mode .eq. 2) go to 65 +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + step4 = .true. +@@ -524,7 +524,7 @@ c | WORKD(IPJ:IPJ+N-1) := B*OP*v_ + c %-----------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -592,12 +592,12 @@ c + else + h(j,1) = rnorm + end if +- call second (t4) ++ call secnd2 (t4) + c + orth1 = .true. + iter = 0 + c +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call scopy (n, resid, 1, workd(irj), 1) +@@ -621,7 +621,7 @@ c | WORKD(IPJ:IPJ+N-1) := B*r_{j} + c %---------------------------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -695,7 +695,7 @@ c + h(j,2) = h(j,2) + workd(irj + j - 1) + c + orth2 = .true. +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call scopy (n, resid, 1, workd(irj), 1) +@@ -719,7 +719,7 @@ c | Back from reverse communicati + c %---------------------------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -791,7 +791,7 @@ c + rstart = .false. + orth2 = .false. + c +- call second (t5) ++ call secnd2 (t5) + titref = titref + (t5 - t4) + c + c %----------------------------------------------------------% +@@ -815,7 +815,7 @@ c %------------------------------ + c + j = j + 1 + if (j .gt. k+np) then +- call second (t1) ++ call secnd2 (t1) + tsaitr = tsaitr + (t1 - t0) + ido = 99 + c +diff -up ARPACK/SRC/snapps.f.sb ARPACK/SRC/snapps.f +--- ARPACK/SRC/snapps.f.sb 1998-05-20 16:58:55.000000000 +0200 ++++ ARPACK/SRC/snapps.f 2007-10-24 02:50:57.000000000 +0200 +@@ -237,7 +237,7 @@ c | Initialize timing statistics | + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mnapps + kplusp = kev + np + c +@@ -635,7 +635,7 @@ c + end if + c + 9000 continue +- call second (t1) ++ call secnd2 (t1) + tnapps = tnapps + (t1 - t0) + c + return +diff -up ARPACK/SRC/dnaitr.f.sb ARPACK/SRC/dnaitr.f +--- ARPACK/SRC/dnaitr.f.sb 1996-08-27 18:09:00.000000000 +0200 ++++ ARPACK/SRC/dnaitr.f 2007-10-24 02:50:57.000000000 +0200 +@@ -319,7 +319,7 @@ c | Initialize timing statistics + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mnaitr + c + c %------------------------------% +@@ -430,7 +430,7 @@ c | which spans OP and exit + c %------------------------------------------------% + c + info = j - 1 +- call second (t1) ++ call secnd2 (t1) + tnaitr = tnaitr + (t1 - t0) + ido = 99 + go to 9000 +@@ -470,7 +470,7 @@ c %------------------------------ + c + step3 = .true. + nopx = nopx + 1 +- call second (t2) ++ call secnd2 (t2) + call dcopy (n, v(1,j), 1, workd(ivj), 1) + ipntr(1) = ivj + ipntr(2) = irj +@@ -490,7 +490,7 @@ c | WORKD(IRJ:IRJ+N-1) := OP*v_{j + c | if step3 = .true. | + c %----------------------------------% + c +- call second (t3) ++ call secnd2 (t3) + tmvopx = tmvopx + (t3 - t2) + + step3 = .false. +@@ -506,7 +506,7 @@ c | STEP 4: Finish extending the + c | factorization to length j. | + c %---------------------------------------% + c +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + step4 = .true. +@@ -531,7 +531,7 @@ c | if step4 = .true. + c %----------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -576,11 +576,11 @@ c + c + if (j .gt. 1) h(j,j-1) = betaj + c +- call second (t4) ++ call secnd2 (t4) + c + orth1 = .true. + c +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call dcopy (n, resid, 1, workd(irj), 1) +@@ -604,7 +604,7 @@ c | WORKD(IPJ:IPJ+N-1) := B*r_{j} + c %---------------------------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -681,7 +681,7 @@ c + call daxpy (j, one, workd(irj), 1, h(1,j), 1) + c + orth2 = .true. +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call dcopy (n, resid, 1, workd(irj), 1) +@@ -705,7 +705,7 @@ c | Back from reverse communicati + c %---------------------------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -783,7 +783,7 @@ c + rstart = .false. + orth2 = .false. + c +- call second (t5) ++ call secnd2 (t5) + titref = titref + (t5 - t4) + c + c %------------------------------------% +@@ -792,7 +792,7 @@ c %------------------------------ + c + j = j + 1 + if (j .gt. k+np) then +- call second (t1) ++ call secnd2 (t1) + tnaitr = tnaitr + (t1 - t0) + ido = 99 + do 110 i = max(1,k), k+np-1 +diff -up ARPACK/SRC/sneigh.f.sb ARPACK/SRC/sneigh.f +--- ARPACK/SRC/sneigh.f.sb 1996-04-20 18:27:22.000000000 +0200 ++++ ARPACK/SRC/sneigh.f 2007-10-24 02:50:57.000000000 +0200 +@@ -170,7 +170,7 @@ c | Initialize timing statistics | + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mneigh + c + if (msglvl .gt. 2) then +@@ -301,7 +301,7 @@ c + & '_neigh: Ritz estimates for the eigenvalues of H') + end if + c +- call second (t1) ++ call secnd2 (t1) + tneigh = tneigh + (t1 - t0) + c + 9000 continue +diff -up ARPACK/SRC/dsaup2.f.sb ARPACK/SRC/dsaup2.f +--- ARPACK/SRC/dsaup2.f.sb 1998-05-20 16:59:00.000000000 +0200 ++++ ARPACK/SRC/dsaup2.f 2007-10-24 02:50:57.000000000 +0200 +@@ -262,7 +262,7 @@ c | Initialize timing statistics + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = msaup2 + c + c %---------------------------------% +@@ -770,7 +770,7 @@ c | the first step of the next ca + c %---------------------------------------------% + c + cnorm = .true. +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call dcopy (n, resid, 1, workd(n+1), 1) +@@ -795,7 +795,7 @@ c | WORKD(1:N) := B*RESID + c %----------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -837,7 +837,7 @@ c %------------% + c | Error exit | + c %------------% + c +- call second (t1) ++ call secnd2 (t1) + tsaup2 = t1 - t0 + c + 9000 continue +diff -up ARPACK/SRC/snaupd.f.sb ARPACK/SRC/snaupd.f +--- ARPACK/SRC/snaupd.f.sb 2002-08-23 07:29:34.000000000 +0200 ++++ ARPACK/SRC/snaupd.f 2007-10-24 02:50:57.000000000 +0200 +@@ -476,7 +476,7 @@ c | & message level for debugging + c %-------------------------------% + c + call sstatn +- call second (t0) ++ call secnd2 (t0) + msglvl = mnaupd + c + c %----------------% +@@ -640,7 +640,7 @@ c + & '_naupd: Associated Ritz estimates') + end if + c +- call second (t1) ++ call secnd2 (t1) + tnaupd = t1 - t0 + c + if (msglvl .gt. 0) then +diff -up ARPACK/SRC/znapps.f.sb ARPACK/SRC/znapps.f +--- ARPACK/SRC/znapps.f.sb 1998-05-20 16:45:03.000000000 +0200 ++++ ARPACK/SRC/znapps.f 2007-10-24 02:50:57.000000000 +0200 +@@ -240,7 +240,7 @@ c | Initialize timing statistics | + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mcapps + c + kplusp = kev + np +@@ -495,7 +495,7 @@ c + end if + c + 9000 continue +- call second (t1) ++ call secnd2 (t1) + tcapps = tcapps + (t1 - t0) + c + return +diff -up ARPACK/SRC/znaitr.f.sb ARPACK/SRC/znaitr.f +--- ARPACK/SRC/znaitr.f.sb 1996-08-27 18:12:57.000000000 +0200 ++++ ARPACK/SRC/znaitr.f 2007-10-24 02:50:57.000000000 +0200 +@@ -326,7 +326,7 @@ c | Initialize timing statistics + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mcaitr + c + c %------------------------------% +@@ -437,7 +437,7 @@ c | which spans OP and exit + c %------------------------------------------------% + c + info = j - 1 +- call second (t1) ++ call secnd2 (t1) + tcaitr = tcaitr + (t1 - t0) + ido = 99 + go to 9000 +@@ -477,7 +477,7 @@ c %------------------------------ + c + step3 = .true. + nopx = nopx + 1 +- call second (t2) ++ call secnd2 (t2) + call zcopy (n, v(1,j), 1, workd(ivj), 1) + ipntr(1) = ivj + ipntr(2) = irj +@@ -497,7 +497,7 @@ c | WORKD(IRJ:IRJ+N-1) := OP*v_{j + c | if step3 = .true. | + c %----------------------------------% + c +- call second (t3) ++ call secnd2 (t3) + tmvopx = tmvopx + (t3 - t2) + + step3 = .false. +@@ -513,7 +513,7 @@ c | STEP 4: Finish extending the + c | factorization to length j. | + c %---------------------------------------% + c +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + step4 = .true. +@@ -538,7 +538,7 @@ c | if step4 = .true. + c %----------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -583,11 +583,11 @@ c + c + if (j .gt. 1) h(j,j-1) = dcmplx(betaj, rzero) + c +- call second (t4) ++ call secnd2 (t4) + c + orth1 = .true. + c +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call zcopy (n, resid, 1, workd(irj), 1) +@@ -611,7 +611,7 @@ c | WORKD(IPJ:IPJ+N-1) := B*r_{j} + c %---------------------------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -689,7 +689,7 @@ c + call zaxpy (j, one, workd(irj), 1, h(1,j), 1) + c + orth2 = .true. +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call zcopy (n, resid, 1, workd(irj), 1) +@@ -713,7 +713,7 @@ c | Back from reverse communicati + c %---------------------------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -791,7 +791,7 @@ c + rstart = .false. + orth2 = .false. + c +- call second (t5) ++ call secnd2 (t5) + titref = titref + (t5 - t4) + c + c %------------------------------------% +@@ -800,7 +800,7 @@ c %------------------------------ + c + j = j + 1 + if (j .gt. k+np) then +- call second (t1) ++ call secnd2 (t1) + tcaitr = tcaitr + (t1 - t0) + ido = 99 + do 110 i = max(1,k), k+np-1 +diff -up ARPACK/SRC/zgetv0.f.sb ARPACK/SRC/zgetv0.f +--- ARPACK/SRC/zgetv0.f.sb 1999-04-08 00:46:45.000000000 +0200 ++++ ARPACK/SRC/zgetv0.f 2007-10-24 02:50:57.000000000 +0200 +@@ -211,7 +211,7 @@ c | Initialize timing statistics + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mgetv0 + c + ierr = 0 +@@ -238,7 +238,7 @@ c | Force the starting vector int + c | the generalized problem when B is possibly (singular). | + c %----------------------------------------------------------% + c +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nopx = nopx + 1 + ipntr(1) = 1 +@@ -261,7 +261,7 @@ c %--------------------------------- + c + if (orth) go to 40 + c +- call second (t3) ++ call secnd2 (t3) + tmvopx = tmvopx + (t3 - t2) + c + c %------------------------------------------------------% +@@ -269,7 +269,7 @@ c | Starting vector is now in the ra + c | Compute B-norm of starting vector. | + c %------------------------------------------------------% + c +- call second (t2) ++ call secnd2 (t2) + first = .TRUE. + if (bmat .eq. 'G') then + nbx = nbx + 1 +@@ -285,7 +285,7 @@ c + 20 continue + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -328,7 +328,7 @@ c %--------------------------------- + c | Compute the B-norm of the orthogonalized starting vector | + c %----------------------------------------------------------% + c +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call zcopy (n, resid, 1, workd(n+1), 1) +@@ -343,7 +343,7 @@ c + 40 continue + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -401,7 +401,7 @@ c + end if + ido = 99 + c +- call second (t1) ++ call secnd2 (t1) + tgetv0 = tgetv0 + (t1 - t0) + c + 9000 continue +diff -up ARPACK/SRC/zneigh.f.sb ARPACK/SRC/zneigh.f +--- ARPACK/SRC/zneigh.f.sb 1996-04-20 19:16:01.000000000 +0200 ++++ ARPACK/SRC/zneigh.f 2007-10-24 02:50:57.000000000 +0200 +@@ -171,7 +171,7 @@ c | Initialize timing statistics | + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mceigh + c + if (msglvl .gt. 2) then +@@ -244,7 +244,7 @@ c + & '_neigh: Ritz estimates for the eigenvalues of H') + end if + c +- call second(t1) ++ call secnd2(t1) + tceigh = tceigh + (t1 - t0) + c + 9000 continue +diff -up ARPACK/SRC/cnaupd.f.sb ARPACK/SRC/cnaupd.f +--- ARPACK/SRC/cnaupd.f.sb 2002-08-15 07:50:57.000000000 +0200 ++++ ARPACK/SRC/cnaupd.f 2007-10-24 02:50:57.000000000 +0200 +@@ -451,7 +451,7 @@ c | & message level for debugging + c %-------------------------------% + c + call cstatn +- call second (t0) ++ call secnd2 (t0) + msglvl = mcaupd + c + c %----------------% +@@ -611,7 +611,7 @@ c + & '_naupd: Associated Ritz estimates') + end if + c +- call second (t1) ++ call secnd2 (t1) + tcaupd = t1 - t0 + c + if (msglvl .gt. 0) then +diff -up ARPACK/SRC/cgetv0.f.sb ARPACK/SRC/cgetv0.f +--- ARPACK/SRC/cgetv0.f.sb 1999-04-08 00:46:44.000000000 +0200 ++++ ARPACK/SRC/cgetv0.f 2007-10-24 02:50:57.000000000 +0200 +@@ -211,7 +211,7 @@ c | Initialize timing statistics + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mgetv0 + c + ierr = 0 +@@ -238,7 +238,7 @@ c | Force the starting vector int + c | the generalized problem when B is possibly (singular). | + c %----------------------------------------------------------% + c +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nopx = nopx + 1 + ipntr(1) = 1 +@@ -261,7 +261,7 @@ c %--------------------------------- + c + if (orth) go to 40 + c +- call second (t3) ++ call secnd2 (t3) + tmvopx = tmvopx + (t3 - t2) + c + c %------------------------------------------------------% +@@ -269,7 +269,7 @@ c | Starting vector is now in the ra + c | Compute B-norm of starting vector. | + c %------------------------------------------------------% + c +- call second (t2) ++ call secnd2 (t2) + first = .TRUE. + if (bmat .eq. 'G') then + nbx = nbx + 1 +@@ -285,7 +285,7 @@ c + 20 continue + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -328,7 +328,7 @@ c %--------------------------------- + c | Compute the B-norm of the orthogonalized starting vector | + c %----------------------------------------------------------% + c +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call ccopy (n, resid, 1, workd(n+1), 1) +@@ -343,7 +343,7 @@ c + 40 continue + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -401,7 +401,7 @@ c + end if + ido = 99 + c +- call second (t1) ++ call secnd2 (t1) + tgetv0 = tgetv0 + (t1 - t0) + c + 9000 continue +diff -up ARPACK/SRC/sgetv0.f.sb ARPACK/SRC/sgetv0.f +--- ARPACK/SRC/sgetv0.f.sb 1999-04-08 00:42:46.000000000 +0200 ++++ ARPACK/SRC/sgetv0.f 2007-10-24 02:50:57.000000000 +0200 +@@ -214,7 +214,7 @@ c | Initialize timing statistics + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mgetv0 + c + ierr = 0 +@@ -241,7 +241,7 @@ c | Force the starting vector int + c | the generalized problem when B is possibly (singular). | + c %----------------------------------------------------------% + c +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nopx = nopx + 1 + ipntr(1) = 1 +@@ -265,7 +265,7 @@ c + if (orth) go to 40 + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvopx = tmvopx + (t3 - t2) + end if + c +@@ -274,7 +274,7 @@ c | Starting vector is now in the ra + c | Compute B-norm of starting vector. | + c %------------------------------------------------------% + c +- call second (t2) ++ call secnd2 (t2) + first = .TRUE. + if (bmat .eq. 'G') then + nbx = nbx + 1 +@@ -290,7 +290,7 @@ c + 20 continue + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -333,7 +333,7 @@ c %--------------------------------- + c | Compute the B-norm of the orthogonalized starting vector | + c %----------------------------------------------------------% + c +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call scopy (n, resid, 1, workd(n+1), 1) +@@ -348,7 +348,7 @@ c + 40 continue + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -406,7 +406,7 @@ c + end if + ido = 99 + c +- call second (t1) ++ call secnd2 (t1) + tgetv0 = tgetv0 + (t1 - t0) + c + 9000 continue +diff -up ARPACK/SRC/dnaupd.f.sb ARPACK/SRC/dnaupd.f +--- ARPACK/SRC/dnaupd.f.sb 2002-08-23 07:29:34.000000000 +0200 ++++ ARPACK/SRC/dnaupd.f 2007-10-24 02:50:57.000000000 +0200 +@@ -476,7 +476,7 @@ c | & message level for debugging + c %-------------------------------% + c + call dstatn +- call second (t0) ++ call secnd2 (t0) + msglvl = mnaupd + c + c %----------------% +@@ -640,7 +640,7 @@ c + & '_naupd: Associated Ritz estimates') + end if + c +- call second (t1) ++ call secnd2 (t1) + tnaupd = t1 - t0 + c + if (msglvl .gt. 0) then +diff -up ARPACK/SRC/cnaitr.f.sb ARPACK/SRC/cnaitr.f +--- ARPACK/SRC/cnaitr.f.sb 1996-08-27 18:12:56.000000000 +0200 ++++ ARPACK/SRC/cnaitr.f 2007-10-24 02:50:57.000000000 +0200 +@@ -326,7 +326,7 @@ c | Initialize timing statistics + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mcaitr + c + c %------------------------------% +@@ -437,7 +437,7 @@ c | which spans OP and exit + c %------------------------------------------------% + c + info = j - 1 +- call second (t1) ++ call secnd2 (t1) + tcaitr = tcaitr + (t1 - t0) + ido = 99 + go to 9000 +@@ -477,7 +477,7 @@ c %------------------------------ + c + step3 = .true. + nopx = nopx + 1 +- call second (t2) ++ call secnd2 (t2) + call ccopy (n, v(1,j), 1, workd(ivj), 1) + ipntr(1) = ivj + ipntr(2) = irj +@@ -497,7 +497,7 @@ c | WORKD(IRJ:IRJ+N-1) := OP*v_{j + c | if step3 = .true. | + c %----------------------------------% + c +- call second (t3) ++ call secnd2 (t3) + tmvopx = tmvopx + (t3 - t2) + + step3 = .false. +@@ -513,7 +513,7 @@ c | STEP 4: Finish extending the + c | factorization to length j. | + c %---------------------------------------% + c +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + step4 = .true. +@@ -538,7 +538,7 @@ c | if step4 = .true. + c %----------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -583,11 +583,11 @@ c + c + if (j .gt. 1) h(j,j-1) = cmplx(betaj, rzero) + c +- call second (t4) ++ call secnd2 (t4) + c + orth1 = .true. + c +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call ccopy (n, resid, 1, workd(irj), 1) +@@ -611,7 +611,7 @@ c | WORKD(IPJ:IPJ+N-1) := B*r_{j} + c %---------------------------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -689,7 +689,7 @@ c + call caxpy (j, one, workd(irj), 1, h(1,j), 1) + c + orth2 = .true. +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call ccopy (n, resid, 1, workd(irj), 1) +@@ -713,7 +713,7 @@ c | Back from reverse communicati + c %---------------------------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -791,7 +791,7 @@ c + rstart = .false. + orth2 = .false. + c +- call second (t5) ++ call secnd2 (t5) + titref = titref + (t5 - t4) + c + c %------------------------------------% +@@ -800,7 +800,7 @@ c %------------------------------ + c + j = j + 1 + if (j .gt. k+np) then +- call second (t1) ++ call secnd2 (t1) + tcaitr = tcaitr + (t1 - t0) + ido = 99 + do 110 i = max(1,k), k+np-1 +diff -up ARPACK/SRC/dsaupd.f.sb ARPACK/SRC/dsaupd.f +--- ARPACK/SRC/dsaupd.f.sb 2001-04-11 00:52:40.000000000 +0200 ++++ ARPACK/SRC/dsaupd.f 2007-10-24 02:50:57.000000000 +0200 +@@ -478,7 +478,7 @@ c | & message level for debugging + c %-------------------------------% + c + call dstats +- call second (t0) ++ call secnd2 (t0) + msglvl = msaupd + c + ierr = 0 +@@ -638,7 +638,7 @@ c + & '_saupd: corresponding error bounds') + end if + c +- call second (t1) ++ call secnd2 (t1) + tsaupd = t1 - t0 + c + if (msglvl .gt. 0) then +diff -up ARPACK/SRC/znaup2.f.sb ARPACK/SRC/znaup2.f +--- ARPACK/SRC/znaup2.f.sb 2000-06-01 22:28:53.000000000 +0200 ++++ ARPACK/SRC/znaup2.f 2007-10-24 02:50:57.000000000 +0200 +@@ -264,7 +264,7 @@ c %-----------------------% + c + if (ido .eq. 0) then + c +- call second (t0) ++ call secnd2 (t0) + c + msglvl = mcaup2 + c +@@ -724,7 +724,7 @@ c | the first step of the next ca + c %---------------------------------------------% + c + cnorm = .true. +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call zcopy (n, resid, 1, workd(n+1), 1) +@@ -749,7 +749,7 @@ c | WORKD(1:N) := B*RESID + c %----------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -788,7 +788,7 @@ c %------------% + c | Error Exit | + c %------------% + c +- call second (t1) ++ call secnd2 (t1) + tcaup2 = t1 - t0 + c + 9000 continue +diff -up ARPACK/SRC/snaitr.f.sb ARPACK/SRC/snaitr.f +--- ARPACK/SRC/snaitr.f.sb 1996-08-27 18:09:01.000000000 +0200 ++++ ARPACK/SRC/snaitr.f 2007-10-24 02:50:57.000000000 +0200 +@@ -319,7 +319,7 @@ c | Initialize timing statistics + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mnaitr + c + c %------------------------------% +@@ -430,7 +430,7 @@ c | which spans OP and exit + c %------------------------------------------------% + c + info = j - 1 +- call second (t1) ++ call secnd2 (t1) + tnaitr = tnaitr + (t1 - t0) + ido = 99 + go to 9000 +@@ -470,7 +470,7 @@ c %------------------------------ + c + step3 = .true. + nopx = nopx + 1 +- call second (t2) ++ call secnd2 (t2) + call scopy (n, v(1,j), 1, workd(ivj), 1) + ipntr(1) = ivj + ipntr(2) = irj +@@ -490,7 +490,7 @@ c | WORKD(IRJ:IRJ+N-1) := OP*v_{j + c | if step3 = .true. | + c %----------------------------------% + c +- call second (t3) ++ call secnd2 (t3) + tmvopx = tmvopx + (t3 - t2) + + step3 = .false. +@@ -506,7 +506,7 @@ c | STEP 4: Finish extending the + c | factorization to length j. | + c %---------------------------------------% + c +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + step4 = .true. +@@ -531,7 +531,7 @@ c | if step4 = .true. + c %----------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -576,11 +576,11 @@ c + c + if (j .gt. 1) h(j,j-1) = betaj + c +- call second (t4) ++ call secnd2 (t4) + c + orth1 = .true. + c +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call scopy (n, resid, 1, workd(irj), 1) +@@ -604,7 +604,7 @@ c | WORKD(IPJ:IPJ+N-1) := B*r_{j} + c %---------------------------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -681,7 +681,7 @@ c + call saxpy (j, one, workd(irj), 1, h(1,j), 1) + c + orth2 = .true. +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call scopy (n, resid, 1, workd(irj), 1) +@@ -705,7 +705,7 @@ c | Back from reverse communicati + c %---------------------------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -783,7 +783,7 @@ c + rstart = .false. + orth2 = .false. + c +- call second (t5) ++ call secnd2 (t5) + titref = titref + (t5 - t4) + c + c %------------------------------------% +@@ -792,7 +792,7 @@ c %------------------------------ + c + j = j + 1 + if (j .gt. k+np) then +- call second (t1) ++ call secnd2 (t1) + tnaitr = tnaitr + (t1 - t0) + ido = 99 + do 110 i = max(1,k), k+np-1 +diff -up ARPACK/SRC/cnapps.f.sb ARPACK/SRC/cnapps.f +--- ARPACK/SRC/cnapps.f.sb 1998-05-20 16:45:03.000000000 +0200 ++++ ARPACK/SRC/cnapps.f 2007-10-24 02:50:57.000000000 +0200 +@@ -240,7 +240,7 @@ c | Initialize timing statistics | + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mcapps + c + kplusp = kev + np +@@ -495,7 +495,7 @@ c + end if + c + 9000 continue +- call second (t1) ++ call secnd2 (t1) + tcapps = tcapps + (t1 - t0) + c + return +diff -up ARPACK/SRC/dnconv.f.sb ARPACK/SRC/dnconv.f +--- ARPACK/SRC/dnconv.f.sb 1996-04-20 18:27:05.000000000 +0200 ++++ ARPACK/SRC/dnconv.f 2007-10-24 02:50:57.000000000 +0200 +@@ -119,7 +119,7 @@ c | + c | for some appropriate choice of norm. | + c %-------------------------------------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + c + c %---------------------------------% + c | Get machine dependent constant. | +@@ -134,7 +134,7 @@ c + if (bounds(i) .le. tol*temp) nconv = nconv + 1 + 20 continue + c +- call second (t1) ++ call secnd2 (t1) + tnconv = tnconv + (t1 - t0) + c + return +diff -up ARPACK/SRC/dngets.f.sb ARPACK/SRC/dngets.f +--- ARPACK/SRC/dngets.f.sb 1996-04-20 18:27:07.000000000 +0200 ++++ ARPACK/SRC/dngets.f 2007-10-24 02:50:57.000000000 +0200 +@@ -152,7 +152,7 @@ c | Initialize timing statistics | + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mngets + c + c %----------------------------------------------------% +@@ -208,7 +208,7 @@ c + call dsortc ( 'SR', .true., np, bounds, ritzr, ritzi ) + end if + c +- call second (t1) ++ call secnd2 (t1) + tngets = tngets + (t1 - t0) + c + if (msglvl .gt. 0) then +diff -up ARPACK/SRC/ssconv.f.sb ARPACK/SRC/ssconv.f +--- ARPACK/SRC/ssconv.f.sb 1996-04-20 18:27:27.000000000 +0200 ++++ ARPACK/SRC/ssconv.f 2007-10-24 02:50:57.000000000 +0200 +@@ -106,7 +106,7 @@ c %-----------------------% + c | Executable Statements | + c %-----------------------% + c +- call second (t0) ++ call secnd2 (t0) + c + eps23 = slamch('Epsilon-Machine') + eps23 = eps23**(2.0E+0 / 3.0E+0) +@@ -126,7 +126,7 @@ c + c + 10 continue + c +- call second (t1) ++ call secnd2 (t1) + tsconv = tsconv + (t1 - t0) + c + return +diff -up ARPACK/SRC/ssapps.f.sb ARPACK/SRC/ssapps.f +--- ARPACK/SRC/ssapps.f.sb 1998-05-20 16:58:58.000000000 +0200 ++++ ARPACK/SRC/ssapps.f 2007-10-24 02:50:57.000000000 +0200 +@@ -213,7 +213,7 @@ c | Initialize timing statistics | + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = msapps + c + kplusp = kev + np +@@ -503,7 +503,7 @@ c + end if + end if + c +- call second (t1) ++ call secnd2 (t1) + tsapps = tsapps + (t1 - t0) + c + 9000 continue +diff -up ARPACK/SRC/ssaupd.f.sb ARPACK/SRC/ssaupd.f +--- ARPACK/SRC/ssaupd.f.sb 2001-04-11 00:52:40.000000000 +0200 ++++ ARPACK/SRC/ssaupd.f 2007-10-24 02:50:57.000000000 +0200 +@@ -478,7 +478,7 @@ c | & message level for debugging + c %-------------------------------% + c + call sstats +- call second (t0) ++ call secnd2 (t0) + msglvl = msaupd + c + ierr = 0 +@@ -638,7 +638,7 @@ c + & '_saupd: corresponding error bounds') + end if + c +- call second (t1) ++ call secnd2 (t1) + tsaupd = t1 - t0 + c + if (msglvl .gt. 0) then +diff -up ARPACK/SRC/snconv.f.sb ARPACK/SRC/snconv.f +--- ARPACK/SRC/snconv.f.sb 1996-04-20 18:27:21.000000000 +0200 ++++ ARPACK/SRC/snconv.f 2007-10-24 02:50:57.000000000 +0200 +@@ -119,7 +119,7 @@ c | + c | for some appropriate choice of norm. | + c %-------------------------------------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + c + c %---------------------------------% + c | Get machine dependent constant. | +@@ -134,7 +134,7 @@ c + if (bounds(i) .le. tol*temp) nconv = nconv + 1 + 20 continue + c +- call second (t1) ++ call secnd2 (t1) + tnconv = tnconv + (t1 - t0) + c + return +diff -up ARPACK/SRC/cnaup2.f.sb ARPACK/SRC/cnaup2.f +--- ARPACK/SRC/cnaup2.f.sb 2000-06-01 22:28:53.000000000 +0200 ++++ ARPACK/SRC/cnaup2.f 2007-10-24 02:50:57.000000000 +0200 +@@ -264,7 +264,7 @@ c %-----------------------% + c + if (ido .eq. 0) then + c +- call second (t0) ++ call secnd2 (t0) + c + msglvl = mcaup2 + c +@@ -724,7 +724,7 @@ c | the first step of the next ca + c %---------------------------------------------% + c + cnorm = .true. +- call second (t2) ++ call secnd2 (t2) + if (bmat .eq. 'G') then + nbx = nbx + 1 + call ccopy (n, resid, 1, workd(n+1), 1) +@@ -749,7 +749,7 @@ c | WORKD(1:N) := B*RESID + c %----------------------------------% + c + if (bmat .eq. 'G') then +- call second (t3) ++ call secnd2 (t3) + tmvbx = tmvbx + (t3 - t2) + end if + c +@@ -788,7 +788,7 @@ c %------------% + c | Error Exit | + c %------------% + c +- call second (t1) ++ call secnd2 (t1) + tcaup2 = t1 - t0 + c + 9000 continue +diff -up ARPACK/SRC/dseigt.f.sb ARPACK/SRC/dseigt.f +--- ARPACK/SRC/dseigt.f.sb 1996-08-27 07:29:04.000000000 +0200 ++++ ARPACK/SRC/dseigt.f 2007-10-24 02:50:57.000000000 +0200 +@@ -138,7 +138,7 @@ c | Initialize timing statistics | + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mseigt + c + if (msglvl .gt. 0) then +@@ -168,7 +168,7 @@ c + bounds(k) = rnorm*abs(bounds(k)) + 30 continue + c +- call second (t1) ++ call secnd2 (t1) + tseigt = tseigt + (t1 - t0) + c + 9000 continue +diff -up ARPACK/SRC/sngets.f.sb ARPACK/SRC/sngets.f +--- ARPACK/SRC/sngets.f.sb 1996-04-20 18:27:24.000000000 +0200 ++++ ARPACK/SRC/sngets.f 2007-10-24 02:50:57.000000000 +0200 +@@ -152,7 +152,7 @@ c | Initialize timing statistics | + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mngets + c + c %----------------------------------------------------% +@@ -208,7 +208,7 @@ c + call ssortc ( 'SR', .true., np, bounds, ritzr, ritzi ) + end if + c +- call second (t1) ++ call secnd2 (t1) + tngets = tngets + (t1 - t0) + c + if (msglvl .gt. 0) then +diff -up ARPACK/SRC/cngets.f.sb ARPACK/SRC/cngets.f +--- ARPACK/SRC/cngets.f.sb 1996-04-20 19:15:56.000000000 +0200 ++++ ARPACK/SRC/cngets.f 2007-10-24 02:50:57.000000000 +0200 +@@ -137,7 +137,7 @@ c | Initialize timing statistics | + c | & message level for debugging | + c %-------------------------------% + c +- call second (t0) ++ call secnd2 (t0) + msglvl = mcgets + c + call csortc (which, .true., kev+np, ritz, bounds) +@@ -157,7 +157,7 @@ c + c + end if + c +- call second (t1) ++ call secnd2 (t1) + tcgets = tcgets + (t1 - t0) + c + if (msglvl .gt. 0) then --- arpack-2.1+parpack96.dfsg.orig/debian/patches/parpacklib.patch +++ arpack-2.1+parpack96.dfsg/debian/patches/parpacklib.patch @@ -0,0 +1,10 @@ +--- arpack-2.1+parpack96/ARmake.inc~ 2008-11-10 10:55:42.000000000 -0500 ++++ arpack-2.1+parpack96/ARmake.inc 2008-11-10 10:56:10.000000000 -0500 +@@ -59,6 +59,7 @@ + # %---------------------------------------------------% + # + ARPACKLIB = $(home)/libarpack.a ++PARPACKLIB = $(home)/libparpack.a + LAPACKLIB = + BLASLIB = + # --- arpack-2.1+parpack96.dfsg.orig/debian/patches/use-gfortran.patch +++ arpack-2.1+parpack96.dfsg/debian/patches/use-gfortran.patch @@ -0,0 +1,50 @@ +--- arpack-2.1+parpack96.orig/ARmake.inc ++++ arpack-2.1+parpack96/ARmake.inc +@@ -21,7 +21,7 @@ + # + # %--------------------------------------% + # | You should change the definition of | +-# | home if ARPACK is built some place | ++# | home if ARPACK is built some place | + # | other than your home directory. | + # %--------------------------------------% + # +@@ -59,12 +59,12 @@ + # %---------------------------------------------------% + # + ARPACKLIB = $(home)/libarpack.a +-LAPACKLIB = +-BLASLIB = ++LAPACKLIB = ++BLASLIB = ++# ++ALIBS = $(ARPACKLIB) $(LAPACKLIB) $(BLASLIB) + # +-ALIBS = $(ARPACKLIB) $(LAPACKLIB) $(BLASLIB) + # +-# + # %---------------------------------------------------------% + # | SECTION 2: COMPILERS | + # | | +@@ -102,10 +102,10 @@ + # | for your system. | + # %-----------------------------------------% + # +-FC = g77 ++FC = gfortran + FFLAGS = -O2 + +-LDFLAGS = ++LDFLAGS = + CD = cd + + ECHO = echo +@@ -126,7 +126,7 @@ + # | ranlib, set RANLIB = touch. | + # %----------------------------------------------------------------% + # +-AR = ar ++AR = ar + ARFLAGS = rv + #RANLIB = touch + RANLIB = ranlib --- arpack-2.1+parpack96.dfsg.orig/debian/patches/no_external_etime.patch +++ arpack-2.1+parpack96.dfsg/debian/patches/no_external_etime.patch @@ -0,0 +1,26 @@ +Index: trunk/ARPACK/UTIL/second.f +=================================================================== +--- trunk.orig/ARPACK/UTIL/second.f 2008-03-11 04:23:31.000000000 +0100 ++++ trunk/ARPACK/UTIL/second.f 2008-03-11 04:23:41.000000000 +0100 +@@ -21,7 +21,7 @@ + * .. + * .. External Functions .. + REAL ETIME +- EXTERNAL ETIME ++ INTRINSIC ETIME + * .. + * .. Executable Statements .. + * +Index: trunk/UTIL/second.f +=================================================================== +--- trunk.orig/UTIL/second.f 2008-03-11 04:23:45.000000000 +0100 ++++ trunk/UTIL/second.f 2008-03-11 04:23:54.000000000 +0100 +@@ -21,7 +21,7 @@ + * .. + * .. External Functions .. + REAL ETIME +- EXTERNAL ETIME ++ INTRINSIC ETIME + * .. + * .. Executable Statements .. + * --- arpack-2.1+parpack96.dfsg.orig/debian/patches/parpack-build.patch +++ arpack-2.1+parpack96.dfsg/debian/patches/parpack-build.patch @@ -0,0 +1,17 @@ +Index: arpack/ARmake.inc +=================================================================== +--- arpack.orig/ARmake.inc 2008-02-15 11:09:00.000000000 +0100 ++++ arpack/ARmake.inc 2008-02-15 11:09:58.000000000 +0100 +@@ -59,10 +59,11 @@ + # %---------------------------------------------------% + # + ARPACKLIB = $(home)/libarpack.a ++PARPACKLIB = $(home)/libparpack.a + LAPACKLIB = + BLASLIB = + # +-ALIBS = $(ARPACKLIB) $(LAPACKLIB) $(BLASLIB) ++ALIBS = $(PARPACKLIB) $(ARPACKLIB) $(LAPACKLIB) $(BLASLIB) + # + # + # %---------------------------------------------------------%