Path: archiver1.google.com!news1.google.com!sn-xit-02!supernews.com!newsfeed.direct.ca!look.ca!fu-berlin.de!uni-berlin.de!kab114a1.tmd.ns.ac.YU!not-for-mail
From: "Jugoslav Dujic" <jdu...@yahoo.com>
Newsgroups: comp.lang.fortran
Subject: Re: enums in Fortran
Date: Wed, 14 Nov 2001 22:14:51 +0100
Lines: 19
Message-ID: <9sumjt$15rbes$2@ID-106075.news.dfncis.de>
References: <VLvI7.2657$Oh1.31242@insync> <AozI7.169836$3d2.6978302@bgtnsc06-news.ops.worldnet.att.net> <HUzI7.2665$Oh1.31395@insync> <9sult2$14ujob$1@ID-106075.news.dfncis.de> <10BI7.2672$Oh1.31513@insync>
NNTP-Posting-Host: kab114a1.tmd.ns.ac.yu (147.91.174.155)
Mime-Version: 1.0
Content-Type: text/plain;
	charset="Windows-1252"
Content-Transfer-Encoding: 7bit
X-Trace: fu-berlin.de 1005772221 39693788 147.91.174.155 (16 [106075])
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 5.50.4522.1200
X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4522.1200

"Adrian Ferramosca" <adr...@bjahouston.com> wrote in message
news:10BI7.2672$Oh1.31513@insync...
| > | then in the code:
| > |   SweaterColor := Blue     { OK }
| > |   SweaterColor := 14        { compiler error }
| > |
| > | How would you emulate this in Fortran?  It's the compiler error I'm
particularly interested in emulating.
| >
| > You can't --
|
| Not so, take a look at James's extremely elegant solution, repeated here for
conciseness:

Yup, really cool. Wow, what speed -- is this ICQ or usenet? :-)

Regards
Jugoslav