taisyo7333

 ghc --make todo.hs

taisyo7333

import System.Random
-- getStdGen , newStdGen 
-- If you use getStdGen 2 times , you can get the same result.
-- In this case , you can use newStdGen instead of getStdGen after the first time you use getStdGen. 
main = do
     gen <- getStdGen
     putStrLn $ take 20 (randomRs ('a','z') gen )
     gen' <- newStdGen
     putStrLn $ take 20 (randomRs ('a','z') gen' )

taisyo7333

New-Item -ItemType Directory -Name ディレクトリ名

taisyo7333

import System.Environment
import Data.List
{-
>.\arg.exe abc xyz "123 456"
The arguments are:
abc
xyz
123 456
The program name is:
arg.exe

taisyo7333

import System.Environment
import System.Directory	-- openTempFile , removeFile
import System.IO	
import Control.Exception -- bracketOnError
import qualified Data.ByteString.Lazy as B
{-
This code is referenced from "Learn You a Haskell for Great Good!!"
-}

main = do

taisyo7333

{-
Reverse Polish Notation
>example
rpn "10 4 3 + 2 * - "
-4.0

rpn "30 4 +"
34.0

rpn "4 3 + 10 *"

taisyo7333

>runhaskell RoutePath.hs < paths.txt
The best path to take is : BCACBBC
Time taken: 75

taisyo7333

module Translate
( toPostFix 
, translate
) where 

import Data.Char
import qualified Data.Map as Map

-- ("operator",priority)
operators = Map.fromList [ ("+",1)

taisyo7333

#include<string>
#include<iostream>

// arg1   : 評価する式
// arg2   : 式の参照位置
// return : std::pair<構文解析結果,次の参照位置> 
using RESULT = std::pair < int, size_t > ;
RESULT expr(const std::string&, size_t);
RESULT term(const std::string&, size_t);
RESULT factor(const std::string&, size_t);

taisyo7333

[merge]
	tool = WinMerge
[mergetool "WinMerge"]
    cmd = \"C:/Program Files/WinMerge/WinMergeU.exe\" //e //u //wl //wr \"$LOCAL\" \"$BASE\" \"$REMOTE\" //o \"$MERGED\"
    trustExitCode = true
[mergetool "kdiff3"]
	path = C:/Program Files/KDiff3/kdiff3.exe
[diff]
	guitool = winmerge
[difftool "kdiff3"]