Commit 33f11724 authored by Raymond Toy's avatar Raymond Toy
Browse files

Replace latin-1 character Latin_Small_Letter_I_With_Diaeresis

In files/math.lisp, the word "naive" is spelled using the character
\Latin_Small_Letter_I_With_Diaeresis.  However, when compiling locally
with a UTF-8 encoding (which is the default), this is invalid.  The
letter needs to be encoded as 2 octets.  I'm too lazy to figure out
how to get emacs to insert the correct encoded character so I'm
replacing it with a simple "i".  This makes the file pure ASCII, so it
should work fine with a UTF-8 encoding.
parent a7300f03
Loading
Loading
Loading
Loading
Loading
+2 −2
Original line number Original line Diff line number Diff line
;;; math.lisp -- various numerical operations
;;; math.lisp -- various numerical operations
;;
;;
;; Time-stamp: <2004-01-05 emarsden>
;; Time-stamp: <2023-08-12 07:34:28 toy>
;;
;;
;; some basic mathematical benchmarks
;; some basic mathematical benchmarks


@@ -56,7 +56,7 @@
;; calculate the "level" of a point in the Mandebrot Set, which is the
;; calculate the "level" of a point in the Mandebrot Set, which is the
;; number of iterations taken to escape to "infinity" (points that
;; number of iterations taken to escape to "infinity" (points that
;; don't escape are included in the Mandelbrot Set). This version is
;; don't escape are included in the Mandelbrot Set). This version is
;; intended to test performance when programming in nave math-style. 
;; intended to test performance when programming in naive math-style. 
(defun mset-level/complex (c)
(defun mset-level/complex (c)
  (declare (type complex c))
  (declare (type complex c))
  (loop :for z = #c(0 0) :then (+ (* z z) c)
  (loop :for z = #c(0 0) :then (+ (* z z) c)