racket/leetcode/lc-1304-find-n-unique-integers.rkt


1
2
3
4
5

#lang racket
(define/contract (sum-zero n)
  (-> exact-integer? (listof exact-integer?))
  (cond [(even? n) (remove 0 (range (/ n -2) (add1 (/ n 2))))]
        [(odd? n)  (range (/ (- n 1) -2) (add1 (/ (- n 1) 2)))]))