
Ayrat
18.10.2018
09:56:55
'a : int
'b : string
и привет

Ilya
18.10.2018
09:57:01
Ну id более общий, нежели твоя функция же

Ayrat
18.10.2018
09:57:10
а значит более строгий

Google

Ilya
18.10.2018
09:58:01
(id (fun x -> x)) 5
((fun x -> (fun y -> x y)) (fun x -> x)) 5

Ayrat
18.10.2018
09:58:42
let f' = fun x -> (fun y -> x y)
f' string 5
f' int "5"
Как тебе такое Илон Маск?

Ilya
18.10.2018
09:59:20
> id string 5;;
val it : string = "5"
> id int "5";;
val it : int = 5

Ayrat
18.10.2018
09:59:56
подожди, подожди

Ilya
18.10.2018
10:00:32
x:('a -> 'b) -> (y:'a -> 'b) - сигнатура твоей,
a -> a сигнатура id
получается a прост заменятеся на a -> b

Ayrat
18.10.2018
10:00:43
возможно ты прав. И ионид тоже прав
> x:('a -> 'b) -> (y:'a -> 'b) - сигнатура твоей
почти
x:('a -> 'b) -> (y:'a) -> 'b

Ilya
18.10.2018
10:01:49
ну это одно и то же

Ayrat
18.10.2018
10:01:57
да
Долго думал, дошло
ионид-то прав

Google

Ayrat
18.10.2018
10:09:46
сигнатура
('a -> 'b) -> 'a -> 'b
в силу правоассоциативности эквивалентна
(('a -> 'b) -> ('a -> ('b)))
убрав совсем лишние скобки
('a -> 'b) -> ('a -> 'b)
т.е. по сути это
'c -> 'c
короче, дичь, да


Evgeniy
18.10.2018
11:26:49
ребятки, делаю задачи на codewars по эфшарпу, вобщем задачка:
You are given an array strarr of strings and an integer k. Your task is to return the first longest string consisting of k consecutive strings taken in the array.
#Example: longest_consec(["zone", "abigail", "theta", "form", "libe", "zas", "theta", "abigail"], 2) --> "abigailtheta"
n being the length of the string array, if n = 0 or k > n or k <= 0 return "".
В общем мой код:
let takeNElementsFromMax n (xs: list<string>) =
let maxEl = xs
|> Seq.map (fun x -> (x, x.Length))
|> Seq.maxBy (fun (_, l) -> l)
|> (fun (el, _) -> el)
let idx = xs |> Seq.findIndex (fun x -> x = maxEl)
let idxs = [idx .. if (idx + n > xs.Length - 1) then xs.Length - 1 else idx + n - 1]
[for index in idxs -> xs.[index]]
let longestConsec lg (xs: seq<string>) =
xs
|> List.ofSeq
|> fun arr ->
if arr.Length = 0 || lg > arr.Length || lg < 1
then ""
else takeNElementsFromMax lg arr
|> List.fold (+) ""
Тесты проходит, но потом не проходит рандомные тесты, я не понимаю, что я делаю не так


Vasily
18.10.2018
11:30:26
Seq.windowed

Evgeniy
18.10.2018
11:33:32

Ayrat
18.10.2018
11:34:10
let src = ["zone"; "abigail"; "theta"; "form"; "libe"; "zas"; "theta"; "abigail"]
let longest n =
src
|> Seq.windowed n
|> Seq.maxBy (fun x -> x |> Seq.sumBy (fun x->x.Length))
|> String.concat ""
longest 2

Vasily
18.10.2018
11:34:25
Teamwork

Evgeniy
18.10.2018
11:35:24
блин, я столько лишнего кода написал, а вы тут со своим windowed :D
спасиб

Roman
18.10.2018
11:49:28
Привет!

Татьяна Аква
18.10.2018
11:56:21
Привет!) Я на самом деле с вакансией, сейчас смотрю куда ее кинуть) На другой чатик меня перекидывает. За спиной 6 лет it-рекрутмента, но про этот язык недавно узнала, сейчас изучаю, очень интересно;)

Alexey
18.10.2018
11:59:05
инженер-рекрутёр-программист?

Roman
18.10.2018
12:00:44

Татьяна Аква
18.10.2018
12:03:02
Сюда можно написать про вакансию?) Или в @microsoftstackjobs? Там я так понимаю менее целевая группа?)

Evgeniy
18.10.2018
12:04:00
я думаю, что если админы разрешат сюда, то в @microsoftstackjobs тоже стоит продублировать

Vasily
18.10.2018
12:05:58
Про f# можно

Татьяна Аква
18.10.2018
12:07:03
Супер, спасибо. Сейчас опишу задачу и кину!)

Dim
18.10.2018
12:13:23
Ребят, небольшой оффтоп. А Nemerle оно умерло?
Был такой язык под .NET

Evgeniy
18.10.2018
12:31:24

Google

Evgeniy
18.10.2018
12:31:31
ну не так давно, между прочим

Vasily
18.10.2018
12:32:23

Dim
18.10.2018
12:32:34

A64m
18.10.2018
12:34:33
судя по https://github.com/rsdn/nemerle/graphs/contributors не особо живет
чистяков и еще пара человек делали что-то вроде новой версии немерле, так что старую особо не развивали
что-то вроде, потому что это и не язык даже, а такой метапрограммный тулкит, чтоб языки делать - и немерле там бы был одним из синтаксисов из коробки. они даже в джетбрейнс над этим поработать успели но пару-тройку лет назад их оттуда на мороз выкинули, так что сейчас и над вроде-как-новой-версией работа идет не особо

Dim
18.10.2018
12:42:05
Ясно
RIP

Doge
18.10.2018
12:42:56

Alexey
18.10.2018
12:43:49
пойду коллегу порадую, он больно уж сильно западал одно время на этот немерлоид

Vasily
18.10.2018
12:44:25
По отзывам, Влад Чистяков - очень токсичный товарищ

Anatoly
18.10.2018
12:47:01

Vasily
18.10.2018
12:47:35

Dim
18.10.2018
12:50:00
И я читал)

Anatoly
18.10.2018
12:50:31
токсичный лидер у успешного проекта уже не модно =)

Bonart
18.10.2018
12:51:23
Тут правда старой гвардии не свезло

Anatoly
18.10.2018
12:51:52

Alexey
18.10.2018
12:52:48
В смысле был нормальным мужиком, но в последнее время стал п****ом?

A64m
18.10.2018
12:52:53
для успешного проекта язык был недостаточно плохой (хотя и не супер, так что шансы может и были)

Grigoriy
18.10.2018
13:16:21
Предлагаю перенести эту дискуссию в параллельный чатик

Google

Friedrich
18.10.2018
13:57:48
Тут всё правильно, ты и записал id для функций.

Ayrat
18.10.2018
13:58:03

Friedrich
18.10.2018
14:00:17

Ayrat
18.10.2018
14:01:25
Даже у успешных проектов бывают проблемы при переезде на некую, ломающую всё, улучшенную (в голове автора) вторую версию
а у немерле после такого переезда просто нет шансов
питон 2 vs питон 3 например

Grigoriy
18.10.2018
14:01:59
Fable1 vs 2 ?
Хотя... не - плохой пример

Ayrat
18.10.2018
14:02:49
fake 4 vs fake 5!
до сих пор не перешёл
слишком много сломали

A64m
18.10.2018
14:02:59
у успешных-то проектов может быть, а пока никто не использует ломать можно сколько угодно. ранние адапторы к такому привычные

Grigoriy
18.10.2018
14:03:21
надо пинить версии
я вчера ночью SAFE.Template пилил напильником

Roman
18.10.2018
14:20:18

Anna
18.10.2018
14:21:59
Только сейчас заметила, что про f(by) уже распинили ?

Roman
18.10.2018
14:24:52

Anna
18.10.2018
14:25:34

Google

Roman
18.10.2018
14:48:13
Привет!

Dmitry
18.10.2018
14:48:52

Roman
18.10.2018
14:57:18
И вам привет!)

Alexander
18.10.2018
14:59:14

Roman
18.10.2018
15:34:58
Пожалуйте!)

Shub
18.10.2018
15:36:29
про токсичных лидеров дискуссия уже закончилась?

Vasily
18.10.2018
15:37:46
В соседнем чате можно

Shub
18.10.2018
15:38:32
я хотел удостовериться, что закончилась

Grigoriy
18.10.2018
18:00:32
Привет!

Viacheslav
18.10.2018
18:01:00
А про дружелюбное комьюнити не наврали))
Посоветуйте книгу по F#, а то начал “F# for fun and profit”, а там всё как-то скомкано
Что-нибудь более основательное

Vlad
18.10.2018
18:14:12
@slavonchick

Shub
18.10.2018
18:16:47

Vasily
18.10.2018
18:17:55