gen_double_4ind_rev Subroutine

public subroutine gen_double_4ind_rev(nI, ilutI, nJ, ilutJ, ex, par, pgen)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: nI(nel)
integer(kind=n_int), intent(in) :: ilutI(0:NIfTot)
integer, intent(out) :: nJ(nel)
integer(kind=n_int), intent(out) :: ilutJ(0:NIfTot)
integer, intent(out) :: ex(2,maxExcit)
logical, intent(out) :: par
real(kind=dp), intent(out) :: pgen

Contents