#lang datalog/sexp
(require racket/math)

(? (sqr 4 :- X))