module fact_mod contains function factorial(n) integer i,n real (kind(1.0d0)) :: factorial factorial=1 do i=2,n factorial=factorial*i enddo end function end module program test use fact_mod integer i write(*,*)'Please input i' read(*,*) i write(*,*)i,' factorial is ',factorial(i) end

... Einstein FITS files can be read into PROS using the standard IRAF and PROS routines, dataio.rfits for images and xray.xdataio.efits2qp for Event Lists. The user is prompted for the name of the FITS file and the dataset is drawn from (IPC Unscreened Data, HRI Event lists etc.) For example; xl> efits2qp input FITS file name: i2029n40.xpc dataset (hrievt|ipcevt|slew|ipcu): ipcevt output IRAF/PROS QPOE file name (.): test Writing output QPOE file: test.qp aux=.convtgr, type=convtgr -> test.qp . ...

Welcome to program SCHED. ... TPINI: Reading tape initialization information from SCHED input file. ... SRREAD: Reading source catalog: /nfs/atapplic/vlbi/sched/catalogs/sources.vlba GETFREQ: Reading frequency file: /nfs/atapplic/vlbi/sched/catalogs/freq.dat SCHOPT: First output scan will be number 1 TPS2: *** WARNING *** 4.00 minutes needed to change tapes at S2 stations without data loss while using all tapes. Change at CEDUNA on day 133 at 14:02:44 has only a 3.00 minute gap. ...

... This file is not intended to be a thorough coverage of the PCI standard. ... Thus, I/O operations are explained in the most detail, while memory operations, which will usually not be dealt with by an I/O card, are only briefly explained. ... Address/Data Lines. ... Used to indicate whether the cycle is an address phase or a data phase. ... Each cycle begins with an address phase followed by one or more data phases. ... This is done to reduce the overall number of pins on the PCI connector. ...

... int feof(FlLE *file_pointer) - Check if end of file occurred on a stream. int ferror(FlLE *file_pointer) - Check if any error occurred during file I/0. int fflush(FlLE *file_pointer) - Write out (flush) buffer to file. int fgetc(FlLE *file_pointer) - Get a character from a stream. int fgetpos(FlLE *file_pointer, fpos_t current_pos) - Get the current position in a stream. char *fgets(char *string, int maxchar, FILE *file_pointer) - Read a string from a file. ...

... 30 : 0; /*TODO*/ libapogeedrv.cpp : alta - write_RoiStartX(x); libapogeedrv.cpp : alta - write_RoiStartY(y); libapogeedrv.cpp : alta - write_RoiPixelsH(width); libapogeedrv.cpp : alta - write_RoiPixelsV(height); libapogeedrv.cpp : alta - write_DigitizeOverscan(0); libapogeedrv.cpp : alta - write_ImageCount(1); libapogeedrv.cpp : status = alta - Expose(exposure,shutter_flag); libapogeedrv.cpp : ...

... spectrum . ... nsource <n> : choice of source function (def: 3=Feautrier) . noptype <n> : choice of continuous opacity (def: 1=Kiel) . nhedat <nhedat> : choice of HeI data (BCS or Mon treal) (def: 1=BCS) . ... read_model <filename>: read model atmosphere in QUB/STERNE2 format . ... wavmax <w_max> : distance from line centre to compute . ... nvturb <n vt > : number of points in -dependent v turb . ... tau_exp <n> : increase resolution of optical depth scale by adding additional points . ...

Apache 1.1 and earlier let modules handle POST and PUT requests by themselves. The module would, on its own, determine whether the request had an entity, how many bytes it was, and then called a function ( read_client_block ) to get the data. ... This step also sends a 100 Continue response to HTTP/1.1 clients, so should not be called until the module is *definitely* ready to read content. (otherwise, the point of the 100 response is defeated). ... Finally, call ap_get_client_block in a loop. ...

To read standard input into a shell script use the read command. For example: echo "Please enter your name:" read name echo "Welcome to Edinburgh $name" . This prompts the user for input, assigns this to the variable name and then displays the value of this variable to standard output . ... For example: echo "Please enter your surname\n" echo "followed by your first name: \c" read name1 name2 echo "Welcome to Glasgow $name2 $name1" . ...

A problem, that can arise when moving from Fortran 77 to Fortran 90, is dependent on a usual deviation from the standard, and has to do especially with user programs. ... With many Fortran 77 implementations we wrote PROGRAM TEST REAL X WRITE(*,10) 10 FORMAT('Give X = ',$) READ(*,*) X WRITE(*,*) X END In Fortran 90 we use "non-advancing I/O" instead. ... In some old Fortran dialects the statement TYPE was used to write on a typewriter terminal and PRINT was used to write on the line printer. ...

Astronotes Armagh Planetarium's Stellar Blog! ... Space Flight . ... January . ... Posted on February 3, 2011 | No Comments Kepler-11 is an amazing, newly-discovered system of exoplanets. ... Continue Reading.. Posted on January 31, 2011 | ... 8 Comments NASA?s Curiosity Mars rover is to use a unique system called a ?sky crane? to touch down next year on the Red Planet. ... 1 Comment 2011 will be a year of exciting and historic upcoming events in space exploration. ...

... PhD Thesis Topics offered by ESO Faculty Members > Thesis Topic: Testing the non-universality of the low-mass end of the Initial Mass Function in massive Early-Type Galaxies . ... Observing with ESO Telescopes . ... ESO-MIDAS . ... The stellar initial mass function (IMF) in early-type galaxies and the internal distribution of their dark and luminous mass are two of the deepest and most puzzling open issues in modern astrophysics, each of great importance to our understanding of galaxy formation. ...

... Tonight's Sky . ... The Magazine . ... Star Atlas . ... An artificial comet holds secrets to Earths life . ... Astronomy for Kids . ... Observing springtime deep-sky objects with a large telescope . ... The planet has extreme temperature swings and perhaps active lava flows. ... A digital supplement to Astronomy magazine. ... Join TravelQuest International with Astronomy and Discover magazines on one of three great tour options surrounding this celestial spectacle . ... Astronomy Magazine . ...

... The Multiple Extension FITS (MEF) file interface is an IRAF library providing facilities for general file operations upon FITS multi-extension files. ... The Multiple Extensions FITS (MEF) interface consists of a number of routines to mainly read a FITS Primary Data Unit or an Extension Unit and manipulate the data at a file level. ... Read the FITS header of a MEF file that matches the EXTNAME or EXTVER keyword values or if not specified, read the extension number `group'. ... The header filename. ...

... At least one hour before you plan to use the tester, power it up as follows (please do not leave the lamp or stepper motor driver on for days at a time because that wastes bulbs and electricity). ... To measure the throughput of a fiber optic harness, first set up the fiber harness as follows: . Arrange the harness so that the v-groove block is near the linear stage, the ferrules are near the Source, and there are no sharp bends in the fibers. ... Quit the fiber tester program. ...

fitshdr - FITS-file headers manipulation tool fitshdr [options] [FITSfile_name] . ... fitshdr [options] --edit FITSfile_name . ... If You want to modify headers of FITSFILE using new FITS-header lines from HEADER file (or from stdin), You have to use this option (You can skip this option, if -H or --header option is used). ... Empty header lines are not displayed (in 'dump' mode only). --line-offsets . ... In 'dump' mode: file offset will be displayed for each header line. --no-line-offsets . ...

... Timothy L. Kopra (Colonel, U. S. Army, Ret.) NASA Astronaut . ... In this position, he primarily served as an engineering liaison for space shuttle launch operations and International Space Station hardware testing. ... He then served in the Space Station Branch of the Astronaut Office, where he was involved in the testing of crew interfaces for two space station pressurized modules as well as the implementation of support computers and operational Local Area Network on the station. ...

... Exit Sub End If ' First argument is the FITS file to read filename = WScript.Arguments.Item(0) ' Create the ASCOM FITS driver object Set image = CreateObject( FITS. Image ) ' Read the file from disk WScript.Echo Reading filename ... image .ReadFromFile filename WScript.Echo ...done ' Read image dimensions WScript.Echo WScript.Echo ...

Stellarium 0.12.3 . ... Classes . ... StelJsonParser Class Reference . ... Create a JsonListIterator from the given input device. ... static QVariantљ . ... write (const QVariant &jsonObject, QIODevice *output, int indentLevel=0) . ... registerSerializerForType (int t, void(*func)(const QVariant &, QIODevice *, int)) . ... Parse the given input stream. static void StelJsonParser::write . ... Serialize the passed QVariant as JSON into the output QIODevice. static QByteArray StelJsonParser::write . ...

... A magnetized bar has its power concentrated at two ends, its poles ; they are known as its north (N) and south (S) poles, because if the bar is hung by its middle from a string, its N end tends to point northwards and its S end southwards. ... That flow became known as an electric current . ... An electric current produced a magnetic force! ... The fundamental nature of magnetism was not associated with magnetic poles or iron magnets, but with electric currents . ...