Если пустота, то seq с одним дефолтным значением для этого типа

Seq.init

Привет!

Всем привет!)

https://pastebin.com/VL6ZWa7k

похоже? let punches = _unitOfWork.PunchRepository.All |> Seq.groupBy (fun punch -> punch.DragonId) |> dict [ for dragon in _unitOfWork.DragonRepository.All do match punches.TryGetValue dragon.Id with | true, x -> yield dragon, x | _ -> yield dragon, seq {} ]

похоже? let punches = _unitOfWork.PunchRepository.All |> Seq.groupBy (fun punch -> punch.DragonId) |> dict [ for dragon in _unitOfWork.DragonRepository.All do match punches.TryGetValue dragon.Id with | true, x -> yield dragon, x | _ -> yield dragon, seq {} ]

похоже

спасибо

Хммм, не знал, что так можно: let K x y = x in List.map (K 3) [ 1; 2; 3; 4 ]

Хммм, не знал, что так можно: let K x y = x in List.map (K 3) [ 1; 2; 3; 4 ]

А что выдаст?

Не понял

Четыре тройки?

Ну это короткая запись вместо двух строк

Ну это короткая запись вместо двух строк

Ага, но я не понял что оно должно делать

НУ я тоже пока особо не присматривался :)

Ну это короткая запись вместо двух строк

это что.. еще begin...end есть

Четыре тройки?

По идее, должен получиться список из четырёх функций одного аргумента

[3; 3; 3; 3]

А, точно. в качестве y будут элементы списка. Сглупил я

Как же не хватало такой полезности

fable-react/using-third-party-react-components.md at master · fable-compiler/fable-react https://github.com/fable-compiler/fable-react/blob/master/docs/using-third-party-react-components.md

Привет!

Подскажите, как лучше работать с коллекциями. LINQ подойдет или есть аналоги?

Подскажите, как лучше работать с коллекциями. LINQ подойдет или есть аналоги?

linq + мозг

linq + мозг

Type-safe обверток в коробке не идет?

В частности, интересует аналог Single, возвращающий Option

tryFind

Тьфу

tryFilter

tryFind как раз

Только он первый попавшийся дает

То что нужно, благодарю

Поизучал pandas и теперь понял зачем нужен Deedle в F# теперь было бы интресно сравнить одно с другим.

Только вот Deedle давно не обновлялся

Интересно, что за BlueMountainCapital. Вроде, в последнее время о них ничего не слышно в мире F#.

привет. Подскажите, пожалуйста. Необходимо найти сумму по определенному свойству( использую record), но seq может содержать null записи. Как это можно красиво сделать?

это как так? Используете рекорды, но возможны нуллы

привет. Подскажите, пожалуйста. Необходимо найти сумму по определенному свойству( использую record), но seq может содержать null записи. Как это можно красиво сделать?

ActivePatterns

это как так? Используете рекорды, но возможны нуллы

да вот после groupBy там null

как вариант, можно отфильтровать нуллы. Или можно бахнуть mySeq |> Seq.map Option.ofObj и работать с опшнами, если удобней

а вот не получается так( Option.ofObj - the type does not have null as a proper value

ну тут есть грязный хак [<AllowNullLiteral>], но надо дважды подумать, прежде чем его использовать

видел да, но должен же быть нормальный способ

это ж основа бизнесс приложения группировка и агрегация

тогда фильтровать. Если с нуллом не получается сравнить, есть еще Uncheked.defaultof<>

Ну или кстати можно свой кастомный маппинг на Option так же сделать

Можно коротко, но грубо: Seq.choose (box >> tryUnbox<MyType>) .

Привет!

Привет!

Привет)

а вот не получается так( Option.ofObj - the type does not have null as a proper value

так откуда nullы то взялись если рекорды ими не становятся?

так откуда nullы то взялись если рекорды ими не становятся?

F# запрещает null только на этапе компиляции в F# коде. null легко может вылезти в качестве непроиниализированного поля в C# или рассчитанных на C# сериализаторов и пр.

F# запрещает null только на этапе компиляции в F# коде. null легко может вылезти в качестве непроиниализированного поля в C# или рассчитанных на C# сериализаторов и пр.

Но это возможно либо при работе с определенными в C# типами, которые, насколько помню, можно сравнивать с null, либо совсем хитрый кейс, когда F# тип был инициализирован как null в C# коде. Ну либо если был вызван Unchecked.defaultof

Или я неправ?

Ну можно ещё атрибут вешать

F# запрещает null только на этапе компиляции в F# коде. null легко может вылезти в качестве непроиниализированного поля в C# или рассчитанных на C# сериализаторов и пр.

это не отменяет вопрос откуда nullы

это не отменяет вопрос откуда nullы

Ну как откуда

Из архитектуры стороннего кода, вестимо

это не отменяет вопрос откуда nullы

Вариант: пришло из бд не катит?

не знаю. в бд запись или есть или ее нет. понятия нулл записи нет. поля есть, а записи нет

Вариант: пришло из бд не катит?

не хочу врать, но option в моделях для того же даппера спасает от этой проблемы

Ну можно ещё атрибут вешать

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

не знаю. в бд запись или есть или ее нет. понятия нулл записи нет. поля есть, а записи нет

Я подозреваю, что это поле какой-то записи, и оно вполне может быть null.

не хочу врать, но option в моделях для того же даппера спасает от этой проблемы

Это уже к инициатору изначального вопроса.

а вот не получается так( Option.ofObj - the type does not have null as a proper value

А можно пример кода, где нуллы появляются? А то мы тут зубы по фотографии лечим

А можно пример кода, где нуллы появляются? А то мы тут зубы по фотографии лечим

[<AllowNullLiteral>] type Punch(attack: int, heroId: Guid, dragonId: Guid) = let _id = Guid.NewGuid() let _attack = attack let _heroId = heroId let _dragonId = dragonId interface IEntity with member this.GetId() = _id member this.Id with get() = (this :> IEntity).GetId() member this.HeroId with get() = _heroId member this.DragonId with get() = _dragonId member this.Attack with get() = _attack query { for dragon in unitOfWork.DragonRepository.All do leftOuterJoin punch in unitOfWork.PunchRepository.All on (dragon.Id = punch.DragonId) into _punch for punch in _punch do groupValBy punch dragon into gd select (gd) } |> Seq.toList

groupValBy punch dragon into gd - генерирует seq [null] после left join

Привет ?

[<AllowNullLiteral>] type Punch(attack: int, heroId: Guid, dragonId: Guid) = let _id = Guid.NewGuid() let _attack = attack let _heroId = heroId let _dragonId = dragonId interface IEntity with member this.GetId() = _id member this.Id with get() = (this :> IEntity).GetId() member this.HeroId with get() = _heroId member this.DragonId with get() = _dragonId member this.Attack with get() = _attack query { for dragon in unitOfWork.DragonRepository.All do leftOuterJoin punch in unitOfWork.PunchRepository.All on (dragon.Id = punch.DragonId) into _punch for punch in _punch do groupValBy punch dragon into gd select (gd) } |> Seq.toList

Потому что надо выкинуть все эти билдеры и писать SQL =) Больше нервов останется

Потому что надо выкинуть все эти билдеры и писать SQL =) Больше нервов останется

а аттрибут это я уже как ках добавил, а писать SQL я буду просто мне нужен InMemory репозиторий сперва

ясно, ну вот я выкинул как раз из-за группировок. In memory репозиторий для тестов? Может стоит inMemoryBD подключить?

Делаю сейчас обработку сообщений из кафки, может кто уже делал похожий воркфлоу? Пока не вижу простого решения. start processing if < 1 sec processing completed commit else sleep processing completed resume commit

Там время отклика есть?

где?)

Ну в воркфле

processing это просто я вызываю функцию по обработке сообщения, она может занять скажем до 10 секунд, а может и несколько миллисекунд, т.к. там запись в базу с ретраями

Ну оперируй фреймами времени

расшифруй плиз)

Условно у тебя есть кортеж, состоящий из времени и состояния

Дальше ты этот стрим фолдируешь

Как тебе надо

Сложно) Можешь псевдокод привести?

Ну смотри

Есть счётчик времени

Ты в нем отсчитываешь тики

в акторе?

Далее у тебя есть статус операции

Завязанный на время

Это все приходит в виде некоего потока

При матчинге можно задать правила обработки

А, ты про это) Да, если у меня есть статус и сколько времени прошло, то что сделать это понятно. Вопрос главный как их получить

А, ты про это) Да, если у меня есть статус и сколько времени прошло, то что сделать это понятно. Вопрос главный как их получить

Ну отдельный поток исполнения по идее

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