OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [ada/] [s-dmotpr.ads] - Blame information for rev 717

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 706 jeremybenn
------------------------------------------------------------------------------
2
--                                                                          --
3
--                         GNAT RUN-TIME COMPONENTS                         --
4
--                                                                          --
5
--         S Y S T E M . D I M . M K S . O T H E R _ P R E F I X E S        --
6
--                                                                          --
7
--                                  S p e c                                 --
8
--                                                                          --
9
--           Copyright (C) 2011-2012, Free Software Foundation, Inc.        --
10
--                                                                          --
11
-- GNAT is free software;  you can  redistribute it  and/or modify it under --
12
-- terms of the  GNU General Public License as published  by the Free Soft- --
13
-- ware  Foundation;  either version 3,  or (at your option) any later ver- --
14
-- sion.  GNAT is distributed in the hope that it will be useful, but WITH- --
15
-- OUT ANY WARRANTY;  without even the  implied warranty of MERCHANTABILITY --
16
-- or FITNESS FOR A PARTICULAR PURPOSE.                                     --
17
--                                                                          --
18
-- As a special exception under Section 7 of GPL version 3, you are granted --
19
-- additional permissions described in the GCC Runtime Library Exception,   --
20
-- version 3.1, as published by the Free Software Foundation.               --
21
--                                                                          --
22
-- You should have received a copy of the GNU General Public License and    --
23
-- a copy of the GCC Runtime Library Exception along with this program;     --
24
-- see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see    --
25
-- <http://www.gnu.org/licenses/>.                                          --
26
--                                                                          --
27
-- GNAT was originally developed  by the GNAT team at  New York University. --
28
-- Extensive contributions were provided by Ada Core Technologies Inc.      --
29
--                                                                          --
30
------------------------------------------------------------------------------
31
 
32
--  Package that defines some other prefixes for the MKS base unit system.
33
 
34
--  These prefixes have been defined in a child package in order to avoid too
35
--  many constant declarations in System.Dim_Mks.
36
 
37
package System.Dim.Mks.Other_Prefixes is
38
 
39
   --  SI prefixes for Meter
40
 
41
   ym  : constant Length := 1.0E-24;  -- yocto
42
   zm  : constant Length := 1.0E-21;  -- zepto
43
   am  : constant Length := 1.0E-18;  -- atto
44
   fm  : constant Length := 1.0E-15;  -- femto
45
   pm  : constant Length := 1.0E-12;  -- pico
46
   nm  : constant Length := 1.0E-09;  -- nano
47
   Gm  : constant Length := 1.0E+09;  -- giga
48
   Tm  : constant Length := 1.0E+12;  -- tera
49
   Pem : constant Length := 1.0E+15;  -- peta
50
   Em  : constant Length := 1.0E+18;  -- exa
51
   Zem : constant Length := 1.0E+21;  -- zetta
52
   Yom : constant Length := 1.0E+24;  -- yotta
53
 
54
   --  SI prefixes for Kilogram
55
 
56
   yg  : constant Mass := 1.0E-27;  -- yocto
57
   zg  : constant Mass := 1.0E-24;  -- zepto
58
   ag  : constant Mass := 1.0E-21;  -- atto
59
   fg  : constant Mass := 1.0E-18;  -- femto
60
   pg  : constant Mass := 1.0E-15;  -- pico
61
   ng  : constant Mass := 1.0E-12;  -- nano
62
   Gg  : constant Mass := 1.0E+06;  -- giga
63
   Tg  : constant Mass := 1.0E+09;  -- tera
64
   Peg : constant Mass := 1.0E+13;  -- peta
65
   Eg  : constant Mass := 1.0E+15;  -- exa
66
   Zeg : constant Mass := 1.0E+18;  -- zetta
67
   Yog : constant Mass := 1.0E+21;  -- yotta
68
 
69
   --  SI prefixes for Second
70
 
71
   ys  : constant Time := 1.0E-24;  -- yocto
72
   zs  : constant Time := 1.0E-21;  -- zepto
73
   as  : constant Time := 1.0E-18;  -- atto
74
   fs  : constant Time := 1.0E-15;  -- femto
75
   ps  : constant Time := 1.0E-12;  -- pico
76
   ns  : constant Time := 1.0E-09;  -- nano
77
   Gs  : constant Time := 1.0E+09;  -- giga
78
   Ts  : constant Time := 1.0E+12;  -- tera
79
   Pes : constant Time := 1.0E+15;  -- peta
80
   Es  : constant Time := 1.0E+18;  -- exa
81
   Zes : constant Time := 1.0E+21;  -- zetta
82
   Yos : constant Time := 1.0E+24;  -- yotta
83
 
84
   --  SI prefixes for Ampere
85
 
86
   yA  : constant Electric_Current := 1.0E-24;  -- yocto
87
   zA  : constant Electric_Current := 1.0E-21;  -- zepto
88
   aA  : constant Electric_Current := 1.0E-18;  -- atto
89
   fA  : constant Electric_Current := 1.0E-15;  -- femto
90
   nA  : constant Electric_Current := 1.0E-09;  -- nano
91
   uA  : constant Electric_Current := 1.0E-06;  -- micro (u)
92
   GA  : constant Electric_Current := 1.0E+09;  -- giga
93
   TA  : constant Electric_Current := 1.0E+12;  -- tera
94
   PeA : constant Electric_Current := 1.0E+15;  -- peta
95
   EA  : constant Electric_Current := 1.0E+18;  -- exa
96
   ZeA : constant Electric_Current := 1.0E+21;  -- zetta
97
   YoA : constant Electric_Current := 1.0E+24;  -- yotta
98
 
99
   --  SI prefixes for Kelvin
100
 
101
   yK  : constant Thermodynamic_Temperature := 1.0E-24;  -- yocto
102
   zK  : constant Thermodynamic_Temperature := 1.0E-21;  -- zepto
103
   aK  : constant Thermodynamic_Temperature := 1.0E-18;  -- atto
104
   fK  : constant Thermodynamic_Temperature := 1.0E-15;  -- femto
105
   pK  : constant Thermodynamic_Temperature := 1.0E-12;  -- pico
106
   nK  : constant Thermodynamic_Temperature := 1.0E-09;  -- nano
107
   uK  : constant Thermodynamic_Temperature := 1.0E-06;  -- micro (u)
108
   mK  : constant Thermodynamic_Temperature := 1.0E-03;  -- milli
109
   cK  : constant Thermodynamic_Temperature := 1.0E-02;  -- centi
110
   dK  : constant Thermodynamic_Temperature := 1.0E-01;  -- deci
111
   daK : constant Thermodynamic_Temperature := 1.0E+01;  -- deka
112
   hK  : constant Thermodynamic_Temperature := 1.0E+02;  -- hecto
113
   kK  : constant Thermodynamic_Temperature := 1.0E+03;  -- kilo
114
   MeK : constant Thermodynamic_Temperature := 1.0E+06;  -- mega
115
   GK  : constant Thermodynamic_Temperature := 1.0E+09;  -- giga
116
   TK  : constant Thermodynamic_Temperature := 1.0E+12;  -- tera
117
   PeK : constant Thermodynamic_Temperature := 1.0E+15;  -- peta
118
   EK  : constant Thermodynamic_Temperature := 1.0E+18;  -- exa
119
   ZeK : constant Thermodynamic_Temperature := 1.0E+21;  -- zetta
120
   YoK : constant Thermodynamic_Temperature := 1.0E+24;  -- yotta
121
 
122
   --  SI prefixes for Mole
123
 
124
   ymol  : constant Amount_Of_Substance := 1.0E-24;  -- yocto
125
   zmol  : constant Amount_Of_Substance := 1.0E-21;  -- zepto
126
   amol  : constant Amount_Of_Substance := 1.0E-18;  -- atto
127
   fmol  : constant Amount_Of_Substance := 1.0E-15;  -- femto
128
   pmol  : constant Amount_Of_Substance := 1.0E-12;  -- pico
129
   nmol  : constant Amount_Of_Substance := 1.0E-09;  -- nano
130
   umol  : constant Amount_Of_Substance := 1.0E-06;  -- micro (u)
131
   mmol  : constant Amount_Of_Substance := 1.0E-03;  -- milli
132
   cmol  : constant Amount_Of_Substance := 1.0E-02;  -- centi
133
   dmol  : constant Amount_Of_Substance := 1.0E-01;  -- deci
134
   damol : constant Amount_Of_Substance := 1.0E+01;  -- deka
135
   hmol  : constant Amount_Of_Substance := 1.0E+02;  -- hecto
136
   kmol  : constant Amount_Of_Substance := 1.0E+03;  -- kilo
137
   Memol : constant Amount_Of_Substance := 1.0E+06;  -- mega
138
   Gmol  : constant Amount_Of_Substance := 1.0E+09;  -- giga
139
   Tmol  : constant Amount_Of_Substance := 1.0E+12;  -- tera
140
   Pemol : constant Amount_Of_Substance := 1.0E+15;  -- peta
141
   Emol  : constant Amount_Of_Substance := 1.0E+18;  -- exa
142
   Zemol : constant Amount_Of_Substance := 1.0E+21;  -- zetta
143
   Yomol : constant Amount_Of_Substance := 1.0E+24;  -- yotta
144
 
145
   --  SI prefixes for Candela
146
 
147
   ycd  : constant Luminous_Intensity := 1.0E-24;  -- yocto
148
   zcd  : constant Luminous_Intensity := 1.0E-21;  -- zepto
149
   acd  : constant Luminous_Intensity := 1.0E-18;  -- atto
150
   fcd  : constant Luminous_Intensity := 1.0E-15;  -- femto
151
   pcd  : constant Luminous_Intensity := 1.0E-12;  -- pico
152
   ncd  : constant Luminous_Intensity := 1.0E-09;  -- nano
153
   ucd  : constant Luminous_Intensity := 1.0E-06;  -- micro (u)
154
   mcd  : constant Luminous_Intensity := 1.0E-03;  -- milli
155
   ccd  : constant Luminous_Intensity := 1.0E-02;  -- centi
156
   dcd  : constant Luminous_Intensity := 1.0E-01;  -- deci
157
   dacd : constant Luminous_Intensity := 1.0E+01;  -- deka
158
   hcd  : constant Luminous_Intensity := 1.0E+02;  -- hecto
159
   kcd  : constant Luminous_Intensity := 1.0E+03;  -- kilo
160
   Mecd : constant Luminous_Intensity := 1.0E+06;  -- mega
161
   Gcd  : constant Luminous_Intensity := 1.0E+09;  -- giga
162
   Tcd  : constant Luminous_Intensity := 1.0E+12;  -- tera
163
   Pecd : constant Luminous_Intensity := 1.0E+15;  -- peta
164
   Ecd  : constant Luminous_Intensity := 1.0E+18;  -- exa
165
   Zecd : constant Luminous_Intensity := 1.0E+21;  -- zetta
166
   Yocd : constant Luminous_Intensity := 1.0E+24;  -- yotta
167
 
168
end System.Dim.Mks.Other_Prefixes;

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.