From 6bab23035740ef6d2bd6c26d35f2e27e2108921e Mon Sep 17 00:00:00 2001 From: fiddlosopher Date: Thu, 31 Dec 2009 01:18:35 +0000 Subject: Updated lhs tests. git-svn-id: https://pandoc.googlecode.com/svn/trunk@1741 788f1e2b-df1e-0410-8736-df70ead52e1b --- tests/lhs-test.html | 148 ++++++++++++++++++++++++++-------------------------- 1 file changed, 73 insertions(+), 75 deletions(-) (limited to 'tests/lhs-test.html') diff --git a/tests/lhs-test.html b/tests/lhs-test.html index 5ab1ee102..5f015db0f 100644 --- a/tests/lhs-test.html +++ b/tests/lhs-test.html @@ -1,79 +1,77 @@ -

lhs test

unsplit is an arrow that takes a pair of values and combines them to return a single value:

unsplit :: (Arrow a) => (b -> c -> d) -> a (b, c) d
unsplit = arr . uncurry       
          -- arr (\op (x,y) -> x `op` y)

(***) 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).

f *** g = first f >>> second g
+
+
+  
+  
+  
+  
+  
+
+
+
lhs test
unsplit is an arrow that takes a pair of values and combines them to return a single value:
unsplit :: (Arrow a) => (b -> c -> d) -> a (b, c) d
unsplit = arr . uncurry       
          -- arr (\op (x,y) -> x `op` y) 
(***) 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).
f *** g = first f >>> second g
 
Block quote:
foo bar

Block quote:

foo bar

+ + -- cgit v1.2.3