\documentclass[a5paper,landscape,fontsize=10pt]{scrartcl}
\usepackage{amsmath,amsthm,amsfonts,amssymb,verbatim,xcolor}
\usepackage{graphicx}
\usepackage{pinlabel}
\usepackage[ngerman]{babel}  % German umlauts
\usepackage[utf8]{inputenc}  % German umlauts
\usepackage{hyperref}  % seems to be important for multicols
\pagenumbering{gobble}  % disable page numbering
\usepackage{multicol}  % split page in two parts

\DeclareMathAlphabet{\mathpzc}{OT1}{pzc}{m}{it}
%this is for my weird f

\usepackage{concmath}
%\usepackage{helvet} %NB this was the first font I tried

\renewcommand{\familydefault}{\sfdefault}
\usepackage[margin=0.2cm]{geometry}
\usepackage{parskip}

 \usepackage{picins}


\setlength\columnseprule{.4pt}


\usepackage{lipsum}
\let\OLDthebibliography\thebibliography
\renewcommand\thebibliography[1]{
  \OLDthebibliography{#1}
  \setlength{\parskip}{0pt}
  \setlength{\itemsep}{1pt plus 0.3ex}
}


\newtheorem*{namedtheorem}{\theoremname}
\newcommand{\theoremname}{testing}
\newenvironment{named}[1]{\renewcommand{\theoremname}{#1}
        \begin{namedtheorem}}
        {\end{namedtheorem}}

\usepackage{atbegshi}% http://ctan.org/pkg/atbegshi
\AtBeginDocument{\AtBeginShipoutNext{\AtBeginShipoutDiscard}}

% ! This is a major hack 
% cf https://tex.stackexchange.com/questions/140168/how-to-remove-a-blank-page-before-the-title-page
% I do not know how the first blank page was being generated; this throws it out
% Need to learn how to properly 'bleed' a photo

   \begingroup
\renewcommand{\section}[2]{}%
%\renewcommand{\chapter}[2]{}% for other classes
     
%%%%Extre stuff for DBN

\def\bbD{{\mathbb D}}
\def\bbe{\mathbbm{e}}
\def\bbO{{\mathbb O}}
\def\bbQ{{\mathbb Q}}
\def\bbR{{\mathbb R}}
\def\bbZ{{\mathbb Z}}
\def\calA{{\mathcal A}}
\def\calD{{\mathcal D}}
\def\calF{{\mathcal F}}
\def\calI{{\mathcal I}}
\def\calK{{\mathcal K}}
\def\calP{{\mathcal P}}
\def\calR{{\mathcal R}}
\def\calS{{\mathcal S}}
\def\calT{{\mathcal T}}
\def\calU{{\mathcal U}}
\def\fraka{{\mathfrak a}}
\def\frakb{{\mathfrak b}}
\def\frakh{{\mathfrak h}}
\def\frakg{{\mathfrak g}}

%%%%%%%%%%%%%%

\begin{document}


%----------------
% 
%\vspace*{-78mm}
%\hspace*{-123mm}
\noindent
\includegraphics[width=\linewidth]{Beehive.pdf}
%
%----------------

\newpage

\vspace*{0mm}

\begin{multicols}{2}
    {\normalfont \bfseries A Very Fast and Very Strong Knot Invariant}
    
 \medskip

\parpic[r]{\scriptsize\normalfont \itshape February 18, 2025.}
    {\scriptsize Dror Bar-Natan} \\[-2pt]
    {\scriptsize University of Toronto}\\[-2pt]
    {\scriptsize \normalfont \ttfamily drorbn@utoronto.ca}
    
    \medskip
 
There is a knot invariant $\Theta$ that can go by a fancy name ``the two loop contribution to the Kontsevich integral'' [1--4].

\vskip -1mm
{\bfseries Theorem} [6]. There is a down to earth algorithm to compute $\Theta$ which makes it computable for knots with hundreds of crossings.

\vskip -1mm
{\bfseries Fact.} $\Theta$ is much stronger than the HOMFLY-PT polynomial $H$ and Khovanov homology $KH$ taken together. On the 313,230 prime knots with up to 15 crossings it attains 306,472 distinct values -- a deficit of 6,758 -- whereas $H$ and $KH$ together have a deficit of 70,245, about 10 times the worse.

\vskip -1mm
{\bfseries Strongly Supported Conjecture.} $\Theta(K)$ has a ``Seifert Formula'': It can be presented as a perturbed Gaussian integral of a Lagrangian on (6 copies of) the first homology $H_1$ of a Seifert surface $\Sigma$ of a knot $K$, itself defined using low degree finite type invariants of links representing  classes in $H_1$. Thus $\Theta$ bounds the genus of $K$.

\vskip -1mm
\parpic[r]{\includegraphics[width=0.75in]{Seifert4Ribbon.pdf}}
{\bfseries Dream.} Pretty Seifert surfaces will lead to pretty formulas, and in particular, $\Theta$ may say something about ribbon knots, whose Seifert surfaces, as on the right, are pretty.

\vskip -1mm
$\Theta$ is a two variable polynomial. A two variable polynomial is a 2D array of coefficients, which can be interpreted as directing the colours of a 2D array of pixels, which can be viewed as a picture. On the other side are the 15 pictures corresponding to $\Theta$ of 15 random knots with 101--115 crossings. There are patterns there; we don't understand them yet.

\columnbreak\par
    
\parpic[r]{\framebox(60,75){\scriptsize }} %Postage ENLARGED THIS FOR A5
\medskip
\scriptsize
%\def\bysame{{---}}
\def\arXiv#1{{\href{http://arxiv.org/abs/#1}{{arXiv:}\linebreak[0]{#1}}}}
\begin{thebibliography}{}

%\bibitem{Ro} L.~Rozansky,
%  {\em A Contribution of the Trivial Flat Connection to the Jones
%  Polynomial and Witten's Invariant of 3D Manifolds, I,}
%  Comm.\ Math.\ Phys.\ {\bfseries 175-2} (1996) 275--296, \arXiv{hep-th/9401061}.
%
%\bibitem{Rozansky:Burau} \bysame,
%  {\em The Universal $R$-Matrix, Burau Representation and the Melvin-Morton
%    Expansion of the Colored Jones Polynomial,}
%  Adv.\ Math.\ {\bfseries 134-1} (1998) 1--31, \arXiv{q-alg/9604005}.

\bibitem{Rozansky:U1RCC} L.~Rozansky,
  {\em A Universal $U(1)$-RCC Invariant of Links and \newline
  Rationality Conjecture,}
  \arXiv{math/0201139}.

\bibitem{GaroufalidisRozansky:LoopExpansion} S.~Garoufaldis, L.~Rozansky,
  {\em The Loop Expansion of the Kontsevich\newline
  Integral, the Null-Move, and $S$-Equivalence,}
  \arXiv{math.GT/0003187}.

\bibitem{Kricker:Lines} A.~Kricker,
  {\em The Lines of the Kontsevich Integral and Rozansky's\newline
  Rationality Conjecture,}
  \arXiv{math/0005284}.

\bibitem{Ohtsuki:TwoLoop} T.~Ohtsuki,
  {\em On the 2–loop Polynomial of Knots,}
  Geom.\ Top.\ {\bfseries 11}\newline (2007) 1357--1475.

\bibitem{Theta} DBN, R.~van~der~Veen,
  {\em A Very Fast, Very Strong, Topologically\newline
  Meaningful and Fun Knot Invariant,}
  in preparation at \url{https://drorbn.net/Theta}.

\end{thebibliography}

\vfill
 \hfill {\scriptsize \, \textcopyright 2024 Mathematical Research Postcards}
    
\end{multicols} 


\end{document}