Need help with a LISP function(DrScheme)

[lotrsimp12345]

I can write the recursion version correctly need help with writing a do loop in DrScheme.

After the do loop the variable x is sent to car L intially and then is updated to first element of everything but first element in list.

(define (sumiteration L)
  (do ((x (car L) (car(cdr L))))
    ((null? L))
    (set! sum (+ sum x)))
)

[jonsca]

Did you mean to post this in CompSci?

[lotrsimp12345]

yea my bad.

[WaltP]

Moved...

[lotrsimp12345]

delete one of the threads since i posted it here. doesn't matter which one.

[lotrsimp12345]

some one please help I am really confused!! :(

[davibq]

(define (sumiteration L)
(do ((sum 0)
)
((null? L) suma)
(set! sum (+ sum (car L)))
(set! L (cdr L))
)
)