let x = not true
let m = (-1)
let m = (-2.5)
let m = ~~~ 2
let x = 5
let x = 5.4
let b = (-1n)
let b = 1n
let m = ~~~ 2n
let sum = (- a) - (- b)
let bitop = (~~~ a) ^^^ (~~~ b)
let x = ~~~ (-1n)
let x = - (~~~ 1n)
let x = ~~~ (-1n)
let x = - (~~~ 1n)