Skip to content

Instantly share code, notes, and snippets.

View takeokunn's full-sized avatar
🌴
On vacation

take takeokunn

🌴
On vacation
View GitHub Profile
(defparameter *coins* `(1 5 10 50 100 500))
(defparameter *have-coins* `(3 2 1 3 0 2))
(defparameter *sum* 620)
(defun calc (index sum answer)
(let* ((number (min (floor sum (nth index *coins*)) (nth index *have-coins*)))
(new-sum (- sum (* number (nth index *coins*))))
(new-answer (+ answer number)))
(values new-sum new-answer)))
precision mediump float;
uniform float t; // time
uniform vec2 r; // resolution
const float PI = 3.1415926;
const vec3 red = vec3(1.0, 0.0, 0.0);
const vec3 yellow = vec3(1.0, 1.0, 0.2);
const vec3 white = vec3(1.0);
const vec3 black = vec3(0.15, 0.15, 0.15);
const vec3 gray = vec3(0.4, 0.4, 0.4);
@takeokunn
takeokunn / fetch_bank_and_branches.php
Created January 5, 2018 12:10
銀行/支店一覧を取得コード
<?php
declare(strict_types = 1);
namespace Hoge;
class FetchBanks
{
/**
* Execute the console command.
*