| subroutine, public ai_overlap3::overlap3 |
( |
integer, intent(in) | la_max_set, |
|
|
integer, intent(in) | npgfa, |
|
|
real(kind=dp), dimension(:), intent(in) | zeta, |
|
|
real(kind=dp), dimension(:), intent(in) | rpgfa, |
|
|
integer, intent(in) | la_min_set, |
|
|
integer, intent(in) | lb_max_set, |
|
|
integer, intent(in) | npgfb, |
|
|
real(kind=dp), dimension(:), intent(in) | zetb, |
|
|
real(kind=dp), dimension(:), intent(in) | rpgfb, |
|
|
integer, intent(in) | lb_min_set, |
|
|
integer, intent(in) | lc_max_set, |
|
|
integer, intent(in) | npgfc, |
|
|
real(kind=dp), dimension(:), intent(in) | zetc, |
|
|
real(kind=dp), dimension(:), intent(in) | rpgfc, |
|
|
integer, intent(in) | lc_min_set, |
|
|
real(kind=dp), dimension(3), intent(in) | rab, |
|
|
real(kind=dp), intent(in) | dab, |
|
|
real(kind=dp), dimension(3), intent(in) | rac, |
|
|
real(kind=dp), intent(in) | dac, |
|
|
real(kind=dp), dimension(3), intent(in) | rbc, |
|
|
real(kind=dp), intent(in) | dbc, |
|
|
real(kind=dp), dimension(:, :, :), intent(inout) | sabc, |
|
|
real(kind=dp), dimension(:, :, :, :), intent(inout), optional | sdabc, |
|
|
real(kind=dp), dimension(:, :, :, :), intent(inout), optional | sabdc, |
|
|
real(dp), intent(out), optional | int_abc_ext ) |