λ : j

module jagajaga where

ι : ∀ {J : Set} → J → J
ι x = x

me : Person
  name      ≔ Arseniy Seroka
  email     ≔ a@jagajaga
  born      ≔ 29.04.1993 · Saint Petersburg
  lives     ≔ Paris
  serokell  ≔ founded
  blooper   ≔ building
  studied   ≔ Mathematics ∧ CS  @  ITMO  ↦  docent ⊢ FP
  cinema    ≔ reel ∷ cinema
  directing ≔ lenfilm  ↦  imdb
  music     ∞ scrobbles
  hobbies   ≔ { tennis , extreme enduro , ski
              , photography , literature }
  pgp       ≔ 0xBB88A32CB051FD00
  elsewhere ≔ ⟨ github · linkedin · instagram ⟩
  builds    ≔ apps

apps : List (App me)
apps = coaurora     -- a WebGL aurora that is a Store comonad
     ∷ redline      -- menu-bar dashboard for Claude Code
     ∷ SpotifyBar   -- Spotify now-playing in the macOS menu bar
     ∷ []

я  :  ι me ≡ me
я  =  β me  ∎