Neden Clojure'ın döngü ve yineleme yöntemleri

Question

arasındaki hızda böyle bir fark var Neden döngü yöntemi ve clojure içinde yineleme yöntemi arasındaki hızda böyle bir fark olduğu hakkında bir sorum var. Ben http://www.learningclojure.com/2010/02/clojure-dojo-2-what-about-numbers-that.html yılında öğretici takip ve Heron yöntemi kullanılarak iki kare kök yöntemleri tanımlanmıştır:

(defn avg [& nums] (/ (apply + nums) (count nums))) 
(defn abs [x] (if (< x 0) (- x) x)) 
(defn close [a b] (-> a (- b) abs (< 1e-10))) 

(defn sqrt [num] 
    (loop [guess 1] 
    (if (close num (* guess guess)) 
     guess 
    (recur (avg guess (/ num guess))) 
))) 

(time (dotimes [n 10000] (sqrt 10))) ;;"Elapsed time: 1169.502 msecs" 


;; Calculation using the iterate method 
(defn sqrt2 [number] 
    (first (filter #(close number (* % %)) 
     (iterate #(avg % (/ number %)) 1.0)))) 

(time (dotimes [n 10000] (sqrt2 10))) ;;"Elapsed time: 184.119 msecs" 

İki yöntem arasındaki hız yaklaşık bir x10 artış olduğunu ve neden yüzeyinin altında neler olduğunu merak ediyorum İkisi de çok mu etkilendi?

Answer 1

Sonuçlarınız şaşırtıcıdır: döngü/tekrarlama, döngü için Clojure'daki en hızlı yapıdır.

JVM JIT'in yineleme yöntemi için akıllı bir optimizasyon gerçekleştirdiğinden şüpheliyim, ancak döngü/yineleme sürümü için değil. Clojure'da temiz işlevsel kod kullandığınızda bunun ne sıklıkla meydana gelmesi şaşırtıcıdır: optimizasyona çok uygun görünmektedir. Açıkça kullanarak çiftlerde tarafından iki sürümde önemli bir hızlanma elde edebilirsiniz

Not:

Beklendiği gibi

(set! *unchecked-math* true) 

(defn sqrt [num] 
    (loop [guess (double 1)] 
    (if (close num (* guess guess)) 
     guess 
     (recur (double (avg guess (/ num guess))))))) 

(time (dotimes [n 10000] (sqrt 10))) 
=> "Elapsed time: 25.347291 msecs" 


(defn sqrt2 [number] 
    (let [number (double number)] 
    (first (filter #(close number (* % %)) 
     (iterate #(avg % (/ number %)) 1.0))))) 

(time (dotimes [n 10000] (sqrt 10))) 
=> "Elapsed time: 32.939526 msecs" 

, döngü/tekrarlanmasını sürümü artık hafif bir kenar vardır. Sonuçlar Clojure 1.3