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 |