Size: a a a

2021 February 17

к

кана in Haskell Start
The Lord of Hypercomplex Numbers
Таки да
эта функция выражается проще кстати

[] # [] = 0
(x : xs) # (y : ys) = x * y + (xs # ys)
_ # _ = 0


без последнего кейса функция упадает на списках разных длин

еще это записывается как
a # b = sum (zipWith (*) a b)
источник

T

The Lord of Hypercom... in Haskell Start
The Lord of Hypercomplex Numbers
Дак исключение ж в любом случае кинется?
Или при попытке разной длины списки в кортеж закинуть, или при попытке разной длины списки в функцию закинуть
источник

AP

Aleksei (astynax) Pi... in Haskell Start
Это не скрипт. Это обычный модуль, объявляющий функцию main
источник

A

Arjaz in Haskell Start
The Lord of Hypercomplex Numbers
Или при попытке разной длины списки в кортеж закинуть, или при попытке разной длины списки в функцию закинуть
Но это уже не проблема функции
источник

D

Dreamerinnoise in Haskell Start
Aleksei (astynax) Pirogov
Это не скрипт. Это обычный модуль, объявляющий функцию main
источник

D

Dreamerinnoise in Haskell Start
не обычный модуль
источник

T

The Lord of Hypercom... in Haskell Start
кана
эта функция выражается проще кстати

[] # [] = 0
(x : xs) # (y : ys) = x * y + (xs # ys)
_ # _ = 0


без последнего кейса функция упадает на списках разных длин

еще это записывается как
a # b = sum (zipWith (*) a b)
Падажжити
А разве не zipWith (*) a b ?
источник

AP

Aleksei (astynax) Pi... in Haskell Start
То, что у модуля есть shebang не делает его "плоской последовательностью команд"
источник

к

кана in Haskell Start
The Lord of Hypercomplex Numbers
Падажжити
А разве не zipWith (*) a b ?
да, *
источник

T

The Lord of Hypercom... in Haskell Start
Arjaz
Но это уже не проблема функции
Ну, в этом есть своя логика
источник

D

Dreamerinnoise in Haskell Start
ну в общем в стаке есть штука, позволяющая работать с этим как со скриптом
источник

D

Dreamerinnoise in Haskell Start
удобно
источник

AP

Aleksei (astynax) Pi... in Haskell Start
Это и с runghc работало всегда
источник

AP

Aleksei (astynax) Pi... in Haskell Start
stack всего лишь зависимости подтягивать умеет. Но это нынче умеет и cabal
источник

T

The Lord of Hypercom... in Haskell Start
кана
эта функция выражается проще кстати

[] # [] = 0
(x : xs) # (y : ys) = x * y + (xs # ys)
_ # _ = 0


без последнего кейса функция упадает на списках разных длин

еще это записывается как
a # b = sum (zipWith (*) a b)
Последняя версия вообще лепота
источник

A

Aragaer in Haskell Start
я ж написал, (#) = sum . zipWith (*)
источник

T

The Lord of Hypercom... in Haskell Start
Aragaer
я ж написал, (#) = sum . zipWith (*)
Не видел
источник

AP

Aleksei (astynax) Pi... in Haskell Start
Aleksei (astynax) Pirogov
Это и с runghc работало всегда
$ cat <<END > foo.hs
> #!/usr/bin/env runghc
> main = putStrLn "Hello!"
> END
$ chmod +x foo.hs
$ ./foo.hs
Hello!
источник

к

кана in Haskell Start
Aragaer
я ж написал, (#) = sum . zipWith (*)
а это неверно
источник

A

Aragaer in Haskell Start
а, ну да
источник