2011-01-12 02:36:58 +01:00
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
< html xmlns = "http://www.w3.org/1999/xhtml" >
< head >
< meta http-equiv = "Content-Type" content = "text/html; charset=utf-8" / >
< meta name = "generator" content = "pandoc" / >
2011-01-12 17:17:38 +01:00
< title > < / title >
2011-01-12 02:36:58 +01:00
< / head >
< body >
2011-02-05 05:37:58 +01:00
< h1 id = "lhs-test" > lhs test< / h1 >
< p > < code > unsplit< / code > is an arrow that takes a pair of values and combines them to return a single value:< / p >
2011-03-04 20:11:01 +01:00
< pre class = "sourceCode haskell" > < code > unsplit :: (Arrow a) => (b -> c -> d) -> a (b, c) d
unsplit = arr . uncurry
-- arr (\op (x,y) -> x `op` y)
< / code > < / pre >
2011-02-05 05:37:58 +01:00
< p > < code > (***)< / code > combines two arrows into a new arrow by running the two arrows on a pair of values (one arrow on the first item of the pair and one arrow on the second item of the pair).< / p >
< pre > < code > f *** g = first f > > > second g
< / code > < / pre >
< p > Block quote:< / p >
2011-02-05 08:25:28 +01:00
< blockquote >
< p > foo bar< / p >
< / blockquote >
2011-01-12 02:36:58 +01:00
< / body >
< / html >