scheme

0熱

1答えて

(define (merge-sorted lst1 lst2) (cond ((null? lst1) lst2) ((null? lst2) lst1) ((>= (car lst1) (car lst2)) (cons (car lst2) (merge-sorted lst1 (cdr lst2)))) (else (c

0熱

1答えて

Schemeでは、 `（begin）`の返り値は何ですか？

(begin expr1 expr2 ...)はすべての式を評価し、評価された最後の式を返します。私はChez Schemeではbeginのような式を使わずに(begin)を使用することができます。私は私の研究の一環としてChez Schemeを使用しています。私がコンソールに書き込むときには、voidのように構文エラーを出さず、何も表示しません。私の質問は、何が返されますか？ (void)を

0熱

1答えて

スキーム余分なメッセージを削除するには？等;値; GNU Schemeで未指定の戻り値

私は大学でコンピュータサイエンスの学生です、と私の教授は私のスキームについての割り当てを与える。.. 、その後は、私は、スキーム9.2バージョンを設定し、これにしようとしたが私はこのために夢中になるだろう[ここに画像の説明を入力] [1] 52 error> (display "hi") hi ;Unspecified return value それはなんですか？ ;指定されていない戻り値

0熱

1答えて

スキーム関数のチェックを定義する

(define (make-checking beg-bal) (let* ((balance beg-bal) (tlist '())) (define (writer s x) (display s) (display x) (newline)) (define (deposit f) (set! bal

1熱

1答えて

モナド評価の `bind`演算子

私はSchemeで実装されたthe article of Dan Friedman about monadic evaluationを数回読みましたが、State monadのサブチャプターの終わりからエクササイズに悩まされています。この記事は非常にはっきりしていますが、最小限の理論で深い理解を得ていますが、この演習は実際にはあいまいです。私はいくつかの重要な面を欠場することが恐れており、これが

0熱

2答えて

ループを使用してリストを返す

私はラケットを初めて使います。私はループを使ってリストのリストを返そうとしています。コードは機能しますが、他の条件を評価せずに要素の1つだけを3回印刷し、重複を招きます。どのように各条件をループし、重複なく各条件に対して1つの要素を印刷することができますか？ (define position_ (lambda (l

1熱

1答えて

スキームが関数リストとしてヌルリストを渡す

私はいくつかの基本的なlisp /スキームを実行しています。空のリスト/ nullを渡すことができない問題にぶち当たっています。。 (define (fxn L) (if (null? L) ('()) (cdr L))) そして、私は > (fxn '()) procedure application: expected procedure, given

1熱

1答えて

スキームペアの構築

ペアの構成と表現を理解しようとしています。のは、以下の結果を見てみましょう： (length (cons '(a b) '(d e f))) => 4 今の順序を切り替えることができます： (length (cons '(d e f) '(a b))) => 3 しかし (length (car (cons '(d e f) '(a b)))) => 3 あなたは上記の結果を説

2熱

1答えて

Haskellでの構文解析のドット付きリスト/リスト

私はスキームインタープリタを書くときにthis guideに従っています。左要因にDottedList /リストのための文法を試して、私はこの思い付いた： E -> (H T) H -> E H' H' -> <space> H H' -> <term> T -> <term> T -> <space> . <space> E - spaces :: Parser() spaces

0熱

1答えて

Racketの構造体の命名規則はありますか？

私は、%という接尾辞を持つクラスに名前を付けるという慣習があり、高次クラスとインスタンスを区別するのに役立ちます。一方で (define ingredient% (class object% (init-field name taste price color) (super-new))) (define (total-price ingredients)