<?xml version="1.0" encoding="utf-8" standalone="yes"?>
<oembed>
  <author_name>moremagic</author_name>
  <author_url>https://blog.hatena.ne.jp/moremagic/</author_url>
  <blog_title>moremagic’s diary</blog_title>
  <blog_url>https://moremagic.hateblo.jp/</blog_url>
  <categories>
    <anon>Scheme手習い</anon>
  </categories>
  <description>パッと思いついた感じで特に問題なくかけた。ただ、思いつきをメモして、晩酌後にやるので ちょっとしたところで結構時間を食ってしまう。勉強するときはお酒 cons しちゃ駄目ね。 (define insertR (lambda (new old lat) (cond ((null? lat) '()) ((eq? old (car lat)) (cons old (cons new (cdr lat)))) (else (cons (car lat) (insertR new old (cdr lat))))))) (define insertL (lambda (new old lat) (co…</description>
  <height>190</height>
  <html>&lt;iframe src=&quot;https://hatenablog-parts.com/embed?url=https%3A%2F%2Fmoremagic.hateblo.jp%2Fentry%2F20130613%2F1371129027&quot; title=&quot;insertR と L に挑戦してみた - moremagic’s diary&quot; class=&quot;embed-card embed-blogcard&quot; scrolling=&quot;no&quot; frameborder=&quot;0&quot; style=&quot;display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;&quot;&gt;&lt;/iframe&gt;</html>
  <image_url></image_url>
  <provider_name>Hatena Blog</provider_name>
  <provider_url>https://hatena.blog</provider_url>
  <published>2013-06-13 22:10:27</published>
  <title>insertR と L に挑戦してみた</title>
  <type>rich</type>
  <url>https://moremagic.hateblo.jp/entry/20130613/1371129027</url>
  <version>1.0</version>
  <width>100%</width>
</oembed>
