[racket] Planet Cute in the teaching languages

It should be. The program from the docs (as below) produces the expected
image in the teaching languages in the git head version, at least.

Robby

(require 2htdp/planetcute)
(require 2htdp/image)
; stack : non-empty-list-of-images -> image
; stacks 'imgs' on each other, separated by 40 pixels
(define (stack imgs)
  (cond
    [(empty? (rest imgs)) (first imgs)]
    [else (overlay/xy (first imgs)
                      0 40
                      (stack (rest imgs)))]))
(beside/align
 "bottom"
 (stack (list wall-block-tall stone-block))
 (stack (list character-cat-girl
              stone-block stone-block
              stone-block stone-block))
 water-block
 (stack (list grass-block dirt-block))
 (stack (list grass-block dirt-block dirt-block)))



On Tue, Aug 27, 2013 at 8:14 AM, Jens Axel Søgaard <jensaxel at soegaard.net>wrote:

> Is it possible to use Planet Cute in the teaching languges?
>
> From the documentation I get the feeling there is supposed
> to be a teachpack, but I can't find any.
>
> After  (require 2htdp/planetcute) using any identifiers from
> the module provokes an error.
>
> http://docs.racket-lang.org/teachpack/2htdpPlanet_Cute_Images.html
>
> --
> Jens Axel Søgaard
>
>
> ____________________
>   Racket Users list:
>   http://lists.racket-lang.org/users
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.racket-lang.org/users/archive/attachments/20130827/908f63c1/attachment-0001.html>