|
ToDo:
|
memo
こっちもメモ。
早く発売キボンヌ。PS3買っちゃうから。
Silverlight2を最近勉強しています。
TutorialでIronPythonから動かせるのは確認しました。
いちをーメモ。
本日も終了は25時過ぎ。あー眠い。明日朝イチから会議なんだよなぁ。
忙しくなってきました。22時閉店。
ひかぞーもそろそろ九九を習うので、ちょっとメモ。OpenOfficeでも大丈夫かなぁ。
Micorosoft.mshtml.dllって以前Offce2003のUpdateで入れたのですが、Officeが入ってない端末だとこの方法も不可でした。
ってことで此処を参考です。
Copy Local = True
ローカルコピーをTrueにしてからClickOnceのModuleを作ればちゃんと入ってくれるみたい。
5:50にbootしました。
ボチボチとF#をお勉強始めました。
delegateはof句に続き引数の仮宣言して、->で戻り値ですかね。
type delegatedFunc = delegate of int * int -> string
let ret = (new delegatedFunc(fun x y -> "Return = " + System.Convert.ToString(x * y))).Invoke(10,20)
System.Diagnostics.Debug.WriteLine(ret)
奇数・偶数の判定
let (|Judge|_|) j =
match j%2 with
| 0 -> Some(Judge)
| _ -> None
let Judge j =
match j with
| Judge j -> "Even"
| _ -> "Odd"
do {1..10} |> Seq.iter(
fun x -> System.Diagnostics.Debug.WriteLine(
System.Convert.ToString(x) + " is " + Judge x))
FuzzBuzzもお試し。コードはダサいけど晒す。
let (|Fuzz|_|) i =
match i%3 with
| 0 -> Some(i)
| _ -> None
let (|Buzz|_|) i =
match i%5 with
| 0 -> Some(i)
| _ -> None
let (|FuzzBuzz|_|) i =
match i%15 with
| 0 -> Some(i)
| _ -> None
let FuzzBuzz i =
match i with
| FuzzBuzz i -> "FuzzBuzz"
| Fuzz i -> "Fuzz"
| Buzz i -> "Buzz"
| _ -> System.Convert.ToString(i)
{0..60} |> Seq.iter(fun x -> System.Diagnostics.Debug.WriteLine(FuzzBuzz x))
かるーくランニングするつもりで外出。すっげー暑かった。6kmのうち2kmは歩いたかな。
ちょっと落ち着いてきたので頭の体操。
(apply + (filter #(or (zero? (mod % 3)) (zero? (mod % 5)))(range 1 1000)))
(apply + (take-while #(< % 4000000 )(filter even? (map first (iterate (fn [[a b]] [b (+ a b)]) [0N 1N])))))
読了した。面白く読めました。このシリーズは肩の力を抜いて楽しく読めます。長編はあと1冊残っているようですね。