get_hardness_sym Function

private elemental function get_hardness_sym(sym) result(eta)

Get chemical hardness for a given element symbol

Arguments

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

Element symbol

Return Value real(kind=wp)

Chemical hardness


Source Code

elemental function get_hardness_sym(sym) result(eta)

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

   !> Chemical hardness
   real(wp) :: eta

   eta = get_hardness(to_number(sym))

end function get_hardness_sym