comp.lang.ada
 help / color / mirror / Atom feed
* Kilogram constant defined in package System.Dim.Other_Prefixes (s-dmotpr.ads)
@ 2014-02-04 17:26 Anh Vo
  2014-02-04 17:44 ` adambeneschan
                   ` (2 more replies)
  0 siblings, 3 replies; 9+ messages in thread
From: Anh Vo @ 2014-02-04 17:26 UTC (permalink / raw)


The Kilogram constants defined in package System.Dim.Other_Prefixes (s-dmotpr.ads) look different compared to others such as Meter, Second,... In addition, the values do not match with names in the comments on the right side. I would like to know why. By the way, the Meter, Kilogram and Second constant are repeated here for easy discussion.

   --  SI prefixes for Meter

   pragma Warnings (Off);
   --  Turn off the all the dimension warnings

   ym  : constant Length := 1.0E-24;  -- yocto
   zm  : constant Length := 1.0E-21;  -- zepto
   am  : constant Length := 1.0E-18;  -- atto
   fm  : constant Length := 1.0E-15;  -- femto
   pm  : constant Length := 1.0E-12;  -- pico
   nm  : constant Length := 1.0E-09;  -- nano
   Gm  : constant Length := 1.0E+09;  -- giga
   Tm  : constant Length := 1.0E+12;  -- tera
   Pem : constant Length := 1.0E+15;  -- peta
   Em  : constant Length := 1.0E+18;  -- exa
   Zem : constant Length := 1.0E+21;  -- zetta
   Yom : constant Length := 1.0E+24;  -- yotta

   --  SI prefixes for Kilogram

   yg  : constant Mass := 1.0E-27;  -- yocto
   zg  : constant Mass := 1.0E-24;  -- zepto
   ag  : constant Mass := 1.0E-21;  -- atto
   fg  : constant Mass := 1.0E-18;  -- femto
   pg  : constant Mass := 1.0E-15;  -- pico
   ng  : constant Mass := 1.0E-12;  -- nano
   Gg  : constant Mass := 1.0E+06;  -- giga
   Tg  : constant Mass := 1.0E+09;  -- tera
   Peg : constant Mass := 1.0E+13;  -- peta
   Eg  : constant Mass := 1.0E+15;  -- exa
   Zeg : constant Mass := 1.0E+18;  -- zetta
   Yog : constant Mass := 1.0E+21;  -- yotta

   --  SI prefixes for Second

   ys  : constant Time := 1.0E-24;  -- yocto
   zs  : constant Time := 1.0E-21;  -- zepto
   as  : constant Time := 1.0E-18;  -- atto
   fs  : constant Time := 1.0E-15;  -- femto
   ps  : constant Time := 1.0E-12;  -- pico
   ns  : constant Time := 1.0E-09;  -- nano
   Gs  : constant Time := 1.0E+09;  -- giga
   Ts  : constant Time := 1.0E+12;  -- tera
   Pes : constant Time := 1.0E+15;  -- peta
   Es  : constant Time := 1.0E+18;  -- exa
   Zes : constant Time := 1.0E+21;  -- zetta
   Yos : constant Time := 1.0E+24;  -- yotta
  
   --...


^ permalink raw reply	[flat|nested] 9+ messages in thread

end of thread, other threads:[~2014-02-05  9:30 UTC | newest]

Thread overview: 9+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2014-02-04 17:26 Kilogram constant defined in package System.Dim.Other_Prefixes (s-dmotpr.ads) Anh Vo
2014-02-04 17:44 ` adambeneschan
2014-02-04 18:10   ` G.B.
2014-02-04 18:16     ` adambeneschan
2014-02-04 18:22       ` adambeneschan
2014-02-04 18:19 ` Ludovic Brenta
2014-02-04 19:44   ` Anh Vo
2014-02-05  7:44 ` Yannick Duchêne (Hibou57)
2014-02-05  9:30   ` AdaMagica

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox