peterszerzo

const cond = (condition, value) => (condition ?
  {
    state: value,
    or(obj) {
      return this 
    },
    valueOr(defaultValue) {
      return this.state
    }
  }

peterszerzo

const canvasSketch = require("canvas-sketch");
const utils = require("./utils");

const dim = 1024;

const settings = {
  dimensions: [dim, dim],
  animate: true,
  duration: 30
};

peterszerzo

const canvasSketch = require("canvas-sketch");

const dim = 1000;

const range = n => [...Array(n).keys()];

const settings = {
  dimensions: [dim, dim],
  animate: true,
  duration: 30,

peterszerzo

module Main exposing (main)

import Browser
import Dict
import Html exposing (..)
import Html.Events exposing (onClick)
import Mark

peterszerzo

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

peterszerzo

(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

peterszerzo

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

peterszerzo

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)

peterszerzo

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]

peterszerzo

<script lang="ts">
  type Pet = Fish | Bird;

  interface Fish {
    type: "fish";
    isLarge: boolean;
  }

  interface Bird {
    type: "bird";