Делаешь фримонаду для http и потом интерпритатуешь используя httpclient

Достаточно функционально

Главное что наружу мутабл стейт не торчит нигде

Я ещё не выучил слово "фримонады"

Так что не нужно мне тут

Делаешь фримонаду для http и потом интерпритатуешь используя httpclient

А в этом случае сам клиент как аргумент передаётся?

Откуда он вообще браться будет

Главное, болл на хилл не забыть зафорсить. :)

Делаешь фримонаду для http и потом интерпритатуешь используя httpclient

Но зачем? Что бы мешать pure + “абстрагированными” сайд эффектами, ты же потом настрадаешься с тестами, нужен будет интерпретатор тестовый. Это как IO монада в хаскель, один раз вернул и все - весь вызывающий код в ней испачкался.

А если надо будет миксовать с др фримонадами, так это же придется трасформаторы писать.

Я шучу

?

Я шучу

ОК, меня эта тема просто задела чютка ??

А Suave.IO не завели поверх dotnet core разве?

А Suave.IO не завели поверх dotnet core разве?

завели вроде, по крайней мере Suave over Kestrel есть

Кстати

Коллеги

Вопрос

Как сделать OneOf groupby?

Т.е. есть два параметра

Сгруппировать айтемы, если хотя бы один совпадает

да, я знаю, что я наркоман

Что тогда, будет ключом группировки?

Пара значений

Пара значений

берешь GroupBy из линку и суешь ему собственный компаратор. который на гетхэшкод вертает константу, а в эквивалентности проверяет совпадение одного из параметров

но это очень криво, конечно

В целом кривовато,да

Я, походу, вопрос неправильно ставлю

Мне нужно в теории множество значений разбить на на n категорий

Чисто чтобы понять, что творится

В наборе данных

В наборе данных

k-means?

https://gist.github.com/Badmoonz/543a8d50720fc5515b52abd17fb3f303

k-means?

А поконкретнее?

А поконкретнее?

Ты используешь k-means?

Термин слышу впервые

Можно назвать кластеризацией, да

Но тут скорее про то, что в следующие кластера попадает только то, что не попало в предыдущие

Т.е. у меня есть последовательный набор предикатов, по которым я хочу сплитить

Т.е. у меня есть последовательный набор предикатов, по которым я хочу сплитить

Я правильно понимаю, что все это можно грубо выразить последовательностью partition?

Угу

Партишнов над кортежами в общем случае

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

Мда, голова с недосыпа не работает

я просто не понимаю поставноку задачи. если у тебя есть ф-ции вида TItem -> TK1, TItem -> TK2, ... TItem -> TKN и надо разбить по ним, то это тоже самое что сгрупировать по кортеж k1 * k2 ... * kn

У меня есть список неких значений, надо выявить аномалии

Значение состоит из верхней границы, нижней и имени

let rec partitionClasterisation (predicates: ('a -> bool) seq ) (items : 'a seq) : 'a list list = Сигнатура такая?

Да, похоже

Как раз о такой функции думал

Принято писать типы аргументам функций или потому что без тела?

Лучше писать, ибо понятнее

Принято писать типы аргументам функций или потому что без тела?

Я писал ибо тела не было.

let partitionClasterisation (predicates: ('a -> bool) seq ) (items : 'a seq) : 'a list list = let firstState = [fun _ -> true] |> Seq.append predicates |> Seq.mapi (fun index predicate -> index, (predicate, [])) |> Map.ofSeq let folder map item = map |> Map.toSeq |> Seq.find (fun (_, (predicate, _)) -> predicate item) ||> fun index (predicate, items) -> Map.add index (predicate, item :: items) map items |> Seq.fold folder firstState |> Map.toSeq |> Seq.map (snd >> snd >> List.rev) |> List.ofSeq [1..20] |> partitionClasterisation [ fun p -> p % 10 = 0 fun p -> p % 5 = 0 fun p -> p % 2 = 0 ]

От Map стоит избавиться чем-нить типа ImmutableList.

И rec не нужен оказался.

let partitionClasterisation (predicates: ('a -> bool) seq ) (items : 'a seq) : 'a list list = let firstState = [fun _ -> true] |> Seq.append predicates |> Seq.mapi (fun index predicate -> index, (predicate, [])) |> Map.ofSeq let folder map item = map |> Map.toSeq |> Seq.find (fun (_, (predicate, _)) -> predicate item) ||> fun index (predicate, items) -> Map.add index (predicate, item :: items) map items |> Seq.fold folder firstState |> Map.toSeq |> Seq.map (snd >> snd >> List.rev) |> List.ofSeq [1..20] |> partitionClasterisation [ fun p -> p % 10 = 0 fun p -> p % 5 = 0 fun p -> p % 2 = 0 ]

Vasily ping

Тут в ReactNative чате посоветовали https://facebook.github.io/reason/ смотрел кто?

https://pbs.twimg.com/media/C_eoKIkWAAAmnVT.jpg:large

https://pbs.twimg.com/media/C_eoKIkWAAAmnVT.jpg:large

М?

@angmarr OCaml с другим синтаксисом. Близко не смотрел.

М?

студия 2017 обновилась.

студия 2017 обновилась.

Багфиксы?

Что-то они в этот раз быстро до 2 версии дошли.

студия 2017 обновилась.

Ну так Microsoft Build идет, там еще VSforMac обновилась (странно что не VSCode)

ERROR: S client not available

/stat@combot

Тут в ReactNative чате посоветовали https://facebook.github.io/reason/ смотрел кто?

Мне нравится, я бы юзал.

/stat@combot

В описании группы есть ссылка)

Мне нравится, я бы юзал.

Пробую сейчас, отпишусь потом

@neftedollar @angmarr И я бы юзал, если бы была нормальная поддержка Windows. :(

Пробую сейчас, отпишусь потом

у меня была проблема в том чтоб использовать ее в винде, так и не попробовал.

@neftedollar @angmarr И я бы юзал, если бы была нормальная поддержка Windows. :(

++, WLS или как там подсистема линя?

@neftedollar @angmarr И я бы юзал, если бы была нормальная поддержка Windows. :(

Бедные вы мои ? (надо на линукс/macos переходить - все таки core и все дела)

Бедные вы мои ? (надо на линукс/macos переходить - все таки core и все дела)

на ноуте линь, но сейчас проект под винду так что сижу под ней.

красивее стала, но справа в окошке постоянно мыло (впф?) в коде

А на маке бесит, что там все в отдельных окна, каждый репозиторий и список репозиториев (имхо на винде удобнее)

О, вместе с обновлениями студии, еще обновление F# тулинга пришло.

Новая версия fsharp-mode?

Почему вы выбираете F#, что бы писать в функциональном стиле?

Ну дотнет жеж

Мне в силу инерции уже тяжело платформу менять

Опять же красивый и лаконичный язык

Почему в стандартной библиотеке так мало функциональных комбинаторов?

А каких не хватает?

Базис вроде весь

const например

Есть

List.Cons

Тьфу

Шо есть const?

Literal?

const x y = x

И что оно должно делать?

Игнорить второй аргумент

Что бы не писать fun _ -> someValue

В FSharp.Extras точно есть эта функция. Только konst называется.