funatsufumiya

(* tegami.ml created by funatsu.fumiya *)

(* base functions *)
exception Not_Match;;

let rec print_list = function 
  [] -> ()
  | e::l -> print_int e ; print_string " " ; print_list l
let fail = -1 ;;
let puts = print_endline ;;

funatsufumiya

(defprotocol Metric (distance [p1 p2]))

(deftype Point3D [x y z] Metric
  (distance [p1 p2]
    (let [dx (- (.x p1) (.x p2))
          dy (- (.y p1) (.y p2))
          dz (- (.z p1) (.z p2))]
      (Math/sqrt (+ (* dx dx) (* dy dy) (* dz dz))))))

(def p1 (Point3D. 0 0 0))

funatsufumiya

常用漢字データベースSQL

常用漢字データベースがすぐ作れる２つのSQLファイルです。

常用漢字の版（バージョン）

平成22年版

ライセンス

funatsufumiya

import java.util.Map;
import java.util.HashMap;

public class Demo {
    public static void main(String[] args) {
        String years[] = {
            "2009-11", "2009-01",
            "2010-01", "2010-12",
            "2010-01", "2010-04",
            "2010-01", "2010-12",

funatsufumiya

o
oo
ooo
oooo
ooooo
o
oo
ooo
oooo
ooooo

funatsufumiya

#include <iostream>
#include <string>

#define bold "\e[1;30m"
#define red "\e[0;31m"
#define green "\e[0;32m"
#define cyan "\e[0;36m"
#define reset "\e[0m"

using namespace std;

funatsufumiya

// Project     : VST SDK
// Version     : 3.6.0
//
// Category    : Examples
// Filename    : public.sdk/samples/vst/pitchnames/source/pitchnames.h
// Created by  : Steinberg, 12/2010

/* ============ */
/* === 中略 === */
/* ============ */

funatsufumiya

-->sqrt(2)
 ans = 1.4142136 

-->sqrt([1,2,3,4,5])
 ans = 1.  1.4142136  1.7320508  2.  2.236068  

funatsufumiya

import java.awt.*;
import javax.swing.*;
import java.io.File;

class NativeFileDialog {

    public static void print(String s){
        System.out.print(s);
    }

funatsufumiya

uniform float millis;
uniform float width;
uniform float height;

void main()
{
	float rx = gl_FragCoord.x / width;
	float ry = gl_FragCoord.y / height;

	float rate = sin(millis)/2.0 + 0.5;