Personal tools

HaskellWiki:Style test

From HaskellWiki

(Difference between revisions)
Jump to: navigation, search
 
(Haskell)
 
(3 intermediate revisions by one user not shown)
Line 1: Line 1:
  +
== H2 ==
  +
  +
=== H3 ===
  +
  +
==== H4 ====
  +
  +
===== H5 =====
  +
  +
====== H6 ======
  +
 
== GeSHi Tests ==
 
== GeSHi Tests ==
   
Line 17: Line 27:
 
import Prelude
 
import Prelude
   
foo :: (Monad m) -> m (Int,Int)
+
foo :: (Monad m) => m (Int,Int)
foo = (x-2,x - 1) where
+
foo = return (x-2,x - 1) where
 
x = 3
 
x = 3
   

Latest revision as of 10:30, 26 August 2008

Contents

[edit] 1 H2

[edit] 1.1 H3

[edit] 1.1.1 H4

[edit] 1.1.1.1 H5
[edit] 1.1.1.1.1 H6

[edit] 2 GeSHi Tests

[edit] 2.1 C

for (int a=0;a<3;a++)
  printf ("%d\n",a);

[edit] 2.2 Haskell

{-
My program
-}
 
import Prelude
 
foo :: (Monad m) => m (Int,Int)
foo = return (x-2,x - 1) where
  x = 3
 
-- The main function
main :: IO ()
main = do
  a <- foo
  putStr ("And the answer is: " ++(show (fst a))++"\n")
Inline:
import Prelude
. Inline:
pre
.