diff --git a/examples/hello-kr.rkt b/examples/hello-kr.rkt new file mode 100644 index 0000000..2e188d3 --- /dev/null +++ b/examples/hello-kr.rkt @@ -0,0 +1,22 @@ +#lang planet dyoo/whalesong/korean + + +(정의 (안녕 이름) + (string-append "안녕" " " 이름)) + + +(displayln (안녕 "danny")) + + +(정의 (f x) + (조건부 + [(= x 0) + 1] + [다른 + (* x (f (- x 1)))])) + +(f 50) + + +(정의-구조 사람 (이름 나이)) +(make-사람 "danny" 32) \ No newline at end of file