Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- |= w=@
- =| path=(list @)
- |- ^- (list @)
- ?. (gth w 1)
- path
- ?: =((mod w 2) 1)
- $(w (div (dec w) 2), path [3 path])
- $(w (div w 2), path [2 path])
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement