diff options
Diffstat (limited to 'noao/lib/units.h')
| -rw-r--r-- | noao/lib/units.h | 50 |
1 files changed, 50 insertions, 0 deletions
diff --git a/noao/lib/units.h b/noao/lib/units.h new file mode 100644 index 00000000..95d8367e --- /dev/null +++ b/noao/lib/units.h @@ -0,0 +1,50 @@ +# Definition for units package + +define UN_LEN 126 # Length of units structure +define SZ_UNITS 79 # Length of units strings + +define UN_TYPE Memi[$1] # Unit type code +define UN_CLASS Memi[$1+1] # Unit class code +define UN_LOG Memi[$1+2] # Log code +define UN_INV Memi[$1+3] # Inverse code +define UN_SCALE Memr[P2R($1+4)] # Scale factor +define UN_VREF Memr[P2R($1+5)] # Ref lambda (ang) for velocity +define UN_LABEL Memc[P2C($1+6)] # Unit label +define UN_UNITS Memc[P2C($1+46)] # Units string +define UN_USER Memc[P2C($1+86)] # User units string + +# Unit classes +define UN_UNKNOWN 0 # Unknown +define UN_WAVE 1 # Wavelength +define UN_FREQ 2 # Frequency +define UN_VEL 3 # Velocity +define UN_ENERGY 4 # Energy +define UN_DOP 5 # Doppler shift + +# Unit types +define UN_NUNITS 17 +define UN_DIC "|angstroms|nanometers|millimicrons|microns|millimeters\ + |centimeters|meters|hertz|kilohertz|megahertz|gigahertz\ + |m/s|km/s|ev|kev|mev|z|log|inverse|" + +# Unit scales: Conversions from Angstroms +define UN_ANG 1.0 # angstroms +define UN_NM 0.1 # nanometers +define UN_MMIC 0.1 # millimicrons +define UN_MIC 1E-4 # microns +define UN_MM 1E-7 # millimeters +define UN_CM 1E-8 # centimeter +define UN_M 1E-10 # meters +define UN_HZ 2.9979E18 # hertz +define UN_KHZ 2.9979E15 # kilohertz +define UN_MHZ 2.9979E12 # megahertz +define UN_GHZ 2.9979E9 # gigaertz +define UN_MPS 2.9979E8 # m/s +define UN_KPS 2.9979E5 # km/s +define UN_EV 1.2396E4 # ev +define UN_KEV 1.2396E1 # kev +define UN_MEV 1.2396E-2 # mev +define UN_Z 1.0 # doppler shift + +# Unit abbreviations +define ABBREVIATIONS "noao$lib/units.dat" |