Logo

Programming-Idioms

  • Haskell
  • Cobol
IDENTIFICATION DIVISION.
PROGRAM-ID. list.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 LIST.
   03 X OCCURS 5 TIMES
        INDEXED BY i PIC 9.
PROCEDURE  DIVISION.       
    PERFORM VARYING i FROM 1  BY 1 UNTIL i > 5
        DISPLAY X(i)
    END-PERFORM    
STOP RUN.
import Control.Monad
forM_ items doSomething
for Item of Items loop
   Do_Something (Item);
end loop;

New implementation...