Loops/Foreach: Difference between revisions

Content added Content deleted
Line 486: Line 486:
=={{header|Ela}}==
=={{header|Ela}}==
===Standard Approach===
===Standard Approach===
<lang ela>open Console
<lang ela>open console imperative
open Imperative


each writen [1..10]</lang>
each writen [1..10]</lang>
Function 'each' is defined in standard Imperative module as:
Function 'each' is defined in imperative module as:
<lang ela>let each f (x::xs) = f x $ each f xs
<lang ela>each f (x::xs) = f x $ each f xs
each _ [] = ()</lang>
each _ [] = ()</lang>
This also can be accomplished using 'map':
This also can be accomplished using 'map':
<lang ela>open Console
<lang ela>open console list
open Core


let _ = map writen [1..10]</lang>
map writen [1..10]</lang>


===Alternate Approach===
===Alternate Approach===
<lang ela>let each (x::xs) = writen x $ each xs
<lang ela>each (x::xs) = writen x $ each xs
each [] = ()
each [] = ()


each [1..10]</lang>
each [1..10]</lang>
Retrieved from "https://rosettacode.org/wiki/Loops/Foreach"