Conversion of standardized ReadMe file for
file /./ftp/cats/J/ApJ/786/20 into FORTRAN code for reading data files line by line.
Note that special values are assigned to unknown or unspecified
numbers (also called NULL numbers);
when necessary, the coordinate components making up the right ascension
and declination are converted into floating-point numbers
representing these angles in degrees.
program load_ReadMe
C=============================================================================
C F77-compliant program generated by readme2f_1.81 (2015-09-23), on 2026-Jun-08
C=============================================================================
* This code was generated from the ReadMe file documenting a catalogue
* according to the "Standard for Documentation of Astronomical Catalogues"
* currently in use by the Astronomical Data Centers (CDS, ADC, A&A)
* (see full documentation at URL http://vizier.u-strasbg.fr/doc/catstd.htx)
* Please report problems or questions to
C=============================================================================
implicit none
* Unspecified or NULL values, generally corresponding to blank columns,
* are assigned one of the following special values:
* rNULL__ for unknown or NULL floating-point values
* iNULL__ for unknown or NULL integer values
real*4 rNULL__
integer*4 iNULL__
parameter (rNULL__=--2147483648.) ! NULL real number
parameter (iNULL__=(-2147483647-1)) ! NULL int number
integer idig ! testing NULL number
C=============================================================================
Cat. J/ApJ/786/20 Classification of 2XMM variable sources (Lo+, 2014)
*================================================================================
*Automatic classification of time-variable X-ray sources.
* Lo K.K., Farrell S., Murphy T., Gaensler B.M.
* <Astrophys. J., 786, 20 (2014)>
* =2014ApJ...786...20L (SIMBAD/NED BibCode)
C=============================================================================
C Internal variables
integer*4 i__
c - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
C Declarations for 'table7.dat' ! 2XMM variable sources classification
integer*4 nr__
parameter (nr__=1284) ! Number of records
character*95 ar__ ! Full-size record
character*22 Name ! 2XMM identifier (2XMM JHHMMSS.s+DDMMSS and
* 2XMMi JHHMMSS.s+DDMMSS in Simbad)
real*4 PAGN ! Probability source is an AGN
real*4 PCV ! Probability source is a CV
real*4 PGRB ! Probability source is a GRB
real*4 PSSS ! Probability source is a SSS
real*4 PStar ! Probability source is a star
real*4 PULX ! Probability source is a ULX
real*4 PXRB ! Probability source is a XRB
real*4 Pmax ! Maximum classification probability
character*4 RFC ! Output from Random Forest classifier
real*4 CM ! Classification margin
character*7 Sample ! Source in known or unknown sample
character*4 Class ! Actual class; known sources only
C=============================================================================
C Loading file 'table7.dat' ! 2XMM variable sources classification
C Format for file interpretation
1 format(
+ A22,1X,F5.3,1X,F5.3,1X,F5.3,1X,F5.3,1X,F5.3,1X,F5.3,1X,F5.3,
+ 1X,F5.3,1X,A4,1X,F6.3,1X,A7,1X,A4)
C Effective file loading
open(unit=1,status='old',file=
+'table7.dat')
write(6,*) '....Loading file: table7.dat'
do i__=1,1284
read(1,'(A95)')ar__
read(ar__,1)
+ Name,PAGN,PCV,PGRB,PSSS,PStar,PULX,PXRB,Pmax,RFC,CM,Sample,
+ Class
c ..............Just test output...........
write(6,1)
+ Name,PAGN,PCV,PGRB,PSSS,PStar,PULX,PXRB,Pmax,RFC,CM,Sample,
+ Class
c .......End.of.Just test output...........
end do
close(1)
C=============================================================================
stop
end