% !TeX encoding = UTF-8
\documentclass[a4paper]{scrartcl}

\usepackage[ngerman]{babel}
\usepackage[utf8]{inputenc}
\usepackage{lmodern}
\usepackage[T1]{fontenc}
\usepackage{microtype}
\usepackage{amsmath}
\usepackage{amssymb}
\usepackage{amsfonts}
\usepackage{enumitem}
 \usepackage{listings}
\usepackage{xcolor}
\usepackage{tikz}
\usepackage{ziffer}
\usepackage{lscape}
 \lstset{
 	breaklines=true,
     postbreak=\mbox{\textcolor{red}{$\hookrightarrow$}\space}
 }

\usepackage{mathrsfs}
\usepackage{multicol}
\usepackage{datetime}
\usepackage[left=1.5cm, right=1.5cm, top=1.5cm, bottom=2.5cm]{geometry}

\newcommand{\RM}[1]{\MakeUppercase{\romannumeral #1}}
\usepackage[autostyle=true,german=quotes]{csquotes}

\KOMAoptions{parskip=half, fontsize=12pt}
\setkomafont{disposition}{\normalcolor\bfseries}

\definecolor{fau}{RGB}{26, 71, 115} % FAU Blau
\definecolor{natfak}{RGB}{56, 132, 105} % NatFak Grün
\definecolor{wiso}{RGB}{131, 34, 44} % WISO Rot
\definecolor{philfak}{RGB}{156, 109, 39} % PhilFak Gelb

% \lstset{frame=tb,
% 	aboveskip=3mm,
% 	belowskip=3mm,
% 	showstringspaces=false,
% 	columns=flexible,
% 	basicstyle={\small \ttfamily},
% 	flexiblecolumns=false,
% 	keywordstyle=\color{fau_blau}\bfseries,
% 	commentstyle=\color{fau_tf_grau},
% 	stringstyle=\color{dkgreen},
% 	breaklines=true,
% 	breakatwhitespace=true,
% 	tabsize=4
% }
\usepackage[newfloat,cache=false]{minted}

% Line numbers not flowing out of the margin
\setminted{numbersep=5pt, xleftmargin=5pt}


%\usemintedstyle{bw} %black and white style
%\usemintedstyle{vs} %visual studio
%\usemintedstyle{friendlygrayscale} % custom style - submitted as pull request https://bitbucket.org/birkenfeld/pygments-main/pull-requests/748/add-style-friendly-grayscale/diff
\usemintedstyle{friendly}
%\usemintedstyle{eclipse} %http://www.jevon.org/wiki/Eclipse_Pygments_Style
%\usemintedstyle{autumn}
%\usemintedstyle{rrt}
%\usemintedstyle{borland}

\input glyphtounicode
\pdfgentounicode=1


\title{ThProg --- Fold in Haskell}

\begin{document}
\maketitle
\inputminted[linenos=true,tabsize=2, obeytabs,breaklines]{haskell}{folds.hs}
\end{document}