File: funits.h

package info (click to toggle)
iraf-rvsao 2.8.3-1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye, buster, sid
  • size: 16,456 kB
  • sloc: ansic: 963; lisp: 651; fortran: 397; makefile: 27
file content (33 lines) | stat: -rw-r--r-- 1,014 bytes parent folder | download | duplicates (4)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
# Definition for funits package

define	FUN_LEN		124			# Length of funits structure
define	SZ_UNITS	79			# Length of funits strings

define	FUN_TYPE	Memi[$1]		# Unit type code
define	FUN_CLASS	Memi[$1+1]		# Unit class code
define	FUN_MOD		Memi[$1+2]		# Modifier code
define	FUN_SCALE	Memr[$1+3]		# Scale factor
define	FUN_LABEL	Memc[P2C($1+4)]		# Unit label
define	FUN_UNITS	Memc[P2C($1+44)]	# Units string
define	FUN_USER	Memc[P2C($1+84)]	# User units string 

# Unit classes
define	FUN_UNKNOWN	0			# Unknown
define	FUN_FREQ	1			# Frequency
define	FUN_WAVE	2			# Wavelength

# Unit modifiers
define	FUN_LOG		1			# Log10
define	FUN_MAG		2			# Mag

# Unit types
define	FUN_NUNITS	4
define	FUN_DIC	"|jansky|fu|erg/cm2/s/hz|erg/cm2/s/a|log|mag|"

# Unit scales: Conversions from Jansky
define	FUN_J		1.0		# Jansky (W/m2/s/Hz)
define	FUN_FU		1E26		# Flux units (W/m2/s/Hz*1E26)
define	FUN_CGSH	1e3		# CGS units (erg/cm2/s/Hz)
define	FUN_CGSA	1e3		# CGS units (erg/cm2/s/A)

define	FUN_VLIGHT	2.997925e18	# V light A/s