Conversion of standardized ReadMe file for
file /./ftp/cats/J/ApJ/742/61 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 2024-Mar-29 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/742/61 Photometric redshift of AGNs from XMM- and C-COSMOS (Salvato+ 2011) *================================================================================ *Dissecting photometric redshift for active galactic nucleus using XMM- and *Chandra-COSMOS samples. * Salvato M., Ilbert O., Hasinger G., Rau A., Civano F., Zamorani G., * Brusa M., Elvis M., Vignali C., Aussel H., Comastri A., Fiore F., * Le Floc'h E., Mainieri V., Bardelli S., Bolzonella M., Bongiorno A., * Capak P., Caputi K., Cappelluti N., Carollo C.M., Contini T., Garilli B., * Iovino A., Fotopoulou S., Fruscione A., Gilli R., Halliday C., Kneib J.-P., * Kakazu Y., Kartaltepe J.S., Koekemoer A.M., Kovac K., Ideue Y., Ikeda H., * Impey C.D., Le Fevre O., Lamareille F., Lanzuisi G., Le Borgne J.-F., * Le Brun V., Lilly S., Maier C., Manohar S., Masters D., McCracken H., * Messias H., Mignoli M., Mobasher B., Nagao T., Pello R., Puccetti S., * Perez-Montero E., Renzini A., Sargent M., Sanders D.B., Scodeggio M., * Scoville N., Shopbell P., Silverman J., Taniguchi Y., Tasca L., Tresse L., * Trump J.R., Zucca E. * <Astrophys. J., 742, 61 (2011)> * =2011ApJ...742...61S C============================================================================= C Internal variables integer*4 i__ c - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - C Declarations for 'table4.dat' ! Extracted from C-COSMOS photometric redshift catalog integer*4 nr__ parameter (nr__=1694) ! Number of records character*56 ar__ ! Full-size record integer*4 XID ! [1/100382] X-ray identifier (1) integer*4 OID ! ?=-99 Optical counterpart identifier (2) real*4 zph ! [0/7] Photometric redshift (0=star) real*4 b_zph ! Lower value on zph character*1 n_zph ! [*] Lower value forced (5) real*4 B_zph_1 ! Upper value on zph character*1 f_zph ! [*] Upper value forced (5) real*8 PDFz ! [14.06/100.1]?=-99 Redshift probability distribution integer*4 Temp ! [1/131]?=-99 Best-fit template (3) integer*4 Cl ! [1/4]?=-99 Morphological classification (4) real*4 VAR ! (mag) [0/2.1]?=-99 Variability parameter defined as Eq.(1) * in Salvato et al. 2009ApJ...690.1250S *Note (1): Chandra identifier from Civano et al. 2012, Cat. J/ApJS/201/30, * (Col. CID; <CXOC JHHMMSS.s+DDMMSS> in Simbad) for table 4. * XMM identifier from Brusa et al. 2010, Cat. J/ApJ/716/348, * <XMMC NNNNNN> in Simbad for table 5. *Note (2): As reported in the photo-z catalog (Ilbert et al. 2009ApJ...690.1236I; * Column 2) and in the photometric catalog "cosmos_phot_20081101" * available in the COSMOS web page: * http://irsa.ipac.caltech.edu/data/COSMOS/tables/photometry/ *Note (3): Best-fit template: from 1 to 31 the templates are from Salvato et al. * 2009ApJ...690.1250S, templates from 100+(1...30) are from the * Ilbert et al. 2009ApJ...690.1236I library. *Note (4): From Leauthaud et al. 2007ApJS..172..219L. 1 or 3 indicates extended * sources, while 2 or 4 indicates point-like sources. *Note (5): The asterisk, in table5 only, was added at CDS when the limit * value was changed; see the "History" section below. c - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - C Declarations for 'table5.dat' ! Extracted from XMM-COSMOS photometric redshift catalog integer*4 nr__1 parameter (nr__1=1735) ! Number of records character*56 ar__1 ! Full-size record integer*4 XID_1 ! [1/100382] X-ray identifier (1) integer*4 OID_1 ! ?=-99 Optical counterpart identifier (2) real*4 zph_1 ! [0/7] Photometric redshift (0=star) real*4 b_zph_2 ! Lower value on zph character*1 n_zph_1 ! [*] Lower value forced (5) real*4 B_zph_3 ! Upper value on zph character*1 f_zph_1 ! [*] Upper value forced (5) real*8 PDFz_1 ! [14.06/100.1]?=-99 Redshift probability distribution integer*4 Temp_1 ! [1/131]?=-99 Best-fit template (3) integer*4 Cl_1 ! [1/4]?=-99 Morphological classification (4) real*4 VAR_1 ! (mag) [0/2.1]?=-99 Variability parameter defined as Eq.(1) * in Salvato et al. 2009ApJ...690.1250S *Note (1): Chandra identifier from Civano et al. 2012, Cat. J/ApJS/201/30, * (Col. CID; <CXOC JHHMMSS.s+DDMMSS> in Simbad) for table 4. * XMM identifier from Brusa et al. 2010, Cat. J/ApJ/716/348, * <XMMC NNNNNN> in Simbad for table 5. *Note (2): As reported in the photo-z catalog (Ilbert et al. 2009ApJ...690.1236I; * Column 2) and in the photometric catalog "cosmos_phot_20081101" * available in the COSMOS web page: * http://irsa.ipac.caltech.edu/data/COSMOS/tables/photometry/ *Note (3): Best-fit template: from 1 to 31 the templates are from Salvato et al. * 2009ApJ...690.1250S, templates from 100+(1...30) are from the * Ilbert et al. 2009ApJ...690.1236I library. *Note (4): From Leauthaud et al. 2007ApJS..172..219L. 1 or 3 indicates extended * sources, while 2 or 4 indicates point-like sources. *Note (5): The asterisk, in table5 only, was added at CDS when the limit * value was changed; see the "History" section below. C============================================================================= C Loading file 'table4.dat' ! Extracted from C-COSMOS photometric redshift catalog C Format for file interpretation 1 format( + I6,1X,I7,1X,F5.3,1X,F5.3,A1,F5.3,A1,F7.3,1X,I3,2X,I3,1X,F6.2) C Effective file loading open(unit=1,status='old',file= +'table4.dat') write(6,*) '....Loading file: table4.dat' do i__=1,1694 read(1,'(A56)')ar__ read(ar__,1) + XID,OID,zph,b_zph,n_zph,B_zph_1,f_zph,PDFz,Temp,Cl,VAR c ..............Just test output........... write(6,1) + XID,OID,zph,b_zph,n_zph,B_zph_1,f_zph,PDFz,Temp,Cl,VAR c .......End.of.Just test output........... end do close(1) C============================================================================= C Loading file 'table5.dat' ! Extracted from XMM-COSMOS photometric redshift catalog C Format for file interpretation 2 format( + I6,1X,I7,1X,F5.3,1X,F5.3,A1,F5.3,A1,F7.3,1X,I3,2X,I3,1X,F6.2) C Effective file loading open(unit=1,status='old',file= +'table5.dat') write(6,*) '....Loading file: table5.dat' do i__=1,1735 read(1,'(A56)')ar__1 read(ar__1,2) + XID_1,OID_1,zph_1,b_zph_2,n_zph_1,B_zph_3,f_zph_1,PDFz_1, + Temp_1,Cl_1,VAR_1 c ..............Just test output........... write(6,2) + XID_1,OID_1,zph_1,b_zph_2,n_zph_1,B_zph_3,f_zph_1,PDFz_1, + Temp_1,Cl_1,VAR_1 c .......End.of.Just test output........... end do close(1) C============================================================================= stop end