This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
I am attesting that this GitHub handle peterszerzo is linked to the Tezos account tz1Qd57kL3wjCdmhUBaHJVvDaPcBcq79nik9 for tzprofiles | |
sig:edsigtsnLtDTvKMcRkpMdMmw4reKBXTG72iJ7DzYKbUAyw1LAppp6majPRmUjwLQmZ3zgxHwwgAqEgRTRZFQ8qMtJhfVJMVGNZh |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
import equals from "ramda/src/equals"; | |
export interface Undoable<T> { | |
_current: T; | |
_prevs: Array<T>; | |
_nexts: Array<T>; | |
} | |
export const create = <T>(val: T): Undoable<T> => ({ | |
_current: val, |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
<script lang="ts"> | |
type Pet = Fish | Bird; | |
interface Fish { | |
type: "fish"; | |
isLarge: boolean; | |
} | |
interface Bird { | |
type: "bird"; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
import mapAccum from "ramda/src/mapAccum"; | |
const removeConsecutiveEmptyLines = (val: string): string => | |
mapAccum( | |
(previous: null | string, current: string) => { | |
return [current, previous === "" && current === "" ? null : current]; | |
}, | |
null, | |
val.split("\n") | |
)[1] |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
module CustomHooks where | |
import Prelude | |
import Data.Maybe (Maybe(..), maybe) | |
import Data.Newtype (class Newtype) | |
import Data.DateTime.Instant (unInstant) | |
import Data.Nullable (Nullable, notNull, null) | |
import Data.Time.Duration (Milliseconds(..)) | |
import Effect (Effect) | |
import Effect.Now (now) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
module Main exposing (main) | |
import Browser | |
import Element as Element | |
import Element.Background as Background | |
import Element.Events as Events | |
import Element.Font as Font | |
import Html exposing (Html, button, div, text) | |
import Html.Events exposing (onClick) | |
import Reader |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(ns floorplan.core | |
(:require [quil.core :as q] | |
[quil.middleware :as m])) | |
(defn setup [] | |
; Set frame rate to 30 frames per second. | |
(q/frame-rate 30) | |
; Set color mode to HSB (HSV) instead of default RGB. | |
(q/color-mode :hsb) | |
; setup function returns initial state. It contains |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
module TicTacToe where | |
import Control.Monad.State | |
import Data.Char | |
import Data.List | |
import qualified Data.Map as Map | |
import Data.Maybe | |
import qualified System.Process as Process | |
-- Cell |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
module Main exposing (main) | |
import Browser | |
import Dict | |
import Html exposing (..) | |
import Html.Events exposing (onClick) | |
import Mark | |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
const canvasSketch = require("canvas-sketch"); | |
const dim = 1000; | |
const range = n => [...Array(n).keys()]; | |
const settings = { | |
dimensions: [dim, dim], | |
animate: true, | |
duration: 30, |
NewerOlder