Nobuhisa https://blog.hatena.ne.jp/Nobuhisa/ Nobuhisa's diary https://nobuhisa.hatenablog.jp/ LISP 独り言 ちょっとloop復習。特に意味はない。 CL-USER > (sort (loop for k being the hash-keys in ht using (hash-value v) collect (cons k v)) #'< :key #'cdr) ((ONE . 1) (TWO . 2) (THREE . 3)) CL-USER > (loop with a = (make-sequence 'list 11 :initial-element 2) with b = (loop for x upto 10 collect x) for x in a for y in b coll… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fnobuhisa.hatenablog.jp%2Fentry%2F20080318%2F1205840291" title=" - Nobuhisa&#39;s diary" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2008-03-18 20:38:11 rich https://nobuhisa.hatenablog.jp/entry/20080318/1205840291 1.0 100%