Fortran 2003 Book Pdf
Author by: Michael MetcalfLanguage: enPublisher by: Oxford University Press, USAFormat Available: PDF, ePub, MobiTotal Read: 51Total Download: 911File Size: 43,7 MbDescription: Fortran remains one of the principal languages used in scientific, numerical, and engineering programming, and a series of revisions to the standard versions of the language have progressively enhanced its power. The latest standard - Fortran 2003 - greatly extends the power of the language, by introducing object-oriented concepts, interoperability with C, better integration with operating systems and many other enhancements. This text details all these new features. Fortran 95/2003 Explained, significantly expands on the second edition of Fortran 90/95 Explained (also published by Oxford University Press): the opening chapters contain a complete description of the Fortran 95 language and are followed by descriptions of three formally approved extensions; six completely new chapters describe in detail the features that are new in Fortran 2003, but the distinction between the various language levels is kept clear throughout. Authored by three leading experts in the development of the language, this is a complete and authoritative description of the two languages (Fortran 95 and Fortran 2003).
It is intended for new and existing users of Fortran, and for all those involved in scientific and numerical computing. It is suitable as textbook for teaching and, with its extensive index, as a handy reference for practitioners. Author by: David PaduaLanguage: enPublisher by: Springer Science & Business MediaFormat Available: PDF, ePub, MobiTotal Read: 90Total Download: 224File Size: 46,6 MbDescription: Containing over 300 entries in an A-Z format, the Encyclopedia of Parallel Computing provides easy, intuitive access to relevant information for professionals and researchers seeking access to any aspect within the broad field of parallel computing. Topics for this comprehensive reference were selected, written, and peer-reviewed by an international pool of distinguished researchers in the field. The Encyclopedia is broad in scope, covering machine organization, programming languages, algorithms, and applications. Within each area, concepts, designs, and specific implementations are presented. The highly-structured essays in this work comprise synonyms, a definition and discussion of the topic, bibliographies, and links to related literature.
Extensive cross-references to other entries within the Encyclopedia support efficient, user-friendly searchers for immediate access to useful information. Author by: Michael MetcalfLanguage: enPublisher by: Oxford University Press, USAFormat Available: PDF, ePub, MobiTotal Read: 53Total Download: 934File Size: 40,8 MbDescription: An easy-to-use handbook for experienced programmers and scientists, this highly readable survey offers a concise but thorough description of the whole of Fortran 77, including practical advice on program portability, design, testing and documentation. The book benefits from the author's long association with the Fortran standardization committee (X3J3), and his extensive experience with large-scale processing in high-energy physics.
Since Fortran 77 is the only practical choice for sizable scientific numerical and engineering applications, this will be an invaluable handbook for computer scientists working with engineers and physicists engaged in large-scale computation. Author by: Michael MetcalfLanguage: enPublisher by:Format Available: PDF, ePub, MobiTotal Read: 73Total Download: 774File Size: 54,7 MbDescription: FORTRAN has always been intended to be an efficient high-level language, and its adherence to this original design aim has helped it to achieve a dominant position in scientific, engineering and other areas of computing.
Program xarray! Demonstrate array constructor and intrinsic functions implicit none integer, parameter:: n = 3 integer:: vec ( n ) vec = ( / 9, 4, 1 / )! Set vec(1) to 9, vec(2) to 4, vec(3) to 1 write (.,.
) 'vec = ', vec! Print each element of vec write (.,.
) 'vec(1) = ', vec ( 1 ), ', vec(3) =', vec ( 3 )! Print the 1st and 3rd elements write (.,. ) 'size(vec), sum(vec), product(vec) = ', & size ( vec ), sum ( vec ), product ( vec ) write (.,. ) 'minval(vec), maxval(vec) = ', minval ( vec ), maxval ( vec ) vec = vec + 2! Add 2 to each element of vec write (.,.
) 'vec = ', vec! Print each element of vec vec = vec. 2! Square each element of vec write (.,. ) 'vec = ', vec! Print each element of vec end program xarrayoutput:vec = 9 4 1vec(1) = 9, vec(3) = 1size(vec), sum(vec), product(vec) = 3 14 36minval(vec), maxval(vec) = 1 9vec = 11 6 3vec = 121 36 9loops Fortran uses do loops for iteration. For example, the program.
Fortran Textbook Pdf
Program xloop implicit none integer:: i do i = 1, 3 write (.,. ) i, i. 2 end do write (.,. ) 'i=', i do i = 1, 4, 2 write (.,. ) i end do write (.,.
) 'i=', i end program xloopgives output1 12 43 9i= 413i= 5because within the first loop, variable i takes on values between 1 and 3 with step size of 1, and in the second loop the step size is 2. After completing the loop the value of i is its last value before leaving the loop plus the step size.comparison operators Fortran has the comparison operators = , where /= means 'not equal' and the other operators have the usual meanings. Program xfibonacci! Print Fibonacci numbers up to maxfib implicit none integer, parameter:: maxfib = 10 integer:: i, fib, fib1, fib2 i = 0 fib = 0 fib1 = 0 fib2 = 0 write (.,. ) 'Fibonacci numbers maxfib ) exit write (.,. ) fib i = i + 1 if ( i 1 ) then fib = fib1 + fib2 else fib = 1 end if fib2 = fib1 fib1 = fib end do end program xfibonacciDeclaring maxfib a parameter means that its value cannot be changed in the rest of the program.nested loops Loops can be nested, as shown in the following program.
Module convertmod implicit none contains subroutine celsfromfahr ( degreesfahr, degreescels ) real, intent ( in ):: degreesfahr real, intent ( out ):: degreescels degreescels = ( degreesfahr - 32 ) / 1.8 end subroutine celsfromfahr end module convertmod program xtemperature use convertmod, only: celsfromfahr real:: degf, degc integer:: i write (., '(2a10)' ) 'degreesF', 'degreesC' do i = 12, 100, 20 degf = real ( i ) call celsfromfahr ( degf, degc ) write (., '(2f10.1)' ) degf, degc end do end program xtemperature See Also.