67ef9fb ^
1 2 3 4 5 6 7 8
(set *hush* true) (LOAD "rms-sysdep.lisp") (declare sqrt [number --> number]) (specialise sqrt 1) (tc +) (load "rms-defs.shen") (set *hush* false) (output "~A~%" (rms (iota 10)))