I hereby claim:
- I am ykochi on github.
- I am ykochi (https://keybase.io/ykochi) on keybase.
- I have a public key ASDxT-tlQKxDx0qFXDg2sJbTb4mpHtLKL_6FP_tJ92Ionwo
To claim this, I am signing this object:
I hereby claim:
To claim this, I am signing this object:
| #!/usr/bin/python | |
| # coding: UTF-8 | |
| # 実行ファイルはコマンドライン引数としてパラメータを受け取り,目的関数値のみを標準出力に出力するものとする | |
| # $ ./a.out 1.2 10 | |
| # 42 | |
| # configファイルには | |
| # [varname] [vartype] [range] | |
| # を書いておく |
| (defmacro lm (exp) | |
| `(progn ,@(eval exp))) |
| #!/bin/sh | |
| #|-*- mode:lisp -*-|# | |
| #| | |
| exec ros -Q -- $0 "$@" | |
| |# | |
| (defpackage :ros.script.lightsout.3667581499 | |
| (:use :cl)) | |
| (in-package :ros.script.lightsout.3667581499) | |
| (ql:quickload :sketch :silent t) |
| (defun ->-helper (forms) | |
| (if (null forms) | |
| nil | |
| (let ((form (first forms)) | |
| (first-form (->-helper (rest forms)))) | |
| (if first-form | |
| (append (list (first form)) | |
| (list first-form) | |
| (rest form)) | |
| form)))) |
| ;; | |
| ;; kirimochi | |
| ;; | |
| (ql:quickload '(alexandria | |
| split-sequence)) | |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | |
| ;; | |
| ;; Solver |