IBM 1620 User Manual

FORTRAN Arithmetic
Functions
If an arithmetic statement is in mixed mode, the mode of the variable on the
left side of the equal sign determines the mode of the result.
If the variable on the left is in fixed point and the expression on the right is
in floating point, the expression will first be evaluated in floating point, the portion
following the decimal point will be dropped, and the remainder will be converted
to fixed
point by retaining only the four digits immediately to the left of the decimal.
If a result is
123456.78
the fixed point quantity stored is 3456.
If the variable on the left is in floating point and the expression on the right
is in fixed point, the expression will be evaluated in fixed point and the result con-
verted to floating point. For example,
Arithmetic
Statement
A = 5/3
A = 5./3.
I = 5/3
I = 3./2.
I = 123456.78/4.
Result
A=1.
A = 1.6666666
I = 1
I
= 1
I = 864 (was computed as 30864.195)
If your problems are programmed in floating point rather than in fixed point, you
will find
it is easier to process fractions because you will not have the problem of
locating decimal points.
If a particular problem that you are programming requires
the use of fixed point quantities, you must understand exactly how fixed point
arithmetic is accomplished.
In fixed point calculations, if the result is not an integer (whole number) the
result is truncated to a whole number. That is, the fractional portion of the result
is discarded,
and no rounding takes place.
The fixed point division 5/3 is 1, not 2. Therefore, if you write an expression
with a series of operations that includes a division, you must be careful when
grouping. For example,
A = 5./3. ~< 4.
In floating point, 5 divided by .3 equals 1.6666666, and this value multiplied
by 4 equals 6.6666664.
If this arithmetic statement is written in fixed point,
I = 5/3 * 4
then 5 divided by .3 equals 1.6, which is truncated to 1. The 1 is multiplied by 4
and the answer is 4.
If you had reversed the grouping in the statement,
I = 4 *5/3
the result would be 6. Remember, in a statement with a series of multiplications
and divisions where the parentheses have been omitted the operations are per-
formed from left to right.
Assume
that you are writing a FORTRAN program that requires taking the square
root of a number at different locations in the program. The statements to perform
the sql1are root would be identical, except for the different arguments used each
time.
Writing the 1620 FORTRAN Program 21

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