एक मूल्य में परिवर्तन के साथ नया रिकॉर्ड बनाएं

Question

मेरी रिकॉर्ड (खेतों की बड़ी संख्या के साथ) मान लीजिए इस तरह परिभाषित किया गया है: a से

data Sample_Record = Sample_Record { record_field1 :: Int, 
            record_field2 :: Int, 
            record_field3 :: Float 
            } 

a = Sample_Record { record_field1 = 4, 
        record_field2 = 5, 
        record_field3 = 5.4 
        } 

मैं प्रकार Sample_Record का एक नया रिकॉर्ड बना सकते हैं है जो यह में से एक है क्षेत्र संशोधित?

Answer 1

हां। हमारे पास बहुत सारे तरीके हैं। सरल

foo b = b {record_field1 = 1} 

> foo a 
Sample_Record { record_field1 = 1,record_field2 = 5, record_field3 = 5.4 } 

हमारे पास कुछ एक्सटेंशन हैं। वाइल्डकार्ड NamedFieldPuns एक्सटेंशन के साथ पैटर्न में सभी रिकॉर्ड,

{-# LANGUAGE RecordWildCards #-} 
bar b@(Sample_Record {record_field1 = 1,..}) = b {record_field1 = 10} 
bar b@(Sample_Record {record_field1 = 2,..}) = b {record_field1 = 20} 

उपयोग करने के लिए नहीं हम अतिरिक्त बॉयलरप्लेट बिना मूल्यों के रूप में रिकॉर्ड क्षेत्रों इस्तेमाल कर सकते हैं अनुमति देते हैं

{-# LANGUAGE NamedFieldPuns #-} 
baz b@(Sample_Record {record_field1, record_field2, record_field3 = 0}) = 
    b{ record_field3 = record_field1 + record_field2 }