Skip to content

Instantly share code, notes, and snippets.

View keizo042's full-sized avatar

Koichi Nakanishi keizo042

  • japanese company
  • Japan
View GitHub Profile
@keizo042
keizo042 / enum_99.scala
Created March 5, 2014 10:21
九九を書いてみた。けどifのところが気持ち悪い。
(1 to 10)foreach(
x => (1 to 10)foreach(
y =>if(y !=10) print(x * y+ "\t") else println(x *y + "\t")
)
)
@keizo042
keizo042 / funcToCurried.scala
Last active August 29, 2015 13:57
カリー化した関数。Haskellとscalaでは部分適用のニュアンスが異なる気がする。あとL10が通らないのが謎感高い。
def box(x:Int)(y: Int)(z:Int)=
x * y * z
println(box(1)(2)(3))
val boxWithX = box(1)_
println(boxWithX(2)(2))
val boxWithXY =boxWithX(2)(_:Int)
// val boxWithXY =boxWithX(2)_
@keizo042
keizo042 / fizzubuzz.scala
Last active August 29, 2015 13:57
FizzBuzzをscalaで書いた。分かりやすく書けて割りと気に入っている。そういうお題じゃないとも思う。
(1 to 100).foreach{ i =>
printf("%d",i)
if(i % 3 == 0) printf("Fizz")
if(i % 5 == 0) printf("Buzz")
printf(" ")}
println
@keizo042
keizo042 / simple_sort.go
Created March 11, 2014 11:35
golangの単純ソート。
package main
import (
"fmt"
"math/rand"
)
func swap(a int,b int)(int,int){
if a > b {
return b, a
}else {
@keizo042
keizo042 / func_ptr.c
Created March 12, 2014 19:07
関数ポインタの練習。Cはメモリを直接弄れて全能感がある。
#include<stdio.h>
typedef int (*func)(int x, int y);
int cat(int, int);
int dog(int, int);
int bird(int, int);
int
main()
{
@keizo042
keizo042 / mrb_config_watch.rb
Created April 9, 2014 13:41
understand for why MRUBY_CONFIG use ternary operator .
require 'pp'
# encoding: utf-8
# Build description.
# basic build file for mruby
p MRUBY_ROOT = File.dirname(File.expand_path(__FILE__))
p MRUBY_BUILD_HOST_IS_CYGWIN = RUBY_PLATFORM.include?('cygwin')
# load build systems
#p load "#{MRUBY_ROOT}/tasks/ruby_ext.rake"
#p load "#{MRUBY_ROOT}/tasks/mruby_build.rake"
@keizo042
keizo042 / MyzipWith.hs
Last active August 29, 2015 13:59
zipWith 実装してみようと思ったけど上手くかね。わかんね。
--zipTwo :: ( a -> b -> c ) -> [a] -> [b] -> [c]
--zipTwo _ [] _ = []
--zipTwo _ _ [] = []
--zipTwo f (x:xs) (y:ys) = f x y : f xs ys
--分かった 再帰を使っているのに引数にとった関数を使おうとしているから
-- 上手くいかなかった
zipTwo :: (a -> b -> c) -> [a] -> [b] -> [c]
zipTwo f [] _ = []
zipTwo f _ [] = []
@keizo042
keizo042 / fileutils.scala
Created July 1, 2014 12:26
file io scala
import scala.io._
object FileUtils {
def main( args: Array[String] ) : Unit = {
Source.fromFile(args(0) ).foreach{
print
@keizo042
keizo042 / eratosthenes.c
Created August 8, 2014 16:14
エラトステネスの篩を実装したかったが断念
#include<stdio.h>
#include<stdlib.h>
#include<math.h>
#define LEN 1000
#define PRIME int
struct list{
struct list *next;
@keizo042
keizo042 / newton.c
Created August 9, 2014 13:45
newton法、美しいアルゴリズム
#include<stdio.h>
#include<stdlib.h>
double newton(double c)
{
double x;
int i;
x = ( c + c / c ) / 2;