to_lcsymbol Function

public elemental function to_lcsymbol(number) result(symbol)

Convert atomic number to element symbol

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: number

Atomic number

Return Value character(len=2)

Element symbol


Source Code

elemental function to_lcsymbol(number) result(symbol)

   !> Atomic number
   integer,intent(in) :: number

   !> Element symbol
   character(len=2) :: symbol

   call number_to_lcsymbol(symbol, number)

end function to_lcsymbol