(div-euclid! place ..args) place: a place args: zero or more forms
Performs in-place Euclidean division or reciprocation.
(div-euclid! x 11 12) is equivalent to
(= x (div-euclid x 11 12)), except that
is only evaluated once.
This means that with only one argument,
(div-euclid! x) replaces
(div-euclid 1.0 x).