← Back to branch summary

~ubuntu-branches/ubuntu/saucy/python-scipy/saucy

« back to all changes in this revision

Viewing changes to Lib/sandbox/arpack/ARPACK/SRC/zstatn.f

  • Committer: Bazaar Package Importer
  • Author(s): Ondrej Certik
  • Date: 2008-06-16 22:58:01 UTC
  • mfrom: (2.1.24 intrepid)
  • Revision ID: james.westby@ubuntu.com-20080616225801-irdhrpcwiocfbcmt
Tags: 0.6.0-12
http://bugs.debian.org/489149
* The description updated to match the current SciPy (Closes: #489149).
* Standards-Version bumped to 3.8.0 (no action needed)
* Build-Depends: netcdf-dev changed to libnetcdf-dev

Show diffs side-by-side

added added

removed removed

Lines of Context:
Lib/sandbox/arpack/ARPACK/SRC/zstatn.f
1
 
c
2
 
c\SCCS Information: @(#)
3
 
c FILE: statn.F   SID: 2.2   DATE OF SID: 4/20/96   RELEASE: 2
4
 
c
5
 
c     %---------------------------------------------%
6
 
c     | Initialize statistic and timing information |
7
 
c     | for complex nonsymmetric Arnoldi code.      |
8
 
c     %---------------------------------------------%
9
 
 
10
 
      subroutine zstatn
11
 
c
12
 
c     %--------------------------------%
13
 
c     | See stat.doc for documentation |
14
 
c     %--------------------------------%
15
 
c
16
 
      include   'stat.h'
17
 
 
18
 
c     %-----------------------%
19
 
c     | Executable Statements |
20
 
c     %-----------------------%
21
 
 
22
 
      nopx   = 0
23
 
      nbx    = 0
24
 
      nrorth = 0
25
 
      nitref = 0
26
 
      nrstrt = 0
27
 
 
28
 
      tcaupd = 0.0D+0
29
 
      tcaup2 = 0.0D+0
30
 
      tcaitr = 0.0D+0
31
 
      tceigh = 0.0D+0
32
 
      tcgets = 0.0D+0
33
 
      tcapps = 0.0D+0
34
 
      tcconv = 0.0D+0
35
 
      titref = 0.0D+0
36
 
      tgetv0 = 0.0D+0
37
 
      trvec  = 0.0D+0
38
 
 
39
 
c     %----------------------------------------------------%
40
 
c     | User time including reverse communication overhead |
41
 
c     %----------------------------------------------------%
42
 
      tmvopx = 0.0D+0
43
 
      tmvbx  = 0.0D+0
44
 
 
45
 
      return
46
 
c
47
 
c     %---------------%
48
 
c     | End of zstatn |
49
 
c     %---------------%
50
 
c
51
 
      end