Conversion of standardized ReadMe file for
file /./ftp/cats/J/ApJ/835/161 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-Oct-12
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/835/161 A cosmic void catalog of SDSS DR12 BOSS galaxies (Mao+, 2017)
*================================================================================
*A cosmic void catalog of SDSS DR12 BOSS galaxies.
* Mao Q., Berlind A.A., Scherrer R.J., Neyrinck M.C., Scoccimarro R.,
* Tinker J.L., McBride C.K., Schneider D.P., Pan K., Bizyaev D.,
* Malanushenko E., Malanushenko V.
* <Astrophys. J., 835, 161-161 (2017)>
* =2017ApJ...835..161M (SIMBAD/NED BibCode)
C=============================================================================
C Internal variables
integer*4 i__
c - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
C Declarations for 'table1.dat' ! Void catalog from the Baryon Oscillation
Spectroscopic Survey (BOSS) sample
integer*4 nr__
parameter (nr__=1228) ! Number of records
character*104 ar__ ! Full-size record
C J2000 position composed of: RAdeg DEdeg
character*11 Sample ! BOSS galaxies sample identifier (CMASS or LOWZ)
integer*4 ID ! [15/22748] Void identifier within Sample
real*8 RAdeg ! (deg) Right Ascension in decimal degrees (J2000) (1)
real*4 DEdeg ! (deg) Declination in decimal degrees (J2000) (1)
real*4 z ! [0.2/0.7] Redshift (1)
integer*4 NGal ! [12/109066] Number of galaxies in the void
real*4 V ! (Mpc+3) [12260/] Total Voronoi void volume;
* in units of (Mpc/h)^3^
real*8 Reff ! (Mpc) [14/453] Effective radius; Mpc/h
real*4 nmin ! (Mpc-3) [/0.0002] Number density {eta}_min_;
* in units of (h/Mpc)^3^ (3)
real*4 delmin ! [-1/-0.5] Density contrast {delta}_min_ (4)
real*4 r ! [1.5/6.2] Ratio (5)
real*4 Prob ! [/0.05] Probability (6)
real*8 Dbound ! (Mpc) [7/298] Distance; Mpc/h (7)
*Note (1): Of the weighted center.
*Note (3): Of the minimum density Voronoi cell in the void.
*Note (4): Of the minimum density cell comparing to the
* mean density at that redshift.
*Note (5): Between the minimum density particle on a ridge to
* the minimum density particle of the void.
*Note (6): That the void arises from Poisson fluctuations.
*Note (7): From the weighted center to the nearest survey boundary.
C=============================================================================
C Loading file 'table1.dat' ! Void catalog from the Baryon Oscillation
* Spectroscopic Survey (BOSS) sample
C Format for file interpretation
1 format(
+ A11,1X,I5,1X,F7.3,1X,F6.3,1X,F5.3,1X,I6,1X,E9.3,1X,F7.3,1X,
+ E9.3,1X,F6.3,1X,F5.3,1X,E9.3,1X,F7.3)
C Effective file loading
open(unit=1,status='old',file=
+'table1.dat')
write(6,*) '....Loading file: table1.dat'
do i__=1,1228
read(1,'(A104)')ar__
read(ar__,1)
+ Sample,ID,RAdeg,DEdeg,z,NGal,V,Reff,nmin,delmin,r,Prob,Dbound
c ..............Just test output...........
write(6,1)
+ Sample,ID,RAdeg,DEdeg,z,NGal,V,Reff,nmin,delmin,r,Prob,Dbound
c .......End.of.Just test output...........
end do
close(1)
C=============================================================================
stop
end