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=-0.9 required=5.0 tests=BAYES_00,FORGED_GMAIL_RCVD,
	FREEMAIL_FROM autolearn=no autolearn_force=no version=3.4.4
X-Google-Thread: 103376,1b41412c7bc28c47
X-Google-Attributes: gid103376,domainid0,public,usenet
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!postnews.google.com!z72g2000hsb.googlegroups.com!not-for-mail
From: amado.alves@gmail.com
Newsgroups: comp.lang.ada
Subject: Re: Suffix _T for types found good
Date: Wed, 6 Aug 2008 15:07:09 -0700 (PDT)
Organization: http://groups.google.com
Message-ID: 
 <594cdbb8-4018-44bd-a8db-0df3f23df247@z72g2000hsb.googlegroups.com>
References: <2e9ebb23-a68b-43cf-8871-febcb173f951@56g2000hsm.googlegroups.com>
	<IHmmk.286534$yE1.220045@attbi_s21>
 <188191be-d2c6-4d94-8d6b-082015954332@t54g2000hsg.googlegroups.com>
	<489A0440.9080201@obry.net>
NNTP-Posting-Host: 89.214.21.131
Mime-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 7bit
X-Trace: posting.google.com 1218060431 637 127.0.0.1 (6 Aug 2008 22:07:11 GMT)
X-Complaints-To: groups-abuse@google.com
NNTP-Posting-Date: Wed, 6 Aug 2008 22:07:11 +0000 (UTC)
Complaints-To: groups-abuse@google.com
Injection-Info: z72g2000hsb.googlegroups.com; posting-host=89.214.21.131;
	posting-account=3cDqWgoAAAAZXc8D3pDqwa77IryJ2nnY
User-Agent: G2/1.0
X-HTTP-UserAgent: Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 6.0; SLCC1;
	.NET CLR 2.0.50727; Media Center PC 5.0; .NET CLR 3.0.04506; .NET CLR
	1.1.4322),gzip(gfe),gzip(gfe)
Xref: g2news1.google.com comp.lang.ada:1479
Date: 2008-08-06T15:07:09-07:00
List-Id: <comp.lang.ada>

Object_Value was sort of meta-symbol.

Real example:

subtype Node_Index_T is Positive;
type Node_Value_T is range 1 .. 10;

type Node_T is
   record
      Parent : Node_Index_T;
      Value : Node_Value_T;
      -- ...
   end record;

type Tree_T is array (Node_Index_T range <>) of Node_T;
subtype Triad_T is Tree_T (1 .. 3);

type Triad_Value_T is 1 .. 30;

--  Then down the road I need to make computations involving triad and
node values.
--  And indexes.

Triad_Value : Triad_Value_T;
Node_Value : Node_Value_T;
Node_Index : Node_Index_T;

--  See?

And even if you can come up with good different names for types and
objects, even if you magically did that effortlessly, why double the
lexicon? Can it possibly make the code better? Just to avoid a suffix
rule?