 #reader(lib "" "lang")((modname wgt-on-moon-simple) (read-case-
sensitive #t) (teachpacks ()) (htdp-settings #(#t constructor
repeating-decimal #f #t none #f ())))  ;; wgt-on-moon : number
-> number ;; produces a person's weight on the moon, given their
weight on earth  (check-expect (wgt-on-moon 12) 2)  (define
(wgt-on-moon earth-wgt)   (* 1/6 earth-wgt))  (require
racket/base) (require (planet nah22/racketui))   "Moon Weight
Computer"  (function "This program computes what your weight
would             be on the moon, given your Earth weight."
(wgt-on-moon ["Earth Weight (lbs)" number] -> ["Moon Weight
(lbs)" number])))