라켓 :</p> <pre><code>[a | x <- xs, let a = x^2, a >= 25] </code></pre> <p>어떻게 내가 라켓의 <code>for</code> 이해의 어휘 변수를 결합 않습니다 하스켈에서

Question

에 대한 내부 어휘 범위, 지능형리스트 안에, 내가 변수마다 반복으로 표현을 결합 할 수 있습니까? 변수에

(define (euler4) 
    (apply max 
     (for*/list ([i (in-range 100 1000)] 
        [j (in-range i 1000)] 
        #:when (string=? (number->string (* i j)) 
             (string-reverse (number->string (* i j))))) 
      (* i j)))) 

내가 원하는 바운드 (* i j) 및 기능에서 모든 곳으로 식을 대체 :

현재 나는이 코드가 있습니다.

Answer 1

in-value 형식을 사용하면 단일 값에 바인딩 된 루프 변수를 사용할 수 있습니다. 당신의 예에서

: 질문과 대답은 유효하지만

(define (euler4) 
    (apply max 
     (for*/list ([i (in-range 100 1000)] 
        [j (in-range i 1000)] 
        [ij (in-value (* i j))] 
        #:when (string=? (number->string ij) 
             (string-reverse (number->string ij)))) 
      (* i j))))