Probably not the module you're looking for, but then again you're not going to be able to turn any of the others in for your homework either . . .
module Main
where
eng_commafy :: (Show a) => [a] -> String
eng_commafy x | length x > 2 = foldl1 (commacat) init_as_show ++ ", a
+nd " ++ last_show
where
commacat x y = x ++ ", " ++ y
init_as_show = map (show) (init x)
last_show = show (last x)
eng_commafy x | length x == 2 = (show (head x)) ++ " and " ++ (show (l
+ast x))
eng_commafy x | length x == 1 = show (head x)
eng_commafy [] = ""
main = do
putStrLn (eng_commafy [1..10])
putStrLn (eng_commafy [1,2])
putStrLn (eng_commafy [1])
(Yeah, my Haskell's terrible . . . :)
Update: Actually looking at the OP's posting history this is probably not homework. But it's still trivial and probably not past the threshold of "should be stuck in a module" on its own.
The cake is a lie.
The cake is a lie.
The cake is a lie.
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.
|