https://github.com/jrincayc/ucblogo-code
Tip revision: 007bb0ba3f02a27ba0b6dbe4ca6a5222bf8110f0 authored by Joshua Cogliati on 17 January 2023, 03:00:41 UTC
Merge pull request #146 from jrincayc/release_623_changes
Merge pull request #146 from jrincayc/release_623_changes
Tip revision: 007bb0b
map.se
;;; -*- logo -*-
to map.se :map.se.template [:template.lists] 2
op map.se1 :template.lists 1
end
to map.se1 :template.lists :template.number
if emptyp first :template.lists [output []]
output sentence (apply :map.se.template firsts :template.lists) ~
(map.se1 bfs :template.lists :template.number+1)
end
to ?rest [:which 1]
output bf item :which :template.lists
end
bury [map.se map.se1 ?rest]