#!/usr/local/bin/sbcl --script



(format t "~D ^ ~D = ~D" -2 21 (list -2 21))