← Back to branch summary

~ubuntu-branches/ubuntu/trusty/nwchem/trusty-proposed

« back to all changes in this revision

Viewing changes to src/NWints/api/int_l1eall.F

  • Committer: Package Import Robot
  • Author(s): Michael Banck, Daniel Leidert, Andreas Tille, Michael Banck
  • Date: 2013-07-04 12:14:55 UTC
  • mfrom: (1.1.2)
  • Revision ID: package-import@ubuntu.com-20130704121455-5tvsx2qabor3nrui
Tags: 6.3-1
http://bugs.debian.org/696361
* New upstream release.
* Fixes anisotropic properties (Closes: #696361).
* New features include:
  + Multi-reference coupled cluster (MRCC) approaches
  + Hybrid DFT calculations with short-range HF 
  + New density-functionals including Minnesota (M08, M11) and HSE hybrid
    functionals
  + X-ray absorption spectroscopy (XAS) with TDDFT
  + Analytical gradients for the COSMO solvation model
  + Transition densities from TDDFT 
  + DFT+U and Electron-Transfer (ET) methods for plane wave calculations
  + Exploitation of space group symmetry in plane wave geometry optimizations
  + Local density of states (LDOS) collective variable added to Metadynamics
  + Various new XC functionals added for plane wave calculations, including
    hybrid and range-corrected ones
  + Electric field gradients with relativistic corrections 
  + Nudged Elastic Band optimization method
  + Updated basis sets and ECPs 

[ Daniel Leidert ]
* debian/watch: Fixed.

[ Andreas Tille ]
* debian/upstream: References

[ Michael Banck ]
* debian/upstream (Name): New field.
* debian/patches/02_makefile_flags.patch: Refreshed.
* debian/patches/06_statfs_kfreebsd.patch: Likewise.
* debian/patches/07_ga_target_force_linux.patch: Likewise.
* debian/patches/05_avoid_inline_assembler.patch: Removed, no longer needed.
* debian/patches/09_backported_6.1.1_fixes.patch: Likewise.
* debian/control (Build-Depends): Added gfortran-4.7 and gcc-4.7.
* debian/patches/10_force_gcc-4.7.patch: New patch, explicitly sets
  gfortran-4.7 and gcc-4.7, fixes test suite hang with gcc-4.8 (Closes:
  #701328, #713262).
* debian/testsuite: Added tests for COSMO analytical gradients and MRCC.
* debian/rules (MRCC_METHODS): New variable, required to enable MRCC methods.

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/NWints/api/int_l1eall.F
1
 
c $Id: int_l1eall.F 19696 2010-10-29 16:53:42Z d3y133 $
 
1
c $Id: int_l1eall.F 23339 2013-01-03 17:50:16Z d3y133 $
2
2
*
 
3
C> \ingroup nwint
 
4
C> @{
 
5
C> \brief Compute any 1-electron integrals removing any zero integrals
 
6
C>
 
7
C> This routine computes the 1 electron integrals \f$S\f$, \f$T\f$, and \f$V\f$:
 
8
C> \f{eqnarray*}{
 
9
C> S & = & ({\mu}|{\nu}) \\\\
 
10
C>   & = & \int_{-\infty}^{\infty} g_{\mu}(X_{\mu},r_{1})g_{\nu}(X_{\nu},r_{1})dr_{1} \\\\
 
11
C> T & = & ({\mu}|-\frac{1}{2}\nabla^{2}|{\nu}) \\\\
 
12
C>   & = & -\frac{1}{2}\int_{-\infty}^{\infty}g_{\mu}(X_{\mu},r_{1})\nabla^{2}(r_{1})\\
 
13
C>         g_{\nu}(X_{\nu},r_{1})dr_{1} \\\\
 
14
C> V & = & ({\mu}|\sum_{\alpha}\frac{-Z_{\alpha}}{|r_{1}-R_{\alpha}|}|{\nu}) \\\\
 
15
C>   & = & \int_{-\infty}^{\infty} g_{\mu}(X_{\mu},r_{1})\sum_{\alpha}\frac
 
16
C> {-Z_{\alpha}}{|r_{1}-R_{\alpha}|}g_{\nu}(X_{\nu},r_{1})dr_{1} 
 
17
C> \f}
 
18
C> All zero valued integrals are removed and the remaining integrals
 
19
C> identified with appropriate labels.
 
20
C>
 
21
C> If an ECP is defined then the ECP integral contributions are summed
 
22
C> directly into the V integrals.
 
23
C>
3
24
c:tex-% this is part of the API Standard Integral routines.
4
25
c:tex-\subsection{int\_l1eall}
5
26
c:tex-This routine computes the 1 electron integrals S, T, and V 
40
61
      external int_nint_cart
41
62
c::passed
42
63
c:tex-\begin{verbatim}
43
 
      integer i_basis ! [input] basis set handle for ish
44
 
      integer ish     ! [input] i shell/contraction
45
 
      integer j_basis ! [input] basis set handle for jsh
46
 
      integer jsh     ! [input] j shell/contraction
47
 
      integer lscr    ! [input] length of scratch array
48
 
      double precision zerotol ! [input] zero threshold for integrals
49
 
      double precision scr(lscr) ! [scratch] scratch array
50
 
      integer lstv               ! [input] length of one electron buffers
51
 
      integer ilab(lstv)         ! [output] i bas. fun. index array
52
 
      integer jlab(lstv)         ! [output] j bas. fun. index array
53
 
      double precision T(lstv)   ! [output] kinetic integral buffer
54
 
      double precision V(lstv)   ! [output] potential integral buffer
55
 
      double precision S(lstv)   ! [output] overlap integral buffer
56
 
      integer numstv             ! [output] number of returned integrals
 
64
      integer i_basis !< [Input] basis set handle for ish
 
65
      integer ish     !< [Input] i shell/contraction
 
66
      integer j_basis !< [Input] basis set handle for jsh
 
67
      integer jsh     !< [Input] j shell/contraction
 
68
      integer lscr    !< [Input] length of scratch array
 
69
      double precision zerotol !< [Input] zero threshold for integrals
 
70
      double precision scr(lscr) !< [Scratch] scratch array
 
71
      integer lstv               !< [Input] length of one electron buffers
 
72
      integer ilab(lstv)         !< [Output] i bas. fun. index array
 
73
      integer jlab(lstv)         !< [Output] j bas. fun. index array
 
74
      double precision T(lstv)   !< [Output] kinetic integral buffer
 
75
      double precision V(lstv)   !< [Output] potential integral buffer
 
76
      double precision S(lstv)   !< [Output] overlap integral buffer
 
77
      integer numstv             !< [Output] number of returned integrals
57
78
c:tex-\end{verbatim}
58
79
c::local
59
80
      integer ibas, jbas, iscrS, iscrT, iscrV, icount, i, j
125
146
00100 continue
126
147
c
127
148
      end
 
149
C> @}