From mboxrd@z Thu Jan 1 00:00:00 1970 X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me X-Spam-Level: X-Spam-Status: No, score=-1.3 required=5.0 tests=BAYES_00,MAILING_LIST_MULTI, REPLYTO_WITHOUT_TO_CC autolearn=no autolearn_force=no version=3.4.4 X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 103376,a1ce307c10055549 X-Google-Attributes: gid103376,public X-Google-ArrivalTime: 2002-12-17 12:09:09 PST Path: archiver1.google.com!news1.google.com!newsfeed.stanford.edu!syros.belnet.be!news.belnet.be!colt.net!newsfeed.icl.net!newsfeed.fjserv.net!proxad.net!teaser.fr!enst.fr!not-for-mail From: "David C. Hoos" Newsgroups: comp.lang.ada Subject: Re: calenday (was Re: IBM Acquires Rational Ada Date: Tue, 17 Dec 2002 14:08:23 -0600 Organization: ENST, France Sender: comp.lang.ada-admin@ada.eu.org Message-ID: References: <9DKL9.380955$P31.141586@rwcrnsc53> Reply-To: comp.lang.ada@ada.eu.org NNTP-Posting-Host: marvin.enst.fr Mime-Version: 1.0 Content-Type: text/plain; charset="iso-8859-15" Content-Transfer-Encoding: 7bit X-Trace: avanie.enst.fr 1040155741 44782 137.194.161.2 (17 Dec 2002 20:09:01 GMT) X-Complaints-To: usenet@enst.fr NNTP-Posting-Date: Tue, 17 Dec 2002 20:09:01 +0000 (UTC) Return-Path: X-Priority: 3 X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook Express 6.00.2800.1106 X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1106 Errors-To: comp.lang.ada-admin@ada.eu.org X-BeenThere: comp.lang.ada@ada.eu.org X-Mailman-Version: 2.0.13 Precedence: bulk List-Unsubscribe: , List-Id: comp.lang.ada mail<->news gateway List-Post: List-Help: List-Subscribe: , Errors-To: comp.lang.ada-admin@ada.eu.org X-BeenThere: comp.lang.ada@ada.eu.org Xref: archiver1.google.com comp.lang.ada:31983 Date: 2002-12-17T14:08:23-06:00 ----- Original Message ----- From: Newsgroups: comp.lang.ada To: Sent: Tuesday, December 17, 2002 1:08 PM Subject: Re: calenday (was Re: IBM Acquires Rational Ada > > > > type day_name_type is (mon,tue,wed,thu,fri,sat,sun); > > the program could internallly use Sunday, Monday, etc, and then do a table > > lookup to find the appropriate String to print. > > type Day_Name is (Monday, Tuesday ... > Short_Day_Name : constant array(Day_Name) of String(1 .. 3) := ("Mon", ... > makes it easy to print three letter abbreviations, and Day_Name'image(Day) > would print the full (English) names if you want full length names. Going > the reverse direction, with an array of different length strings, is > rather less convenient. > "And on the seventh day He rested" suggests Sunday should be last and > Monday first. OTOH, both moon and sun are mere astronomical objects, > whereas Thor was a god, so clearly Thursday should be first. ;) The day of rest prescribed in the Ten Commandments is the seventh day or the sabbath, derived from the Hebrew verb shabath ("rested"), and which is reflected in the name of the seventh day of the week in several of the Romance languages -- e.g., Italian "Sabato." Moreover, the name for the first day of the week in several of the Romance languages is derived from the Latin Domini ("Lord") -- e.g., Italian "Domenica." As a matter of fact the names of the days of the week in Portuguese are Domingo, Segunda-fiera, Terca-fiera, Quarta-fiera, Quinta-fiera, Sexta-fiera, Sabado. So... ISO notwithstanding, it's pretty clear from historical usage that Sunday is the first day of the week. http://ada.eu.org/mailman/listinfo/comp.lang.ada >