/[ascend]/trunk/models/measures.a4l
ViewVC logotype

Diff of /trunk/models/measures.a4l

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1702 by jpye, Sun Jan 6 03:42:21 2008 UTC revision 1703 by jpye, Sun Jan 6 04:11:10 2008 UTC
# Line 29  PROVIDE "measures.a4l"; Line 29  PROVIDE "measures.a4l";
29      Please keep unit names to 20 characters or less as this makes life pretty.      Please keep unit names to 20 characters or less as this makes life pretty.
30      This is not a hard limit however.      This is not a hard limit however.
31            
32      The root system units in SI MKS system are set in the C code to:      All ASCEND units are built up from base units for each dimension of
33      unitname  DIMENSION      measurement. The base units are mostly the Systeme Internationale base
34      define kilogram   M;        internal mass unit SI      units, with a few additional ones to aid with legibility/checkability.
35      define mole       Q;        internal quantity unit SI  
36      define second     T;        internal time unit SI      Unit      Dim code   Dimension              Source
37      define meter      L;        internal length unit SI      kg        M          mass                   SI
38      define Kelvin     TMP;      internal temperature unit SI      mol       Q          amount of substance    SI
39      define currency   C;        internal currency unit      s         T          time                   SI
40      define ampere     E;        internal electric current unit SI suggested      m         L          length                 SI
41      define candela    LUM;      internal luminous intensity unit SI      K         TMP        temperature            SI
42      define radian     P;        internal plane angle unit SI suggested      USD       C          currency               non SI
43      define steradian  S;        internal solid angle unit SI suggested      A         E          electric current       SI
44        cd        LUM        luminous intensity     SI
45      CHANGES:      rad       P          plane angle            SI suggested
46      Added money which isn't really time 3-94 BAA      sr        S          solid angle            SI suggested
     Expanded, including some of Karl's units, constants. 4-94 BAA  
     Updated with supplementary SI dimensions and less ambiguous mole dim. jz/baa      
47    
48        Units for currency are selected arbitrarily to be USD, for US dollars,
49        being the dominant international currency at this time.
50        
51      Original author: Tom Epperly, 1990.      Original author: Tom Epperly, 1990.
52      Contributors: Ben Allan, John Pye.      Contributors: Ben Allan, John Pye.
53  *)  *)
# Line 161  Rankine = {R}; Line 162  Rankine = {R};
162  (*  money *)  (*  money *)
163    
164  (* PLEASE USE ISO 4127 CURRENCY CODES FOR ALL MONEY UNITS *)  (* PLEASE USE ISO 4127 CURRENCY CODES FOR ALL MONEY UNITS *)
165  USD = {currency};  currency = {USD};
166  CR = {currency};  CR = {USD};
167  credits= {currency};  credits= {USD};
168  (* the following two are historic and should not be used in future *)  (* the following two are historic and should not be used in future *)
169  USdollar = {currency};  USdollar = {USD};
170  US = {currency};  US = {USD};
171    
172  (* currencies according to yahoo.com, as at 11 Sep 2006 *)  (* currencies according to yahoo.com, as at 11 Sep 2006 *)
173  AUD = {0.752400*USD};  AUD = {0.752400*USD};
# Line 316  aWW= {1*EW}; (* <geekjok>we could say ar Line 317  aWW= {1*EW}; (* <geekjok>we could say ar
317  Wh = {W*h};  Wh = {W*h};
318  kWh = {kW*h};  kWh = {kW*h};
319    
   
320  hp= {7.456998e+2*W};  hp= {7.456998e+2*W};
321    
322  (* absolute viscosity *)  (* absolute viscosity *)
# Line 382  molecule = {1.0}; Line 382  molecule = {1.0};
382  PI= {3.1415926535897932385};              (* Circumference/Diameter ratio *)  PI= {3.1415926535897932385};              (* Circumference/Diameter ratio *)
383  EULER_C = {0.57721566490153286};          (* euler gamma *)  EULER_C = {0.57721566490153286};          (* euler gamma *)
384  GOLDEN_C = {1.618033988749894};           (* golden ratio *)  GOLDEN_C = {1.618033988749894};           (* golden ratio *)
385  HBAR = {1.055e-34*J*second};              (* Reduced planck's constant *)  HBAR = {1.055e-34*J*s};              (* Reduced planck's constant *)
386  PLANCK_C = {2*PI*HBAR};                   (* Planck's constant *)  PLANCK_C = {2*PI*HBAR};                   (* Planck's constant *)
387  LIGHT_C = {2.99793e8 * meter/second};     (* Speed of light in vacuum *)  LIGHT_C = {2.99793e8 * m/s};     (* Speed of light in vacuum *)
388  MU0 = {4e-7*PI*kg*m/C/C};                 (* Permeability of free space *)  MU0 = {4e-7*PI*kg*m/C/C};                 (* Permeability of free space *)
389  EPSILON0 = {1/LIGHT_C/LIGHT_C/MU0};       (* Permittivity of free space *)  EPSILON0 = {1/LIGHT_C/LIGHT_C/MU0};       (* Permittivity of free space *)
390  BOLTZMAN_C = {1.3805e-23 * J/K};          (* Boltzman's constant *)  BOLTZMAN_C = {1.3805e-23 * J/K};          (* Boltzman's constant *)
391  SIGMA_C = {5.670e-8 * W/m^2/K^4 };        (* Stefan-Boltzmann constant  SIGMA_C = {5.670e-8 * W/m^2/K^4 };        (* Stefan-Boltzmann constant
392                                               - blackbody radiation *)                                               - blackbody radiation *)
393  AVOGADRO_C = {6.022045e23 *molecule/mole};(* Avogadro's number of molecules *)  AVOGADRO_C = {6.022045e23 *molecule/mol};(* Avogadro's number of molecules *)
394  GRAVITY_C = {6.673e-11 * N*m*m/kg/kg};    (* Newtons gravitational constant *)  GRAVITY_C = {6.673e-11 * N*m*m/kg/kg};    (* Newtons gravitational constant *)
395  GAS_C = {BOLTZMAN_C*AVOGADRO_C};          (* Gas constant *)  GAS_C = {BOLTZMAN_C*AVOGADRO_C};          (* Gas constant *)
396  INFINITY= {1.0e38};                       (* damn big number *)  INFINITY= {1.0e38};                       (* damn big number *)
# Line 415  M_SQRT1_2=   {7.0710678118654752440E-1}; Line 415  M_SQRT1_2=   {7.0710678118654752440E-1};
415    
416  eCHARGE = {1.602e-19*C};         (* Charge of an electron *)  eCHARGE = {1.602e-19*C};         (* Charge of an electron *)
417  EARTH_G = {9.80665 * m/s/s};   (* Earth's gravitational field, somewhere *)  EARTH_G = {9.80665 * m/s/s};   (* Earth's gravitational field, somewhere *)
418  eMASS = {9.1095e-31*kilogram};   (* Electron rest mass, I suppose *)  eMASS = {9.1095e-31*kg};   (* Electron rest mass, I suppose *)
419  pMASS = {1.67265e-27*kilogram};  (* Proton mass *)  pMASS = {1.67265e-27*kg};  (* Proton mass *)
420    
421  (* constant based conversions *)  (* constant based conversions *)
422    
# Line 454  lux= {lx}; Line 454  lux= {lx};
454    
455  (* misc rates *)  (* misc rates *)
456    
457  gpm = {gallon/minute};  gpm = {gallon/min};
458    
459  (* time variant conversions *)  (* time variant conversions *)
460    

Legend:
Removed from v.1702  
changed lines
  Added in v.1703

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22