wat-aro wat-aro

wat-aro / curry.html

Last active March 14, 2016 10:38 — forked from machida/html_practice.html

HTMLの練習（このレシピにマークアップをしてみましょう）

wat-aro / Rakefile

Created March 11, 2016 06:14

Rakefile

	CC = "gcc"

	task :default => "print_reverse"

	file "print_reverse" => "print_reverse.o" do
	sh "#{ CC } -o print_reverse print_reverse.o"
	end

	file "print_reverse.o" => "print_reverse.c" do
	sh "#{ CC } -c print_reverse.c"

wat-aro / eval.scm

Created March 24, 2016 13:55

	(define (eval exp env)
	(cond ((self-evaluating? exp) exp)
	((variable? exp) (lookup-variable-value exp env))
	((quoted? exp) (text-of-quotation exp))
	((assignment? exp) (eval-assignment exp env))
	((definition? exp) (eval-definition exp env))
	((if? exp) (eval-if exp env))
	((lambda? exp)
	(make-procedure (lambda-parameters exp)
	(lambda-body exp)

wat-aro / combination.rb

Last active September 21, 2016 13:30

	class Hoge
	def combination(array, num)
	if array.empty? \|\| num == 0
	[]
	elsif num == 1
	array.map{ \|elem\| [elem] }
	else
	rest = array.drop(1)
	combination(rest, num - 1).map{ \|elem\| [array.first] + elem } +
	combination(rest, num)

wat-aro / DateTimeParser.hs

Last active November 1, 2017 17:30

	{-# LANGUAGE OverloadedStrings #-}

	module DateTimeParser where

	import Control.Applicative
	import Data.Attoparsec.Text hiding (take)
	import Data.Char
	import qualified Data.Text as T

	data YMD = YMD Int Int Int deriving Show

wat-aro / Main.elm

Created September 28, 2018 05:02

SVG Clock

	module Main exposing (Model, init, main)

	import Browser
	import Html exposing (..)
	import Html.Attributes as Attributes
	import Html.Events exposing (onClick)
	import Svg
	import Svg.Attributes
	import Task
	import Time