GETTRUMATEL Subroutine

public subroutine GETTRUMATEL(A, B, C, D, BTRANS, NSBASIS, NSPINS, TOTSUM)

Arguments

Type IntentOptional Attributes Name
integer :: A
integer :: B
integer :: C
integer :: D
real(kind=dp) :: BTRANS(NSBASIS,NSBASIS,NSPINS)
integer :: NSBASIS
integer :: NSPINS
real(kind=dp) :: TOTSUM

Contents