<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> <!--Rendered using the Haskell Html Library v0.2--> <HTML ><HEAD ><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8" ><TITLE >UniqSupply</TITLE ><LINK HREF="haddock.css" REL="stylesheet" TYPE="text/css" ><SCRIPT SRC="haddock-util.js" TYPE="text/javascript" ></SCRIPT ><SCRIPT TYPE="text/javascript" >window.onload = function () {setSynopsis("mini_UniqSupply.html")};</SCRIPT ></HEAD ><BODY ><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0" ><TR ><TD CLASS="topbar" ><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0" ><TR ><TD ><IMG SRC="haskell_icon.gif" WIDTH="16" HEIGHT="16" ALT=" " ></TD ><TD CLASS="title" >ghc-6.12.3: The GHC API</TD ><TD CLASS="topbut" ><A HREF="index.html" >Contents</A ></TD ><TD CLASS="topbut" ><A HREF="doc-index.html" >Index</A ></TD ></TR ></TABLE ></TD ></TR ><TR ><TD CLASS="modulebar" ><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0" ><TR ><TD ><FONT SIZE="6" >UniqSupply</FONT ></TD ></TR ></TABLE ></TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD ><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0" ><TR ><TD CLASS="section4" ><B >Contents</B ></TD ></TR ><TR ><TD ><DL ><DT ><A HREF="#1" >Main data type </A ></DT ><DD ><DL ><DT ><A HREF="#2" >Operations on supplies </A ></DT ></DL ></DD ><DT ><A HREF="#3" >Unique supply monad and its abstraction </A ></DT ><DD ><DL ><DT ><A HREF="#4" >Operations on the monad </A ></DT ><DT ><A HREF="#5" >Deprecated operations on <TT ><A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A ></TT > </A ></DT ></DL ></DD ></DL ></TD ></TR ></TABLE ></TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="section1" >Synopsis</TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="body" ><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0" ><TR ><TD CLASS="decl" ><SPAN CLASS="keyword" >data</SPAN > <A HREF="#t%3AUniqSupply" >UniqSupply</A > </TD ></TR ><TR ><TD CLASS="s8" ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="#v%3AuniqFromSupply" >uniqFromSupply</A > :: <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A > -> <A HREF="Unique.html#t%3AUnique" >Unique</A ></TD ></TR ><TR ><TD CLASS="s8" ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="#v%3AuniqsFromSupply" >uniqsFromSupply</A > :: <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A > -> [<A HREF="Unique.html#t%3AUnique" >Unique</A >]</TD ></TR ><TR ><TD CLASS="s8" ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="#v%3AmkSplitUniqSupply" >mkSplitUniqSupply</A > :: <A HREF="../base-4.2.0.2/Data-Char.html#t%3AChar" >Char</A > -> <A HREF="../base-4.2.0.2/System-IO.html#t%3AIO" >IO</A > <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A ></TD ></TR ><TR ><TD CLASS="s8" ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="#v%3AsplitUniqSupply" >splitUniqSupply</A > :: <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A > -> (<A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A >, <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A >)</TD ></TR ><TR ><TD CLASS="s8" ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="#v%3AlistSplitUniqSupply" >listSplitUniqSupply</A > :: <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A > -> [<A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A >]</TD ></TR ><TR ><TD CLASS="s8" ></TD ></TR ><TR ><TD CLASS="decl" ><SPAN CLASS="keyword" >data</SPAN > <A HREF="#t%3AUniqSM" >UniqSM</A > result</TD ></TR ><TR ><TD CLASS="s8" ></TD ></TR ><TR ><TD CLASS="decl" ><SPAN CLASS="keyword" >class</SPAN > <A HREF="../base-4.2.0.2/Control-Monad.html#t%3AMonad" >Monad</A > m => <A HREF="#t%3AMonadUnique" >MonadUnique</A > m <SPAN CLASS="keyword" >where</SPAN ></TD ></TR ><TR ><TD CLASS="body" ><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0" ><TR ><TD CLASS="decl" ><A HREF="#v%3AgetUniqueSupplyM" >getUniqueSupplyM</A > :: m <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="#v%3AgetUniqueM" >getUniqueM</A > :: m <A HREF="Unique.html#t%3AUnique" >Unique</A ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="#v%3AgetUniquesM" >getUniquesM</A > :: m [<A HREF="Unique.html#t%3AUnique" >Unique</A >]</TD ></TR ></TABLE ></TD ></TR ><TR ><TD CLASS="s8" ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="#v%3AinitUs" >initUs</A > :: <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A > -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > a -> (a, <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A >)</TD ></TR ><TR ><TD CLASS="s8" ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="#v%3AinitUs_" >initUs_</A > :: <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A > -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > a -> a</TD ></TR ><TR ><TD CLASS="s8" ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="#v%3AlazyThenUs" >lazyThenUs</A > :: <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > a -> (a -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > b) -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > b</TD ></TR ><TR ><TD CLASS="s8" ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="#v%3AlazyMapUs" >lazyMapUs</A > :: (a -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > b) -> [a] -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > [b]</TD ></TR ><TR ><TD CLASS="s8" ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="#v%3AgetUniqueUs" >getUniqueUs</A > :: <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > <A HREF="Unique.html#t%3AUnique" >Unique</A ></TD ></TR ><TR ><TD CLASS="s8" ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="#v%3AgetUs" >getUs</A > :: <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A ></TD ></TR ><TR ><TD CLASS="s8" ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="#v%3AreturnUs" >returnUs</A > :: a -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > a</TD ></TR ><TR ><TD CLASS="s8" ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="#v%3AthenUs" >thenUs</A > :: <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > a -> (a -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > b) -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > b</TD ></TR ><TR ><TD CLASS="s8" ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="#v%3AmapUs" >mapUs</A > :: (a -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > b) -> [a] -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > [b]</TD ></TR ></TABLE ></TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="section1" ><A NAME="1" ><A NAME="1" >Main data type </A ></A ></TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="decl" ><SPAN CLASS="keyword" >data</SPAN > <A NAME="t:UniqSupply" ><A NAME="t%3AUniqSupply" ></A ></A ><B >UniqSupply</B > </TD ></TR ><TR ><TD CLASS="body" ><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0" ><TR ><TD CLASS="ndoc" >A value of type <TT ><A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A ></TT > is unique, and it can supply <EM >one</EM > distinct <TT ><A HREF="Unique.html#t%3AUnique" >Unique</A ></TT >. Also, from the supply, one can also manufacture an arbitrary number of further UniqueSupply values, which will be distinct from the first and from all others. </TD ></TR ></TABLE ></TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="section2" ><A NAME="2" ><A NAME="2" >Operations on supplies </A ></A ></TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="decl" ><A NAME="v:uniqFromSupply" ><A NAME="v%3AuniqFromSupply" ></A ></A ><B >uniqFromSupply</B > :: <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A > -> <A HREF="Unique.html#t%3AUnique" >Unique</A ></TD ></TR ><TR ><TD CLASS="doc" >Obtain the <TT ><A HREF="Unique.html#t%3AUnique" >Unique</A ></TT > from this particular <TT ><A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A ></TT > </TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="decl" ><A NAME="v:uniqsFromSupply" ><A NAME="v%3AuniqsFromSupply" ></A ></A ><B >uniqsFromSupply</B > :: <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A > -> [<A HREF="Unique.html#t%3AUnique" >Unique</A >]</TD ></TR ><TR ><TD CLASS="doc" >Obtain an infinite list of <TT ><A HREF="Unique.html#t%3AUnique" >Unique</A ></TT > that can be generated by constant splitting of the supply </TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="decl" ><A NAME="v:mkSplitUniqSupply" ><A NAME="v%3AmkSplitUniqSupply" ></A ></A ><B >mkSplitUniqSupply</B > :: <A HREF="../base-4.2.0.2/Data-Char.html#t%3AChar" >Char</A > -> <A HREF="../base-4.2.0.2/System-IO.html#t%3AIO" >IO</A > <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A ></TD ></TR ><TR ><TD CLASS="doc" >Create a unique supply out of thin air. The character given must be distinct from those of all calls to this function in the compiler for the values generated to be truly unique. </TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="decl" ><A NAME="v:splitUniqSupply" ><A NAME="v%3AsplitUniqSupply" ></A ></A ><B >splitUniqSupply</B > :: <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A > -> (<A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A >, <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A >)</TD ></TR ><TR ><TD CLASS="doc" >Build two <TT ><A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A ></TT > from a single one, each of which can supply its own <TT ><A HREF="Unique.html#t%3AUnique" >Unique</A ></TT >. </TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="decl" ><A NAME="v:listSplitUniqSupply" ><A NAME="v%3AlistSplitUniqSupply" ></A ></A ><B >listSplitUniqSupply</B > :: <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A > -> [<A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A >]</TD ></TR ><TR ><TD CLASS="doc" >Create an infinite list of <TT ><A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A ></TT > from a single one </TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="section1" ><A NAME="3" ><A NAME="3" >Unique supply monad and its abstraction </A ></A ></TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="decl" ><SPAN CLASS="keyword" >data</SPAN > <A NAME="t:UniqSM" ><A NAME="t%3AUniqSM" ></A ></A ><B >UniqSM</B > result </TD ></TR ><TR ><TD CLASS="body" ><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0" ><TR ><TD CLASS="ndoc" >A monad which just gives the ability to obtain <TT ><A HREF="Unique.html#t%3AUnique" >Unique</A ></TT >s </TD ></TR ><TR ><TD CLASS="section4" ><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:UniqSM')" ALT="show/hide" > Instances</TD ></TR ><TR ><TD CLASS="body" ><DIV ID="i:UniqSM" STYLE="display:block;" ><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0" ><TR ><TD CLASS="decl" ><A HREF="../base-4.2.0.2/Control-Monad.html#t%3AMonad" >Monad</A > <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="../base-4.2.0.2/Control-Monad.html#t%3AFunctor" >Functor</A > <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="MonadUtils.html#t%3AMonadFix" >MonadFix</A > <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="MonadUtils.html#t%3AApplicative" >Applicative</A > <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="UniqSupply.html#t%3AMonadUnique" >MonadUnique</A > <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A ></TD ></TR ></TABLE ></DIV ></TD ></TR ></TABLE ></TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="decl" ><SPAN CLASS="keyword" >class</SPAN > <A HREF="../base-4.2.0.2/Control-Monad.html#t%3AMonad" >Monad</A > m => <A NAME="t:MonadUnique" ><A NAME="t%3AMonadUnique" ></A ></A ><B >MonadUnique</B > m <SPAN CLASS="keyword" >where</SPAN ></TD ></TR ><TR ><TD CLASS="body" ><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0" ><TR ><TD CLASS="ndoc" >A monad for generating unique identifiers </TD ></TR ><TR ><TD CLASS="s8" ></TD ></TR ><TR ><TD CLASS="section4" >Methods</TD ></TR ><TR ><TD CLASS="body" ><TABLE CLASS="vanilla" CELLSPACING="0" CELLPADDING="0" ><TR ><TD CLASS="decl" ><A NAME="v:getUniqueSupplyM" ><A NAME="v%3AgetUniqueSupplyM" ></A ></A ><B >getUniqueSupplyM</B > :: m <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A ></TD ></TR ><TR ><TD CLASS="doc" >Get a new UniqueSupply </TD ></TR ><TR ><TD CLASS="s8" ></TD ></TR ><TR ><TD CLASS="decl" ><A NAME="v:getUniqueM" ><A NAME="v%3AgetUniqueM" ></A ></A ><B >getUniqueM</B > :: m <A HREF="Unique.html#t%3AUnique" >Unique</A ></TD ></TR ><TR ><TD CLASS="doc" >Get a new unique identifier </TD ></TR ><TR ><TD CLASS="s8" ></TD ></TR ><TR ><TD CLASS="decl" ><A NAME="v:getUniquesM" ><A NAME="v%3AgetUniquesM" ></A ></A ><B >getUniquesM</B > :: m [<A HREF="Unique.html#t%3AUnique" >Unique</A >]</TD ></TR ><TR ><TD CLASS="doc" >Get an infinite list of new unique identifiers </TD ></TR ></TABLE ></TD ></TR ><TR ><TD CLASS="s8" ></TD ></TR ><TR ><TD CLASS="section4" ><IMG SRC="minus.gif" CLASS="coll" ONCLICK="toggle(this,'i:MonadUnique')" ALT="show/hide" > Instances</TD ></TR ><TR ><TD CLASS="body" ><DIV ID="i:MonadUnique" STYLE="display:block;" ><TABLE CLASS="vanilla" CELLSPACING="1" CELLPADDING="0" ><TR ><TD CLASS="decl" ><A HREF="UniqSupply.html#t%3AMonadUnique" >MonadUnique</A > <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="UniqSupply.html#t%3AMonadUnique" >MonadUnique</A > <A HREF="OptimizationFuel.html#t%3AFuelMonad" >FuelMonad</A ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="UniqSupply.html#t%3AMonadUnique" >MonadUnique</A > <A HREF="SimplMonad.html#t%3ASimplM" >SimplM</A ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="UniqSupply.html#t%3AMonadUnique" >MonadUnique</A > <A HREF="CoreMonad.html#t%3ACoreM" >CoreM</A ></TD ></TR ><TR ><TD CLASS="decl" ><A HREF="UniqSupply.html#t%3AMonadUnique" >MonadUnique</A > (<A HREF="IOEnv.html#t%3AIOEnv" >IOEnv</A > (<A HREF="TcRnTypes.html#t%3AEnv" >Env</A > gbl lcl))</TD ></TR ><TR ><TD CLASS="decl" ><A HREF="UniqSupply.html#t%3AMonadUnique" >MonadUnique</A > (DFM' <A HREF="OptimizationFuel.html#t%3AFuelMonad" >FuelMonad</A > f)</TD ></TR ></TABLE ></DIV ></TD ></TR ></TABLE ></TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="section2" ><A NAME="4" ><A NAME="4" >Operations on the monad </A ></A ></TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="decl" ><A NAME="v:initUs" ><A NAME="v%3AinitUs" ></A ></A ><B >initUs</B > :: <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A > -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > a -> (a, <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A >)</TD ></TR ><TR ><TD CLASS="doc" >Run the <TT ><A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A ></TT > action, returning the final <TT ><A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A ></TT > </TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="decl" ><A NAME="v:initUs_" ><A NAME="v%3AinitUs_" ></A ></A ><B >initUs_</B > :: <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A > -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > a -> a</TD ></TR ><TR ><TD CLASS="doc" >Run the <TT ><A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A ></TT > action, discarding the final <TT ><A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A ></TT > </TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="decl" ><A NAME="v:lazyThenUs" ><A NAME="v%3AlazyThenUs" ></A ></A ><B >lazyThenUs</B > :: <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > a -> (a -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > b) -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > b</TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="decl" ><A NAME="v:lazyMapUs" ><A NAME="v%3AlazyMapUs" ></A ></A ><B >lazyMapUs</B > :: (a -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > b) -> [a] -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > [b]</TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="section2" ><A NAME="5" ><A NAME="5" >Deprecated operations on <TT ><A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A ></TT > </A ></A ></TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="decl" ><A NAME="v:getUniqueUs" ><A NAME="v%3AgetUniqueUs" ></A ></A ><B >getUniqueUs</B > :: <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > <A HREF="Unique.html#t%3AUnique" >Unique</A ></TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="decl" ><A NAME="v:getUs" ><A NAME="v%3AgetUs" ></A ></A ><B >getUs</B > :: <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > <A HREF="UniqSupply.html#t%3AUniqSupply" >UniqSupply</A ></TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="decl" ><A NAME="v:returnUs" ><A NAME="v%3AreturnUs" ></A ></A ><B >returnUs</B > :: a -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > a</TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="decl" ><A NAME="v:thenUs" ><A NAME="v%3AthenUs" ></A ></A ><B >thenUs</B > :: <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > a -> (a -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > b) -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > b</TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="decl" ><A NAME="v:mapUs" ><A NAME="v%3AmapUs" ></A ></A ><B >mapUs</B > :: (a -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > b) -> [a] -> <A HREF="UniqSupply.html#t%3AUniqSM" >UniqSM</A > [b]</TD ></TR ><TR ><TD CLASS="s15" ></TD ></TR ><TR ><TD CLASS="botbar" >Produced by <A HREF="http://www.haskell.org/haddock/" >Haddock</A > version 2.6.1</TD ></TR ></TABLE ></BODY ></HTML >