Skip to content

Instantly share code, notes, and snippets.

View srid's full-sized avatar
🌤️
a smoothly flowing moment of clear experiencing

Sridhar Ratnakumar srid

🌤️
a smoothly flowing moment of clear experiencing
View GitHub Profile
@srid
srid / READMD.md
Last active October 19, 2023 17:41
Dioxus components cannot have `key` argument?
❯ tree $(nix build --no-link --print-out-paths github:EmaApps/ema#ghc92)/lib/ghc-*/*ghc*
/nix/store/a0a38aapnpbx9bs7dp5iizja84gv0jdb-ema-0.8.2.0/lib/ghc-9.2.4/aarch64-osx-ghc-9.2.4
├── ema-0.8.2.0-83X1iKLU3OkJlvTakD9Ohj
│   ├── Ema
│   │   ├── App.dyn_hi
│   │   ├── App.hi
│   │   ├── Asset.dyn_hi
│   │   ├── Asset.hi
│   │   ├── CLI.dyn_hi
│   │   ├── CLI.hi
@srid
srid / index.html
Created August 2, 2022 16:21
One-page Tailwind site
<!DOCTYPE html>
<html lang="en">
<head>
<meta charset="UTF-8" />
<meta name="viewport" content="width=device-width, initial-scale=1.0" />
<meta http-equiv="X-UA-Compatible" content="ie=edge" />
<link href="https://unpkg.com/tailwindcss@2/dist/tailwind.min.css" rel="stylesheet" type="text/css"></link>
<title>FP Slack</title>
</head>
<body class="overflow-y-scroll mx-auto my-8 md:w-64">
@srid
srid / ema-indicator.html
Created July 27, 2022 01:38
Ema v1 indicator
<div class="absolute top-0 left-0 p-2" style="display: none;" id="ema-indicator">
<div
class="
flex overflow-hidden items-center p-2 text-xs gap-2
h-8 border-2 border-gray-200 bg-white rounded-full shadow-lg
transition-[width,height] duration-500 ease-in-out w-8 hover:w-full
"
id="ema-status"
title="Ema Status"
>
(program
(let
(nonrec)
(datatypebind
(datatype (tyvardecl Unit (type)) Unit_match (vardecl Unit Unit))
)
(datatypebind
(datatype
(tyvardecl Bool (type))
namespace Feather.Template
open System.IO
open System.Text
open Microsoft.AspNetCore.Http
open Microsoft.AspNetCore.Hosting
open Microsoft.Extensions.DependencyInjection
open DotLiquid
open Giraffe
open FSharp.Control.Tasks
@srid
srid / Boring Haskell.md
Created March 23, 2021 16:36
Boring Haskell

Boring Haskell

Some in the Haskell community set out to create Boring Haskell (aka. Simple Haskell) as a philosophical approach towards Haskell development that emphasizes practicality more than academic perfection.

Manifestos

Discussions

-- | Like `unsafeMapIncremental` but the patch function also takes the old
-- target.
unsafeMapIncrementalWithOldValue ::
(Reflex t, Patch p, Patch p') =>
(PatchTarget p -> PatchTarget p') ->
(PatchTarget p -> p -> p') ->
Incremental t p ->
Incremental t p'
unsafeMapIncrementalWithOldValue f g x =
let x0 = currentIncremental x
@srid
srid / neuron-migrate-wikilinks.sh
Last active November 1, 2020 20:23
neuron-migrate-wikilinks.sh
@srid
srid / neuron.dhall
Last active August 11, 2020 14:55
multi site neuron.dhall
{ formats =
[ "markdown", "org" ],
sites =
[ { siteTitle =
"My private zettelkasten"
, theme =
"brown"
},
{ siteTitle =