#!/usr/local/bin/sbcl --script
(defun g (m n)
  (if (> m n)
    m
    n))
(+(+ 18 64)(*(+(g 18 22)(+(g 18 64)(*(+(+(* 64 22)18)22)22)22)22)))