aboutsummaryrefslogtreecommitdiffhomepage
path: root/index.html.pm
diff options
context:
space:
mode:
Diffstat (limited to 'index.html.pm')
-rw-r--r--index.html.pm36
1 files changed, 36 insertions, 0 deletions
diff --git a/index.html.pm b/index.html.pm
new file mode 100644
index 0000000..2bbb0ad
--- /dev/null
+++ b/index.html.pm
@@ -0,0 +1,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"]))))
+ )
+) \ No newline at end of file