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.9 required=5.0 tests=BAYES_00 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,a5f77772dc1375a3
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2002-05-23 02:27:23 PST
Path: 
 archiver1.google.com!news1.google.com!newsfeed.stanford.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!transit.news.xs4all.nl!not-for-mail
From: Fraser <newsfraser@blancolioni.org>
Newsgroups: comp.lang.ada
Subject: Re: Safe Units Handling in Ada
Date: Thu, 23 May 2002 11:28:49 +0200
Organization: XS4ALL Internet BV
Message-ID: <3CECB651.3010209@blancolioni.org>
References: 
 <u3cwlbz02.fsf@FWILSON.i-did-not-set--mail-host-address--so-shoot-me>
 <3CEB7124.4050604@blancolioni.org>
 <01HW.B91197820000C3D90E449050@netnews.netaxs.com>
NNTP-Posting-Host: a80-126-24-12.adsl.xs4all.nl
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii; format=flowed
Content-Transfer-Encoding: 7bit
X-Trace: news1.xs4all.nl 1022146192 9832 80.126.24.12 (23 May 2002 09:29:52
 GMT)
X-Complaints-To: abuse@xs4all.nl
NNTP-Posting-Date: 23 May 2002 09:29:52 GMT
User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.0; en-US;
 rv:1.0rc2) Gecko/20020510
X-Accept-Language: en-us, en
Xref: archiver1.google.com comp.lang.ada:24569
Date: 2002-05-23T09:29:52+00:00
List-Id: <comp.lang.ada>

William C. Brennan wrote:

> Wouldn't it be also useful to define the operator:
> 
>    function "/"
>      (Left  : Kilogram;
>       Right : Kilogram) 
>      return Float_Type;
> 
> (where Float_Type is used throughout as a unitless scalar)?

Good idea.  Even better, a one liner.  It's added, and if you don't want 
to wait, you can add in the procedure Write_Unit after line 83 of the 
file macks-writers.adb in version 0.0.2 the following line:

       Write_Function (Macks.Table.Divide, Name, Name, "Float_Type");

cheers,
Fraser.