カスタムeqv？/ equal？方式の機能

Question

自分のeqvを書くにはどうすればいいですか？または等しい？スキームで？私はちょうどcondとシンボルを探しますか？、number？など、適切な#tか#fを返しますか？ #tに評価するR5RS 1として

Answer 1

、eqv?の実施のための最小仕様（二つの引数obj1とobj2を通過）である：

• obj1とobj2両方#tまたは両方#fです。 （2つのブールリテラルがどのように同じ値に評価されるかは、実装に依存します）。
• obj1とobj2は両方のシンボルであり、

(string=? (symbol->string obj1) (symbol->string obj2)) =) => #t

• obj1とobj2両方の数であり、（=）数値的に等しく、両方の正確なまたは両方不正確いずれかです。
• obj1およびobj2はいずれも文字であり、手順はchar=?と同じです。
• obj1とobj2の両方が空のリストです。
• obj1およびobj2は、ストア内の同じ場所を示すペア、ベクトル、または文字列です（R5RSの3.4項を参照）。
• obj1とobj2は、その位置タグ等しい手順である（lambda 発現は、保管場所でタグ付け概念的ある。何それが意味することはスキームの実装の間で変化する。またR5RSのセクション4.1.4を参照します）。これは再帰的に、このような数字や記号などの他のオブジェクトにeqv?を適用すること、対、ベクター、および文字列の内容を比較として

equal?はeqv?の点で実施することができます。