Size: a a a

F# Flood: Ручная работа

2020 February 11

R

Roman in F# Flood: Ручная работа
ну в смысле чем он хорош?
источник

оГ

отец Григорий in F# Flood: Ручная работа
вот :) пруф!
источник

оГ

отец Григорий in F# Flood: Ручная работа
зафолдишь потом :)
источник

оГ

отец Григорий in F# Flood: Ручная работа
Roman
ну в смысле чем он хорош?
фентези
источник

оГ

отец Григорий in F# Flood: Ручная работа
прикольно
источник

R

Roman in F# Flood: Ручная работа
Мне диалоги не зашли, игра актеров так себе, саундтрек не особо подходит для такого сеттинга и тп
источник

оГ

отец Григорий in F# Flood: Ручная работа
а не как в Странжер Сингс 3 - русские учёные в бункере посерди америки
источник

R

Roman in F# Flood: Ручная работа
ну фентези ж не гарант успеха
источник

R

Roman in F# Flood: Ручная работа
Roman
Мне диалоги не зашли, игра актеров так себе, саундтрек не особо подходит для такого сеттинга и тп
одно только слово destiny доебало за первые полторы серии
источник

R

Roman in F# Flood: Ручная работа
короч я хотел, чтоб мне понравилось, но не смог
источник

R

Roman in F# Flood: Ручная работа
теперь пытаюсь понять, за что он нравится другим
источник

Д

Диёр in F# Flood: Ручная работа
Roman
теперь пытаюсь понять, за что он нравится другим
ну там парочка хороших экшонов была и в целом соответствует первым рассказам
источник

Д

Диёр in F# Flood: Ручная работа
а они на фанфик были похожи
источник

AH

Ayrat Hudaygulov in F# Flood: Ручная работа
Nikolay M
let tryUploadFileAsync fileType =
 async {
   match fileType with
   | "image" ->
     return Some 1L |> Result.Ok // 1L is file id
   | "uploading_not_required" -> return None |> Result.Ok
   | _ -> return Result.Error (sprintf "%s uploading is not supported" fileType)
 }

let files = []
let uploadedFiles = System.Collections.Generic.List<int64>(files.Length)

for file in files do
 let! uploadResult = tryUploadFileAsync file
 match uploadResult with
 | Result.Ok (Some r) ->
   uploadedFiles.Add(r)
 | Result.Ok None ->
   uploadedFiles.Add(-1L)
 | Result.Error e -> return e |> Result.Error

m.UploadedFiles <- uploadedFiles

return serialize m |> Result.Ok
let tryUploadFileAsync fileType =
 async {
   match fileType with
   | "image" ->
     return Some 1L |> Result.Ok // 1L is file id
   | "uploading_not_required" -> return None |> Result.Ok
   | _ -> return Result.Error (sprintf "%s uploading is not supported" fileType)
 }

let files = []

let maybeAsyncUploadedFiles: Async<Result<ResizeArray<int64>, string>> =
 AsyncSeq.ofSeq files
 |> AsyncSeq.mapAsync tryUploadFileAsync
 |> AsyncSeq.fold(fun maybeList file ->
   maybeList
   |> Result.bind (fun (list: ResizeArray<_>) ->
     match file with
     | Result.Ok   (Some r) -> list.Add r  ; Result.Ok list
     | Result.Ok    None    -> list.Add -1L; Result.Ok list
     | Result.Error e       ->               Result.Error e)
   ) (Result.Ok(ResizeArray()))
источник

оГ

отец Григорий in F# Flood: Ручная работа
Ayrat Hudaygulov
let tryUploadFileAsync fileType =
 async {
   match fileType with
   | "image" ->
     return Some 1L |> Result.Ok // 1L is file id
   | "uploading_not_required" -> return None |> Result.Ok
   | _ -> return Result.Error (sprintf "%s uploading is not supported" fileType)
 }

let files = []

let maybeAsyncUploadedFiles: Async<Result<ResizeArray<int64>, string>> =
 AsyncSeq.ofSeq files
 |> AsyncSeq.mapAsync tryUploadFileAsync
 |> AsyncSeq.fold(fun maybeList file ->
   maybeList
   |> Result.bind (fun (list: ResizeArray<_>) ->
     match file with
     | Result.Ok   (Some r) -> list.Add r  ; Result.Ok list
     | Result.Ok    None    -> list.Add -1L; Result.Ok list
     | Result.Error e       ->               Result.Error e)
   ) (Result.Ok(ResizeArray()))
😍
источник

IC

Iλyα Che in F# Flood: Ручная работа
Диёр
в дискорде кстати вроде есть подсветка кода
Так он на электроне.
источник

NM

Nikolay M in F# Flood: Ручная работа
Ayrat Hudaygulov
let tryUploadFileAsync fileType =
 async {
   match fileType with
   | "image" ->
     return Some 1L |> Result.Ok // 1L is file id
   | "uploading_not_required" -> return None |> Result.Ok
   | _ -> return Result.Error (sprintf "%s uploading is not supported" fileType)
 }

let files = []

let maybeAsyncUploadedFiles: Async<Result<ResizeArray<int64>, string>> =
 AsyncSeq.ofSeq files
 |> AsyncSeq.mapAsync tryUploadFileAsync
 |> AsyncSeq.fold(fun maybeList file ->
   maybeList
   |> Result.bind (fun (list: ResizeArray<_>) ->
     match file with
     | Result.Ok   (Some r) -> list.Add r  ; Result.Ok list
     | Result.Ok    None    -> list.Add -1L; Result.Ok list
     | Result.Error e       ->               Result.Error e)
   ) (Result.Ok(ResizeArray()))
🥴
источник

Д

Диёр in F# Flood: Ручная работа
Iλyα Che
Так он на электроне.
нуууу
источник

Д

Диёр in F# Flood: Ручная работа
да
источник

AH

Ayrat Hudaygulov in F# Flood: Ручная работа
шо не так???
источник