mendeleev.inc

来自「已经编译好的levoo程序」· INC 代码 · 共 15 行

c
c............. Mendeleev's table of the first 82 elements
      character NAZV(82)*2
      data NAZV/' H','He',
     &     'Li','Be',' B',' C',' N',' O',' F','Ne',
     &     'Na','Mg','Al','Si',' P',' S','Cl','Ar',
     &     ' K','Ca','Sc','Ti',' V','Cr','Mn','Fe','Co','Ni','Cu',
     ,          'Zn','Ga','Ge','As','Se','Br','Kr',
     &     'Rb','Sr',' Y','Zr','Nb','Mo','Tc','Ru','Rh','Pd','Ag',
     ,          'Cd','In','Sn','Sb','Te',' I','Xe',
     &     'Cs','Ba',15*'  ','Hf','Ta',' W','Re','Os','Ir','Pt','Au',
     ,                            'Hg','Tl','Pb'/