!+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
!.IDENTIFICATION: STARFILE.FMT
!.PURPOSE: Dummy format file for star tables for PEPSYS programs
!.AUTHOR: A. T. Young
!-------------------------------------------------------------------------------
!
!
! INSTRUCTIONS: Edit a copy of this file, replacing the ?? in each DEFINE/FIELD
!		statement below by the actual first and last column numbers of
!		each field in your ascii source file.
!
!		Note that the "width" part of a format specification is the
!		number of columns used in displaying the column with the
!		READ/TABLE command, NOT the number of columns used in the
!		original ascii file!  The ascii column numbers must be given
!		explicitly.
!
!
!	Object names can have 32 characters
!
DEFINE/FIELD ?? ??  C  A32  :OBJECT
!
!
!	R.A. formats:	R7.3  for minutes and tenths
!			R8.4 for minutes and seconds
!			R10.5 for seconds and tenths
!			R11.6 for seconds and hundredths
!			R12.7 for seconds and thousandths
!
DEFINE/FIELD ?? ??  R  R11.6  :RA
!
!
!	Dec. formats:	s6.2  for minutes of arc only
!			s8.3 for minutes and tenths
!			s9.4 for minutes and seconds
!			s11.5 for seconds and tenths
!			s12.6 for seconds and hundredths
!
DEFINE/FIELD ?? ??  R  s12.6  :DEC  "degrees"
!
!
!	Equinox: year and decimal fraction
!
DEFINE/FIELD ?? ??  R  F7.2   :EQUINOX  "years"
!
!
!****************  Everything ABOVE this line is REQUIRED !! *****************
!****************  Everything below this line is optional, except EXIT  ******
!
!
!	P.M. in R.A. (seconds/year)  N.B.: time units!
!
DEFINE/FIELD ?? ??  R  F6.4   :MUALPHA  "sec/y"
!
!
!	P.M. in Dec. (arcsec/year)
!
DEFINE/FIELD ?? ??  R  F6.3   :MUDELTA  "arcsec/y"
!
!
!	Epoch of position data: year and decimal fraction
!
DEFINE/FIELD ?? ??  R  F7.2   :EPOCH  "years"
!
!
!	Spectral type (if > 12 chars, only 1st 12 are output by programs)
!
DEFINE/FIELD ?? ??  C  A12   :SPTYPE
!
!
!	Rough magnitude and source (e.g., 'HD mpg = 10.5')
!
DEFINE/FIELD ?? ??  C  A16   :MAG
!
!
!	Comment field
!
DEFINE/FIELD ?? ??  C  A32   :COMMENT
!
!
!******************  EXIT statement is REQUIRED !!  *************************
!
EXIT