lexa@qexat

let lexa = User.get "lexa"

val lexa : User.t = <abstr>

print_endline (User.about lexa)

my name is clarisse, but people commonly call me lexa. I go by they/them. I am a former student in computer science speaking French and English. I like category theory, linguistics, music and graphic design. I am one of the permanent members of the producer group qexat.

- : unit = ()

print_endline Group.(page (of_user lexa))

https://qexat.com

- : unit = ()

let|> link = Fun.flip @@ List.iter (User.links lexa) in

Printf.printf "* %s\n" link.title

• bearblog
• bluesky
• codeberg
• github

- : unit = ()

User.support lexa

Support lexa on Ko-Fi: https://ko-fi.com/qexat

let open Db in

let& db = open_path "cool_people.db" in

db

|> select [ "name"; "page" ]

|> sort_by [ "name" ]

|> pp

|> print_endline

- : unit = ()