Skip to content

Instantly share code, notes, and snippets.

View quasi-coherent's full-sized avatar
🤘

D.M. Donohue quasi-coherent

🤘
  • New York, New York, USA
View GitHub Profile
---
# Source: elastic-agent/templates/serviceaccount.yaml
apiVersion: v1
kind: ServiceAccount
metadata:
name: elastic-agent
labels:
helm.sh/chart: elastic-agent-0.1.0
app.kubernetes.io/name: elastic-agent
app.kubernetes.io/instance: elastic-agent
{-# OPTIONS_GHC -fno-warn-type-defaults #-}
module Main where
import Data.List ((\\))
import qualified Data.Vector as V
main :: IO ()
main = print $ sum $ primeSieveAlsoBad 50000
@quasi-coherent
quasi-coherent / Dropdown.js
Last active October 2, 2019 14:16
React basic dropdown.
"use strict";
const Semantic = require("semantic-ui-react");
exports.semanticDropdown = Semantic.Dropdown;

Keybase proof

I hereby claim:

  • I am quasi-coherent on github.
  • I am ddonohue (https://keybase.io/ddonohue) on keybase.
  • I have a public key ASAyigWO98U9XlGlMzUV1mjtf5l_KV4f2TwBeJ5m3ZfRXAo

To claim this, I am signing this object:

@quasi-coherent
quasi-coherent / keybase.md
Created December 3, 2018 15:43
keybase.md

Keybase proof

I hereby claim:

  • I am quasi-coherent on github.
  • I am ddonohue (https://keybase.io/ddonohue) on keybase.
  • I have a public key ASCSo5X_1vPv5oeW8fjKPtG464ECr8vuuRtm6L8bee29CAo

To claim this, I am signing this object:

@quasi-coherent
quasi-coherent / test.hs
Last active November 27, 2018 23:05
Stream to port example
#!/usr/bin/env stack
-- stack --resolver lts-12.7 script
import Conduit hiding (connect)
import qualified Data.Conduit.Binary as CB
import qualified Data.Conduit.Network as CN
import qualified Data.Conduit.Process as CP
import qualified Data.Text as T
import Network.Socket
import System.Directory
import System.Environment
@quasi-coherent
quasi-coherent / test.hs
Created November 27, 2018 23:03
Stream to port example
#!/usr/bin/env stack
-- stack --resolver lts-12.7 script
import Conduit hiding (connect)
import qualified Data.Conduit.Binary as CB
import qualified Data.Conduit.Network as CN
import qualified Data.Conduit.Process as CP
import qualified Data.Text as T
import Network.Socket
import System.Directory
import System.Environment