stat_factor_occupied Function

public function stat_factor_occupied(p, f, n_occ, oi) result(factor)

return the statistical factor that orbital oi is occupied basically f_occ/2

Arguments

Type IntentOptional Attributes Name
type(param), intent(in) :: p
type(wf_data), intent(in) :: f
integer, intent(in) :: n_occ(:)
integer, intent(in) :: oi

Return Value real(kind=long)