Fortran References

Phil Cheeseman < aai@cc.purdue.edu>
Phil's Home Page

Examples provided below are, in some cases, not tested on all platforms to which I have access. They are provided, furthermore, as instructive examples and are coded more for readability than speed and/or elegance.

If you reference a source file, you may notice it has a suffix of 'txt' rather than the 'f' or 'for' suffix which one normally uses with Fortran. The 'txt' suffix is used because some servers mishandle the 'f' and/or 'for' suffix by sending the source to the client as HTML rather than plain text. That convention causes the 'f' or 'for' file to be displayed incorrectly.

Fortran 77 Examples

• Makefile for run-time library built using examples below.



• ISALPHA: Return .TRUE. if a character is a letter.
• ISDIGIT: Return .TRUE. if a character is a digit.
• LNB: Find the last non-blank in a string.
• LGR: Find the last non-blank non-control character in a string.
• LALPHA: Find the last letter in a string.



• RSET: Set the elements of a REAL array to a known value.
• ISET: Set the elements of an INTEGER array to a known value.



• RDOT: Calculate a REAL dot product.
• RSUM: Total the elements of a REAL array.



• LLS: Calculate a linear least squares line.



• Test program for LLS().

Fortran 90 Examples (under construction)

All of the routines referenced below are rewrites of routines already found in the Fortran 77 examples. If the net result of a rewrite amounted to nothing other than changing the comment character from 'c' to '!', no rewrite was done.

• Makefile for run-time library.



• RSET: Set the elements of a REAL array to a known value.
• ISET: Set the elements of an INTEGER array to a known value.



• Test program for LLS() using Fortran 90 dynamic storage allocation.

The following links point to material supplied by vendors and other sources w.r.t. Fortran. Thanks to those who have made this material available over the Web.

Numerical Recipes

Solaris Fortran Reference Material (via docs.sun.com)

• Fortran Programming Guide
• Fortran Library Reference

AIX Fortran Reference Material (courtesy IBM)

• XL Fortran 5.1
• Language Reference
• Contents
• Index of Intrinsic Procedures
• Detailed Descriptions of Intrinsic Procedures
• User's Guide
• Contents
• Compiler Option Reference
• Answers to Frequently Asked Questions