トップページ > プログラム > 2014年05月23日 > WVZoxCv3

書き込み順位&時間帯一覧

1 位/88 ID中時間01234567891011121314151617181920212223Total
書き込み数0000000000000000000500005



使用した名前一覧書き込んだスレッド一覧
デフォルトの名無しさん
プログラミング言語 Scala 10冊目
Win32API質問箱 Build117
JavaScriptは消滅すべきだったよな
【入門】Common Lisp その10【質問よろず】
くだすれPython(超初心者用) その22

書き込みレス一覧

プログラミング言語 Scala 10冊目
280 :デフォルトの名無しさん[]:2014/05/23(金) 19:28:21.40 ID:WVZoxCv3
https://github.com/hjast/geodude/blob/master/src/main/scala/geodude/googlemaps/GoogleMapsGeocoding.scala
Win32API質問箱 Build117
421 :デフォルトの名無しさん[sage]:2014/05/23(金) 19:29:21.27 ID:WVZoxCv3
てst
JavaScriptは消滅すべきだったよな
600 :デフォルトの名無しさん[sage]:2014/05/23(金) 19:31:44.49 ID:WVZoxCv3
数日分データ飛んだのか
【入門】Common Lisp その10【質問よろず】
818 :デフォルトの名無しさん[sage]:2014/05/23(金) 19:34:03.35 ID:WVZoxCv3
>>821,824
Lisp的に書くなら関数内で局所関数を定義すると思う
(defun member* (x lst)
(labels ((iter (lst cnt)
(cond ((null lst) 0)
((eq (car lst) x) cnt)
(t (iter (cdr lst) (1+ cnt))))))
(iter lst 1)))

Schemeの名前付きletを移植するとか (Let over Lambdaより)

(defmacro nlet (n letargs &rest body)
`(labels ((,n ,(mapcar #'car letargs)
,@body))
(,n ,@(mapcar #'cadr letargs))))

(defun member* (x lst)
(nlet iter ((lst lst) (cnt 1))
(cond ((null lst) 0)
((eq (car lst) x) cnt)
(t (iter (cdr lst) (1+ cnt))))))
くだすれPython(超初心者用) その22
981 :デフォルトの名無しさん[sage]:2014/05/23(金) 19:42:28.21 ID:WVZoxCv3
くだすれPython(超初心者用) その23
http://toro.2ch.net/test/read.cgi/tech/1400479217/


※このページは、『2ちゃんねる』の書き込みを基に自動生成したものです。オリジナルはリンク先の2ちゃんねるの書き込みです。
※このサイトでオリジナルの書き込みについては対応できません。
※何か問題のある場合はメールをしてください。対応します。