On this page:
伄^
􏾝
􏾘
􏾘^
􏺊
􏹃
􏹊
􏷍?
􏿳
􏿳?
􏺈
􏺇
8.15

4.2 􏿴🔗

 (require ming/list) package: ming
Extention of 双 and 􏿴.

All the procedures in this page are implemented in Ming, therefore, the source code can be seen as a demonstation of it.

procedure

( LST N ...)  􏿴?

  LST : 􏿴?
  N : 􏺡?

procedure

(伄^ LST N-LST)  􏿴?

  LST : 􏿴?
  N-LST : (listof 􏺡?)
:  + . 
ideograph
伄^:  + + ^. 
ideograph

Examples:
> ( '(a b c d e f g) 0 2 3)

'(a c d)

> (伄^ '(a b c d e f g) '(0 2 3))

'(a c d)

procedure

(􏾝 LST N1 [N2])  􏿴?

  LST : 􏿴?
  N1 : 􏺡?
  N2 : 􏺡? = +inf.0
􏾝:  + . 
ideograph

Examples:
> (􏾝 '(a b c d e f) 0)

'(a b c d e f)

> (􏾝 '(a b c d e f) 0 0)

'()

> (􏾝 '(a b c d e f) 0 1)

'(a)

> (􏾝 '(a b c d e f) 1 2)

'(b)

> (􏾝 '(a b c d e f) 0 2)

'(a b)

> (􏾝 '(a b c d e f) 0 5)

'(a b c d e)

> (􏾝 '(a b c d e f) 2 5)

'(c d e)

procedure

(􏾘 LST N)  􏿴?

  LST : 􏿴?
  N : 􏺡?

procedure

(􏾘^ LST N-LST)  􏿴?

  LST : 􏿴?
  N-LST : (listof? 􏺡?)
􏾘:  + . 
ideograph
􏾘^:  + + ^. 
ideograph

🐘 􏾺 𨚞

Examples:
> (􏾘 '(a b c d e f g) 1)

'(a c d e f g)

> (􏾘^ '(a b c d e f g) '(0 1 3))

'(c e f g)

procedure

(􏺊 LST N M)  􏿴?

  LST : 􏿴?
  N : 􏺡?
  M : 􏺡?
􏺊: 􏷵 + 􏷴. 
ideograph
Shorts for (􏷴 (􏷵 LST N) M).

Example:
> (􏺊 '(a b c d e f g) 1 3)

'(b c d)

procedure

(􏹃 LST PROC)  􏺡?

  LST : 􏿴?
  PROC : 程?
􏹃:  + . 
ideograph

🐘 􏹈巨

Example:
> (􏹃 '(a b 12 c 33 d  58 f g) 米?)

3

procedure

( LST)  􏿴?

  LST : 􏿴?
:  + . 
ideograph

Examples:
> ( '())

'()

> ( '(11))

'()

> ( '(11 22 33 22 44))

'(22)

> ( '(11 11 11 22 55 22 33 88 88 88 99 99))

'(11 22 88 99)

procedure

(􏹊 V LST [PROC])  􏿴?

  V : any/c
  LST : 􏿴?
  PROC : 程? = 同?
􏹊:  + . 
ideograph

🐘 􏹊~ 􏹊^

Example:
> (􏹊 'c '(a b c d e c f))

'(a b d e f)

procedure

(􏷍? LST1 LST2)  boolean?

  LST1 : 􏿴?
  LST2 : 􏿴?
LST1是否是LST2的子集。
􏷍:  + 􏿴. 
ideograph
􏷍?: 􏷍 + ?. 
ideograph

Examples:
> (􏷍? '(a b) '(a b c d e f g))

#t

> (􏷍? '(a e) '(a b c d e f g))

#t

> (􏷍? '(a z) '(a b c d e f g))

#f

procedure

(􏿳 V ...)  􏿳?

  V : any?
􏿳:  + 􏿴. stands for association list.
ideograph

🐘 􏿰

Examples:
> (􏿳 1 2 3 4 1 5)

'((1 . 2) (3 . 4) (1 . 5))

> (􏿳)

'()

> (􏿳 1)

'()

> (􏿳 1 2 3)

'((1 . 2))

procedure

(􏿳? V)  boolean?

  V : any?
􏿳?: 􏿳 + ?. 
ideograph
V is 􏿳 or not. Shorts for ( (􏿴? V) (􏷐 双? V)).

Examples:
> (􏿳? '(1 2 3 4))

#f

> (􏿳? (􏿳 1 2 3 4))

#t

> (􏿳? '((1 . 2) (3 . 4)))

#t

> (􏿳? '((1 2) (3 4)))

#t

> (􏿳? '((1 (2)) (3 (4))))

#t

procedure

(􏺈 ALST)  􏿴?

  ALST : 􏿳?

procedure

(􏺇 ALST)  􏿴?

  ALST : 􏿳?
􏺈:  + . 
ideograph
􏺇: 􏺇 + . 
ideograph
Same as:

Examples:
> (􏺈 '((1 . 2) (3 . 4)))

'(1 3)

> (􏺇 '((1 . 2) (3 . 4)))

'(2 4)