#lang racket
(require video/base)
(require video/render)

(define background (color "black"
                          #:properties (hash "start" 0 "end" +inf.0)))
(render/pretty background "composite.mov"
               #:mode 'verbose
               #:width 1280
               #:height 720
               #:fps 24
               #:start 0
               #:end 2)