aiya000

if has('conceal')
	function! s:concealJavaDocTags()
		syn clear javaDocTags
		syn clear htmlTag
		syn clear htmlEndTag
		syn clear htmlSpecialChar
		syn clear htmlLink
		syn clear htmlBold
		syn clear htmlBold
		syn clear htmlBoldUnderline

aiya000

" コメント

" 変数 ( 動的型付け )
let a = 10   " int
let b = 20.0 " double
let c = "30" " string
let d = '40' " string

" 出力

aiya000

/* Java */
public class Test {
	public static void main(String[] args){
		Hoge<Integer> hoge = Hoge.get(10);
		System.out.println(hoge.value);
	}
}

class Hoge<T> {
	private Hoge(){}

aiya000

using System;
using System.Collections.Generic;
using System.Linq;


public class Hello {
	public static void Main(string[] args){
		var a = Console.ReadLine()
		               .Split(' ')
		               .Select(s => int.Parse(s))

aiya000

2014-12-24

自称Javaristaの僕がいかにしてHaskellに触れて純粋になったか

　話をしよう、あれは今から…36万…あー…いつだったか。 最初にHaskellに触れた時は…確かー…1万…まぁいい。 君たちは純粋関数に…まぁいいや。 … … 　そうそう、思い出した。

aiya000

import Control.Monad

type Bar    = [Int]
type BarLen = Int
type SelectLen = Int
type Damage    = Int


main :: IO ()
main = getLengths  >>= \(rLen,bLen) ->

aiya000

import Language.Haskell.TH


func1   = putStrLn "Hello,TH..!!!!"
-- runQ [e| putStrLn "Hello,TH..!!!!" |]
--   => AppE (VarE System.IO.putStrLn) (LitE (StringL "Hello,TH..!!!!"))

func1TH = AppE (VarE 'putStrLn) (LitE (StringL "Hello,TH..!!!!"))
-- 'putStrLn is an Expression Quote ( This is FunctionName Quote on this time. )
--   that is unreal name, I can use this on TH.

aiya000

------------------------------------------------------------------------------------------------------------------------
[[2015年01月01日 23:49]]  「皆さん、今日も制服を着ていますね。 いいことです。
                         ... 可愛い服を着るとそれだけで幸せになれますからね。
                         皆さんの幸せを願っております。
                         男子はどうでもいいです」
                       ( コスP! 引用 )
                       
                       確かにそうだ、貴方は間違っていない。
                       男の制服はあんまりどうでもいい。 ( 本当のところ、どうでもいいとは思わないけれど。 )
                       僕もほぼ同意見だ。

aiya000

module Main where

import Control.Applicative ((<$>))


main :: IO ()
main = do
    n <- readLn
    putStrLn $ fizzbuzz n

aiya000

import Control.Monad (replicateM)
import Control.Applicative ((<$>))


type Point   = (Int,Int)      -- 座標を表す型
type Slash   = (Point,Point)  -- 図形に対する斬り込みを表す型
type Polygon = [Point]        -- 図形を表す型


main :: IO ()