aboutsummaryrefslogtreecommitdiffhomepage
path: root/index.html.pm
blob: 2bbb0add6b7c398298b057198a8ee1d89406dd8e (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
#lang pollen

◊(require string-interpolation)

◊`(main ([class "flex flex-col justify-around"])
    (div ([class "mt-4 mb-10"])
       (h1 ([class "my-2 text-3xl leading-relaxed text-center"])
           "Writing programs is hard —")
       (p ([class "my-2 sm:text-lg leading-relaxed text-center"])
           "Most of the tools and languages (make it easy to) add unnecessary complexity.")
       (p ([class "my-2 sm:text-lg leading-relaxed text-center"])
           "This creates unnecessary cognitive load.")
       (p ([class "my-2 sm:text-lg leading-relaxed text-center"])
           "If we constantly battle cognitive load, we get exhausted, unhappy and frustrated.")
    )
    (div ([class "mt-10 mb-4"])
       (h1 ([class "my-2 text-3xl leading-relaxed text-center"])
           "but it doesn't have to be.")
       (p ([class "my-2 sm:text-lg leading-relaxed text-center"])
           "There are tools and techniques that manage complexity comparatively well:")
       (div ([class "my-4 mx-auto"])
        ,(->badges "Haskell, Nix, Elixir, Erlang, Rust, Clojure, Racket, Category Theory, Lenses")
       )
       (p ([class "my-2 sm:text-lg leading-relaxed text-center"])
           "Using those " (span ([class "italic"]) "reduces") " cognitive load.")
       (p ([class "my-2 sm:text-lg leading-relaxed text-center"])
           "So that you can be energetic, happy and joyful while coding.")
    )
    (div ([class "fixed right-5 bottom-20"])
      (a ([href "/meetup.html"]
          [class ,"inline-flex items-center gap-2 text-zinc-200 hover:text-[@{jordy}] focus-visible:text-[@{jordy}] duration-300"] [target "_blank"] [rel "noreferrer"])
         "Interested? Have a look"
          (svg ([xmlns "http://www.w3.org/2000/svg"] [fill "none"] [viewBox "0 0 24 24"] [stroke-width "1.5"] [stroke "currentColor"] [class "size-6"])
            (path ([stroke-linecap "round"] [stroke-linejoin "round"] [d "M13.5 4.5 21 12m0 0-7.5 7.5M21 12H3"]))))
    )
)