<div dir="ltr">(define (world->image w)<br>  (overlay (pict->bitmap (circle w))<br>           (empty-scene 100 100)))<br></div><div class="gmail_extra"><br><br><div class="gmail_quote">On Mon, Feb 17, 2014 at 1:40 PM, Jens Axel Søgaard <span dir="ltr"><<a href="mailto:jensaxel@soegaard.net" target="_blank">jensaxel@soegaard.net</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Hi All,<br>
<br>
Is there a way to use big-bang with picts?<br>
In other words, how can I convert a pict into something that big-bang<br>
will display?<br>
<br>
The attempt below fails with this error:<br>
<br>
    collects/racket/private/class-internal.rkt:4387:0: send: no such method<br>
    method name: copy<br>
    class name: bitmap%<br>
<br>
#lang racket<br>
(require pict (only-in 2htdp/universe big-bang on-tick to-draw))<br>
<br>
(define (world->image w)<br>
  (pict->bitmap (circle w)))<br>
<br>
(big-bang 100<br>
          [on-tick add1]<br>
          [to-draw world->image])<br>
<br>
<br>
--<br>
Jens Axel Søgaard<br>
<br>
____________________<br>
  Racket Users list:<br>
  <a href="http://lists.racket-lang.org/users" target="_blank">http://lists.racket-lang.org/users</a><br>
</blockquote></div><br></div>