14 lines
948 B
Text
14 lines
948 B
Text
D ← $ 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 * Hf Ta W Re Os Ir Pt Au Hg Tl Pb Bi Po At Rn |
|
||
$ Fr Ra ° Rf Db Sg Bh Hs Mt Ds Rg Cn Nh Fl Mc Lv Ts Og |
|
||
$ |
|
||
$ Lantanoids* La Ce Pr Nd Pm Sm Eu Gd Tb Dy Ho Er Tm Yb Lu |
|
||
$ Aktinoids° Ak Th Pa U Np Pu Am Cm Bk Cf Es Fm Md No Lr |
|
||
T ← ⊜∘⊸≠@\nD
|
||
Es ← ⬚@\s≡(°□⊢°□)regex"[A-Z][a-z]? "D
|
||
Es+1⇡⊸⧻≡(+1_1÷1_4⊢⊚˜⌕T)Es
|
||
≡(&p$"_ _ _")
|