[이승중]

밑에 부분 붙이시고 컴파일 해서 실행하세요

let _ = print_string (string_of_intlist [])
let _ = print_newline ()
let _ = print_string (string_of_intlist [1])
let _ = print_newline ()
let _ = print_string (string_of_intlist [2;3;4;5;6])
let _ = print_newline ()


let _ = print_string(string_of_bool (isEven 7))
let _ = print_newline ()
let _ = print_string(string_of_bool (isOdd 9))
let _ = print_newline ()

let _ = print_string (calc (ADD ((NUM 1),(MUL ((NUM 1), (NUM 4))))))
let _ = print_newline ()
let _ = print_string (calc (DIV ((NUM 2),(NUM 0))))
let _ = print_newline ()
let _ = print_string (calc (DIV ((MUL (NUM 5, MUL (NUM 1, NUM 4))), NUM 10)))
let _ = print_newline()