<html xmlns="http://www.w3.org/1999/xhtml"
><head
  ><link rel="stylesheet" type="text/css" href="style.css"
     /><script type="text/javascript" src="highlight.js"
    ></script
    ></head
  ><body
  ><pre
    ><span class="hs-pragma"
      >{-# LANGUAGE TemplateHaskell #-}</span
      ><span
      >
</span
      ><span id="line-2"
      ></span
      ><span class="hs-keyword"
      >module</span
      ><span
      > </span
      ><span class="hs-identifier"
      >TemplateHaskellSplices</span
      ><span
      > </span
      ><span class="hs-keyword"
      >where</span
      ><span
      >
</span
      ><span id="line-3"
      ></span
      ><span
      >
</span
      ><span id="line-4"
      ></span
      ><span class="hs-keyword"
      >import</span
      ><span
      > </span
      ><span class="annot"
      ><a href="TemplateHaskellQuasiquotes.html"
	><span class="hs-identifier"
	  >TemplateHaskellQuasiquotes</span
	  ></a
	></span
      ><span
      >
</span
      ><span id="line-5"
      ></span
      ><span
      >
</span
      ><span id="line-6"
      ></span
      ><span class="hs-special"
      >$(</span
      ><span id="bar"
      ><span class="annot"
	><span class="annottext"
	  >[(Double, String)] -&gt; [(Int, String)]
</span
	  ><a href="TemplateHaskellSplices.html#bar"
	  ><span class="hs-identifier hs-type hs-var"
	    >aDecl</span
	    ></a
	  ></span
	></span
      ><span class="hs-special"
      >)</span
      ><span
      >
</span
      ><span id="line-7"
      ></span
      ><span
      >
</span
      ><span id="line-8"
      ></span
      ><span id="foo"
      ><span class="annot"
	><span class="annottext"
	  >foo :: Integer
</span
	  ><a href="TemplateHaskellSplices.html#foo"
	  ><span class="hs-identifier hs-var hs-var"
	    >foo</span
	    ></a
	  ></span
	></span
      ><span
      > </span
      ><span class="hs-glyph"
      >=</span
      ><span
      > </span
      ><span class="annot"
      ><span class="annottext"
	>Integer -&gt; Integer
forall a. a -&gt; a
</span
	><span class="hs-identifier hs-var"
	>id</span
	></span
      ><span
      > </span
      ><span class="hs-special"
      >$(</span
      ><span class="annot"
      ><span class="annottext"
	>Double
Integer
Double -&gt; Integer
Integer -&gt; Integer -&gt; Integer
forall a. Floating a =&gt; a
forall a. Num a =&gt; a -&gt; a -&gt; a
forall a b. (RealFrac a, Integral b) =&gt; a -&gt; b
+ :: forall a. Num a =&gt; a -&gt; a -&gt; a
round :: forall a b. (RealFrac a, Integral b) =&gt; a -&gt; b
pi :: forall a. Floating a =&gt; a
</span
	><span class="hs-identifier hs-var hs-var hs-var"
	>anExpression2</span
	></span
      ><span class="hs-special"
      >)</span
      ><span
      >
</span
      ><span id="line-9"
      ></span
      ></pre
    ></body
  ></html
>