summaryrefslogtreecommitdiff
path: root/testcode/test1.lhs
blob: 3c19a70dd20ef868e940ad0f2463f17ccfbfc667 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
\documentstyle{article}

\begin{document}

\section{Introduction}

This is a trivial program that prints the first 20
factorials.  It should have 2 lines of code.

\begin{code}
main :: IO ()
main =  print [ (n, product [1..n]) | n <- [1..20]]
\end{code}

\end{document}