daiksy

package com.github.gist.daiksy

/**
 * エドウィン・モーガンという現代詩人の作品に
 * "message clear"というものがあります.
 * http://www.elgin.free-online.co.uk/misc/message.htm
 *
 * これは,1968年の彼の詩集に含まれている作品で,
 * コンピュータが文章を書いたらどうなるか,
 * という当時流行した議論をテーマに作られた作品です.

daiksy

case class Hentai(val smKind: SMKind.Type) {
  def slap = {
    smKind match {
      case SMKind.S => "てめぇ、なにするんだ！"
      case SMKind.M => "もっと！！！"
    }
  }
}

object SMKind extends Enumeration {

daiksy

object Hentai {
  def slapToS = "てめぇ、なにするんだ！"
  def slapToM = "もっと！！！"
}

daiksy

#!/usr/bin/python
# -*- coding: utf-8 -*-

import sys
import urllib2
import json
import os
import tempfile
import codecs
from optparse import OptionParser

daiksy

object jojo extends App {

  def isPrime(n: Int) = {
    if (n < 2) {
      false
    } else {
      (2 to n - 1).exists(n % _ == 0) == false
    }
  }

daiksy

##gistでmarkdownを書くテスト

val tmp = if (i == 0) {
	"hello"
} else {
	"bye"
}

daiksy

/**
 * 『すごいHaskell』で実装例が出ていたコラッツ数列をScalaで実装
 *
 * コラッツ数列とは：
 * ・任意の自然数から開始する
 * ・数が1ならば、終了
 * ・数が偶数ならば、2で割る
 * ・数が奇数ならが、3倍して1を足す
 * ・新しい値でこのアルゴリズムを繰り返す
 *

daiksy

/**
 * 『すごいHaskell』で実装例が出ていたコラッツ数列をScalaで実装
 *
 *  https://gist.github.com/3986524 が末尾再帰になってないので
 *  なおしてみた.
 *
 * コラッツ数列とは：
 * ・任意の自然数から開始する.
 * ・数が1ならば,終了.
 * ・数が偶数ならば,2で割る.

daiksy

  def reverse[A](xs: List[A]): List[A] = {
    (List.empty[A] /: xs){(x, y) => y :: x}
  }

の方が読みやすい？

でも右畳込みの場合, この書き方だとWindowsでバックスラッシュが円記号になるから,直感的じゃなくなるんだよな…

daiksy

/** 
*  http://projecteuler.net/problem=1
*  http://odz.sakura.ne.jp/projecteuler/index.php?cmd=read&page=Problem%201
*/
(1 to 999) filter(i => i % 3 == 0 || i % 5 == 0) sum