get_wfpair_val_sym Function

private elemental function get_wfpair_val_sym(symi, symj) result(wfpair)

Get pairwise CN weighting factor for a given element symbol pair

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: symi

Element symbol i
character(len=*), intent(in) :: symj

Element symbol j

Return Value real(kind=wp)

Pairwise CN weighting factor


Source Code

elemental function get_wfpair_val_sym(symi, symj) result(wfpair)

   !> Element symbol i
   character(len=*), intent(in) :: symi

   !> Element symbol j
   character(len=*), intent(in) :: symj

   !> Pairwise CN weighting factor
   real(wp) :: wfpair

   wfpair = get_wfpair_val(to_number(symi), to_number(symj))

end function get_wfpair_val_sym