Guest User

Untitled

a guest
Jan 22nd, 2018
62
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.75 KB | None | 0 0
  1. (= (slot
  2. (id Array)
  3. (id first)) (function n
  4. (if (id n)
  5. (slot
  6. (id self)
  7. (call
  8. (id slice)
  9. (float 0.000000) (id n))))
  10. (else
  11. (slot
  12. (id self)
  13. (call
  14. (id at)
  15. (id n))))))
  16. (= (slot
  17. (id Array)
  18. (id sum)) (function
  19. (slot
  20. (id self)
  21. (call
  22. (id reduce)
  23. (function sum n
  24. (+ (id sum) (id n)))))))
  25. (= (slot
  26. (id Array)
  27. (id min)) (function
  28. (slot
  29. (id self)
  30. (call
  31. (id reduce)
  32. (function min n
  33. (if (< (id n) (id min))
  34. (id n))
  35. (id min))))))
  36. (= (slot
  37. (id Array)
  38. (id max)) (function
  39. (slot
  40. (id self)
  41. (call
  42. (id reduce)
  43. (function max n
  44. (if (> (id n) (id max))
  45. (id n))
  46. (id max))))))
Add Comment
Please, Sign In to add comment