(on comp)
(load numeric!-ops)
(on fast!-integers)
(de foo (a b c) (rplaca c (!- a b)) )
