File: InteractiveGhciIn.lhs

package info (click to toggle)
lhs2tex 1.17-1
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 1,884 kB
  • sloc: haskell: 3,896; makefile: 294; sh: 221
file content (22 lines) | stat: -rw-r--r-- 399 bytes parent folder | download | duplicates (6) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
%include verbatim.fmt

\begingroup
\let\origtt=\tt
\def\tt#1{\origtt}
%if False
module InteractiveGhci where
%endif
%format . = "."
%format forall a = "\forall" a

\begin{code}
%options ghci -fglasgow-exts

> fix    ::  forall a. (a -> a) -> a
> fix f  =   f (fix f)

This function is of type \eval{:t fix},
and |take 10 (fix ('x':))| 
evaluates to \eval{take 10 (fix ('x':))}.
\end{code}
\endgroup