https://github.com/jrincayc/ucblogo-code
Tip revision: 0e21c1db877c1e7cb601aa079331d47076b47d30 authored by jeremycowles on 26 April 2009, 01:16:52 UTC
Added more test for standard OOP features.
Added more test for standard OOP features.
Tip revision: 0e21c1d
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