RSIC COMPUTER CODE PSR-077

1. NAME AND TITLE

ANSIFT: ANSI Standard Fortran Sifting Program.

2. CONTRIBUTOR

Los Alamos National Laboratory, Los Alamos, New Mexico.

3. CODING LANGUAGE AND COMPUTER

Fortran IV; CDC-6600/7600 (A), IBM 360/370 (B).

4. NATURE OF PROBLEM SOLVED

ANSIFT examines source decks that are compilable on either the CDC 6600 or 7600 or the IBM 360/370 computers and changes or flags some common nonstandard usages. It can detect, and sometimes correct, the following usages: 1) nonstandard characters, 2) blank cards, 3) nonstandard input/output statements, 4) use of unsubscripted array names or implied DO-loop notations in DATA initialization statements, 5) unspecified repeat count or missing field separators in FORMAT statements, 6) ENCODE statements, 7) two-branch logical IF statements, 8) simple mixed-mode relational expression in logical IF statements, 9) calls to system subroutines, 10) seven-character variable names, 11) Hollerith replacement statements, 12) illegal subscript expressions.

5. METHOD OF SOLUTION

In the first stage of processing, the input file containing the source deck is checked line by line. The accepted lines are written on a scratch file. Program unit headlines are written on the output file to aid in locating errors. Error messages are then written on the output file following the headline of the routine in which they were detected.

In the second stage, the scratch file is read and statements are formed. Each statement is checked for nonstandard usages. Where possible, a nonstandard statement is changed to make it standard. Where it cannot be changed, the statement is flagged. The final version of the statement will be written onto a print file.

6. RESTRICTIONS OR LIMITATIONS

None noted.

7. TYPICAL RUNNING TIME

No study has been made by RSIC of typical running times for ANSIFT.

8. COMPUTER HARDWARE REQUIREMENTS

ANSIFT is operable on the CDC-6600 or the IBM 360/370 computers.

9. COMPUTER SOFTWARE REQUIREMENTS

A Fortran IV compiler is required.

10. REFERENCE

C. W. Cox, "ANSIFT: An ANSI Standard Fortran Sifting Program," LA-5410-MS (October 1973).

11. CONTENTS OF CODE PACKAGE

Included are the referenced document and one (1.2MB) DOS diskette which contains the source code and sample problem input and output.

12. DATE OF ABSTRACT

February 1984.