← Back to branch summary

~ubuntu-branches/ubuntu/saucy/nwchem/saucy

« back to all changes in this revision

Viewing changes to src/tools/ga-4-3/tcgmsg/examples/blkdat240lin.f

  • Committer: Package Import Robot
  • Author(s): Michael Banck, Michael Banck, Daniel Leidert
  • Date: 2012-02-09 20:02:41 UTC
  • mfrom: (1.1.1)
  • Revision ID: package-import@ubuntu.com-20120209200241-jgk03qfsphal4ug2
Tags: 6.1-1
http://bugs.debian.org/632611
https://launchpad.net/bugs/791308
* New upstream release.

[ Michael Banck ]
* debian/patches/02_makefile_flags.patch: Updated.
* debian/patches/02_makefile_flags.patch: Use internal blas and lapack code.
* debian/patches/02_makefile_flags.patch: Define GCC4 for LINUX and LINUX64
  (Closes: #632611 and LP: #791308).
* debian/control (Build-Depends): Added openssh-client.
* debian/rules (USE_SCALAPACK, SCALAPACK): Removed variables (Closes:
  #654658).
* debian/rules (LIBDIR, USE_MPIF4, ARMCI_NETWORK): New variables.
* debian/TODO: New file.
* debian/control (Build-Depends): Removed libblas-dev, liblapack-dev and
  libscalapack-mpi-dev.
* debian/patches/04_show_testsuite_diff_output.patch: New patch, shows the
  diff output for failed tests.
* debian/patches/series: Adjusted.
* debian/testsuite: Optionally run all tests if "all" is passed as option.
* debian/rules: Run debian/testsuite with "all" if DEB_BUILD_OPTIONS
  contains "checkall".

[ Daniel Leidert ]
* debian/control: Used wrap-and-sort. Added Vcs-Svn and Vcs-Browser fields.
  (Priority): Moved to extra according to policy section 2.5.
  (Standards-Version): Bumped to 3.9.2.
  (Description): Fixed a typo.
* debian/watch: Added.
* debian/patches/03_hurd-i386_define_path_max.patch: Added.
  - Define MAX_PATH if not defines to fix FTBFS on hurd.
* debian/patches/series: Adjusted.

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/tools/ga-4-3/tcgmsg/examples/blkdat240lin.f
 
1
      block data
 
2
C$Id: blkdat240lin.f,v 1.2 1995-02-02 23:23:48 d3g681 Exp $
 
3
      implicit double precision (a-h, o-z)
 
4
      include 'cscf.h'
 
5
c
 
6
c     initalize data in common ... clumsy but avoids code to read in data
 
7
c
 
8
c     line of sixteen be atoms 4.0 a.u. apart with 240 orbitals
 
9
c
 
10
c     have 9s functions on each center and simulate p's by having
 
11
c     s function at +- 1 in each of x, y, z
 
12
c
 
13
      data ax /    0.0d0,  4.0d0,  8.0d0, 12.0d0,
 
14
     $            16.0d0, 20.0d0, 24.0d0, 28.0d0,
 
15
     $            32.0d0, 36.0d0, 40.0d0, 44.0d0,
 
16
     $            48.0d0, 52.0d0, 56.0d0, 60.0d0/
 
17
      data ay /   16*0.0d0/
 
18
      data az /   16*0.0d0/
 
19
      data  q /16*4.0d0/, enrep/152.3666555456/
 
20
c
 
21
      data x /9*0.0d0, 1.6d0, -1.6d0, 0.0d0, 0.0d0, 0.0d0, 0.0d0,
 
22
     $        9*4.0d0, 5.6d0,  2.4d0, 4.0d0, 4.0d0, 4.0d0, 4.0d0,
 
23
     $        9*8.0d0, 9.6d0,  6.4d0, 8.0d0, 8.0d0, 8.0d0, 8.0d0,
 
24
     $       9*12.0d0,13.6d0, 10.4d0,12.0d0,12.0d0,12.0d0,12.0d0,
 
25
     $       9*16.0d0,17.6d0, 14.4d0,16.0d0,16.0d0,16.0d0,16.0d0,
 
26
     $       9*20.0d0,21.6d0, 18.4d0,20.0d0,20.0d0,20.0d0,20.0d0,
 
27
     $       9*24.0d0,25.6d0, 22.4d0,24.0d0,24.0d0,24.0d0,24.0d0,
 
28
     $       9*28.0d0,29.6d0, 26.4d0,28.0d0,28.0d0,28.0d0,28.0d0,
 
29
     $       9*32.0d0,33.6d0, 30.4d0,32.0d0,32.0d0,32.0d0,32.0d0,
 
30
     $       9*36.0d0,37.6d0, 34.4d0,36.0d0,36.0d0,36.0d0,36.0d0,
 
31
     $       9*40.0d0,41.6d0, 38.4d0,40.0d0,40.0d0,40.0d0,40.0d0,
 
32
     $       9*44.0d0,45.6d0, 42.4d0,44.0d0,44.0d0,44.0d0,44.0d0,
 
33
     $       9*48.0d0,49.6d0, 46.4d0,48.0d0,48.0d0,48.0d0,48.0d0,
 
34
     $       9*52.0d0,53.6d0, 50.4d0,52.0d0,52.0d0,52.0d0,52.0d0,
 
35
     $       9*56.0d0,57.6d0, 54.4d0,56.0d0,56.0d0,56.0d0,56.0d0,
 
36
     $       9*60.0d0,61.6d0, 58.4d0,60.0d0,60.0d0,60.0d0,60.0d0/
 
37
      data y /9*0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0, 0.0d0, 0.0d0,
 
38
     $        9*0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0, 0.0d0, 0.0d0,
 
39
     $        9*0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0, 0.0d0, 0.0d0,
 
40
     $        9*0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0, 0.0d0, 0.0d0,
 
41
     $        9*0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0, 0.0d0, 0.0d0,
 
42
     $        9*0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0, 0.0d0, 0.0d0,
 
43
     $        9*0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0, 0.0d0, 0.0d0,
 
44
     $        9*0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0, 0.0d0, 0.0d0,
 
45
     $        9*0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0, 0.0d0, 0.0d0,
 
46
     $        9*0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0, 0.0d0, 0.0d0,
 
47
     $        9*0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0, 0.0d0, 0.0d0,
 
48
     $        9*0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0, 0.0d0, 0.0d0,
 
49
     $        9*0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0, 0.0d0, 0.0d0,
 
50
     $        9*0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0, 0.0d0, 0.0d0,
 
51
     $        9*0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0, 0.0d0, 0.0d0,
 
52
     $        9*0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0, 0.0d0, 0.0d0/
 
53
      data z /9*0.0d0, 0.0d0, 0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0,
 
54
     $        9*0.0d0, 0.0d0, 0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0,
 
55
     $        9*0.0d0, 0.0d0, 0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0,
 
56
     $        9*0.0d0, 0.0d0, 0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0,
 
57
     $        9*0.0d0, 0.0d0, 0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0,
 
58
     $        9*0.0d0, 0.0d0, 0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0,
 
59
     $        9*0.0d0, 0.0d0, 0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0,
 
60
     $        9*0.0d0, 0.0d0, 0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0,
 
61
     $        9*0.0d0, 0.0d0, 0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0,
 
62
     $        9*0.0d0, 0.0d0, 0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0,
 
63
     $        9*0.0d0, 0.0d0, 0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0,
 
64
     $        9*0.0d0, 0.0d0, 0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0,
 
65
     $        9*0.0d0, 0.0d0, 0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0,
 
66
     $        9*0.0d0, 0.0d0, 0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0,
 
67
     $        9*0.0d0, 0.0d0, 0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0,
 
68
     $        9*0.0d0, 0.0d0, 0.0d0, 0.0d0, 0.0d0, 1.6d0, -1.6d0/
 
69
      data expnt /1741.0d0, 262.1d0, 60.33d0, 17.62d0, 5.933d0, 2.185d0,
 
70
     $     0.859, 0.1806d0, 0.05835d0, 6*0.3d0,
 
71
     $            1741.0d0, 262.1d0, 60.33d0, 17.62d0, 5.933d0, 2.185d0,
 
72
     $     0.859, 0.1806d0, 0.05835d0, 6*0.3d0,
 
73
     $            1741.0d0, 262.1d0, 60.33d0, 17.62d0, 5.933d0, 2.185d0,
 
74
     $     0.859, 0.1806d0, 0.05835d0, 6*0.3d0,
 
75
     $            1741.0d0, 262.1d0, 60.33d0, 17.62d0, 5.933d0, 2.185d0,
 
76
     $     0.859, 0.1806d0, 0.05835d0, 6*0.3d0,
 
77
     $            1741.0d0, 262.1d0, 60.33d0, 17.62d0, 5.933d0, 2.185d0,
 
78
     $     0.859, 0.1806d0, 0.05835d0, 6*0.3d0,
 
79
     $            1741.0d0, 262.1d0, 60.33d0, 17.62d0, 5.933d0, 2.185d0,
 
80
     $     0.859, 0.1806d0, 0.05835d0, 6*0.3d0,
 
81
     $            1741.0d0, 262.1d0, 60.33d0, 17.62d0, 5.933d0, 2.185d0,
 
82
     $     0.859, 0.1806d0, 0.05835d0, 6*0.3d0,
 
83
     $            1741.0d0, 262.1d0, 60.33d0, 17.62d0, 5.933d0, 2.185d0,
 
84
     $     0.859, 0.1806d0, 0.05835d0, 6*0.3d0,
 
85
     $            1741.0d0, 262.1d0, 60.33d0, 17.62d0, 5.933d0, 2.185d0,
 
86
     $     0.859, 0.1806d0, 0.05835d0, 6*0.3d0,
 
87
     $            1741.0d0, 262.1d0, 60.33d0, 17.62d0, 5.933d0, 2.185d0,
 
88
     $     0.859, 0.1806d0, 0.05835d0, 6*0.3d0,
 
89
     $            1741.0d0, 262.1d0, 60.33d0, 17.62d0, 5.933d0, 2.185d0,
 
90
     $     0.859, 0.1806d0, 0.05835d0, 6*0.3d0,
 
91
     $            1741.0d0, 262.1d0, 60.33d0, 17.62d0, 5.933d0, 2.185d0,
 
92
     $     0.859, 0.1806d0, 0.05835d0, 6*0.3d0,
 
93
     $            1741.0d0, 262.1d0, 60.33d0, 17.62d0, 5.933d0, 2.185d0,
 
94
     $     0.859, 0.1806d0, 0.05835d0, 6*0.3d0,
 
95
     $            1741.0d0, 262.1d0, 60.33d0, 17.62d0, 5.933d0, 2.185d0,
 
96
     $     0.859, 0.1806d0, 0.05835d0, 6*0.3d0,
 
97
     $            1741.0d0, 262.1d0, 60.33d0, 17.62d0, 5.933d0, 2.185d0,
 
98
     $     0.859, 0.1806d0, 0.05835d0, 6*0.3d0,
 
99
     $            1741.0d0, 262.1d0, 60.33d0, 17.62d0, 5.933d0, 2.185d0,
 
100
     $     0.859, 0.1806d0, 0.05835d0, 6*0.3d0/
 
101
      end