1-42.rkt

#lang racket

(define (inc x) (+ x 1))
(define (square x) (* x x))

(define (compose f g)
  (lambda (x) (f (g x))))

((compose square inc) 6)