FORTRAN Source Codes

• GAMS : Guide to Available Mathematical Software Guide to mathematical software in Fortran held at a small number of US government establishments. Some sources are in commercial libraries and are not directly accessible. The code is of a uniformly high quality but usually old; there may be more recent and better algorithms available.
• Numerical Recipes Home Page Home of the Numerical Recipes series of books on scientific programming, including the Numerical Recipes On-Line Software Store, free upgrades and bug fixes, and the complete books on-line in PostScript and Acrobat formats. The Numerical Recipes code in Fortran 77 and Fortran 90 is not in the public domain.
• Fortran Resources (Lahey) A collection of links provided by a vendor of Fortran compilers.
• NSWC Library of Mathematics Subroutines NSWC (Naval Surface Warfare Center) Library of Mathematics Subroutines written in Fortran 66. Old but very high quality code. Unfortunately the manual is only available in hard copy, and is very difficult to obtain. The source code is also available by ftp from: ftp://math.jpl.nasa.gov/pub/nswc.93
• Orderpack 1.0 sorting and ranking routines in Fortran 90 Public domain package by Michel Olagnon of general and specialized sorting and ranking routines in Fortran 90. Specialized routines include partial sorts, partial ranks, unique sorts, unique ranks, partial and unique sorts, as well as partial and unique ranks.
• Combinatorial algorithms Generation of subsets and permutations, Hamiltonian cycles, determinants and permanents, network flow, and minimum spanning trees.
• F2KCLI Implements the draft F2K standard for accessing the command line and arguments. Site answers questions and lists supported compilers and platforms.
• PNNL Fortran Library (FLIB) Mainly non-numeric library for handling text, including parsing, accessing the command line, dates and times, and some random number generation.
• Lucent Technologies (Bell Labs.) Non-Exclusive Limited-Use Software An old but dependable library of Fortran 77 code which includes approximation, ODE/PDE solution, linear algebra, optimization, quadrature, root finding, special functions and FFTs. You must agree to single-user licence conditions before downloading a gzipped tar file (1Mb).
• Fortran 90 codes of John Burkardt Translations of Fortran 77 packages Lapack, Linpack, Eispack, Quadpack, and others. Code for graphics, finite elements, random number generation, and other topics.
• xmlf90, an XML parser in Fortran90 Written by Alberto Garcia in the F subset of Fortran 95, freely available under the BSD license.
• Introducing Fortran 95 Code from the book by Ian Chivers and Jane Sleightholme.
• PORT Mathematical Subroutine Library Collection of Fortran 77 routines that address many traditional areas of mathematical software, including approximation, ordinary and partial differential equations, linear algebra and eigensystems, optimization, quadrature, root finding, special functions, and Fourier transforms, but excluding statistical calculations. PORT stands for Portable, Outstanding, Reliable, and Tested.
• JPL Planetary and Lunar Ephemerides on CD-ROM by Standish, et. al Contains three different Jet Propulsion Laboratory Planetary and Lunar Ephemerides (DE200, DE405, and DE406) along with associated reading and interpolating routines, allowing the user to obtain the rectangular coordinates of the sun, moon, and nine major planets by means of a subroutine written in standard Fortran.
• line_tools/panel/source/ href="http://www.aa.nps.navy.mil/~jones/online_tools/panel/source/" target=_blank<Panel Code (Aeronautics) By Professor Kevin D. Jones of the U.S. Naval Postgraduate School.
• XML-Fortran Aims to be a library that allows programmers to access XML files.
• Alan R. Miller Code from the book "Fortran Programs for Scientists and Engineers", 2nd. ed. (1988).
• Memory Leaks Fortran 90 test program by Arjen Markus to see if memory leaks originating from derived-types can be circumvented.
• Compiler Diagnostic Test Sets Fortran 77/90/95 codes to test run-time diagnostic/debug capability of Windows and Linux Fortran Compilers, by Arnaud Desitter and Herman D. Knoble.
• Starlink Astronomy software, much in Fortran.
• Computer Methods for Mathematical Computations Code from the book, translated to ELF, a Fortran 90 subset. Algorithms for calculations in science and engineering, including linear equations, spline interpolation, integration, differential equations, zero finding, minimization and singular value decomposition.
• Public Domain Aeronautical Software (PDAS) Programs for aeronautical engineering, many from NASA or USAF, complete with public domain source code, instructions and sample cases on CD-ROM. [Commercial]
• GBYTES/SBYTES Library Packages to handle binary unpacking and packing, in Fortran 77 and 90.
• Fortran Tools by Nelson Beebe Dcl2inc postprocesses ftnchek .dcl files to create separate include files; dtosstod converts Fortran floating-point precision; fpp is a reversible Fortran preprocessor; lprsf3 is a filter to print Fortran and SFTRAN3 files with boldface keywords; and pretty is a Fortran 66 prettyprinter.
• Dan Nagle (Purple Sage Consulting) code Fortran Portability Project, Fortran 2003 examples, and Fortran modules.
• Utilities in Fortran 90 Fortran 90 code by Michel Olagnon: pre-processor and pretty-printer, with command-line interface for Unix, fsplit utility for splitting large files into separate ones for each procedure, PostScript converter, interface bloc generator, and format creator for numeric strings.
• NAS Parallel Benchmarks Set of eight programs designed to help evaluate the performance of parallel supercomputers. The benchmarks, which are derived from computational fluid dynamics (CFD) applications, consist of five kernels and three pseudo-applications.
• StopWatch Fortran 90 module, by William Mitchell, for measuring execution time of program segments. It is designed to be a portable, easy-to-use means of measuring execution time.
• FXDR Library by David W. Pierce that allows calls to the XDR (eXternal Data Representation) routines from Fortran.
• Fortran Programmers Club Windows 95/98/NT/2000 applications programming in FORTRAN, by Vladimir V. Vasilchenko. Numerous samples of GUIs, using controls and common controls.
• de.html href="http://www.fortran.com/F/example_code.html" target=_blank<F (Fortran 95 subset) Program Examples Factorial function, iterative computation of the square root, nonadvancing I/O, dynamic arrays, Towers of Hanoi, and other topics.
• OSCall OS Command line interface utility for Compaq/Intel Visual Fortran with immediate return or wait specified in milliseconds (routine automatically quotes the command string).
• ShareBufferWin32 Easy Inter-Process Shared Memory Communication Utilities for Win32 using a simple Fortran 77-style interface. Written for Compaq Visual Fortran by Gary Scott.
• DownGradePrecision Code by Kevin Rhoads to allow precision to be deliberately thrown away in an IEEE floating point compliant computing environment in order to more closely model computations in less precise floating point systems.
• Prime Counts prime numbers.
• PSIDE (Parallel Software for Implicit Differential Equations) Code for solving implicit differential equations on shared memory parallel computers, by Jacques J.B. de Swart, Walter M. Lioen, and Wolter A. van der Veen.
• TLM3D Code by J. L. Herring for transmission line modelling of electromagnetic fields in 3-dimensions using the symmetrical condensed node.
• MathFinance - Financial Functions Library Fortran 90 code for the Cox-Ross-Rubinstein binomial model, the analytic Black-Scholes formula, and Monte Carlo Simulation.
• Numerical Methods and Software Code from book and for nonlinear optimization and matrix equations, by Stephen Nash.
• Wavelet Analysis Code to accompany book by Christopher Torrence and Gilbert P. Compo.
• Examples Fortran 90 codes from introductory course by John Mahaffy.
• SophtwareKodeWerks Fortran 77 codes to solve the quadratic equation, solve a nonlinear equation using the Newton-Raphson method, fit a simple linear regression, and solve a system of equations using Gaussian elimination.
• Benchmarks of N. Tajima Codes to time floating point and integer arithmetic, intrinsic functions, and random access to memory.
• Algorithms and Data Structures in F and Fortran Codes from book by Robin Vowels for sorting, linked lists and trees, complex arithmetic, text processing, solving linear equations, graphics, searching, numerical methods, and whole array operations.
• BIEPACK Code for boundary integral equations, by Kendall E. Atkinson.
• Numerical Analysis Codes for the book by Richard L. Burden and J. Douglas Faires.
• Introduction to F Examples of the F (Fortran 95 subset) language, by Harvey Gould.
• TRIMHAP Implements linkage disequilibrium mapping techniques.
• Finite Elements Fortran 90 code by Jacques Laminie.
• de/ href="http://www.mines.edu/fs_home/spruess/saptext/f90code/" target=_blank<Fundamentals of Numerical Computing Fortran 90 codes from book by Lawrence Shampine, Richard Allen, and Steven Pruess.
• Fortran 77 Codes Programs by John A. Strain to count zeros of the zeta function, compute the Fast Gauss Transform, and use spectral methods to solve nonlinear parabolic systems.
• Algorithms Codes by Julio F. Fernández for uniform and Gaussian random number generation, matrix diagonalization, and physical simulations.
• High Performance Finite Elements Fortran 77 and 90 codes.
• G77_i386_fpe_demo Demonstrates handling of floating point exceptions under g77/i386/Linux. By Tom Crane.
• High Performance Fortran Applications Software Catalog Links to fragments, which are very short codes or code fragments to demonstrate the language features and constructs, kernels, which are short self-contained codes chosen as representative of particular application algorithms and their language feature requirements, and full applications codes, not necessarily stored in full locally, but registered here with relevant pointers given to the code owner/contact person.
• Fortran CGI Fortran 77 CGI examples using GET and POST.
• Hello, World Example of simple program in Fortran.
• Arithmetic with Error Bounds Fortran 90 code by Abraham Agay.
• David Frank Codes for a number-crunching benchmark, reading Internet URL addresses, and partially convertng C code to Fortran 90.
• ISO Varying String Implemented in the F subset by Rich Townsend.
• Fortran Resources - Garnatz and Grovender Keyed file shareware in Fortran 90 and 77, Fortran 90 interface to the X Window system.
• Fast Wavelet Transform By Rick Ottolini, based on an article by Gilbert Strang.
• Texas KZK Time Domain Code Fortran 77 time-domain computer code to model axisymmetric sound beams in fluids. The code is based on an augmented KZK equation that accounts for nonlinearity, diffraction, thermoviscous absorption, and absorption and dispersion due to an arbitrary number of relaxation phenomena.
• RIM: Computing the Acoutic Field Surrounding a Vibrating Plate Shareware by Stephen Kirkup.
• Moisture Content Adjustment Code to predict a property (P2) of dimension lumber at a target moisture content (MC2) given the value of the property (P1) at an initial moisture content (MC1).
• Fortran78 Test Suite Product of the NIST Information Technology Laboratory (ITL). It is used to determine, insofar as is practical, the degree to which a Fortran processor conforms to FIPS Fortran.
• Twist: a Compression Utility Compression tool tailored for fields where node-to-node variations are small, and where undefined (dry) nodes are abundant.
• KindFinder Fortran 90 program by Werner W. Schultz that checks for the available KIND parameters available for a given Fortran 90 or 95 compiler. It prints into a file a new Fortran program that can be compiled to write into a unit the various parameters that describe each integer/real representation.
• OpenMP Tutorial Has examples of Fortran codes using the Message-Passing Interface (MPI).
• Collaborative Computational Projects Links to chemistry, physics, and engineering codes, many in Fortran.
• Applied Numerical Methods for Scientists and Engineers Fortran and C code from book by Singiresu Rao.
• Wild-card String Matching Fortran 77 code by Clive Page to do wild-card matching to a pattern, which may contain "?" to match any single character, and "*" to match zero or more consecutive characters of any type.
• Fortran 90 Software Repository Has short, concise examples of specific features of the Fortran 90, 95 or 2003 language.
• PDEs and linear equations Fortran and C codes by Dong Liang.
• Practical Guide to Splines Code from the book by Carl de Boor.
• Introduction to Scientific Computing Fortran and C codes in gzipped tar file from book by Brigitte Lucquin and Olivier Pironneau.
• Open-Source Software Codes by Richard Brent for multiple precision arithmetic, uniform and normal random number generators, irreducible/primitive trinomials, and parallel sorting.
• Daniel A. Steck Fortran 90 codes to integrate Ito stochastic differential equations, generate random numbers, compute the FFT, and time programs.
• Problem Generators Generators for linear ordering and clustering problems, by John E. Mitchell.
• Numerical Methods Fortran 90 codes for a course.
• Ncregrid Tool by Patrick Jöckel for data transfer of gridded 2- and 3-dimensional (spatial) geophysical/geochemical scalar fields between grids of different resolutions. The algorithm handles data on rectangular latitude/longitude grids (not necessarily evenly spaced) and vertical pressure hybrid grids of arbitrary resolution. The input/output data format is netCDF.
• Fortran 77 Codes Programs by Niklaus Zimmermann for climate data analysis, moving window regression, soil profile analysis, and testing predictive (simulated) maps.
• de/ href="http://128.32.135.2/~stark/Code/" target=_blank<Software by P.B. Stark and Coauthors Bvls.f solves least-squares problems with bounds on the variables. Qr.f computes QR decompositions in a stable way. Sbl1.f finds bounds on linear functionals of an n-vector subject to an l1 constraint on the misfit to a set of linear relations, and linear inequality constraints on the variables. Sbvq.f finds bounds on linear functionals of an n-vector subject to a quadratic constraint on the misfit to a set of linear relations, and linear inequality constraints on the variables.
• Fortran code Fortran 77 codes by Daniel Powers for optimization and statistics.
• Selected Publications and Unpublished Software of Patrick Keast Code for partial differential equations, quadrature, and the solution of linear systems, with associated papers.
• Linear Algebra and Econometrics SPARSEM is a collection of sparse matrix classes that makes programming with sparse matrices (and large problems) almost as easy as a matrix language. BLUPF90 is a BLUP program written using SPARSEM. REMLF90 is a REML version of BLUPF90 that uses accelerated EM algorithm. Other programs included are dense matrix module DENSEOP, Gibbs sampling program GIBBS90, and several versions of linear-threshold models. By Ignacy Misztal and collaborators.
• Image Estimation by Example Fortran 90 code of Jos Claerbout.
• Fast Hankel Transform By Steve Sheng -- further details can be found in his dissertation.
• Peter Benner Fortran 77 code SLICOT Subroutine Library in Control Theory, Parallel Library in Control (PLiC) for large-scale time-invariant linear control systems in state-space form on parallel distributed computers, eigenvalues of Hamiltonian Matrices, subroutines for compressing a symmetric or triangular matrix to packed storage mode or to unpack a packed array to full storage mode, benchmark examples of discrete-time algebraic Riccati equations, benchmark examples of continuous-time algebraic Riccati equations.
• Token Fortran 77 string tokenizer, similar to the C function.
• Weekday Fortran 77 code to compute the day of the week of a date using the Zeller congruence algorithm.
• line.org/code/xml/ href="http://nn-online.org/code/xml/" target=_blank<XML Module by Mart Rentmeester that reads and interprets XML in standard Fortran 95. Also at the site is code for varying length strings, the complementary error function, an interface to the GD Graphics Library, and nucleon-nucleon potential models.
• Multivariate Normal Probabilities and Quadratic Assignment Problems Codes by Professor Zvi Drezner.
• PsSchur Computes the periodic real Schur decomposition of a matrix product. By Kurt Lust.
• Iounits.f Fortran 77 module to automatically assign i/o unit numbers, by Judah Milgram.
• Cligen Weather Generator Fortran 77 code to simulate weather, with associated data files.
• Gridpak Package for curvilinear orthogonal grid generation, which creates an orthogonal grid when provided with boundary information.
• de/fortran.html href="http://www.philbrierley.com/code/fortran.html" target=_blank<Neural Network Source Code in Fortran 90 Free code to help you develop neural networks.
• Numerical and Statistical Codes By Jean-Pierre Moreau.
• Ani2D Fortran 77 package to generate unstructured triangular meshes adapted to a solution function defined at mesh nodes.
• Utility Code Fortran 95 code by Paul van Delst for type kinds, comparing floating numbers, error handlers, file processing, endian conversion, list processing, string processing, dates, and fundamental constants.
• Numerical Methods Code by John H. Matthews to accompany the book Numerical Methods for Mathematics, Science, and Engineering, Second Edition.
• Optimal interpolation Fortran module with Octave interface Fortran 90 module to perform am n-dimensional optimal interpolation (OI). The optimal interpolation allows one to interpolate arbitrarily located observations to a regular grid using a background field as first guess.
• KDTREE 2: Fortran 95 and C++ software to efficiently search for near By Matthew B. Kennel. Accompanying paper is at http://adsabs.harvard.edu/abs/2004physics...8067K.
• XFOIL Interactive program in Fortran 77 and C for the design and analysis of subsonic isolated airfoils, released under the GNU General Public License.
• Numerical Electromagnet Code (NEC) Archives Code in Fortran, C, and Basic.
• Free Software (of Craig C. Douglas) Fortran and C codes for fast matrix multiplication and multigrid solution of PDEs.