Loop in PLT Scheme

Question

Wie ich Schleife in PLT-Schema wie in Java-

for(int i=0;i<10;){ 
    for(int j=0;j<3;){ 
      System.out.println(""+j); 
      j++; 
    } 
     System.out.println(""+i); 
     i++; 
} 

Answer 1

Ihr Beispiel in Java Karte nicht direkt auf die Sprachregelung, die nur ein paar neue Keywords zu lernen, da es aren implementieren 't explizite Konstrukte zum Implementieren einer for-Schleife in Scheme (es sei denn, Sie schreiben selbst ein Konstrukt!). Der Kochbuch Weg, dies in Scheme zu tun, ist eine rekursive Funktion zu definieren, die eine Liste umläuft. Hier ist ein Beispiel dafür, wie eine for-Schleife Style-Funktion in Schema zu tun:

(define (doit x x-max dx) 
    (if (<= x x-max) 
    (begin 
     ;;...perform loop body with x... 
     (doit (+ x dx) x-max dx)))) 

(doit a b dx) ; execute loop from a to b in steps of dx 

von dieser Seite genommen:

Guile and Scheme Links

Hier ist ein weiterer Link zu einer Seite, die die Ideen beschrieben, die Sie brauchen, um verstehen Schleifen von imperativen Sprachen Schema zu übersetzen:

Scheme Looping Constructs

Scheme ist ein wirklich interessante Sprache zu lernen, sollten Sie auch lesen Sie die Structure and Interpretation of Computer Programs, das ist das Lehrbuch früher für den Unterricht Scheme am MIT verwendet.

Answer 2

Ich schlage vor, Sie zu Michele Simionatos "The adventures of a pythonista in schemeland" zu sehen. Es ist für Python-> Schema, aber es ist wirklich gut geschrieben und, was noch wichtiger ist, es ist von prozeduralen-> funktional.

Answer 3

Das Iterationskonstrukt in Schema ist "do", Sie können es in der R5RS specification nachschlagen.

Das Beispiel du hast etwas würde wie folgt aussehen:

(do ((i 0 (+ i 1))) ((> i 9)) 
    (do ((j 0 (+ j 1))) ((> j 2)) 
    (display j) 
    (newline)) 
    (display i) 
    (newline)) 

(do ...) ist etwas allgemeiner als das, was in diesem Beispiel zeigt sich. Sie können beispielsweise einen Wert zurückgeben, anstatt ihn nur für seine Nebenwirkungen zu verwenden. Es ist auch möglich, viele "Zähler" zu haben:

(do ((i 0 (+ i 1) 
    (j 0 (+ j 2)) 
    ((stop? i j) <return-value>) 
    exprs...) 

Answer 4

In PLT Sie dies tun können:

(for ([i (in-range 10)]) 
    (for ([j (in-range 3)]) (printf "~s\n" j)) 
    (printf "~s\n" i))