#lang racket/base (displayln #<