set_det_diagH Subroutine

public subroutine set_det_diagH(j, hel_r)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: j
real(kind=dp), intent(in) :: hel_r

Contents