Оценка части Clojure конусовидного
Использовать вид по умолчанию, установленный для состояния.
...
views: {
'': {
controller: 'loginController'
}
}
...
...
views: {
'': {
controller: 'loginEmailController',
templateUrl: '/components/loginEmail/loginEmailView.html'
}
}
...
6
задан Lars Westergren 18 January 2009 в 14:08
поделиться
2 ответа
Попробуйте это:
(defn fast-it-exp [base exp res]
(cond (= exp 0) res
(odd? exp) (fast-it-exp base (- exp 1) (* base res))
:else (fast-it-exp base (/ exp 2) (* base base res))))
У меня есть не удобный REPL, но, похож на то, что Вы хотите.
11
ответ дан 8 December 2019 в 13:50
поделиться
В основном то, что Вы записали, могло быть переформатировано как:
(defn fast-it-exp [base exp res]
(cond
(= exp 0) res
(odd? exp) fast-it-exp
base (- exp 1)
(* base res) :else
fast-it-exp base
(/ exp 2) (* base base res)))
Так:
user=> (fast-it-exp 0 0 10) ; (= exp 0) => res
10 ;yep
user=> (fast-it-exp 2 2 2) ; base => (- exp 1)
1 ;no...
user=> (fast-it-exp 1 1 1) ; (odd? exp) => fast-it-exp
#<user$fast_it_exp__59 user$fast_it_exp__59@138c63> ;huh?!
6
ответ дан 8 December 2019 в 13:50
поделиться
Другие вопросы по тегам: