{-# LANGUAGE QuasiQuotes #-}
module
       Headfoot
       (latexhead
       ,latexfoot
       ,htmlhead
       ,htmlfoot)
        where

import Data.String.Here

latexhead :: [Char]
latexhead = [here|
\documentclass[11pt, a4paper, fleqn]{article}
\usepackage[a4paper         ,
            hscale=0.75     ,
            vscale=0.75     ,
            vcentering      ,
            hcentering      ]{geometry}
\pagestyle{plain}
\usepackage{metalogo}
\usepackage{fontspec}
\usepackage{textcomp}
\setlength{\mathindent}{0 cm}
\setlength{\parindent}{0 cm}
\setlength{\parskip}{7pt plus 1pt minus 1pt}
\usepackage[T1]{fontenc}
\usepackage[utf8]{inputenc}
\usepackage[noorphans,font=itshape]{quoting}
\usepackage{fancyvrb}
\fvset{fontsize=\footnotesize,fontshape=b}
\setmainfont{STIX Two Text}
\usepackage{cprotect}
\RequirePackage[hyphens]{url}
\usepackage{hyperref}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\begin{document}
\thispagestyle{empty}
|] ++ "\n\n"

latexfoot :: [Char]
latexfoot = [here|
\end{document}
|]

htmlhead :: [Char]
htmlhead = [here|
<!DOCTYPE html>
<html lang="en">
<head>
<meta charset="utf-8"/>
<meta name=viewport content="width=device-width, initial-scale=1">
<title>***TITLE***</title>
<style>
div {
margin:0px auto;
width:800px;
background-color: #e6f7ff;
padding-right:  20px;
padding-left:   20px;
padding-top:     5px;
padding-bottom: 10px;
}
a:link {color:green;}
a:visited {color:green;}
a:hover {color:red;}
a:active {color:red;}
pre {
background-color: lavender;
color: darkblue;
}
code {
background-color: lavender;
color: darkblue;
}
blockquote {
font-style: italic;
}
@media screen and (max-width: 1024px) {
div {
font-size:large;
width:100%;
background-color:lightblue;
}
a:link {color:black;}
a:visited {color:black;}
a:hover {color:red;}
a:active {color:red;}
}
</style>
</head>
<body>
<div>
|] ++ "\n\n"

htmlfoot :: [Char]
htmlfoot = "\n" ++ [here|
</div>
</body>
</html>
|]
