IBM 1620 User Manual

DIMENSION Statement
A FORTRAN Problem
44
the exponent field. The start of an exponent field must be marked by
an E, or if that is omitted, by a + or -, but not a blank. Thus, E2, E02,
+ 2, + 02, E02, and E + 02 are all permissible exponent fields, and must
always
be right-justified. Whichever of these forms you use, it is sug-
gested
that you be consistent in using the same one.
Whenever you use subscripted variables in your program, you must provide the
processor with the following information:
l. Which variables (of all the variables you may have used in your pro-
gram) are subscripted.
2. Whether your subscripted variables (arrays) are one- or two-dimensional.
3. The number of elements in each dimension of the array.
The DIMENSION statement provides information to the processor necessary
for the allocation of storage in the object program for the elements of arrays of
quantities.
One DIMENSION statement may be used to dimension any number of
arrays, as long as
the entire DIMENSION statement does not exceed the length of
a
statement (72 characters).
Format
Examples:
"DIMENSION v( d), v( d,d), v( d)" . .. for one- and two- di-
mensional arrays.
where each
v is the name of a variable, followed by paren-
theses enclosing one or more constants, representing
the
number of elements in each dimension of the array.
The vs must be separated from each other by commas.
The constants must be unsigned and in fixed point mode.
DIMENSION HRS (12)
DIMENSION A( 10), B( 10,5)
Every variable which appears in the program in subscripted form must
appear in a DIMENSION statement, and the DIMENSION statement must precede
the first appearance of the variable. When the object program is processed, the
number of elements in an array must not be larger than the number specified in
the DIMENSION statement. In the first example shown, the variable, HRS, is an array
consisting of 12 elements, and the processor will set aside twelve 10-position
fields of storage
(this is, a floating point variable - 8 for mantissa and 2 for char-
acteristic).
In the second example, the variable, B, represents a two-dimensional
array
that will consist of 10 rows with 5 columns in each row. The processor will
set aside fifty
(10 x 5) 10-position fields in which to store the elements of the
array B.
You may include both fixed point and floating point variables in the same
DIMENSION statement. The DIMENSION statement does not create instructions in
your object program; its function is merely to supply information to the processor.
The problem contained in this section is intended as a guide for developing your
first
FORTRAN problem. Rather than try to show the power of FORTRAN, a simple,
uncomplicated
problem was chosen. It indicates how a problem is developed, how
it is written on the coding form, and how it is documented as it is processed at
compile time and object time.

IBM 1620 Specifications

General

Category	Desktop
Manufacturer	IBM
Model	1620
Introduced	1959
Weight	Approximately 1, 000 pounds
Memory	20, 000 to 60, 000 digits
Programming	FORTRAN, Symbolic Programming System (SPS)
CPU	Decimal, variable word length
Storage	Magnetic disk drive (IBM 1311)

Summary

Introduction to IBM FORTRAN

Writing the 1620 FORTRAN Program

Floating Point Arithmetic Explained

Details floating point arithmetic, mantissa, and exponent representation.

FORTRAN Constants: Definition and Types

Defines constants and explains fixed and floating point constant formats.

FORTRAN Variables: Definition and Naming

Explains variables, their distinction from constants, and naming conventions.

FORTRAN Subscripts and Arrays

Explains subscripts for referencing array elements and defining arrays.

Arithmetic Statements

Describes how numerical calculations are defined using arithmetic statements.

FORTRAN Expressions: Structure and Operations

Defines expressions and lists the basic FORTRAN operation symbols.

Control Statements

Explains control statements that provide flexibility in program development.

Unconditional GO TO Statement

Describes the unconditional GO TO statement for transferring program execution.

Computed GO TO Statement

Explains the computed GO TO statement for conditional transfers.

IF Statement for Conditional Logic

Details the IF statement for transferring program flow based on expression values.

DO Statement for Looping Constructs

Explains the DO statement for simplifying loop programming and providing flexibility.

Nested DO Statements and Rules

Explains the rules for nesting DO statements within other DO statements.

Input/Output Statements

Explains statements used to read data into programs and output results.

READ Statement for Card Input

Details the READ statement for inputting data from punched cards.

ACCEPT Statement for Typewriter Input

ACCEPT TAPE Statement for Paper Tape Input

PUNCH Statement for Card Output

TYPE Statement for Typewriter Output

PRINT Statement for Printer Output

Explains the PRINT statement for outputting data to the 1443 Printer.

PUNCH TAPE Statement for Paper Tape Output

FORTRAN Specification Statements

Introduces specification statements, including FORMAT and DIMENSION.

FORMAT Statement for Data Conversion

Explains the FORMAT statement for controlling input/output data conversion.

FORMAT Statement Output Specifications

Explains I (Integer) and F (Floating Point) conversion for output.

Specifying Alphameric Fields in FORMAT

DIMENSION Statement

Explains the DIMENSION statement for allocating storage for arrays.

Writing FORTRAN Statements for Problem Solution

Processing with the FORTRAN Pre-Compiler

Operating Principles

Producing the Object Program

Explains the fundamental steps for creating the object program from source code.

Clearing Core Storage to Zero

Console Switch Settings for Compilation

Loading the FORTRAN Compiler

Explains the procedures for loading the compiler program deck or tape.

Compiling the FORTRAN Source Program

Describes how to initiate compilation of the FORTRAN source program.

Loading FORTRAN Subroutines

Explains how to load subroutine decks or tapes after source program compilation.

Common Source Program Errors During Compilation

Executing the Object Program

Details the procedures for loading and executing the compiled FORTRAN object program.

Inputting Data from the Keyboard During Execution

Using the Trace Feature for Debugging

Explains how to use the trace feature to monitor program flow and check correctness.

Analysis of the FORTRAN Program

FORTRAN Subroutines: Overview and Classification

Introduces FORTRAN subroutines, their types, and available sets.

Floating Point Accumulator (FAC)

FORTRAN Subroutine Linkage Mechanism

Error Analysis of FORTRAN Subroutines

Discusses errors, their codes, and FAC values for FORTRAN subroutines.

FORTRAN Subroutine Error Checks and Codes

Lists subroutine error checks, error codes, and FAC values for error conditions.

Adding Custom Subroutines to FORTRAN

Processor

Processor Subroutine Management

Storage Allocation

Storage Allocation After Compiler Loading

Storage Allocation After Source Program Processing

The FORTRAN Pre-Compiler Program

Operation of the FORTRAN Pre-Compiler

Explains the two-phase operation: Error Analysis and Final Program Summary.

Pre-Compiler Error Code Categories

Categorizes the common errors detected by the Pre-Compiler program.

FORTRAN Statement Number Errors

FORTRAN Transfer Statement Errors

General FORTRAN Statement Errors

Error Analysis Phase

Restart Procedures in Error Analysis

Final Program Summary in Pre-Compiler

Program Switch Settings

Loading the FORTRAN Pre-Compiler Program

Details the steps required to load the FORTRAN Pre-Compiler program.

Processing the Source Program with Pre-Compiler

Explains how to process the source program using the Pre-Compiler.

Pre-Compiler Program Deck Structure

Pre-Compiler Program Tape Structure

Pre-Compiler Tape Data Identification

Duplicating the FORTRAN Pre-Compiler Tape

Appendix A - Summary of 1620 FORTRAN Statements

ACCEPT Statement Summary

ACCEPT TAPE Statement Summary

DIMENSION Statement Summary

Summarizes the DIMENSION statement for array declaration.

DO Statement Summary

Summarizes the DO statement for loop control.

FORMAT Statement Summary

Summarizes the FORMAT statement for data conversion.

GO TO Statement Summary

Computed GO TO Statement Summary

IF Statement Summary

Summarizes the IF statement for conditional logic.

PRINT Statement Summary

Summarizes the PRINT statement for printer output.

PUNCH Statement Summary

PUNCH TAPE Statement Summary

READ Statement Summary

Summarizes the READ statement for card input.

TYPE Statement Summary

Summary of 1620 Operating Principles

1620 Typewriter Input Operations

Manual Data Entry via Typewriter

Typewriter Output Operations

Paper Tape Input Procedures

IBM Tape Punch Operation

IBM 1621 Paper Tape Reader Operation

Card Input

Covers the process of inputting data via punched cards.

IBM 1622 Card Read Punch Overview

Provides an overview of the IBM 1622 Card Read Punch.

1622 Card Feed Motor Control

1622 Card Read Operation

1622 Card Punch Operation

1622 Operator Keys and Lights

1622 Card Reader Controls and Indicators

1622 Card Punch Controls and Indicators

IBM 1443 Printer Overview

Provides an overview of the IBM 1443 printer.

1443 Printer Keys, Lights, and Switches

Details the keys, lights, and switches for operating the 1443 printer.

1443 Printer Start Key Operation

Explains the operation of the 1443 printer's start key.

1443 Printer Stop Key Operation

Details the operation of the 1443 printer's stop key.

1443 Printer Power On Light

1443 Printer Ready Light

Explains the function of the 1443 printer's ready light.

1443 Printer Sync Check Light

Describes the 1443 printer's sync check light and error conditions.

1443 Printer Parity Check Light

Explains the 1443 printer's parity check light indicator.

1443 Printer Form Check Light

1443 Printer End-of-Form Light

1443 Printer Manual Controls

Details the manual controls for operating the 1443 printer.

1443 Character-Set Selection Switch