プログラミング学習の記録 336.1「『Programming F#』 Chris Smith 著のⅠ部(マルチパラダイムプログラミング)、2章(基本事項)

開発環境

• Microsoft Windows 7 Home Premium (OS)
• Microsoft Visual Studio 2010(Visual Studio 2010 Shell + F# Community Technology Preview(CTP)(F# Compiler and F# for Visual Studio)) (IDE)
• 言語: F# (A Functional Programming Langage)

「『Programming F#』 Chris Smith 著、Copyright 2010 Chris Smith、ISBN 978-9-596-15364-9、邦題『プログラミング F#』 オライリー・ジャパン刊、ISBN 978-4-87311-466-8」のⅠ部(マルチパラダイムプログラミング)、2章(基本事項)を参考に学習。2.1(組み込み型), 2.1.1(数値型の組み込み型), 2.1.2(算術演算子), 2.1.3(変換処理), 2.1.4(BigInt), 2.1.5(ビット演算子), 2.1.6(文字), 2.1.7(文字列)まで。2.1.8(ブール値)まで進めるつもりがFSIが動かなくなって機能の復帰の方法がわからなかったので。

FSI(F# Interactive)

Microsoft (R) F# 2.0 Interactive build 4.0.30319.1 Copyright (c) Microsoft Corporation. All Rights Reserved. For help type #help;; > abs -1;; val it : int = 1 > ceil 9.4;; val it : float = 10.0 > exp 1.0;; val it : float = 2.718281828 > floor 9.5;; val it : float = 9.0 > sign -10;; val it : int = -1 > log (exp 1.0);; val it : float = 1.0 > log 2.718281828;; val it : float = 0.9999999998 > log10 100;; log10 100;; ------^^^ stdin(8,7): error FS0001: The type 'int' does not support any operators named 'Log10' > log10 100.0;; val it : float = 2.0 > sqrt 9.0;; val it : float = 3.0 > cos 0.0;; val it : float = 1.0 > cos 3.14;; val it : float = -0.9999987317 > sin 0.0;; val it : float = 0.0 > sin 3.14;; val it : float = 0.001592652916 > sin 3.14/2.0;; val it : float = 0.0007963264582 > tan 1.0;; val it : float = 1.557407725 > pown 2L 10;; val it : int64 = 1024L > sbyte -5;; val it : sbyte = -5y > byte "42";; val it : byte = 42uy > int 16 'a';; int 16 'a';; ^^^^^^ stdin(20,1): error FS0003: This value is not a function and cannot be applied > int16 'a';; val it : int16 = 97s > uint16 5;; val it : uint16 = 5us > int 2.5;; val it : int = 2 > uint32 0xFF;; val it : uint32 = 255u > int64 -3;; val it : int64 = -3L > uint64 "0xFF";; val it : uint64 = 255UL > float 3.1415M;; val it : float = 3.1415 > float32 8y;; val it : float32 = 8.0f > decimal 1.23;; val it : decimal = 1.23M > let megabyte=1024I*1024I let gigabyte=megabyte*1024I let terabyte=gigabyte*1024I let petabyte=terabyte*1024I let exabyte=petabyte*1024I let zettabyte=exabyte*1024I;; val megabyte : System.Numerics.BigInteger = 1048576 val gigabyte : System.Numerics.BigInteger = 1073741824 val terabyte : System.Numerics.BigInteger = 1099511627776 val petabyte : System.Numerics.BigInteger = 1125899906842624 val exabyte : System.Numerics.BigInteger = 1152921504606846976 val zettabyte : System.Numerics.BigInteger = 1180591620717411303424 > 0b1111&&&0b0011;; val it : int = 3 > 0b111 &&& 0b0011;; val it : int = 3 > let vowels=['a';'e';'i';'o';'u'];; val vowels : char list = ['a'; 'e'; 'i'; 'o'; 'u'] > printfn "Hex u0061='%c'"'\u0061';; Hex u0061='a' val it : unit = () > // 'C'を整数値に変換 int 'C';; val it : int = 67 > // 'C'をバイトに変換 'C'B ;; val it : byte = 67uy > byte 'C';; val it : byte = 67uy > let password="password";; val password : string = "password" > let multiline="1行目 2行目 3行目";; val multiline : string = "1行目 2行目 3行目" > multiline.[0];; val it : char = '1' > multiline.[1];; val it : char = '行' > multiline.[2];; val it : char = '目' > multiline.[3];; val it : char = '\010' > multiline.[4];; val it : char = '2' > multiline.[5];; val it : char = '行' > multiline.[6];; val it : char = '目' > multiline.[7];; val it : char = '\010' > multiline.[8];; val it : char = '3' > multiline.[9];; val it : char = '行' > multiline.[10];; val it : char = '目' > multiline.[11];; System.IndexOutOfRangeException: インデックスが配列の境界外です。 場所 <StartupCode$FSI_0052>.$FSI_0052.main@() Stopped due to error > let="a\ b\ c";; let="a\ ---^ stdin(62,4): error FS0010: Unexpected symbol '=' in binding > let longString="a\ b\ c";; val longString : string = "abc" > val multiline="1行目\n2行目\n3行目";; val multiline="1行目\n2行目\n3行目";; ^^^ stdin(68,1): error FS0010: Unexpected keyword 'val' in interaction > let multiline="1行目\n2行目\n3行目";; val multiline : string = "1行目 2行目 3行目" > let string="シングルクォート: \' 改行\nダブルクォート: \" バックスラッシュ: \\ タブ:\t 終わり";; val string : string = "シングルクォート: ' 改行 ダブルクォート: " バックスラッシュ: \ タブ: 終わり" > let tab="始まりタブ3つ\t\t\t終わり";; val tab : string = "始まりタブ3つ 終わり" > let string=@"\n\t\\\";; let string=@"\n\t\b\";; let string=@"\n\t\\\";; ----------^^ stdin(72,11): error FS0010: Unexpected infix operator in pattern let verbatimeString=@".\n.\n.\t.\t.";; let hello="Hello"B;; ;; true && false;; let 1+2;;

久々のF#のコードの記述, 楽しかったです。