길이

Question

나는 다음 내용이 목록을 가지고 :

l1 = ((at1) (at2)) 

및 l1에서 생성 l2와

l2 = (((at11) (at21))((at12) (at22))) 

.

문제는 다음과 같습니다. l2은 동일한 문제의 두 인스턴스가 될 것이지만, (길이 l1)을 사용하면 결과가 2가되며이 문제는 올바르지 않습니다. 접근. (길이 l1) = 1 인 결과 (목록 l1)을 시도했지만이 기능이 제 기능을 제대로 수행하지 못합니다. l2.

이 코드를 사용해 보았지만이 두 목록에서는 정상적으로 작동하지 않습니다. 이 경우 l2은 l3이라는 다른 목록을 만들 수 있지만 l1은 l2을 만들 수 없습니다. 코드는 다음과 같습니다

(define (applyfunc l1) 
    (let ((l2 '())) 
    (cond ((not(null? l1)) 
       (for/list ([i (length l1)]) 
       (set! l2 (append l2 (func l1))) 
       ) 
      ) 
     ) 
    l2) 
) 

(applyfunc ((at1) (at2))...)는, 즉, AT1 및 AT2 l2을 부가 요소의 전문화를 반환해야합니다. 그러나 위의 코드에서는 l1 = ((at1) (at2))이 두 개 (길이 l1 = 2)인데 인스턴스가 아니기 때문에 작업하지 않습니다. l2을 가져 가면 인스턴스가 2 개이므로 결과는 l3이고 각 인스턴스에 대해 2 개의 속성, 즉 l2과 4 개의 인스턴스와 2 개의 속성이있는 목록이 있습니다. 문제는 l1이 입력 될 때 (at1)과 (at2)을 고려하지만 어떤 것도 허용하지 않는다는 것입니다. ((at1)(at2)) 어떻게 처리 할 수 ​​있습니까? 도와 주셔서 감사합니다!

Answer 1

(cond (not (null? l1) ...)) 

이 양식은

당신은 어떤 사례가 없다 .. 절차 #<procedure:not> 및 #f하지만 모든 것이 사실이기 때문에이 (null? l1)로 시작하는 체인의 나머지 부분을 평가하기 시작합니다 것으로 판명되는 not을 평가합니다 어떻게 그렇게 일할 것인가? Scheme에서 이것은 너무나 긴급합니다.