Clojure Teil rechts

Question

Ich habe die folgende Funktion

(defn fun [a b] (str a b)) 

(fun "1" "2") ;; --> "12" 

Dank (partial) ich es in (fun b) und haben eine feste a

(def fun2 (partial fun "1")) 

(fun2 "2") ;; --> "12" 

Hat clojure haben so etwas wie (partial-right) oder so drehen kann neu anordnen die Argumente einer Funktion, so dass anstelle einer festen a ich eine feste b haben kann und damit die Funktion (fun a) haben?

Dank

Answer 1

Für Ihr spezielles Beispiel, das Sie mit Multi arity gehen könnte:

(defn fun 
    ([a b] (str a b)) 
    ([a] (str a "1"))) 

Answer 2

(defn partial-right [f & args1] 
    (fn [& args2] 
     (apply f (concat args2 args1)))) 

Aber fragen Sie sich ... warum ist das nicht schon Teil der Standardbibliothek? Sind vielleicht andere Leute auf diesem Weg gewandert und es ist schlecht geworden?