test.tex

\documentclass{beamer}
\usepackage{amsmath}
\usepackage[utf8]{inputenc}
\usepackage{graphics}
\usepackage{hyperref}
\usepackage{xcolor}
\usepackage{wasysym}
\usepackage{listings}
\usepackage{tikz}
\usepackage{amssymb}
\usepackage[normalem]{ulem}
\usepackage{textcomp}
\usepackage{verbatim}
\usepackage[T1]{fontenc}
\usepackage{lmodern}
\usepackage{colortbl}
\usepackage{amsmath,amssymb}

\usetikzlibrary{shapes.callouts,shadows, calc}

\usetheme{Warsaw}
\usecolortheme{lily}
\setbeamercovered{transparent}
\setbeamertemplate{headline}{
  \begin{beamercolorbox}{section in head/foot}
    \vskip2pt\insertnavigation{\paperwidth}\vskip2pt
  \end{beamercolorbox}
}

\setbeamertemplate{footline}{
}

\author{
  {\small Tony Morris\\}
}

\xdefinecolor{darkgreen}{rgb}{0,0.35,0}
\lstset{
  tabsize=2,
  basicstyle=\ttfamily,
  moredelim=**[is][\btHL]{`}{`}
}
\lstdefinestyle{language}{
  language=java,
  basicstyle=\footnotesize\ttfamily,
  stringstyle=\color{darkgreen}\ttfamily,
  commentstyle=\color{gray}\ttfamily,
  keywordstyle=\footnotesize\color{blue}\ttfamily,
  tabsize=2,
  moredelim=**[is][\btHL]{`}{`}
}


\begin{document}
\title{\large Test}
\tiny{\date

}
\normalsize



\setbeamercovered{transparent}
\begin{frame}
  \titlepage
\end{frame}

\begin{frame}[fragile]
\frametitle{Problem?}
\begin{block}{list}
\begin{lstlisting}[style=language,language=haskell]
[1,2,3,4]
\end{lstlisting}
\begin{lstlisting}[style=language,language=haskell]
[1,2,3,9]
\end{lstlisting}
\end{block}
\begin{tikzpicture}
  \draw [<->, red, thick, double] (4,0) -- (10, 2);
\end{tikzpicture}
\end{frame}

\end{document}