(let ((type a (record string))) (if (< 1 3) (new a "true") (new a "false")))