Rosetta Code

Old lady swallowed a fly: Difference between revisions

← Older editNewer edit →
Content deleted Content added
Edmund (talk | contribs)
519 edits
Added BBC BASIC
Frege and Haskell: concatMap is much more elegant
Line 736:
 
{{trans|Haskell}}
{{Works with|Frege|3.2023.113888-g4e22ab6}}
 
Nearly identical to the Haskell. Only the first line and last line of the program had to be changed atis alldifferent.
 
<lang frege>module OldLady where
Line 778:
 
song :: [String]
song = intercalate [""] $ mapconcatMap verse $ tail $ reverse $ tails animals
 
main _ = printStrputStr $ unlines song</lang>
 
=={{header|Go}}==
Line 822:
 
=={{header|Haskell}}==
 
<lang haskell>#!/usr/bin/runhaskell▼
{{Works with|GHC|7.8.3}}
 
▲<lang haskell>#!/usr/bin/env runhaskell
 
import Data.List
Line 860 ⟶ 863:
 
song :: [String]
song = intercalate [""] $ mapconcatMap verse $ tail $ reverse $ tails animals
 
main = putStr $ unlines song</lang>
Retrieved from "https://rosettacode.org/wiki/Old_lady_swallowed_a_fly"