haskell

Ну а что еще должна сделать функция, когда ей сказано перебрать все числа и вернуть из них те, которые меньше 10?

подумать вместо меня... и выдать все те, что меньше 10 )) В общем, понял. Не понял только, зачем нужны в хаскеле бесконечные списки, если на них все равно вот такая вот фигня происходит

>Не понял только, зачем нужны в хаскеле бесконечные списки

ровно для тех же целей, как и бесконечные структуры в других языках

def is_prime(n):
    return not any(n % k == 0 for k in xrange(2,n))

print is_prime(2)
print is_prime(3)
print is_prime(5)
print is_prime(7)
print is_prime(9)

True
True
True
True
False

читаю дальше...

> Не понял только, зачем нужны в хаскеле бесконечные списки, если на них все равно вот такая вот фигня происходит

factorials = 1 : zipWith (*) [1..] factorials

Простейший пример. Зачем его обрубать на каком-то элементе? Пусть компилятор это сделает сам.

newX = takeWhile (\x -> x < 10) [1..]

main = print newX

main = takeWhile (<10) [1..]

>main = takeWhile (<10) [1..]

поработаю lambdabot'ом:

main :: IO ()
takeWhile (<10) [1..] :: (Enum a, Ord a, Num a) => [a]

типы, соответственно, не совпадают
чтобы исправить этот момент, нужна функция типа [a] -> IO ()
уже упоминавшийся print:

print :: (Show a) => a -> IO ()

если a принадлежит классу Show, то и [a] тоже принадлежит классу Show
соотвественно:

print [1..9] :: IO ()

итого искомая функция будет выглядеть так:

main = print $ takeWhile (<10) [1..]

P.S. писался этот ответ прежде всего для топикстартера

>P.S. писался этот ответ прежде всего для топикстартера

Сам хотел исправить да забил...

>Сам хотел исправить да забил...

да я понял, просто чтобы спрашивающего не запутать окончательно расписал всё :)

Если расписывать ВСЁ, то надо ещё не забыть про функцию ($) :: (a -> b) -> a -> b