zeptometer

;-*-Lisp-*-
(in-package :stumpwm-user)

;;壁紙を設定
(run-shell-command "feh --bg-scale ~/Documents/minecraft.jpg")

;;;よく使うコマンド/キーバインドの設定
(set-prefix-key (kbd "C-q"))

(defcommand opera () ()

zeptometer

#include <stdio.h>
#define M_MAX 18

int m[M_MAX],k[M_MAX];

void doit(int n){
  int i=0,j=0,a,l,r,nl,nr;
  if(n==1){printf("X");return;}

  for(i=0;n>k[i];i++);

zeptometer

wwwwv                ; \abcd.a
wv                   ; id
ww                   ; \xy.xy 
  WWwv
ww                   ; \xy.yx
  Wwwv
wwww                 ; \mnfx.mf(nfx) := plus
  WWWww
  Www
  WWWWWWwwww

zeptometer

(defpackage :grass 
  (:use :common-lisp
	:split-sequence
	:babel
	:ppcre
	:babel-streams)
  (:export :grass-eval
	   :str-to-grass))

(in-package grass)

zeptometer

(defun singlep (x) (and (consp x) (not (consp (cdr x)))))

(defun lambda-form? (form)
  (and (consp form)
       (eq (car form) 'lambda)
       (every #'atom (cadr form))
       (singlep (cddr form))))

(defun normalize-lambda-form (form)
  (labels ((devide-lambda-list (vars body)

zeptometer

(defpackage :infix
  (:use :cl)
  (:export #:add-operator
	   #:add-infix-function
	   #:install-default-operators-and-infix-functions))

(in-package :infix)

(defconstant default-operators 
  '((1 ** expt :right)

zeptometer

import java.util.*;

public class aoj0509{
    static final int rowmax = 10000;

    public static void main(String[] args){
	Scanner scn = new Scanner(System.in);
	int num,mode;
	Row[] rows = new Row[rowmax];

zeptometer

import java.util.*;

public class Main{
	public static void main(String[] args){
		Scanner scn = new Scanner(System.in);
		int row,col;
		int[] cols;
		int cnt_min = 10*10000;

		row = scn.nextInt();