Skip to main content

Browse the archive

Revision 91f307bf5a2820657281457f48cee2ee0073df6f authored by Barak A. Pearlmutter on 16 January 2021, 09:16:31 UTC, committed by Barak A. Pearlmutter on 16 January 2021, 09:16:31 UTC 
oops forgot a dependency
1 parent f506282
Raw File
reduce 
;;; -*- logo -*-

to reduce :reduce.function :reduce.list
if emptyp bf :reduce.list [op first :reduce.list]
op apply :reduce.function (list (first :reduce.list) ~
                                (reduce :reduce.function bf :reduce.list))
end

bury "reduce
back to top