1 cdaq  1.1 ********************** begin: GEN_UNITS.PAR *******************************
 2           *
 3           *		short unit names
 4           *
 5           *     $Log:$
 6           *
 7           *-time units
 8                 real nS,uS,mS,Sec,pS
 9                 parameter (nS= nanoSec)                   !nS std. hallC time unit
10                 parameter (uS= microSec)                  !uS
11                 parameter (mS= milliSec)                  !mS
12                 parameter (Sec= Second)                   !second
13                 parameter (pS= picoSec)                   !pS
14           *
15           *-distance units
16                 real cm,mm,um,in,ft
17                 parameter (cm= centimeter)                !cm standard hallC distance unit
18                 parameter (mm= millimeter)                !mm
19                 parameter (um= micron)                    !um
20                 parameter (in= inch)                      !US in.
21                 parameter (ft= foot)                      !US ft.
22 cdaq  1.1 *
23           *-angle units
24                 real rad,deg
25                 parameter (rad= radian)                   !standard hallC angle unit
26                 parameter (deg= degree)                   !radians/degree
27           *
28           *-magnetic field units
29                 real Kg
30                 parameter (Kg= Kgauss)
31           *
32           ************************ end: GEN_UNITS.PAR ********************************
33           *     Local Variables:
34           *     mode: fortran
35           *     End: