← Back to branch summary

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

« back to all changes in this revision

Viewing changes to src/tce/lccsd/lccsd_t2.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/tce/lccsd/lccsd_t2.F
1
1
      SUBROUTINE lccsd_t2(d_f1,d_i0,d_t1,d_t2,d_v2,k_f1_offset,k_i0_offs
2
2
     &et,k_t1_offset,k_t2_offset,k_v2_offset)
3
 
C     $Id: lccsd_t2.F,v 1.3 2005-12-16 22:06:13 kowalski Exp $
 
3
C     $Id: lccsd_t2.F 19706 2010-10-29 17:52:31Z d3y133 $
4
4
C     This is a Fortran77 program generated by Tensor Contraction Engine v.1.0
5
5
C     Copyright (c) Battelle & Pacific Northwest National Laboratory (2002)
6
6
C     i0 ( p3 p4 h1 h2 )_v + = 1 * v ( p3 p4 h1 h2 )_v
45
45
      RETURN
46
46
      END
47
47
      SUBROUTINE lccsd_t2_1(d_a,k_a_offset,d_c,k_c_offset)
48
 
C     $Id: lccsd_t2.F,v 1.3 2005-12-16 22:06:13 kowalski Exp $
 
48
C     $Id: lccsd_t2.F 19706 2010-10-29 17:52:31Z d3y133 $
49
49
C     This is a Fortran77 program generated by Tensor Contraction Engine v.1.0
50
50
C     Copyright (c) Battelle & Pacific Northwest National Laboratory (2002)
51
51
C     i0 ( p3 p4 h1 h2 )_v + = 1 * v ( p3 p4 h1 h2 )_v
143
143
      END
144
144
      SUBROUTINE lccsd_t2_2(d_a,k_a_offset,d_b,k_b_offset,d_c,k_c_offset
145
145
     &)
146
 
C     $Id: lccsd_t2.F,v 1.3 2005-12-16 22:06:13 kowalski Exp $
 
146
C     $Id: lccsd_t2.F 19706 2010-10-29 17:52:31Z d3y133 $
147
147
C     This is a Fortran77 program generated by Tensor Contraction Engine v.1.0
148
148
C     Copyright (c) Battelle & Pacific Northwest National Laboratory (2002)
149
149
C     i0 ( p3 p4 h1 h2 )_vt + = -1 * P( 2 ) * Sum ( h5 ) * t ( p3 h5 )_t * v ( h5 p4 h1 h2 )_v
296
296
      END
297
297
      SUBROUTINE lccsd_t2_3(d_a,k_a_offset,d_b,k_b_offset,d_c,k_c_offset
298
298
     &)
299
 
C     $Id: lccsd_t2.F,v 1.3 2005-12-16 22:06:13 kowalski Exp $
 
299
C     $Id: lccsd_t2.F 19706 2010-10-29 17:52:31Z d3y133 $
300
300
C     This is a Fortran77 program generated by Tensor Contraction Engine v.1.0
301
301
C     Copyright (c) Battelle & Pacific Northwest National Laboratory (2002)
302
302
C     i0 ( p3 p4 h1 h2 )_vt + = -1 * P( 2 ) * Sum ( p5 ) * t ( p5 h1 )_t * v ( p3 p4 h2 p5 )_v
449
449
      END
450
450
      SUBROUTINE lccsd_t2_4(d_a,k_a_offset,d_b,k_b_offset,d_c,k_c_offset
451
451
     &)
452
 
C     $Id: lccsd_t2.F,v 1.3 2005-12-16 22:06:13 kowalski Exp $
 
452
C     $Id: lccsd_t2.F 19706 2010-10-29 17:52:31Z d3y133 $
453
453
C     This is a Fortran77 program generated by Tensor Contraction Engine v.1.0
454
454
C     Copyright (c) Battelle & Pacific Northwest National Laboratory (2002)
455
455
C     i0 ( p3 p4 h1 h2 )_tf + = -1 * P( 2 ) * Sum ( h5 ) * t ( p3 p4 h1 h5 )_t * f ( h5 h2 )_f
611
611
      END
612
612
      SUBROUTINE lccsd_t2_5(d_a,k_a_offset,d_b,k_b_offset,d_c,k_c_offset
613
613
     &)
614
 
C     $Id: lccsd_t2.F,v 1.3 2005-12-16 22:06:13 kowalski Exp $
 
614
C     $Id: lccsd_t2.F 19706 2010-10-29 17:52:31Z d3y133 $
615
615
C     This is a Fortran77 program generated by Tensor Contraction Engine v.1.0
616
616
C     Copyright (c) Battelle & Pacific Northwest National Laboratory (2002)
617
617
C     i0 ( p3 p4 h1 h2 )_tf + = 1 * P( 2 ) * Sum ( p5 ) * t ( p3 p5 h1 h2 )_t * f ( p4 p5 )_f
773
773
      END
774
774
      SUBROUTINE lccsd_t2_6(d_a,k_a_offset,d_b,k_b_offset,d_c,k_c_offset
775
775
     &)
776
 
C     $Id: lccsd_t2.F,v 1.3 2005-12-16 22:06:13 kowalski Exp $
 
776
C     $Id: lccsd_t2.F 19706 2010-10-29 17:52:31Z d3y133 $
777
777
C     This is a Fortran77 program generated by Tensor Contraction Engine v.1.0
778
778
C     Copyright (c) Battelle & Pacific Northwest National Laboratory (2002)
779
779
C     i0 ( p3 p4 h1 h2 )_vt + = 1/2 * Sum ( h5 h6 ) * t ( p3 p4 h5 h6 )_t * v ( h5 h6 h1 h2 )_v
933
933
      END
934
934
      SUBROUTINE lccsd_t2_7(d_a,k_a_offset,d_b,k_b_offset,d_c,k_c_offset
935
935
     &)
936
 
C     $Id: lccsd_t2.F,v 1.3 2005-12-16 22:06:13 kowalski Exp $
 
936
C     $Id: lccsd_t2.F 19706 2010-10-29 17:52:31Z d3y133 $
937
937
C     This is a Fortran77 program generated by Tensor Contraction Engine v.1.0
938
938
C     Copyright (c) Battelle & Pacific Northwest National Laboratory (2002)
939
939
C     i0 ( p3 p4 h1 h2 )_vt + = -1 * P( 4 ) * Sum ( h6 p5 ) * t ( p3 p5 h1 h6 )_t * v ( h6 p4 h2 p5 )_v
1135
1135
      END
1136
1136
      SUBROUTINE lccsd_t2_8(d_a,k_a_offset,d_b,k_b_offset,d_c,k_c_offset
1137
1137
     &)
1138
 
C     $Id: lccsd_t2.F,v 1.3 2005-12-16 22:06:13 kowalski Exp $
 
1138
C     $Id: lccsd_t2.F 19706 2010-10-29 17:52:31Z d3y133 $
1139
1139
C     This is a Fortran77 program generated by Tensor Contraction Engine v.1.0
1140
1140
C     Copyright (c) Battelle & Pacific Northwest National Laboratory (2002)
1141
1141
C     i0 ( p3 p4 h1 h2 )_vt + = 1/2 * Sum ( p5 p6 ) * t ( p5 p6 h1 h2 )_t * v ( p3 p4 p5 p6 )_v