Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | j | |||
integer, | intent(in) | :: | nI(nel) |
subroutine store_decoding(j, nI)
implicit none
integer, intent(in) :: j, nI(nel)
if (tStoredDets) then
global_determinants(:, j) = nI
end if
end subroutine store_decoding