;; тест 0: просте НЕ
а = 5
результат = ~а
очікуваний_результат = -6
якщо результат != очікуваний_результат
  впасти "тест 0: результат має бути %(очікуваний_результат), а рівно %(результат)"
кінець

;; тест 1: НЕ від нуля
а = 0
результат = ~а
очікуваний_результат = -1
якщо результат != очікуваний_результат
  впасти "тест 1: результат має бути %(очікуваний_результат), а рівно %(результат)"
кінець

;; тест 2: НЕ від -1
а = -1
результат = ~а
очікуваний_результат = 0
якщо результат != очікуваний_результат
  впасти "тест 2: результат має бути %(очікуваний_результат), а рівно %(результат)"
кінець

;; тест 3: подвійне НЕ
а = 42
результат = ~(~а)
очікуваний_результат = 42
якщо результат != очікуваний_результат
  впасти "тест 3: результат має бути %(очікуваний_результат), а рівно %(результат)"
кінець

;; тест 4: НЕ від від'ємного
а = -10
результат = ~а
очікуваний_результат = 9
якщо результат != очікуваний_результат
  впасти "тест 4: результат має бути %(очікуваний_результат), а рівно %(результат)"
кінець