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

« back to all changes in this revision

Viewing changes to src/tce/gradients/ccsdt_2pdm_hphp_mo.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
* 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:
1
1
      SUBROUTINE ccsdt_2pdm_hphp_mo(d_i0,d_t1,d_t2,d_t3,d_y1,d_y2,d_y3,k
2
2
     &_i0_offset,k_t1_offset,k_t2_offset,k_t3_offset,k_y1_offset,k_y2_of
3
3
     &fset,k_y3_offset)
4
 
C     $Id: ccsdt_2pdm_hphp_mo.F,v 1.1 2008-10-01 00:15:55 d3p975 Exp $
 
4
C     $Id: ccsdt_2pdm_hphp_mo.F 19706 2010-10-29 17:52:31Z d3y133 $
5
5
C     This is a Fortran77 program generated by Tensor Contraction Engine v.1.0
6
6
C     Copyright (c) Battelle & Pacific Northwest National Laboratory (2002)
7
7
C     i0 ( h4 p1 h2 p3 )_yt + = -1/4 * P( 4 ) * t ( p1 h2 )_t * y ( h4 p3 )_y
73
73
      END
74
74
      SUBROUTINE ccsdt_2pdm_hphp_mo_1(d_a,k_a_offset,d_b,k_b_offset,d_c,
75
75
     &k_c_offset)
76
 
C     $Id: ccsdt_2pdm_hphp_mo.F,v 1.1 2008-10-01 00:15:55 d3p975 Exp $
 
76
C     $Id: ccsdt_2pdm_hphp_mo.F 19706 2010-10-29 17:52:31Z d3y133 $
77
77
C     This is a Fortran77 program generated by Tensor Contraction Engine v.1.0
78
78
C     Copyright (c) Battelle & Pacific Northwest National Laboratory (2002)
79
79
C     i0 ( h4 p1 h2 p3 )_yt + = -1/4 * P( 4 ) * t ( p1 h2 )_t * y ( h4 p3 )_y
230
230
      END
231
231
      SUBROUTINE ccsdt_2pdm_hphp_mo_2(d_a,k_a_offset,d_b,k_b_offset,d_c,
232
232
     &k_c_offset)
233
 
C     $Id: ccsdt_2pdm_hphp_mo.F,v 1.1 2008-10-01 00:15:55 d3p975 Exp $
 
233
C     $Id: ccsdt_2pdm_hphp_mo.F 19706 2010-10-29 17:52:31Z d3y133 $
234
234
C     This is a Fortran77 program generated by Tensor Contraction Engine v.1.0
235
235
C     Copyright (c) Battelle & Pacific Northwest National Laboratory (2002)
236
236
C     i0 ( h4 p1 h2 p3 )_yt + = -1/4 * P( 4 ) * Sum ( h6 p5 ) * t ( p1 p5 h2 h6 )_t * y ( h4 h6 p3 p5 )_y
454
454
      END
455
455
      SUBROUTINE ccsdt_2pdm_hphp_mo_3(d_a,k_a_offset,d_b,k_b_offset,d_c,
456
456
     &k_c_offset)
457
 
C     $Id: ccsdt_2pdm_hphp_mo.F,v 1.1 2008-10-01 00:15:55 d3p975 Exp $
 
457
C     $Id: ccsdt_2pdm_hphp_mo.F 19706 2010-10-29 17:52:31Z d3y133 $
458
458
C     This is a Fortran77 program generated by Tensor Contraction Engine v.1.0
459
459
C     Copyright (c) Battelle & Pacific Northwest National Laboratory (2002)
460
460
C     i0 ( h4 p1 h2 p3 )_yt + = -1/16 * P( 4 ) * Sum ( h7 h8 p5 p6 ) * t ( p1 p5 p6 h2 h7 h8 )_t * y ( h4 h7 h8 p3 p5 p6 )_y
798
798
      END
799
799
      SUBROUTINE ccsdt_2pdm_hphp_mo_4(d_a,k_a_offset,d_b,k_b_offset,d_c,
800
800
     &k_c_offset)
801
 
C     $Id: ccsdt_2pdm_hphp_mo.F,v 1.1 2008-10-01 00:15:55 d3p975 Exp $
 
801
C     $Id: ccsdt_2pdm_hphp_mo.F 19706 2010-10-29 17:52:31Z d3y133 $
802
802
C     This is a Fortran77 program generated by Tensor Contraction Engine v.1.0
803
803
C     Copyright (c) Battelle & Pacific Northwest National Laboratory (2002)
804
804
C     i0 ( h2 p1 h4 p3 )_ytt + = 1/2 * P( 2 ) * Sum ( h9 ) * t ( p1 h9 )_t * i1 ( h2 h9 h4 p3 )_yt
951
951
      END
952
952
      SUBROUTINE ccsdt_2pdm_hphp_mo_4_1(d_a,k_a_offset,d_b,k_b_offset,d_
953
953
     &c,k_c_offset)
954
 
C     $Id: ccsdt_2pdm_hphp_mo.F,v 1.1 2008-10-01 00:15:55 d3p975 Exp $
 
954
C     $Id: ccsdt_2pdm_hphp_mo.F 19706 2010-10-29 17:52:31Z d3y133 $
955
955
C     This is a Fortran77 program generated by Tensor Contraction Engine v.1.0
956
956
C     Copyright (c) Battelle & Pacific Northwest National Laboratory (2002)
957
957
C     i1 ( h4 h9 h2 p1 )_yt + = 1/2 * P( 2 ) * Sum ( p5 ) * t ( p5 h2 )_t * y ( h4 h9 p1 p5 )_y
1130
1130
      END
1131
1131
      SUBROUTINE OFFSET_ccsdt_2pdm_hphp_mo_4_1(l_a_offset,k_a_offset,siz
1132
1132
     &e)
1133
 
C     $Id: ccsdt_2pdm_hphp_mo.F,v 1.1 2008-10-01 00:15:55 d3p975 Exp $
 
1133
C     $Id: ccsdt_2pdm_hphp_mo.F 19706 2010-10-29 17:52:31Z d3y133 $
1134
1134
C     This is a Fortran77 program generated by Tensor Contraction Engine v.1.0
1135
1135
C     Copyright (c) Battelle & Pacific Northwest National Laboratory (2002)
1136
1136
C     i1 ( h4 h9 h2 p1 )_yt
1202
1202
      END
1203
1203
      SUBROUTINE ccsdt_2pdm_hphp_mo_4_2(d_a,k_a_offset,d_b,k_b_offset,d_
1204
1204
     &c,k_c_offset)
1205
 
C     $Id: ccsdt_2pdm_hphp_mo.F,v 1.1 2008-10-01 00:15:55 d3p975 Exp $
 
1205
C     $Id: ccsdt_2pdm_hphp_mo.F 19706 2010-10-29 17:52:31Z d3y133 $
1206
1206
C     This is a Fortran77 program generated by Tensor Contraction Engine v.1.0
1207
1207
C     Copyright (c) Battelle & Pacific Northwest National Laboratory (2002)
1208
1208
C     i1 ( h4 h9 h2 p1 )_yt + = -1/4 * P( 2 ) * Sum ( h7 p5 p6 ) * t ( p5 p6 h2 h7 )_t * y ( h4 h7 h9 p1 p5 p6 )_y
1536
1536
      END
1537
1537
      SUBROUTINE ccsdt_2pdm_hphp_mo_5(d_a,k_a_offset,d_b,k_b_offset,d_c,
1538
1538
     &k_c_offset)
1539
 
C     $Id: ccsdt_2pdm_hphp_mo.F,v 1.1 2008-10-01 00:15:55 d3p975 Exp $
 
1539
C     $Id: ccsdt_2pdm_hphp_mo.F 19706 2010-10-29 17:52:31Z d3y133 $
1540
1540
C     This is a Fortran77 program generated by Tensor Contraction Engine v.1.0
1541
1541
C     Copyright (c) Battelle & Pacific Northwest National Laboratory (2002)
1542
1542
C     i0 ( h2 p1 h4 p3 )_ytt + = 1/4 * P( 2 ) * Sum ( h6 h7 p5 ) * t ( p1 p5 h6 h7 )_t * i1 ( h2 h6 h7 h4 p3 p5 )_yt
1726
1726
      END
1727
1727
      SUBROUTINE ccsdt_2pdm_hphp_mo_5_1(d_a,k_a_offset,d_b,k_b_offset,d_
1728
1728
     &c,k_c_offset)
1729
 
C     $Id: ccsdt_2pdm_hphp_mo.F,v 1.1 2008-10-01 00:15:55 d3p975 Exp $
 
1729
C     $Id: ccsdt_2pdm_hphp_mo.F 19706 2010-10-29 17:52:31Z d3y133 $
1730
1730
C     This is a Fortran77 program generated by Tensor Contraction Engine v.1.0
1731
1731
C     Copyright (c) Battelle & Pacific Northwest National Laboratory (2002)
1732
1732
C     i1 ( h4 h6 h7 h2 p1 p5 )_yt + = -1/2 * P( 2 ) * Sum ( p8 ) * t ( p8 h2 )_t * y ( h4 h6 h7 p1 p5 p8 )_y
2037
2037
      END
2038
2038
      SUBROUTINE OFFSET_ccsdt_2pdm_hphp_mo_5_1(l_a_offset,k_a_offset,siz
2039
2039
     &e)
2040
 
C     $Id: ccsdt_2pdm_hphp_mo.F,v 1.1 2008-10-01 00:15:55 d3p975 Exp $
 
2040
C     $Id: ccsdt_2pdm_hphp_mo.F 19706 2010-10-29 17:52:31Z d3y133 $
2041
2041
C     This is a Fortran77 program generated by Tensor Contraction Engine v.1.0
2042
2042
C     Copyright (c) Battelle & Pacific Northwest National Laboratory (2002)
2043
2043
C     i1 ( h4 h6 h7 h2 p1 p5 )_yt