\documentclass[11pt,leqno]{amsart}
%\usepackage{amsthm}
\newcommand{\pathtotrunk}{./}
\input{text/article_preamble}
\input{text/top_matter}
\input{text/kw_macros}
%\title{Blob Homology}
\title{Sandbox}
\begin{document}
$$
\begin{tikzpicture}[baseline,line width = 1pt,x=1.5cm,y=1.5cm]
\draw (0,0) node(R) {}
-- (0.75,0) node[below] {$\bar{B}$}
--(1.5,0) node[circle,fill=black,inner sep=2pt] {}
arc (0:80:1.5) node[above] {$D \times I$}
arc (80:180:1.5);
\foreach \r in {0.3, 0.6, 0.9, 1.2} {
\draw[blue!50, line width = 0.5pt] (\r,0) arc (0:180:\r);
}
\draw[fill=white]
(R) node[circle,fill=black,inner sep=2pt] {}
arc (45:65:3) node[below] {$B$}
arc (65:90:3) node[below] {$A$}
arc (90:135:3) node[circle,fill=black,inner sep=2pt] {}
arc (-135:-90:3) node[below] {$C$}
arc (-90:-45:3);
\draw[fill] (150:1.5) circle (2pt) node[above=4pt] {$D$};
\node at (-2,0) {\scalebox{2.0}{$\uparrow f$}};
\node at (0.2,0.8) {\scalebox{2.0}{$\uparrow \psi$}};
\end{tikzpicture}
$$
\end{document}