跳轉到內容

Rebol 程式設計/intersect

來自華夏公益教科書,開放的書籍,為開放的世界
INTERSECT ser1 ser2 /case /skip size 

建立一個新值,它是兩個引數的交集。

INTERSECT 是一個原生值。

  • ser1 -- 第一個集合 (型別:系列位集)
  • ser2 -- 第二個集合 (型別:系列位集)
  • /case -- 使用區分大小寫的比較。
  • /skip -- 將系列視為固定大小的記錄
    • size -- (型別:整數)

原始碼

[編輯 | 編輯原始碼]
intersect: native[
    {Create a new value that is the intersection of the two arguments.} 
    ser1 [series! bitset!] "first set" 
    ser2 [series! bitset!] "second set" 
    /case "Uses case-sensitive comparison." 
    /skip "Treat the series as records of fixed size" 
    size [integer!]
]
華夏公益教科書