C INCLUDE THESE PARAMETERS IN RADIAL VELOCITY PROGRAMS REAL*8 PI,TWOPI,RPDEG,JYEAR INTEGER*4 OUTVPLOT,INVDATA,OUTVFILE INTEGER*4 MAXVDATA,MAXVMOD,MMAX,INC,OUTC PARAMETER (INC = 5) ! Console input unit PARAMETER (OUTC = 6) ! Console output unit PARAMETER (INVDATA = 11) ! Input unit for velocity data PARAMETER (OUTVFILE = 12) ! Output unit to disk PARAMETER (OUTVPLOT = 13) ! Output unit to disk for plot PARAMETER (MAXVDATA = 100) ! Max. no. of velocity data PARAMETER (MAXVMOD = 100) ! Max. no. of velocity model pts PARAMETER (MMAX = 11) ! Max. no. of parameters in model PARAMETER (PI = 3.14159265359D0) PARAMETER (TWOPI = 2.0D0 * PI) PARAMETER (RPDEG = PI/180D0) PARAMETER (JYEAR = 365.25) ! Days in a Julian year