home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #3 / NN_1993_3.iso / spool / comp / lang / ada / 4033 < prev    next >
Encoding:
Internet Message Format  |  1993-01-21  |  991 b 
  1. Path: sparky!uunet!haven.umd.edu!mimsy!alex
  2. From: alex@cs.umd.edu (Alex Blakemore)
  3. Newsgroups: comp.lang.ada
  4. Subject: Re: Isomorphic variant question
  5. Message-ID: <63594@mimsy.umd.edu>
  6. Date: 22 Jan 93 01:00:47 GMT
  7. References: <C16FuD.E5L@dale.cts.com>
  8. Sender: news@mimsy.umd.edu
  9. Organization: U of Maryland, Dept. of Computer Science, Coll. Pk., MD 20742
  10. Lines: 19
  11.  
  12. In article <C16FuD.E5L@dale.cts.com> jhb@dale.cts.com (John Bollenbacher) writes:
  13. > So far so good.  My recurring problem arises when I have a code fragment
  14. > which is responsible for building such a piece of mail which does not need
  15. > to distinguish between these isomorphich variants
  16.  
  17.    procedure POST(KIND : SHAPES) is
  18.    begin
  19.      case KIND is
  20.        when CIRCLE | SQUARE =>
  21.          SEND((KIND   => KIND,
  22.                CENTER => CENTER_OF_OBJECT,
  23.                RADIUS => RADIUS_OF_OBJECT));              
  24.  
  25.  
  26.  
  27.  
  28. -- 
  29. ---------------------------------------------------
  30. Alex Blakemore alex@cs.umd.edu   NeXT mail accepted
  31.