uablue.artbeta

Створено в Блакиті

Роботи українських авторів у Bluesky — з усіх тем і тегів. Ми нічого не завантажуємо — це їхні дописи.

Головна

Що набирає вподобання просто зараз: що більше вподобань у Bluesky і що свіжіша робота, то вище. Кожен автор — один раз, найкращою роботою; «+N» біля імені веде до решти.

Малюємо стрічку…
Searge :tryzub_white:@searge.twiukraine.com.ap.brid.gy
Piece of code from introduction to monads https://medium.com/@eugenesh4work/category-theory-crash-course-with-clojure-part-5-introduction-to-monads-b6369d2ef3ab (den fetch-user [id] (if (= id 1) ( Some. {: id 1 : name "Alice"}) nil)) (den fetch-orders [user] (if = (:id user) 1) ( Some. [{:order-id 101} {:order- id 102}]) nil)) (def user-orders (bind (fetch-user 1) ( fn [user] (bind (fetch-orders user) (fn [orders] (unit nil {:user user :orders orders})))))) A => #user.Some{: value {:user {:id 1, :name "Alice"}, :orders [{:order-id 101} {:order-id 102}1}}

Інші роботи · Searge :tryzub_white:

Це все поки що