Richard

@pretzelhands.com

🥨 Professional pretzel 🐘 PHP, .NET and JavaScript 🧑🏼‍💻 Swiss army chainsaw of problem-solving ☀️ Warm presence and hype man 🎨 Part-time con husband @ https://kyoti.art 👾 Helping hand @gamedevgraz.bsky.social If you're reading this, come say hi!

A reflective, shiny A5-sized package with lots of custom packaging decals lying on a doormat

Jowi in the Button Festival booth showing a peace sign and smiling extremely happily

Me and Jowi behind our fully set up and decorated booth at Button Festival

An undecorated store booth built out of modular panels covered in white mesh

A panoramic view of Button Festival showing people playing video games on couches and socializing

A collection of Oddish stickers laid out in a 3-by-4 grid. The sticker say "Broke but free"

A Cricut plotter and an Epson inkjet in their packagings on a makeshift workshop table

Jowi proudly presenting her first design. An axolotl saying "Ich will nicht mehr" (I don't want to anymore)

A panoramic view of Vienna Comic Con's Artist Alley full of people

Maslow's hierarchy of needs, but every need is Punschkrapfen

[EN]: An invite for me to vote in the elections of my local chapter of the chamber of commerce. But since the last two elections in the previous months went really against my wishes, I'd rather not vote in this one anymore.

A pile of notes, most of them folded as paper planes

A picture of a mirror. In the reflection you can see from back to front: Me, kneeling behind my wife in a green jacket and beige pants. My wife, sitting on the floor cross-legged wearing a white t-shirt and blue pyjama pants. On my wife's lap is our pug, comfortable resting and looking at the mirror slightly confused

A macOS finder view with a folder called "Documentation" showing a list of folders called:

alpinejs.dev
laravel.com
livewire.laravel.com
sponsors.tenancyforlaravel.com
tenancyforlaravel.com

A screenshot of a bash command with a comment saying:

# Save all of the Laravel docs locally in a folder called laravel.com

wget --recursive --level=1 --no-parent --convert-links --page-requisites --html-extension --domains=laravel.com https://laravel.com/docs

A test verifying all clients are shown correctly.

$A piece of test code that reads as follows: beforeEach(fn() => useTenant()); afterEach(fn() => disableTenant()); test('it shows all clients on overview page', function () { $this->actingAs($this->consultant); $response = $this->get(tenant_route('clients.index')); $response->assertStatus(200); $response->assertSeeInOrder( $this->clients ->pluck('name') ->all() ); });$

A baking tray showing 14 pieces of assembled cookies with jam in their center

a piece of parchment paper with approximately 50 Vanillekipferl lined up on it

A view into a pot containing a brown stew of pork, morels, carrots and scallion

A screenshot showing a customer creation form with an unbalanced text explanation

A portion of rice on the left, with some Pad Kra Pao on the right and rounded out by an over-easy egg

A top-down photo showing a playtest of our pizza game with 4 people

$My solution for Day 4, Part 2 of Advent of Code module Day3Solution open System.Text.RegularExpressions let multiplierRegex = @"mul$(\d{1,3}),(\d{1,3})$|don\'t|do" let regexOptions = RegexOptions.Multiline let extractMultipliers input = let mutable enabled = true let multiplierTokens = seq { for m in Regex.Matches(input, multiplierRegex, regexOptions) do match m.Value with | "do()" -> enabled <- true None | "don't()" -> enabled <- false None | _ when enabled -> Some((int m.Groups[1].Value, int m.Groups[2].Value)) | _ -> None } Seq.choose id multiplierTokens let calculateSum input = extractMultipliers input |> Seq.map (fun (left, right) -> left * right) |> Seq.sum$

$My solution to Day 4, Part 1 of Advent of Code let multiplierRegex = @"mul$(\d{1,3}),(\d{1,3})$" let regexOptions = RegexOptions.Multiline let extractMultipliers input = Regex.Matches(input, multiplierRegex, regexOptions) |> seq |> Seq.map (fun m -> (int m.Groups[1].Value, int m.Groups[2].Value)) let calculateSum input = extractMultipliers input |> Seq.map (fun (left, right) -> left * right) |> Seq.sum$

My little pug Vanya sitting in a grey hoodie outside a cafe in Munich

A small Russian blue cat resting on my wife's arm while we drove it to my parents

My solution for Day 2, Part 2 of #adventofcode

module Day2Solution

open System

let lineToReport (line: string) =
line.Split([|' '|], StringSplitOptions.RemoveEmptyEntries)
|> Array.map int

let between low high (difference: int) =
let difference = Math.Abs difference
low <= difference && difference <= high

let isLinear (report: int array) predicate =
report
|> Array.pairwise
|> Array.map (fun (left, right) -> predicate left right && between 1 3 (left - right))
|> Array.filter not
|> Array.length
|> fun violations -> violations <= 1

let validateReport (report: int array) =
let incrementing = isLinear report (<)
let decrementing = isLinear report (>)

incrementing || decrementing

let countSafeReports input =
input
|> Array.map lineToReport
|> Array.map validateReport
|> Array.filter id
|> Array.length

My solution for Day 2, Part 1 of Advent Of Code

module Day2Solution

open System

let lineToReport (line: string) =
line.Split([|' '|], StringSplitOptions.RemoveEmptyEntries)
|> Array.map int

let between low high (difference: int) =
let difference = Math.Abs difference
low <= difference && difference <= high

let isIncrementing (report: int array) =
report
|> Array.pairwise
|> Array.map (fun (left, right) -> left < right && between 1 3 (left - right))
|> Array.forall id

let isDecrementing (report: int array) =
report
|> Array.pairwise
|> Array.map (fun (left, right) -> left > right && between 1 3 (left - right))
|> Array.forall id

let validateReport (report: int array) =
let incrementing = isIncrementing report
let decrementing = isDecrementing report

incrementing || decrementing

let countSafeReports input =
input
|> Array.map lineToReport
|> Array.map validateReport
|> Array.filter id
|> Array.length

My solution to Day 1, Part 2 of the Advent of Code

let countOccurrences list item =
list
|> Array.filter ((=) item)
|> Array.length

let calculateSimilarityScore (input: string) =
let (left, right) = separateIntoLists input

left
|> Array.map (fun item -> item, countOccurrences right item)
|> Array.fold (fun acc (item, numOccurrences) -> acc + item * numOccurrences) 0

$My solution to Day 1, Part 1 of Advent of Code let splitIntoTuple (line: string) = let parts = line.Split([|' '|], StringSplitOptions.RemoveEmptyEntries) (int parts[0], int parts[1]) let separateIntoLists (input: string) = input.Split('\n') |> Array.filter (not << String.IsNullOrWhiteSpace) |> Array.map splitIntoTuple |> Array.unzip let calculateDistance (input: string) = let (left, right) = separateIntoLists input let leftList = Array.sort left let rightList = Array.sort right (leftList, rightList) ||> Array.map2 (-) |> Array.map Math.Abs |> Array.sum$