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