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,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,b6780b7c90e46c15,start
X-Google-Attributes: gid103376,public
From: "Chris" <cmrad@ma.ultranet.com>
Subject: Character Type?
Date: 1999/01/26
Message-ID: <78lfbq$l16$1@ligarius.ultra.net>#1/1
X-Deja-AN: 437264809
Sender: cmrad@node246-167.dorms.db.erau.edu
X-Ultra-Time: 26 Jan 1999 22:24:58 GMT
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
X-Complaints-To: abuse@ultra.net
Organization: UltraNet Communications ,
 an RCN Company http://www.ultranet.com/
Newsgroups: comp.lang.ada
Date: 1999-01-26T00:00:00+00:00
List-Id: <comp.lang.ada>

I have to make a program that can declare a range of characters from
'1'..'10'  I have been trying everything but I can't seem to find anything
that will work.  This is what I have so far:

SUBTYPE Index IS Character RANGE  '1'..'10';

TYPE X IS ARRAY (Index) OF Character;
TYPE Y IS ARRAY (Index) OF Character;

Any help would be GREATLY appreciated.

~Chris