common-lisp

3열

3답변

나는 Y 결합자를 설명하는 this 기사를 발견했습니다. 코드는 Scheme에 있지만 Common Lisp을 사용하여 코드를 작성하려고합니다. 그러나 Scheme에서 Common Lisp로 번역하는 데 문제가 있습니다. Scheme은 함수와 (기타) 변수 모두에 대해 단일 네임 스페이스를 사용하지만 Common Lisp는 함수 및 변수에 대해 다른 네임 스

1열

2답변

감소 된 정밀도를 가진 부동 소수점 목록 비교

무거운 부동 소수점 계산을 수행하는 함수에 대한 테스트를 작성하고 있습니다. 당연히 수레를 계산할 때 완벽하게 정확한 결과를 기대하지는 않습니다. 그러나 이것은 예상 된 결과를 함수에 의해 생성 된 실제 결과와 비교해야하기 때문에 테스트에서 문제가됩니다. 내 함수의 결과는 float의 별칭입니다. 예를 들어 : (is (my-function "arg1" "

0열

1답변

LISP - 클래스의 모든 메소드 이름을 얻는다

클래스의 모든 메소드 이름을 LISP로 가져올 수 있습니까? 는 사실은 내가 이름에 세트 - 이 메소드가 필요합니다. LispWorks를 들어

0열

1답변

CLISP는 - 나는 A * 혀짤배기</p> <p>의사 코드의 검색 알고리즘이 <a href="https://en.wikipedia.org/wiki/A*_search_algorithm" rel="nofollow noreferrer">here</a>을 찾을 수 있습니다을 정의하기 위해 노력하고있어 실제 혀짤배기 코드

로 의사를 번역. ;;; A* (defun a* (problem) ;;;;;;;;;;;;;;;;;;;;;;;;;;; cameFrom -> Parent do node ;;;;;;;;;;;;;;;;;;;;;;;;;;; gScore -> node-g ;;;;;;;;;;;;;;;;;;;;;;;;;;; fScore -> node-g + node-h

1열

1답변

Lisp의 멤버와 구조체

아이템이리스트에 있는지 확인하는 방법을 알고 있습니다 : (when (member item list :test #'equalp)). 내가 구조체 책의 목록이있는 경우 : (defstruct book name author ) 는 어떻게 특정 저자의 책 (독립적 이름) 목록의 구성원 인 경우 확인합니까? 나는 이것이 매우 초보적인 질문이

0열

1답변

정렬 다항식 Common Lisp

(M [계수] [총 학위] [변수 목록]) 형식으로 작성된 다항식 목록을 정렬하려고합니다. 예 : ((M 1 1 ((V 1 A))) (M 1 2 ((V 1 A) (V 1 C))) (M 1 2 ((V 2 A))) (M 1 2 ((V 1 A) (V 1 B)))) 이는 다음과 + A * C + A^2 + A * B를, I는 + A * B + C + A * A를^

0열

1답변

Eval을위한 null 어휘 환경

null이 아닌 어휘 환경에서 eval을 사용하여 일부 lisp 코드를 평가하는 방법은 무엇입니까? 적절한 보간 기능을 위해서는이 기능이 필요합니다.

1열

2답변

Lisp : TAGBODY issue

나는 LISP 프로그래밍의 초보자이며, 음수에 도달 할 때까지 키보드에서 숫자를 읽으려면 tagbody를 어떻게 사용하는지 확신 할 수 없다. 온라인에서 자료를 찾을 수 있었지만 지금까지는 실패했습니다. 도움이 될 것입니다.

0열

2답변

clisp의 파일 로딩 어려움

그래서 Lisp을 배우려고 노력 중이며 Windows 10 PC에 GNU CLISP 2.49를 다운로드했습니다. 이미 파일에 코드를 몇 개 썼는데 (load "example.lisp") 명령을 사용하여 CLISP 터미널에서로드하려고합니다. 어디에서 파일을이 파일을 clisp로로드 할 수 있습니까? C:\clisp-2.49에 clisp가 설치되어 있습니다.

1열

1답변

Clozure Common Lisp에서 소켓을 통해 통신하는 방법은 무엇입니까? 한 CCL REPL에서

내가 입력 : (WITH-OPEN-SOCKET (socket :LOCAL-PORT 6667 :LOCAL-HOST "localhost" :CONNECT :PASSIVE :REUSE-ADDRESS t) (let ((stream (ACCEPT-CONNECTION socket :wait t)))