[eichin:19960613.2318PDT] exercise 2.4

type Month_Name is (January, February, March, {...} , December);