~ubuntu-branches/ubuntu/raring/python-scipy/raring-proposed

« back to all changes in this revision

Viewing changes to Lib/sandbox/arpack/ARPACK/UTIL/iset.f

  • Committer: Bazaar Package Importer
  • Author(s): Matthias Klose
  • Date: 2007-01-07 14:12:12 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20070107141212-mm0ebkh5b37hcpzn
* Remove build dependency on python-numpy-dev.
* python-scipy: Depend on python-numpy instead of python-numpy-dev.
* Package builds on other archs than i386. Closes: #402783.

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
c
 
2
c-----------------------------------------------------------------------
 
3
c
 
4
c     Only work with increment equal to 1 right now.
 
5
c
 
6
      subroutine iset (n, value, array, inc)
 
7
c
 
8
      integer    n, value, inc
 
9
      integer    array(*)
 
10
c
 
11
      do 10 i = 1, n
 
12
         array(i) = value
 
13
   10 continue
 
14
c
 
15
      return
 
16
      end