Code

#lang racket

(require "picture.language.scm")
(require "picture.window.scm")

; tests

((flip-horiz wave) unit-frame

Image1