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

Contents of /trunk/models/measures.a4l

Parent Directory Parent Directory | Revision Log Revision Log


Revision 109 - (show annotations) (download) (as text)
Wed Dec 14 00:34:09 2005 UTC (16 years, 9 months ago) by johnpye
File MIME type: text/x-ascend
File size: 10415 byte(s)
Standardising all currency amounts to ISO 4217. USdollar and dollar
replaced by USD in all models in the library.
1 PROVIDE "measures.a4l";
2
3 (*
4 * measures.a4l
5 * by Tom Epperly and Ben Allan
6 * Part of the ASCEND Library
7 * $Date: 1998/08/17 13:07:04 $
8 * $Revision: 1.5 $
9 * $Author: ballan $
10 * $Source: /afs/cs.cmu.edu/project/ascend/Repository/models/measures.a4l,v $
11 *
12 * This file is part of the ASCEND Modeling Library.
13 *
14 * This provides common unit definitions. The user may write additional
15 * files of unit definitions particular to their problem or site.
16 *
17 * Copyright (C) 1997 Carnegie Mellon University.
18 *
19 * The ASCEND Modeling Library is free software; you can redistribute
20 * it and/or modify it under the terms of the GNU General Public
21 * License as published by the Free Software Foundation; either
22 * version 2 of the License, or (at your option) any later version.
23 *
24 * The ASCEND Modeling Library is distributed in hope that it will be
25 * useful, but WITHOUT ANY WARRANTY; without even the implied
26 * warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
27 * See the GNU General Public License for more details.
28 *
29 * You should have received a copy of the GNU General Public License
30 * along with the program; if not, write to the Free Software
31 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139 USA. Check
32 * the file named COPYING.
33 *)
34
35 (*
36 * Units input file
37 * by Tom Epperly
38 * Copyright(C) 1990 Thomas Guthrie Epperly
39 * Copyright(C) 1994-1997 Carnegie Mellon University
40 *
41 * This is a file defining the conversion factors ASCEND will recognize when
42 * it sees them as {units). Note that the assignment x:= 0.5 {100};; yields
43 * x == 50, and that there are no 'offset conversions,' e.g. F=9/5C+32;
44 * Added money which isn't really time 3-94 BAA
45 * Expanded, including some of Karl's units, constants. 4-94 BAA
46 * Updated with supplementary SI dimensions and less ambiguous mole dim. jz/baa
47 *
48 * Please keep unit names to 20 characters or less as this makes life pretty.
49 * This is not a hard limit however.
50 *
51 * The root system units in SI MKS system are set in the C code to:
52 * unitname DIMENSION
53 * define kilogram M; internal mass unit SI
54 * define mole Q; internal quantity unit SI
55 * define second T; internal time unit SI
56 * define meter L; internal length unit SI
57 * define Kelvin TMP; internal temperature unit SI
58 * define currency C; internal currency unit
59 * define ampere E; internal electric current unit SI suggested
60 * define candela LUM; internal luminous intensity unit SI
61 * define radian P; internal plane angle unit SI suggested
62 * define steradian S; internal solid angle unit SI suggested
63 *)
64
65 UNITS
66
67 (* distance *)
68
69 pc = {3.08374e+16*meter};
70 parsec = {pc};
71 kpc = {1000*pc};
72 Mpc = {1e6*pc};
73 km = {meter*1000};
74 m = {meter};
75 dm = {meter/10};
76 cm = {meter/100};
77 mm = {meter/1000};
78 um = {meter/1000000};
79 nm = {1.e-9*meter};
80 kilometer = {km};
81 centimeter = {cm};
82 millimeter = {mm};
83 micron = {um};
84 nanometer = {nm};
85 angstrom = {m/1e10};
86 fermi = {m/1e15};
87
88 mi = {1609.344*meter};
89 yd = {0.914412*meter};
90 ft = {0.304804*meter};
91 inch = {0.0254*meter};
92 mile = {mi};
93 yard = {yd};
94 feet = {ft};
95 foot = {ft};
96 in = {inch};
97
98 (* mass *)
99
100 metton = {kilogram *1000};
101 mton = {kilogram *1000};
102 kg = {kilogram};
103 g = {kilogram/1000};
104 gram = {g};
105 mg = {g/1000};
106 milligram = {mg};
107 ug= {kilogram*1e-9};
108 microgram= {ug};
109 ng= {kilogram*1e-12};
110 nanogram= {ng};
111 pg= {kilogram*1e-15};
112 picogram= {pg};
113
114 amu = {1.661e-27*kilogram};
115 lbm = {4.535924e-1*kilogram};
116 ton = {lbm*2000};
117 oz = {0.028349525*kilogram};
118 slug = {14.5939*kilogram};
119
120 (* time *)
121
122 yr = {31557600*second};
123 wk = {604800*second};
124 dy = {86400*second};
125 hr = {3600*second};
126 min = {60*second};
127 sec = {second};
128 s = {second};
129 ms = {second/1000};
130 us = {second/1e6};
131 ns = {second/1e9};
132 ps = {second/1e12};
133 year = {yr};
134 week = {wk};
135 day = {dy};
136 hour = {hr};
137 minute = {min};
138 millisecond = {ms};
139 microsecond = {us};
140 nanosecond = {ns};
141 picosecond = {ps};
142
143 (* molecular quantities *)
144
145 kg_mole= {1000*mole};
146 g_mole = {mole};
147 gm_mole = {mole};
148 kmol = {1000*mole};
149 mol = {mole};
150 mmol = {mole/1000};
151 millimole= {mmol};
152 umol = {mole/1e6};
153 micromole= {umol};
154 lb_mole = {4.535924e+2*mole};
155
156 (* temperature *)
157
158 K = {Kelvin};
159 R = {5*Kelvin/9};
160 Rankine = {R};
161
162 (* money *)
163
164 USD = {currency};
165 CR = {currency};
166 credits= {currency};
167
168 (* reciprocal time (frequency) *)
169
170 rev = {1.0};
171 cycle = {rev};
172 rpm = {rev/minute};
173 rps = {rev/second};
174 hertz = {cycle/second};
175 Hz = {hertz};
176
177 (* area *)
178
179 ha = {meter^2*10000};
180 hectare= {ha};
181 acre= {meter^2*4046.856};
182
183 (* volume *)
184
185 L = {meter^3/1000};
186 litre = {L};
187 liter = {L};
188 mL = {L/1000};
189 ml = {L/1000};
190 ul = {L/1e6};
191 uL = {L/1e6};
192 milliliter = {ml};
193 millilitre = {mL};
194 microliter = {ul};
195 microlitre = {uL};
196
197 hogshead= {2.384809e-1*meter^3};
198 cuft = {0.02831698*meter^3};
199 impgal = {4.52837e-3*meter^3};
200 gal = {3.785412e-3*meter^3};
201 barrel = {42.0*gal};
202 gallon = {gal};
203 quart = {gal/4};
204 pint = {gal/8};
205 cup = {gal/16};
206 floz = {gal/128};
207
208 (* force *)
209
210 N = {kilogram*meter/second^2};
211 newton = {N};
212 dyne = {N*1.0e-5};
213 EN = {1e18*N};
214 PN = {1e15*N};
215 TN = {1e12*N};
216 GN = {1e9*N};
217 MN = {1e6*N};
218 kN = {1000*N};
219 mN= {N*1e-3};
220 uN= {N*1e-6};
221 nN= {N*1e-9};
222 pN= {N*1e-12};
223 fN= {N*1e-15};
224 aN= {N*1e-18};
225 milliNewton= {mN};
226 microNewton= {uN};
227 nanoNewton= {nN};
228 picoNewton= {pN};
229 femtoNewton= {fN};
230 attoNewton= {aN};
231
232 lbf = {N*4.448221};
233
234 (* pressure *)
235
236 Pa = {kilogram/meter/second^2};
237 MPa = {1.0e+6*Pa};
238 bar = {1.0e+5*Pa};
239 kPa = {1000*Pa};
240 pascal = {Pa};
241
242 atm = {Pa*101325.0};
243 mmHg = {133.322*Pa};
244 torr = {133.322*Pa};
245 psia = {6894.733*Pa};
246 psi = {psia};
247 ftH2O = {2989*Pa};
248
249 (* energy *)
250
251 J = {kilogram*meter^2/second^2};
252 joule = {J};
253 MJ = {J * 1000000};
254 kJ = {J * 1000};
255 mJ= {J*1.0e-3};
256 uJ= {J*1.0e-6};
257 nJ= {J*1.0e-9};
258 milliJoule= {mJ};
259 microJoule= {uJ};
260 nanoJoule= {nJ};
261 erg = {J*1.0e-7};
262
263 BTU = {1055.056*J};
264 pCu = {BTU * 1.8};
265 cal = {J*4.18393};
266 calorie = {cal};
267 kcal= {1000*calorie};
268 Cal= {1000*calorie};
269
270 (* power *)
271
272 W = {J/second};
273 EW = {1.0e+18*W};
274 PW = {1.0e+15*W};
275 TW = {1.0e+12*W};
276 GW = {1.0e+9*W};
277 MW = {1.0e+6*W};
278 kW = {1000*W};
279 mW = {W/1e3};
280 uW = {W/1e6};
281 nW = {W/1e9};
282 pW = {W/1e12};
283 fW = {W/1e15};
284 aW = {W/1e18};
285 terawatt = {TW};
286 gigawatt = {GW};
287 megawatt = {MW};
288 kilowatt = {kW};
289 watt = {W};
290 milliwatt = {mW};
291 microwatt = {uW};
292 nanowatt = {nW};
293 picowatt = {pW};
294 femtowatt = {fW};
295 attowatt = {aW};
296 aWW= {1*EW}; (* we could say art has a lot of power *)
297
298 hp= {7.456998e+2*W};
299
300 (* absolute viscosity *)
301
302 poise = {Pa*s/10};
303 cP = {poise/100};
304
305 (* electric charge *)
306
307 coulomb= {ampere*second};
308 C = {coulomb};
309 coul = {coulomb};
310 mC = {0.001*C};
311 uC = {1e-6*C};
312 nC = {1e-9*C};
313 pC = {1e-12*C};
314
315 (* misc electro-magnetic fun *)
316
317 V = {kilogram*meter^2/second^3/ampere};
318 F = {ampere^2*second^4/kilogram/meter^2};
319 ohm = {kilogram*meter^2/second^3/ampere^2};
320 mho = {ampere^2*second^3/kilogram/meter^2};
321 S = {mho};
322 siemens = {S};
323 A= {ampere};
324 amp = {ampere};
325 volt = {V};
326 farad= {F};
327 mA= {A/1000};
328 uA= {A/1000000};
329 kV= {1000*V};
330 MV= {1e6*V};
331 mV= {V/1000};
332 mF = {0.001*F};
333 uF = {1e-6*F};
334 nF = {1e-9*F};
335 pF = {1e-12*F};
336 kohm = {1000*ohm};
337 Mohm = {1e6*ohm};
338 kS = {1000*S};
339 mS = {0.001*S};
340 uS = {1e-6*S};
341 Wb = {V*second};
342 weber = {Wb};
343 tesla = {Wb/m^2};
344 gauss = {1e-4*tesla};
345 H = {Wb/A};
346 henry = {H};
347 mH = {0.001*H};
348 uH = {1e-6*H};
349
350 (*
351 * numeric constants of some interest
352 * to set a variable or constant to these, the code is (in the declarations)
353 * ATOM constant REFINES real; END constant;
354 * MODEL gizmo;
355 * x IS_A constant;
356 * x := 1 {PI};
357 * ...
358 *)
359 molecule = {1.0};
360 PI= {3.1415926535897932385}; (* Circumference/Diameter ratio *)
361 EULER_C = {0.57721566490153286}; (* euler gamma *)
362 GOLDEN_C = {1.618033988749894}; (* golden ratio *)
363 HBAR = {1.055e-34*J*second}; (* Reduced planck's constant *)
364 PLANCK_C = {2*PI*HBAR}; (* Planck's constant *)
365 LIGHT_C = {2.99793e8 * meter/second}; (* Speed of light in vacuum *)
366 MU0 = {4e-7*PI*kg*m/C/C}; (* Permeability of free space *)
367 EPSILON0 = {1/LIGHT_C/LIGHT_C/MU0}; (* Permittivity of free space *)
368 BOLTZMAN_C = {1.3805e-23 * J/K}; (* Boltzman's constant *)
369 AVOGADRO_C = {6.022045e23 *molecule/mole}; (* Avogadro's number of molecules *)
370 GRAVITY_C = {6.673e-11 * N*m*m/kg/kg}; (* Newtons gravitational constant *)
371 GAS_C = {BOLTZMAN_C*AVOGADRO_C}; (* Gas constant *)
372 INFINITY= {1.0e38}; (* damn big number *)
373 LIM_EXP= {709.78}; (* ln ( maxdouble ) *)
374 LIM_CUBE= {5.6438030941223618e101}; (* cbrt ( maxdouble ) *)
375 LIM_SQR= {1.0e154}; (* sqrt(maxdouble) *)
376 (* swiped from C math.h *)
377 M_E= {2.7182818284590452354E0}; (* base e *)
378 M_LOG2E= {1.4426950408889634074E0}; (* log2(e) *)
379 M_LOG10E= {4.3429448190325182765E-1}; (* log10(e) *)
380 M_LN2= {6.9314718055994530942E-1}; (* ln(2) *)
381 M_LN10= {2.3025850929940456840E0}; (* ln(10) *)
382 M_PI= {3.1415926535897932385E0}; (* as PI, but for consistency *)
383 M_PI_2= {1.5707963267948966192E0}; (* PI/2 *)
384 M_PI_4= {7.8539816339744830962E-1}; (* PI/4 *)
385 M_1_PI= {3.1830988618379067154E-1}; (* 1/PI *)
386 M_2_PI= {6.3661977236758134308E-1}; (* 2/PI *)
387 M_2_SQRTPI= {1.1283791670955125739E0}; (* 2/sqrt(PI) *)
388 M_SQRT2= {1.4142135623730950488E0}; (* sqrt(2) *)
389 M_SQRT1_2= {7.0710678118654752440E-1}; (* 1/sqrt(2) *)
390
391 eCHARGE = {1.602e-19*C}; (* Charge of an electron *)
392 EARTH_G = {9.80665 * m/s/s}; (* Earth's gravitational field, somewhere *)
393 eMASS = {9.1095e-31*kilogram}; (* Electron rest mass, I suppose *)
394 pMASS = {1.67265e-27*kilogram}; (* Proton mass *)
395
396 (* constant based conversions *)
397
398 eV = {eCHARGE * V};
399 keV = {1000*eV};
400 MeV = {1e6*eV};
401 GeV = {1e9*eV};
402 TeV = {1e12*eV};
403 PeV = {1e15*eV};
404 EeV = {1e18*eV};
405
406 lyr = {LIGHT_C * yr}; (* Light-year *)
407
408 oersted = {gauss/MU0};
409
410 (* subtly dimensionless measures *)
411
412 rad = {radian};
413 srad = {steradian};
414 deg = {radian*1.74532925199433e-2};
415 degrees = {deg};
416 grad = {0.9*deg};
417 arcmin = {degrees/60.0};
418 arcsec = {arcmin/60.0};
419
420 (* light quantities *)
421
422 cd = {candela};
423 lm = {candela*steradian};
424 lumen = {lm};
425 lx = {lm/meter^2};
426 lux= {lx};
427
428 (* misc rates *)
429
430 gpm = {gallon/minute};
431
432 (* time variant conversions *)
433
434 MINIMUMWAGE = {3.35*US/hr}; (* 1987 *)
435 (*
436 * conversions we'd like to see , but probably won't
437 * milliHelen = {beauty/ship};
438 * Helen = {documentation/project};
439 *)
440 END UNITS;

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