Loops/Foreach: Difference between revisions

Content added Content deleted
Line 486:
=={{header|Ela}}==
===Standard Approach===
<lang ela>open Consoleconsole imperative
open Imperative
 
each writen [1..10]</lang>
Function 'each' is defined in standard Imperativeimperative module as:
<lang ela>let each f (x::xs) = f x $ each f xs
each _ [] = ()</lang>
This also can be accomplished using 'map':
<lang ela>open Consoleconsole list
open Core
 
let _ = map writen [1..10]</lang>
 
===Alternate Approach===
<lang ela>let each (x::xs) = writen x $ each xs
each [] = ()
 
each [1..10]</lang>
Retrieved from "https://rosettacode.org/wiki/Loops/Foreach"