#lang scheme/base

(provide flip)

(define (flip)
  (if (zero? (random 2)) 'heads 'tails))