जांचें कि कोई तर्क एक सूची है या परमाणु

Question

मैं कैसे जांच सकता हूं कि कुछ परमाणु है या नहीं? मैं number? या list? जैसे कुछ ढूंढ रहा हूं।

Answer 1

विभिन्न योजनाएं यह जानकारी शामिल नहीं करते, मैं अक्सर देखा है atom? इस तरह से परिभाषित:

(define (atom? x) (not (pair? x))) 

यह सच वापस आ जाएगी अगर x एक जोड़ी (या एक सूची) नहीं है। यह संख्याओं, तारों, पात्रों और प्रतीकों के लिए सच होगा, जबकि symbol? केवल स्वाभाविक रूप से प्रतीकों के लिए सच होगा। यह हो सकता है कि आप जो चाहते हैं वह हो या न हो। की तुलना करें यासिर Arsanukaev की मिसाल:

1 ]=> (map atom? (list 42 'a-symbol (list 12 13) 'foo "yiye!")) 

;Value 13: (#t #t #f #t #t) 

यह pair? का उपयोग करता है, क्योंकि इस (1 2 3) तरह उचित सूचियों की जांच करता है, जोड़े (a . b) की तरह है, जबकि list? बिंदीदार जोड़े और डॉटेड-पूंछ सूचियों के लिए अवास्तविक लौटाते हैं।

Answer 2

आमतौर पर, आप भी खाली सूची को बाहर करना चाहेंगे:

(define (atom? x) (not (or (pair? x) (null? x)))) 

या, यदि आप और अधिक पंडिताऊ होना चाहते हैं, तो वैक्टर भी न करे:

(define (atom? x) (not (or (pair? x) (null? x) (vector? x)))) 

और निश्चित रूप से आप यहां और अधिक जोड़ सकते हैं - चूंकि इसे रैकेट प्रश्न के रूप में चिह्नित किया गया है, इसलिए आप हैश टेबल, structs इत्यादि जोड़ना चाहेंगे। इसलिए यह आपके द्वारा परमाणुओं के रूप में विचार करने वाले मानों को निर्दिष्ट करना आसान हो सकता है:

(define (atom? x) 
    (ormap (lambda (p) (p x)) (list number? symbol? boolean? string?))) 

या रैकेट अनुबंध प्रणाली का उपयोग कर:

(define atom? (or/c number? symbol? boolean? string?))