LINUX.ORG.RU

История изменений

Исправление hateyoufeel, (текущая версия) :

Спасибо. Можно заодно пример кода?

> [(x,y) | x <- [0..2], y <- [0..3]]
[(0,0),(0,1),(0,2),(0,3),(1,0),(1,1),(1,2),(1,3),(2,0),(2,1),(2,2),(2,3)]

Вот тебе список индексов. А дальше проходись по нему чем хочешь. Типа такого:

> for_ [(x,y) | x <- [0..2], y <- [0..3]] $ \(a,b) -> putStrLn ("A " ++ show a ++ " B " ++ show b)
A 0 B 0
A 0 B 1
A 0 B 2
A 0 B 3
A 1 B 0
A 1 B 1
A 1 B 2
A 1 B 3
A 2 B 0
A 2 B 1
A 2 B 2
A 2 B 3

Исходная версия hateyoufeel, :

Спасибо. Можно заодно пример кода?

> [(x,y) | x <- [0..2], y <- [0..3]]
[(0,0),(0,1),(0,2),(0,3),(1,0),(1,1),(1,2),(1,3),(2,0),(2,1),(2,2),(2,3)]

Вот тебе список индексов. А дальше проходись по нему чем хочешь.