Function: FINT

Documentation

intersection

Source

(defun fint (fn &rest fns)
  "intersection"
  (apply #'fchain
	 (lambda (x y) (and x y))
	 fn fns))