![]() |
(git:07c9450)
|
Contains routines for contraction without dgemms. PLEASE DO NOT MODIFY. \notes Contains specific routines for contraction. The compiler flag -D__MAX_CONTR defines the maximum angular momentum up to which specialized code will be used. Default setting is d-functions. Increasing -D__MAX_CONTR produces faster code but might overburden the optimization capabilities of some poor compilers. This file contains specific code up to g-functions. If you need more look at cp2k/tools/hfx_tools/contraction/. More...
Functions/Subroutines | |
| subroutine, public | contract (ncoa, ncob, ncoc, ncod, nsoa, nsob, nsoc, nsod, n_a, n_b, n_c, n_d, nl_a, nl_b, nl_c, nl_d, work, sphi_a, sphi_b, sphi_c, sphi_d, primitives, buffer1, buffer2) |
| ... | |
Contains routines for contraction without dgemms. PLEASE DO NOT MODIFY. \notes Contains specific routines for contraction. The compiler flag -D__MAX_CONTR defines the maximum angular momentum up to which specialized code will be used. Default setting is d-functions. Increasing -D__MAX_CONTR produces faster code but might overburden the optimization capabilities of some poor compilers. This file contains specific code up to g-functions. If you need more look at cp2k/tools/hfx_tools/contraction/.
| subroutine, public hfx_contraction_methods::contract | ( | integer, intent(in) | ncoa, |
| integer, intent(in) | ncob, | ||
| integer, intent(in) | ncoc, | ||
| integer, intent(in) | ncod, | ||
| integer, intent(in) | nsoa, | ||
| integer, intent(in) | nsob, | ||
| integer, intent(in) | nsoc, | ||
| integer, intent(in) | nsod, | ||
| integer, intent(in) | n_a, | ||
| integer, intent(in) | n_b, | ||
| integer, intent(in) | n_c, | ||
| integer, intent(in) | n_d, | ||
| integer, intent(in) | nl_a, | ||
| integer, intent(in) | nl_b, | ||
| integer, intent(in) | nl_c, | ||
| integer, intent(in) | nl_d, | ||
| real(dp), dimension(ncoa*ncob*ncoc*ncod), intent(in) | work, | ||
| real(dp), dimension(ncoa, nsoa*nl_a), intent(in) | sphi_a, | ||
| real(dp), dimension(ncob, nsob*nl_b), intent(in) | sphi_b, | ||
| real(dp), dimension(ncoc, nsoc*nl_c), intent(in) | sphi_c, | ||
| real(dp), dimension(ncod, nsod*nl_d), intent(in) | sphi_d, | ||
| real(dp), dimension(nsoa*nl_a, nsob*nl_b, nsoc*nl_c, nsod*nl_d) | primitives, | ||
| real(dp), dimension(ncoa*ncob*ncoc*ncod) | buffer1, | ||
| real(dp), dimension(ncoa*ncob*ncoc*ncod) | buffer2 | ||
| ) |
...
| ncoa | ... |
| ncob | ... |
| ncoc | ... |
| ncod | ... |
| nsoa | ... |
| nsob | ... |
| nsoc | ... |
| nsod | ... |
| n_a | ... |
| n_b | ... |
| n_c | ... |
| n_d | ... |
| nl_a | ... |
| nl_b | ... |
| nl_c | ... |
| nl_d | ... |
| work | ... |
| sphi_a | ... |
| sphi_b | ... |
| sphi_c | ... |
| sphi_d | ... |
| primitives | ... |
| buffer1 | ... |
| buffer2 | ... |
Definition at line 66 of file hfx_contraction_methods.F.