0
Just for fun with PSTricks.
\documentclass[pstricks,border=12pt]{standalone}
\usepackage{pst-eucl}
\usepackage{multido}
\psset
{
PointName=none,
PointSymbol=none,
}
\def\Atom{%
\pstGeonode{L}(1;45){T}(!2 sqrt 0){R}
\pnode[-0.5,0.75](T){CL}
\pnode[0.5,0.75](T){CR}
\...