Goheeca

{-# LANGUAGE TemplateHaskell #-}
module Main where

import Reificator

main :: IO ()
main = pure $$(guardTH (operationTest 11 7 4) [|| () ||])

Goheeca

#!/usr/bin/env stack
-- stack --resolver lts-18.5 script --package template-haskell --package refined
{-# LANGUAGE TemplateHaskell, TypeApplications #-}

import Refined
import Data.Either

import RefinedTestDefinitions

refinedTypeAppliedTest :: RefinedTest Int

Goheeca

(load "nilp.lisp")

(eval
  (read-from-string
    (write-to-string
      (nility
        '(loop for i below 10
               do (format t "~@(~:r hello world!~)~%" i))))))

Goheeca

#!/usr/bin/sbcl --script
(load "~/.sbclrc")
(ql:quickload '("bordeaux-threads") :silent t)

(defun color-formatter (color)
  (format nil "~a[~am~~?~a[m" #\Esc color #\Esc))

(defvar *output-lock* (bt:make-lock "OUTPUT LOCK"))

(defmacro safe-format (stream fmt &rest args)

Goheeca

(ql:quickload "agnostic-lizard")

Goheeca

#!/usr/bin/sbcl --script
(require :sb-posix)
(require :sb-bsd-sockets)

;;; Globals
;; IPC
(defvar *pid* nil)
(defvar *socket-path* "/tmp/socket")
(defvar *socket* nil)
;; MT

Goheeca

#!/usr/bin/sbcl --script

#|

Usage
=====
$ ./braille-pixels.lisp [path]

Main
====

Goheeca

#||| Python or JS that is the question. |#

#|| Let's define a JS function, provided we're in JS. |#

#+moody-js"
function fact(n) {
  if (n == 0) return 1
  else return n * fact(n - 1)
}
"

Goheeca

[user]
	name = Goheeca
	email = [email protected]
[color]
	ui = auto
[color "branch"]
	current = yellow reverse
	local = yellow
	remote = green
[color "diff"]

Goheeca

from fractions import Fraction
import random
from itertools import zip_longest


class Field(object):
    def __init__(self):
        self.characteristic = None

    def __call__(self, value):