Conversion of standardized ReadMe file for
file /./ftp/cats/J/ApJ/835/254 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-28 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/254 GLASS. IX. Structural param. from HFF & GLASS (Morishita+, 2017) *================================================================================ *The Grism Lens-Amplified Survey from Space (GLASS). *IX. The dual origin of low-mass cluster galaxies as revealed by new structural *analyses. * Morishita T., Abramson L.E., Treu T., Vulcani B., Schmidt K.B., * Dressler A., Poggianti B.M., Malkan M.A., Wang X., Huang K.-H., Trenti M., * Bradac M., Hoag A. * <Astrophys. J., 835, 254-254 (2017)> * =2017ApJ...835..254M (SIMBAD/NED BibCode) C============================================================================= C Internal variables integer*4 i__ c - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - C Declarations for 'table1.dat' ! Source and structural catalog integer*4 nr__ parameter (nr__=4309) ! Number of records character*140 ar__ ! Full-size record C J2000 position composed of: RAdeg DEdeg integer*4 Seq ! [1/99] Galaxy cluster number (1) integer*4 Gal ! [21/5546] Galaxy ID real*8 RAdeg ! (deg) Right ascension (J2000) real*8 DEdeg ! (deg) Declination (J2000) real*4 z ! [0.2/0.7] The best redshift (2) real*4 mag ! (mag) [16.7/27] HST/WFC3 F160W total AB magnitude (3) real*4 e_mag ! (mag) [0.0001/2] Error in total magnitude real*4 logM_ ! (Msun) [6/12] Stellar mass derived by FAST real*4 e_logM_ ! (Msun) [0.01/0.6] Error in stellar mass real*8 logae ! (kpc) [-1/2]?=-99 Effective radius along major axis * in log real*8 e_logae ! (kpc) [0.0001/92]?=99 Error in logae real*8 logn ! [-1/1] Sersic index in log real*8 e_logn ! [0.0005/99] Error in logn real*8 logq ! [-1/0]?=-99 Axis ratio in log real*8 e_logq ! [0.004/7563]?=99 Error in logq integer*4 F ! [0/3] Flag for GALFIT visual inspection * (0=Fine, 1=Poor/contaminated, * 2=Point source) (4) real*4 U_V ! (mag) [0.2/2.3] Rest-frame U-V color index real*4 V_J ! (mag) [-0.1/2.3] Rest-frame V-J color index real*8 Sig5 ! (Mpc-2) [0.4/1720] Fifth-closest local galaxy * number density ({Sigma}_5th_) *Note (1): ID as follows: * 1 = Abell2744CLS (z=0.308), * 2 = MACS0416CLS (MCS J0416.1-2403 in Simbad; z=0.396) * 3 = MACS0717CLS (MCS J0717.5+3745 in Simbad; z=0.548) * 4 = MACS1149CLS (MCS J1149.5+2223 in Simbad; z=0.544) * 5 = Abell2744PR1, * 6 = MACS0416PR1, * 7 = MACS0717PR1, * 8 = MACS1149PR1, * 99 = the eXtreme Deep Field (XDF; Illingworth+ 2013ApJS..209....6I). * Both Hubble Frontier Fields (HFF) and Grism Survey from Space (GLASS) * programs use a parallel strategy where HST WFC3IR and ACS are exposed * simultaneously so that the former falls on the cluster core ("CLS") * and the latter on a low-density infall/field region ("PR1"). *Note (2): z_best_ is ground-based spectroscopic redshift (from * Owers+, 2011, J/ApJ/728/27; Ebeling+, 2014ApJ...781L..40E; * Balestra+, 2015, J/ApJS/224/33) if available, * implemented with GLASS grism redshift, and * seven-band photometric-redshift derived by EAZY for else. * All PR1 redshifts are photometric (see Section 2.3). *Note (3): F160W-band Auto magnitude derived by SExtractor. *Note (4): Visual inspection flag for sources 2{sigma} above/below the size-mass * relation for each population. C============================================================================= C Loading file 'table1.dat' ! Source and structural catalog C Format for file interpretation 1 format( + I2,1X,I4,1X,F11.7,1X,F11.7,1X,F4.2,1X,F6.3,1X,F6.4,1X,F5.2,2X, + F5.3,1X,F8.4,1X,F7.4,1X,F7.4,1X,F7.4,1X,F8.4,1X,F9.4,1X,I1,2X, + F5.3,1X,F6.3,1X,F8.3) C Effective file loading open(unit=1,status='old',file= +'table1.dat') write(6,*) '....Loading file: table1.dat' do i__=1,4309 read(1,'(A140)')ar__ read(ar__,1) + Seq,Gal,RAdeg,DEdeg,z,mag,e_mag,logM_,e_logM_,logae,e_logae, + logn,e_logn,logq,e_logq,F,U_V,V_J,Sig5 c ..............Just test output........... write(6,1) + Seq,Gal,RAdeg,DEdeg,z,mag,e_mag,logM_,e_logM_,logae,e_logae, + logn,e_logn,logq,e_logq,F,U_V,V_J,Sig5 c .......End.of.Just test output........... end do close(1) C============================================================================= stop end