subtype of enumeration type

[Maciej Sobczak <no.spam@no.spam.com>]

Consider this:

    type Day is (Mon, Tue, Wed, Thu, Fri, Sat, Sun);

and the following standard example:

    subtype Weekday is Day range Mon .. Fri;

Now imagine that in some country children don't have to go to school on 
Wednesdays, they go there only Monday, Tuesday, Thursday and Friday.

I want to say it in Ada.

    subtype Schoolday is Day <what goes here?>;


-- 
Maciej Sobczak : http://www.msobczak.com/
Programming    : http://www.msobczak.com/prog/