А(
Size: a a a
А(
А(
DL
not-empty
вместо seq
для проверки на непустоту?not-empty
- не предикат, так ещё и завёрнутый seq
DL
(let [ne-coll (not-empty coll)]
(f ne-coll))
DL
T
not-empty
- не предикат, так ещё и завёрнутый seq
T
(map (juxt identity
(comp boolean seq)
(comp boolean not-empty))
[nil
{:a 1}
{}
"foo"
""
[1 2]
[]
'(1 2)
'()
#{1}
#{}])
;=>
;([nil false false]
; [{:a 1} true true]
; [{} false false]
; ["foo" true true]
; ["" false false]
; [[1 2] true true]
; [[] false false]
; [(1 2) true true]
; [() false false]
; [#{1} true true]
; [#{} false false])
DL
(map (juxt identity
(comp boolean seq)
(comp boolean not-empty))
[nil
{:a 1}
{}
"foo"
""
[1 2]
[]
'(1 2)
'()
#{1}
#{}])
;=>
;([nil false false]
; [{:a 1} true true]
; [{} false false]
; ["foo" true true]
; ["" false false]
; [[1 2] true true]
; [[] false false]
; [(1 2) true true]
; [() false false]
; [#{1} true true]
; [#{} false false])
T
DL
DL
DL
not-empty?
- там ещё понятно, предикат, все делаT
not-empty?
- там ещё понятно, предикат, все делаseq
тоже не предикатDL
seq
тоже не предикатT
DL
DL
T
(some-> xs not-empty ...)
DL
(some-> xs not-empty ...)
T