Conversion of standardized ReadMe file for
file /./ftp/cats/J/ApJ/713/671 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-15
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/713/671 Gravitational waves from pulsars (Abbott+, 2010)
*================================================================================
*Searches for gravitational waves from known pulsars with science run 5 LIGO
*data.
* Abbott B.P., Abbott R., Acernese F., Adhikari R., Ajith P., Allen B.,
* Allen G., Alshourbagy M., Amin R.S., Anderson S.B., Anderson W.G.,
* Antonucci F., Aoudia S., Arain M.A., Araya M., Armandula H., Armor P.,
* Arun K.G., Aso Y., Aston S., Astone P., Aufmuth P., Aulbert C., Babak S.,
* Baker P., Ballardin G., Ballmer S., Barker C., Barker D., Barone F.,
* Barr B., Barriga P., Barsotti L., Barsuglia M., Barton M.A., Bartos I.,
* Bassiri R., Bastarrika M., Bauer TH.S., Behnke B., Beker M.,
* Benacquista M., Betzwieser J., Beyersdorf P.T., Bigotta S., Bilenko I.A.,
* Billingsley G., Birindelli S., Biswas R., Bizouard M.A., Black E.,
* Blackburn J.K., Blackburn L., Blair D., Bland B., Boccara C., Bodiya T.P.,
* Bogue L., Bondu F., Bonelli L., Bork R., Boschi V., Bose S., Bosi L.,
* Braccini S., Bradaschia C., Brady P.R., Braginsky V.B., Brau J.E.,
* Bridges D.O., Brillet A., Brinkmann M., Brisson V., Van Den Broeck C.,
* Brooks A.F., Brown D.A., Brummit A., Brunet G., Budzynski R., Bulik T.,
* Bullington A., Bulten H.J., Buonanno A., Burmeister O., Buskulic D.,
* Byer R.L., Cadonati L., Cagnoli G., Calloni E., Camp J.B., Campagna E.,
* Cannizzo J., Cannon K.C., Canuel B., Cao J., Carbognani F., Cardenas L.,
* Caride S., Castaldi G., Caudill S., Cavaglia M., Cavalier F., Cavalieri R.,
* Cella G., Cepeda C., Cesarini E., Chalermsongsak T., Chalkley E.,
* Charlton P., Chassande-Mottin E., Chatterji S., Chelkowski S., Chen Y.,
* Chincarini A., Christensen N., Chung C.T.Y., Clark D., Clark J.,
* Clayton J.H., Cleva F., Coccia E., Cokelaer T., Colacino C.N., Colas J.,
* Colla A., Colombini M., Conte R., Cook D., Corbitt T.R.C., Corda C.,
* Cornish N., Corsi A., Coulon J.-P., Coward D., Coyne D.C.,
* Creighton J.D.E., Creighton T.D., Cruise A.M., Culter R.M., Cumming A.,
* Cunningham L., Cuoco E., Danilishin S.L., D'Antonio S., Danzmann K.,
* Dari A., Dattilo V., Daudert B., Davier M., Davies G., Daw E.J., Day R.,
* De Rosa R., DeBra D., Degallaix J., del Prete M., Dergachev V., Desai S.,
* DeSalvo R., Dhurandhar S., Di Fiore L., Di Lieto A., Di Paolo Emilio M.,
* Di Virgilio A., Diaz M., Dietz A., Donovan F., Dooley K.L., Doomes E.E.,
* Drago M., Drever R.W.P., Dueck J., Duke I., Dumas J.-C., Dwyer J.G.,
* Echols C., Edgar M., Effler A., Ehrens P., Espinoza E., Etzel T., Evans M.,
* Evans T., Fafone V., Fairhurst S., Faltas Y., Fan Y., Fazi D., Fehrmann H.,
* Ferrante I., Fidecaro F., Finn L.S., Fiori I., Flaminio R., Flasch K.,
* Foley S., Forrest C., Fotopoulos N., Fournier J.-D., Franc J., Franzen A.,
* Frasca S., Frasconi F., Frede M., Frei M., Frei Z., Freise A., Frey R.,
* Fricke T., Fritschel P., Frolov V.V., Fyffe M., Galdi V., Gammaitoni L.,
* Garofoli J.A., Garufi F., Gemme G., Genin E., Gennai A., Gholami I.,
* Giaime J.A., Giampanis S., Giardina K.D., Giazotto A., Goda K., Goetz E.,
* Goggin L.M., Gonzalez G., Gorodetsky M.L., Gossler S., Gouaty R.,
* Granata M., Granata V., Grant A., Gras S., Gray C., Gray M.,
* Greenhalgh R.J.S., Gretarsson A.M., Greverie C., Grimaldi F., Grosso R.,
* Grote H., Grunewald S., Guenther M., Guidi G., Gustafson E.K.,
* Gustafson R., Hage B., Hallam J.M., Hammer D., Hammond G.D., Hanna C.,
* Hanson J., Harms J., Harry G.M., Harry I.W., Harstad E.D., Haughian K.,
* Hayama K., Heefner J., Heitmann H., Hello P., Heng I.S., Heptonstall A.,
* Hewitson M., Hild S., Hirose E., Hoak D., Hodge K.A., Holt K., Hosken D.J.,
* Hough J., Hoyland D., Huet D., Hughey B., Huttner S.H., Ingram D.R.,
* Isogai T., Ito M., Ivanov A., Jaranowski P., Johnson B., Johnson W.W.,
* Jones D.I., Jones G., Jones R., Sancho de la Jordana L., Ju L., Kalmus P.,
* Kalogera V., Kandhasamy S., Kanner J., Kasprzyk D., Katsavounidis E.,
* Kawabe K., Kawamura S., Kawazoe F., Kells W., Keppel D.G., Khalaidovski A.,
* Khalili F.Y., Khan R., Khazanov E., King P., Kissel J.S., Klimenko S.,
* Kokeyama K., Kondrashov V., Kopparapu R., Koranda S., Kowalska I.,
* Kozak D., Krishnan B., Krolak A., Kumar R., Kwee P., La Penna P., Lam P.K.,
* Landry M., Lantz B., Lazzarini A., Lei H., Lei M., Leindecker N.,
* Leonor I., Leroy N., Letendre N., Li C., Lin H., Lindquist P.E.,
* Littenberg T.B., Lockerbie N.A., Lodhia D., Longo M., Lorenzini M.,
* Loriette V., Lormand M., Losurdo G., Lu P., Lubinski M., Lucianetti A.,
* Luck H., Machenschalk B., MacInnis M., Mackowski J.-M., Mageswaran M.,
* Mailand K., Majorana E., Man N., Mandel I., Mandic V., Mantovani M.,
* Marchesoni F., Marion F., Marka S., Marka Z., Markosyan A., Markowitz J.,
* Maros E., Marque J., Martelli F., Martin I.W., Martin R.M., Marx J.N.,
* Mason K., Masserot A., Matichard F., Matone L., Matzner R.A., Mavalvala N.,
* McCarthy R., McClelland D.E., McGuire S.C., McHugh M., McIntyre G.,
* McKechan D.J.A., McKenzie K., Mehmet M., Melatos A., Melissinos A.C.,
* Mendell G., Menendez D.F., Menzinger F., Mercer R.A., Meshkov S.,
* Messenger C., Meyer M.S., Michel C., Milano L., Miller J., Minelli J.,
* Minenkov Y., Mino Y., Mitrofanov V.P., Mitselmakher G., Mittleman R.,
* Miyakawa O., Moe B., Mohan M., Mohanty S.D., Mohapatra S.R.P., Moreau J.,
* Moreno G., Morgado N., Morgia A., Morioka T., Mors K., Mosca S.,
* Moscatelli V., Mossavi K., Mours B., Mowlowry C., Mueller G., Muhammad D.,
* zur Muhlen H., Mukherjee S., Mukhopadhyay H., Mullavey A.,
* Muller-Ebhardt H., Munch J., Murray P.G., Myers E., Myers J., Nash T.,
* Nelson J., Neri I., Newton G., Nishizawa A., Nocera F., Numata K.,
* Ochsner E., O'Dell J., Ogin G.H., O'Reilly B., O'Shaughnessy R.,
* Ottaway D.J., Ottens R.S., Overmier H., Owen B.J., Pagliaroli G.,
* Palomba C., Pan Y., Pankow C., Paoletti F., Papa M.A., Parameshwaraiah V.,
* Pardi S., Pasqualetti A., Passaquieti R., Passuello D., Patel P.,
* Pedraza M., Penn S., Perreca A., Persichetti G., Pichot M.,
* Piergiovanni F., Pierro V., Pietka M., Pinard L., Pinto I.M., Pitkin M.,
* Pletsch H.J., Plissi M.V., Poggiani R., Postiglione F., Prato M.,
* Principe M., Prix R., Prodi G.A., Prokhorov L., Puncken O., Punturo M.,
* Puppo P., Quetschke V., Raab F.J., Rabaste O., Rabeling D.S., Radkins H.,
* Raffai P., Raics Z., Rainer N., Rakhmanov M., Rapagnani P., Raymond V.,
* Re V., Reed C.M., Reed T., Regimbau T., Rehbein H., Reid S., Reitze D.H.,
* Ricci F., Riesen R., Riles K., Rivera B., Roberts P., Robertson N.A.,
* Robinet F., Robinson C., Robinson E.L., Rocchi A., Roddy S., Rolland L.,
* Rollins J., Romano J.D., Romano R., Romie J.H., Rosinska D., Rover C.,
* Rowan S., Rudiger A., Ruggi P., Russell P., Ryan K., Sakata S., Salemi F.,
* Sandberg V., Sannibale V., Santamaria L., Saraf S., Sarin P., Sassolas B.,
* Sathyaprakash B.S., Sato S., Satterthwaite M., Saulson P.R., Savage R.,
* Savov P., Scanlan M., Schilling R., Schnabel R., Schofield R., Schulz B.,
* Schutz B.F., Schwinberg P., Scott J., Scott S.M., Searle A.C., Sears B.,
* Seifert F., Sellers D., Sengupta A.S., Sentenac D., Sergeev A., Shapiro B.,
* Shawhan P., Shoemaker D.H., Sibley A., Siemens X., Sigg D., Sinha S.,
* Sintes A.M., Slagmolen B.J.J., Slutsky J., van der Sluys M.V., Smith J.R.,
* Smith M.R., Smith N.D., Somiya K., Sorazu B., Stein A., Stein L.C.,
* Steplewski S., Stochino A., Stone R., Strain K.A., Strigin S., Stroeer A.,
* Sturani R., Stuver A.L., Summerscales T.Z., Sun K.-X., Sung M.,
* Sutton P.J., Swinkels B., Szokoly G.P., Talukder D., Tang L., Tanner D.B.,
* Tarabrin S.P., Taylor J.R., Taylor R., Terenzi R., Thacker J., Thorne K.A.,
* Thorne K.S., Thuring A., Tokmakov K.V., Toncelli A., Tonelli M., Torres C.,
* Torrie C., Tournefier E., Travasso F., Traylor G., Trias M., Trummer J.,
* Ugolini D., Ulmen J., Urbanek K., Vahlbruch H., Vajente G., Vallisneri M.,
* van den Brand J.F.J., van der Putten S., Vass S., Vaulin R., Vavoulidis M.,
* Vecchio A., Vedovato G., van Veggel A.A., Veitch J., Veitch P.,
* Veltkamp C., Verkindt D., Vetrano F., Vicere A., Villar A., Vinet J.-Y.,
* Vocca H., Vorvick C., Vyachanin S.P., Waldman S.J., Wallace L., Ward R.L.,
* Was M., Weidner A., Weinert M., Weinstein A.J., Weiss R., Wen L., Wen S.,
* Wette K., Whelan J.T., Whitcomb S.E., Whiting B.F., Wilkinson C.,
* Willems P.A., Williams H.R., Williams L., Willke B., Wilmut I.,
* Winkelmann L., Winkler W., Wipf C.C., Wiseman A.G., Woan G., Wooley R.,
* Worden J., Wu W., Yakushin I., Yamamoto H., Yan Z., Yoshida S., Yvert M.,
* Zanolin M., Zhang J., Zhang L., Zhao C., Zotov N., Zucker M.E., Zweizig J.,
* (the Ligo Scientific Collaboration The Virgo Collaboration), Begin S.,
* Corongiu A., D'Amico N., Freire P.C.C., Hessels J.W.T., Hobbs G.B.,
* Kramer M., Lyne A.G., Manchester R.N., Marshall F.E., Middleditch J.,
* Possenti A., Ransom S.M., Stairs I.H., Stappers B.
* <Astrophys. J., 713, 671-685 (2010)>
* =2010ApJ...713..671A (SIMBAD/NED BibCode)
C=============================================================================
C Internal variables
integer*4 i__
c - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
C Declarations for 'table1.dat' ! Information on the non-glitching pulsars in our
search, including the start and end times of the
radio observations used in producing the parameter
fits for our search, and upper limit results
integer*4 nr__
parameter (nr__=113) ! Number of records
character*83 ar__ ! Full-size record
character*12 PSR ! Pulsar identification (JHHMM+DDMMA;
* sometimes J1748+2446aa)
character*4 n_PSR ! Pulsar pecularities (1)
integer*4 MJDst ! (d) Start Modified Julian Date of the observation
integer*4 MJDend ! (d) End Modified Julian Date of the observation
real*4 nu ! (Hz) Spin-frequency {nu}
real*4 dnu_dt ! (Hz/s) Spin-down rate
character*1 n_dnu_dt ! [a] corrected spin-down (1)
real*4 Dist ! (kpc) Distance of pulsar
real*4 sd ! Spin-down limit
real*4 h0_95_ ! Joint 95% upper limits on h_0_ (strain tensor
* amplitude)
real*4 ell ! Equatorial ellipticity {epsilon}=(Ixx-Iyy)/Izz
* (Izz = pulsar's principal moment of inertia)
real*4 h95_hsd ! Ratio h^95%^_0_/h^sd^_0_ (h^sd^_0_: spin-down
* limit on strain tensor amplitude)
*Note (1): Flag as follows:
* a = The pulsar's spin-down is corrected for proper motion effects.
* b = The pulsar is within a binary system.
* c = The pulsar is within a globular cluster.
* g = The pulsar was observed by the GBT.
* j = The pulsar was observed by the JBO.
* p = The pulsar was observed by the Parkes Observatory.
C=============================================================================
C Loading file 'table1.dat' ! Information on the non-glitching pulsars in our
* search, including the start and end times of the
* radio observations used in producing the parameter
* fits for our search, and upper limit results
C Format for file interpretation
1 format(
+ A12,1X,A4,1X,I5,1X,I5,1X,F6.2,1X,E8.2,1X,A1,1X,F3.1,1X,E8.3,
+ 1X,E8.3,1X,E7.3,1X,F5.1)
C Effective file loading
open(unit=1,status='old',file=
+'table1.dat')
write(6,*) '....Loading file: table1.dat'
do i__=1,113
read(1,'(A83)')ar__
read(ar__,1)
+ PSR,n_PSR,MJDst,MJDend,nu,dnu_dt,n_dnu_dt,Dist,sd,h0_95_,ell,
+ h95_hsd
c ..............Just test output...........
write(6,1)
+ PSR,n_PSR,MJDst,MJDend,nu,dnu_dt,n_dnu_dt,Dist,sd,h0_95_,ell,
+ h95_hsd
c .......End.of.Just test output...........
end do
close(1)
C=============================================================================
stop
end