Not understanding VL-SOME

[prakashreddy]

Dear all

 

Vl-some confused me. Why the variation in below lines...

 

(setq nlst (list 0 2 pi pi 4))

(vl-some '= nlst (cdr nlst))
T

(vl-some '= (list 1 2 3) (list 2 3))
nil

(vl-some '= '(1 2 3) '(2 3))
nil

 

 

Thanks

[Tharwat]

(setq nlst (list 0 2 pi pi 4))

 

(vl-some '= nlst (cdr nlst))

T

 

The is true because the first item from the first list is equal to the first item in the second list so it is T .

 

 

(vl-some '= (list 1 2 3) (list 2 3))

nil

 

This one is nill because each item from the two lists is not equal to each other so it is NIL .

 

 

(vl-some '= '(1 2 3) '(2 3))

nil

 

This one is the same like the previous one .

[prakashreddy]

 

 

This one is nill because each item from the two lists is not equal to each other so it is NIL .

 

.

 

(vl-some '= (list 0 2 pi pi 4) (list 2 pi pi 4))

 

T

 

Please Check the above line

[Tharwat]

(vl-some '= (list 0 2 pi pi 4) (list 2 pi pi 4))

 

T

 

Please Check the above line

 

My reply was correct and indicating to the correct one .

The following one is correct due to equal items in the two lists .

 

(vl-some '= (list 0 2 [color=blue]pi[/color] pi 4) (list 2 pi [color=blue]pi[/color] 4))

Clear ?

[Tharwat]

Test these to see the differences .

 

(vl-some '(lambda (j k)
           (if (= j k)
             (print j)
           )
         )
        (list 0 1 7 10)
        (list 1 2 7 10)
)

 

 

(vl-some '(lambda (j k)
           (if (= j k)
             (print j)
           )
         )
        (list 0 1 2 10)
        (list 1 2 3 10)
)

[prakashreddy]

yes, now i understood thank you Mr. tharwat.

[Tharwat]

yes, now i understood thank you Mr. tharwat.

 

You're welcome .

[Lee Mac]

Please Google the question before posting a new thread, existing explanations may be found here:

 

vl-some function evaluation

vl-some function evaluation