This week's code snippet, Baklava in Discus, is brought to you by Subete and the Sample Programs repo.
module Main
import System.IO.Console
import Data.List
import Data.Text.List
where
baklavaLine (n: Nat): Text
= (textOfCharList (replicate num_spaces ' ')) % (textOfCharList (replicate num_stars '*'))
where
num_spaces = if n > 10 then n - 10 else 10 -n
num_stars = 21 - 2 * num_spaces
main ()
= forS (enumFromTo 0 20) $ n
-> writel $ baklavaLine n
Below you'll find an up-to-date list of articles by me on The Renegade Coder. For ease of browsing, emojis let you know the article category (i.e., blog: ✒️, code: 💻, meta: 💭, teach: 🍎)
- ✒️ People Don’t Like to Be Deceived (by AI)
- 🍎 Generative AI in Education is Pay-to-Lose
- ✒️ My First “I Have a Toddler” Moment
- ✒️ LLMs Got Everyone Sounding the Same Now
- ✒️ 6v6 Overwatch Is a Joke
- ✒️ I Genuinely Don’t Understand Why People Tolerate Hallucinations in AI
- ✒️ Human Review of AI Output Is Not the Path Forward
- ✒️ I Made the Mistake of Visiting the Vibe Coding Subreddit
- ✒️ You’ve Fallen for the Red/Blue Button Trap
- 🍎 Another Year, Another Japan Trip
Also, here are some fun links you can use to support my work.
This document was automatically rendered on 2026-08-07 using SnakeMD.