FORTRAN Software Research Articles

The regeneration of Fortran software

There is a substantial body of existing Fortran software that has considerable scientific and commercial value, but whose potential is sometimes difficult to exploit to the full because of a lack of structure and internal documentation. This article discusses, by means of an example, how the OLYMPUS COMPOSITOR can be used to regenerate such software semi-automatically so that it meets improved documentation standards. Comments and headings can be edited in on-line, using a free format, and the COMPOSITOR then produces a clear standard layout in which the Fortran statement numbers are correlated with the decimally numbered sections and subsections of an individual routine, and the meaning of the code is clarified by appropriate indentation and cross-referencing. Using the OLYMPUS GENERATOR one can also restructure the COMMON blocks and construct indexes of variables. It is suggested that such techniques can materially enhance the usefulness of a great deal of Fortran software, including some of the programs already included in the CPC Program Library.

A self-paced CAI package for selecting statistical methods

TREELAB is a package of FORTRAN IV programs, files, work sheets, and assignments for self-paced instruction in selecting statistical methods for a broad variety of empirical research purposes. It complements traditional statistics course curricula by giving students extensive practice in evaluating data sets and selecting appropriate methods according to their theoretical needs.

Algorithm 586: ITPACK 2C: A FORTRAN Package for Solving Large Sparse Linear Systems by Adaptive Accelerated Iterative Methods

article Free AccessArtifacts Evaluated & ReusableArtifacts AvailableAlgorithm 586: ITPACK 2C: A FORTRAN Package for Solving Large Sparse Linear Systems by Adaptive Accelerated Iterative Methods Authors: David R. Kincaid Center for Numerical Analysis & Computation Center, RLM Bldg 13 150, University of Texas, Austin, TX Center for Numerical Analysis & Computation Center, RLM Bldg 13 150, University of Texas, Austin, TXView Profile , John R. Respess Center for Numerical Analysis & Computation Center, RLM Bldg 13 150, University of Texas, Austin, TX Center for Numerical Analysis & Computation Center, RLM Bldg 13 150, University of Texas, Austin, TXView Profile , David M. Young Center for Numerical Analysis & Computation Center, RLM Bldg 13 150, University of Texas, Austin, TX Center for Numerical Analysis & Computation Center, RLM Bldg 13 150, University of Texas, Austin, TXView Profile , Rober R. Grimes Boeing Computer Services Co., 565 Andover Park West, Tukwila, WA Boeing Computer Services Co., 565 Andover Park West, Tukwila, WAView Profile Authors Info & Claims ACM Transactions on Mathematical SoftwareVolume 8Issue 3Sept. 1982 pp 302–322https://doi.org/10.1145/356004.356009Published:01 September 1982Publication History 91citation1,122DownloadsMetricsTotal Citations91Total Downloads1,122Last 12 Months71Last 6 weeks17 Get Citation AlertsNew Citation Alert added!This alert has been successfully added and will be sent to:You will be notified whenever a record that you have chosen has been cited.To manage your alert preferences, click on the button below.Manage my AlertsNew Citation Alert!Please log in to your account Save to BinderSave to BinderCreate a New BinderNameCancelCreateExport CitationPublisher SiteeReaderPDF

A financial modeling language using Nested Arrays

The imminent implementation of nested arrays concepts in APL offers a wide variety of potential applications for end users of APL-based financial systems. Historically, limitations of traditional APL tend to inhibit the non-APL programmer in using application packages based in APL, primarily due to syntax conventions which are unfamiliar to financial users who have experience in FORTRAN, BASIC, or higher-level packages based in those languages. A key element in gaining wider acceptance of APL for financial modeling is a simplification of the APL-based systems to minimize the effects of the idiosyncrasies of APL syntax. STSC's Nested Arrays System (NARS) offers several valuable features toward this end. This paper gives an overview of the APL Nested Arrays Modeling System (ANAMS), which uses NARS features to create an English-like modeling language incorporating features previously infeasible using traditional APL methods.

GIMMAP--An Interactive Computer Cartography System: ABSTRACT

Computer-produced contour maps with postings of data points and optional perspective views for surface representation are widely recognized as valuable tools in oil exploration, seismic studies, ground-water modeling, and other geologic applications. Few, in any, of the myriad contouring packages are designed to provide an accurate background of cartographic information to help the scientist, engineer, or politician relate contoured information to the real world of political boundaries, highways, and river beds. Additionally, there is much information of interest (e.g., geologic contacts) which cannot be contoured, but which must be treated as pure cartographic information. The GIMMAP (Geodata Interactive Management Map Analysis and Production) system, developed jointly b the Kansas Geological Survey and the Bureau de Recherches Geologiques et Minieres (France), is being used to produce such background maps as well as traditional multi-color geologic maps. The U.S. Geological Survey 7.5-minute topographic series is used as the primary input source for construction of a cartographic data base consisting of political boundaries, surface hydrology, the transportation network, and U.S. Land Survey information (township-range-section). Additional features may be digitized or projected from latitude-longitude coordinates as required for special projects. GIMMAP employs interactive techniques to assist graphical editing of linework; relative definition, editing, and coloring of areal features; placement and editing of symbology; and versatile, user-specified re rieval for producing plots or high-quality scribes for color separation. The modular FORTRAN package relies on physical and logical data segmentation and extensive use of random-access files to operate on a (64 K byte) minicomputer. End_of_Article - Last_Page 1707------------

Nicer - fast eigenvalue routines

NICER is a package of FORTRAN subroutines to solve standard and generalized eigen-problems for dense real-symmetric matrices, and is superior in speed to either EISPACK or other comparable routines. The advantage is noteworthy in iterative computations. The package is available from the Quantum Chemistry Program Exchange.

Algorithm 566: FORTRAN Subroutines for Testing Unconstrained Optimization Software [C5], [E4

A partial listing of the FORTRAN package of subroutines for testing unconstrained optimazation software is given with a brief description of the subroutines. The following three problem areas are considered: (1) zeros of systems of N nonlinear functions in N variables; (2) least square minimization of M nonlinear functions in N variables; (3) unconstrained minimization of an objective function with N variables. To test a code in any of the three problem areas, the user must provide a driver and interface routine. The package includes example drivers and interface routines for each of the problem areas. Sample data are also provided. (SC)

SASPRO II—A spare and server provisioning model

SASPRO II is a versatile FORTRAN package designed to determine the level of spares inventory and number of repair channels necessary to provide a guaranteed service level at minimum cost for a population of stochastically failing, but completely repairable, items. The problem environment is first discussed, the program options are explained, the analytical models are developed, and sample runs are provided.

Theoretical studies of Cerro Prieto brines' chemical equilibria

We used a chemical equilibrium model, implemented in a compact FORTRAN package called HITEQ, to investigate possible mineral deposition related to prereinjection treatment of Cerro Prieto brines for silica removal. Large saturation ratios of the treated brines with respect to several minerals are indicated by these computations. As a remedy, we propose an inexpensive CO 2 removal scheme aimed at inhibiting carbonate mineral precipitation. This scheme is quantitatively discussed with the aid of HITEQ. We conclude that the proposed treatment is both technically and economically feasible.

Storing and retrieving locational data

A simple concept for storing and retrieving geographic data has been developed. It has been implemented in FORTRAN and BASIC and each package was developed for machine independence. The FORTRAN package is used for highway location studies and interpolating ground heights for highway design.

Package of computer programs for articulatory modeling of the speech process

At the poster session we will describe a package of FORTRAN. programs which accomplish articulatory synthesis of speech from phonetic input. The package of subroutines will include the following: (1) a coarticulation program which, knowing featurelike descriptions of speech segments, performs the staggered sequencing of “motor commands” necessary for proper overlapping of articulatory movements; (2) a dynamics program that converts stepwise motor commands into smooth articulatory movements; (3) an instantaneous model of the vocal tract; (4) a parametric-speed model of the pneumatic system, of vocal-cord activity and fricative noise sources; and (5) a routine for converting the above articulatory details into formants and other controls for parametric synthesis. (Of course, the package of programs can also be used with a direct time-domain acoustic tube model, as well.) The formal presentation will contain a brief description of the package of programs, and comments on several aspects of speech synthesis by articulatory modeling.

Three proposed amendments to the draft proposed ANS FORTRAN Standard

In this note details are given of three additions to the draft proposed ANS FORTRAN Standard published in SIGPLAN NOTICES, March 1976. These amendments were proposed by the members of IFIP Working Group 2.5 on Numerical Software and submitted to the X3J3 committee in July, 1976. We hope that this note will encourage interested parties to send for copies of the full specifications, consider the proposals and then communicate their reactions to the IFIP WG 2.5 committee and to the X3J3 committee.The objective of the proposals is to extend Standard FORTRAN to enhance the portability, adaptibility, ease of use and reliability of FORTRAN Software, without substantial impact upon the spirit and philosophy of the current proposed standard.This note gives a brief description of the proposals and their background. Separate documents detail the line-by-line changes to the Standard. Copies may be obtained by writing to NAG Central Office, 13 Banbury Road, OXFORD or Dr. J. C. T. Pool, Applied Mathematics Division, Argonne National Laboratory, 9700 South Cass Avenue, Argonne, Illinois 60439.

FORTRAN IV programs for processing routine electron microprobe data

A package of FORTRAN IV programs is used to process routine analyses of silicates, sulfides, oxides, and carbonates, following an empirical correction procedure. This approach has two important advantages; (1) computing costs are minimal, and (2) persons who lack experience with the probe or computer have been able to use the package effectively. Various options have been built into the package to give it the flexibility needed by a variety of users with differing objectives. The options include calculations of mole and weight-percent oxides or end members, construction of triangular diagrams, and use of a differing background correction for inhomogeneous minerals.

Statistical comparison of power spectra: A computer program

A general computer program, of interest to neurobiologists, for comparison of uncorrelated power spectra is presented. The program, ALPHAF, is written in Fortran V language and is easily compiled and executed in any computer with a Fortran software package. The purpose of the program is to read power spectral density (PSD) values into a computer from digital tape and then perform the following functions: (1) compute and report power; (2) compute and report averages of the computed power values over selected frequency bands and (3) compute and report statistical standardised normal distributions for a frequency spectrum of interest. The standardised normal distribution statistic is derived by using equation 7.20, page 250 of Random data: Analysis and measurement procedures (Bendat and Piersol, 1971).

A multiline computer voice response system utilizing ADPCM coded speech

In this paper we discuss the issues involved in implementing an automatic computer voice response system which is capable of serving up to ten independent output channels in real time. The system has been implemented on a Data General NOVA- 800 minicomputer. Individual isolated words and phrases are coded at a rate of 24 000 bits/s using a hardware adaptive, differential pulse-code modulation (ADPCM) coder, and stored on a fixed-head disk as a random access vocabulary. By exploiting the features of ADPCM coding, it is possible to create and edit automatically a vocabulary for the system from an analog tape recording of the spoken entries, with minimal operator intervention. To provide ten simultaneous output lines of speech which are independent of each other required the use of an efficient scheduling algorithm. Such an algorithm was provided by the computer manufacturer in their real-time multitasking system which was part of their Fortran software. Thus almost all the programming required to implement this real-time system was in Fortran, thereby providing flexibility and ease in making changes in the system. Initial applications of the voice response system are in computer aided voice wiring, automatic directory assistance, and experiments on speaker verification, but the system is sufficiently modular to adapt readily to other applications.

Stirling FORDOC 01. A set of documentation conventions for FORTRAN packages and routines

Documentation conventions for FORTRAN are urgently needed to provide for better understanding and communication of packages and routines. The required properties of these conventions are defined, and a descriptive list of documentation conventions entitled “Stirling FORDOC 01”, in use at the University of Stirling is presented in the appendix.

A COMPUTER PROGRAM FOR MINIMIZING A FUNCTION OF SEVERAL VARIABLES1

ABSTRACTThe Fletcher‐Powell algorithm for minimizing a function of several variables is described. A package of FORTRAN IV subroutines that follows this algorithm with some modifications is given and its use is discussed and illustrated. It is shown that the algorithm can be used also when the variables satisfy certain equality constraints.