HappyTomatoLife

알아야 하는 것 for문 함수 구조 타입 리스트 인덱싱 match with OCaml version 4.08.1 # let rec last = function | [] -> None | [x] -> Some x | _::t -> last t;; val last : 'a list -> 'a option = # last ["a";"b";"c";"d"];; - : string option = Some "d" # last [];; - : 'a option = None # # let rec last_two = function | [] | [_] -> None | [x;y] -> Some (x,y) | _::t -> last_two t;; val last_two : 'a list -> ('a * 'a) option..

let y : int list = [1;2;3];; let rec length_of_list (l:int list) : int = begin match l with | [] -> 0 | h::t -> 1 + ((length_of_list t)) end;; print_int (length_of_list y) rec 가 recursion이라는 뜻임?

OCaml version 4.08.1 # [1;2;3];; - : int list = [1; 2; 3] # [];; - : 'a list = [] # [1];; - : int list = [1] # ["hi";"j ^CInterrupted. # ["hi ^CInterrupted. # ["a";"b";"c"];; - : string list = ["a"; "b"; "c"] # [1.2;3.2];; - : float list = [1.2; 3.2] # 선언은 이렇게 # let x : int list = [2;3;4];; val x : int list = [2; 3; 4] # let x = [2;3;4];; val x : int list = [2; 3; 4] let y = [1;2;3];; let is_lis..

let is_zero (x:int) : string = match x with | 0 -> "true" | 1 -> "false";; print_string (is_zero 0);; c언어의 case랑 비슷한 기능인 것 같음 @martini:~$ ocaml pattern.ml File "./pattern.ml", line 2, characters 8-81: 2 | ........match x with 3 | | 0 -> "true" 4 | | 1 -> "false".. Warning 8: this pattern-matching is not exhaustive. Here is an example of a case that is not matched: 2 true 이 에러 해결하려면, let is_zero ..

input 받아 output 내면 함수 let calculator (input_one:int) (input_two:int):int = input_one*input_two;; print_int (calculator 3 5);; @martini:~$ ocaml function.ml 15 let calculator (input_one:int) (input_two:int):int= let product = input_one * input_two in product + 1;; print_int (calculator 3 5);; martini:~$ ocaml function_two.ml 16

ocaml OCaml version 4.08.1 # let variable_name = 5;; val variable_name : int = 5 # variable_name;; - : int = 5 # variable_name+1;; - : int = 6 # let first_input = 4;; val first_input : int = 4 # let second_input = 6;; val second_input : int = 6 # first_input * second_input;; - : int = 24 # let first_input = 5;; val first_input : int = 5 # let product = first_input * second_input;; val product : ..

@martini:~$ vim conditional.ml @martini:~$ ocaml conditional.ml if (5>3) then print_int 5 else print_int 3;; if (3==1) then 1 else if (3==2) then 2 else 3;; true, false then과 else가 꼭 있어야 함 return type을 통일해줘야 하나?

TryOCaml (ocamlpro.com) Try OCaml try.ocamlpro.com print hello world 하는 법은? print_string "hello world";; @martini:~$ vim primitives.ml @martini:~$ ocaml primitives.ml print_int (5+5);; @martini:~$ vim primitives_int.ml @martini:~$ ocaml primitives_int.ml