2013/09/07 4

Common Lisp 언어로 복소수 계산하기

아래는 GNU CLisp 로 실행한 것인데. Clozure CL 로 실행해도 거의 같은 결과를 얻는다. 명령프롬프트> clisp i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I \ `+' / I 8 8 8 8 8 8 \ `-+-' / 8 8 8 ooooo 8oooo `-__|__-' 8 8 8 8 8 | 8 o 8 8 o 8 8 ------+------ ooooo 8oooooo ooo8ooo ooooo 8 Welcome to GNU CLISP 2.49 (2010-07-07) Copyright (c) Bruno Haible, Michael Stoll 1992, 1993 Copyright (c) Bruno Haible, Ma..

Common Lisp 를 이용한 간단한 수학식 계산하기

Commonn Lisp 언어는 S-신택스라고 불리우는 구문 즉, (함수명 파라미터1 파라미터2 ... 파라미터n) 인 형태의 구문을 사용한다. 예를 들어 뺄셈을 할 때에도 (- 2 3 5 7) 라는 구문은 수학식 2 - 3 - 5 - 7 을 계산한 결과를 얻는다. * CLisp 용 소스 파일: first-sample-2.lsp #!/usr/bin/env clisp ;; 파일명: first-sample-2.lsp (defun lg(x): (/ (log x) (log 2)) ) (defun log10(x): (/ (log x) (log 10)) ) (format t "이 소스는 CLisp 를 이용하여 실행됨!~%") (format t "----------------~%") (format t "수학식 계산하기..

조립제법(Horner의 방법) 예제 2 for Common Lisp

다항식 p(x) 를 1차 다항식 ax - b 로 나눌 때의 몫과 나머지를 구하는 조립제법을 Python 언어로 구현해 보았다. 조립제법은 일명 Horner의 방법이라고도 불리우는데, 이는 x = a 에서 다항식 p(x)의 값 p(a)을 계산하는 가장 빠른 알고리즘이기도 하다. p(x) = (ax - b)q(x) + r 여기서 r은 나머지이며 r = p(b/a) 이다. 또 q(x)는 몫이다. [참고] * 온라인으로 조립제법 표 만들기 손으로 계산하는 조립제법 표 * 온라인으로 구하는 다항식의 도함수: 조립제법을 이용한 다항식의 도함수 아래의 소스파일은 이전에 작성했던 파일 testSyntheticDivision.lsp 를 수정한 것이다. ;; Filename: testSyntheticDivision2.ls..

숫자 맞추기 게임 with Common Lisp

Common Lisp 언어로 숫자 맞추기 게임을 작성해 보았다.아래 소스의 18째 줄 (setf guess (parse-integer sbuf)) 는 스트링을 정수로 변환하는 과정이다.소스 파일명: guessNumber01.lsp#!/usr/bin/env clisp;;   Filename: guessNumber01.lsp ;;   Purpose:  Interatice game guessing a given number. ;;                 (if condition ;;                     (........)    ; when condition is true;;                     (........)    ; when condition is flase;;   ..