punund

main:
   header:
      - EXPLORE THE...
      - EXPLORA EL...
   menu:
      - the sea.png
      -
         - THE SEA
         - MAR
      - geishas.png

punund

import * as ē from 'three'
import { evolve, multiply, pipe, times } from 'ramda'

// import { OrbitControls } from '../../mod/OrbitControls.js'

import { rnd, RN } from '../../mod/rnd.js'
import { createNoise2D } from 'simplex-noise'

import { mergeCurves, curves } from '../../data/curves.js'
import * as xyz from '../../fun/xyz.js'

punund

Keybase proof

I hereby claim:

• I am punund on github.
• I am punund (https://keybase.io/punund) on keybase.
• I have a public key ASCGPt86DsNnvnpXxUx57AIJzjBJLBBVFSjE8NDX3RHbawo

To claim this, I am signing this object:

punund

{
  "count": 10,
  "locale": "en_UK",
  "product": [
    {
      "name": "KD55X8509C Smart 3D Ultra HD 4k 55\" LED TV",
      "maker": "Sony",
      "brand": "Bravia",
      "price": {
        "amount": 102.95,

punund

(function (){ var slice = [].slice;var hasProp = {}.hasOwnProperty;var bind = function(fn, me){return function(){ return fn.apply(me, arguments); };};var extend = function(child, parent) {for (var key in parent) {if (hasProp.call(parent, key)) child[key] = parent[key];}function ctor() { this.constructor = child; }ctor.prototype = parent.prototype;child.prototype = new ctor();child.__super__ = parent.prototype;return child;};var indexOf = [].indexOf || function(item) {for (var i = 0, l = this.length; i < l; i++) {if (i in this && this[i] === item) return i;} return -1; };var modulo = function(a, b) { return (+a % (b = +b) + b) % b; }; return function () {
        return alert('hi');
      };})();

punund

data Tree a = Node a (Forest a)
type Forest a = [Tree a]

punund

leap ∷ Coor → Int2 → WithProblem Maybe Move
leap src dxy = do
   let dst = src ~+ dxy
   sqr ← squareAtM dst
   kind ← captureM $ colorOnSquare sqr
   return $ case kind of
      SimpleMove -> [ Relocate src dst ]
      CaptureMove -> [ Vacate dst, Relocate src dst ]

-- | linear movement by vector ij :: Int2

punund

{- монада это необязательно последовательное исполнение -}

import Control.Monad

newlist ∷ [(Int, Int)]
newlist =
   do x <- [1..3]
      y <- [11..12]
      guard $ x + y > 13
      return (x, y)

punund

FROM ubuntu

RUN apt-get update

RUN DEBIAN_FRONTEND=noninteractive apt-get install postfix postfix-pcre  -y --force-yes
RUN DEBIAN_FRONTEND=noninteractive apt-get install syslog-ng syslog-ng-core  -y --force-yes

ADD etc /etc/
RUN cp /etc/resolv.conf /etc/services /var/spool/postfix/etc/

punund

for i in *; do
  ((c=0))
  for j in $i/*; do
    ((c++))
    mv $j $j-$c
  done
done