View source for IBM 1130

{{short description|16-bit IBM minicomputer introduced in 1965}}
{{Infobox computing device
| name         = IBM 1130
| title        = 
| aka          = 
| logo         = File:IBM Logo 1956 1972.svg
| logo_size    = 120px
| image        = IBM 1130 (1).jpg
| caption      = 
| developer    = IBM Boca Raton
| manufacturer = IBM
| family       = 
| type         =  [[minicomputer]]
| generation   = 
| release date  = {{Start date|1965}}
| retail availability = 
| lifespan     = 
| price        = ~$1,000 per month rental, {{Inflation|US|1000|1965|fmt=eq|r=-2|cursign=about $}}
| discontinued = early 1980s<ref name=tnmoc-lsg/> 
| units sold    = 
| units shipped = 10,000 est.<ref name=tnmoc-lsg/>
| media        = 
| os           = Disk Monitor 2 (DM2)
| power        =  
| cpu          = 16-bit, word addressed, 15-bit address space
| memory       = [[magnetic core memory|magnetic core]]
| storage      =  IBM 2310 disk drive
| memory card  = IBM 2515 single disk cartridge
| display      = [[IBM 1627]] Calcomp Plotter, [[IBM 2250]], optional
| graphics     = 
| input        = [[punched card]], [[paper tape]], console 
| connectivity = IBM [[Synchronous transmit-receive|Synchronous Communication Adaptor]] (SCA)
| dimensions   = desk-size: width 58.5 in, depth 29 in, height 44.125 in<ref name=1130install>[http://bitsavers.informatik.uni-stuttgart.de/pdf/ibm/1130/fe/2191139_1130_Installation_Jul66.pdf IBM 1130 Installation manual], IBM Form GA26-5914, June 1966, BitSavers</ref>
| weight       = 660 lb<ref name=1130install/> 
| topgame      = 
| compatibility= via [[Fortran]]
| predecessor  =  [[IBM 1620]], [[IBM 650]]
| successor    = [[IBM Series/1]]{{br}}[[IBM System/7]]
| related      =  [[IBM 1800]] process control system
| marketing_target =  small engineering companies, schools
| website      = {{URL|IBM1130.org}}
}}

The '''IBM 1130''' Computing System, introduced in 1965,<ref name=":0">{{cite press release |last=Francis |first=C.G. |title=IBM introduces powerful small computer |date=11 February 1965 |publisher=International Business Machines (IBM) |department=Director of Information |place=[[White Plains, New York]] |url=http://www.ibm1130.net/1130Release.html |url-status=dead |archive-url=https://web.archive.org/web/20190705200515/http://www.ibm1130.net/1130Release.html |archive-date=2019-07-05}}</ref> was [[IBM]]'s least expensive [[computer]] at that time. A [[binary number|binary]] 16-bit machine, it was marketed to price-sensitive, computing-intensive technical markets, like education and engineering, succeeding the [[Decimal computer|decimal]] [[IBM 1620]] in that market segment. Typical installations included a 1 megabyte disk drive that stored the operating system, compilers and object programs, with program source generated and maintained on [[punched card]]s. [[Fortran]] was the most common [[programming language]] used, but several others, including [[APL (programming language)|APL]], were available.[[File:IBM 1130 concole.ms.jpg|thumb|280px|IBM 1130 console]]

The 1130 was also used as an intelligent front-end for attaching an [[IBM 2250]] Graphics Display Unit, or as [[remote job entry]] (RJE) workstation, connected to a [[System/360]] mainframe.[[File:IBM 1130 (16758008839).jpg|thumb|280px|IBM 1130 with peripherals, including paper tape reader punch, [[IBM 1442]] card reader/punch (rear) and [[IBM 1627]] Calcomp plotter]]
== Description ==
[[File:Slt1.jpg|thumb|A double width SLT card from an IBM 1130. The square metal cans contain the hybrid circuits.]]

The total production run of the 1130 has been estimated at 10,000.<ref>{{cite interview
 | last           = Utley
 | first          = Brian
 | title          = Guest speaker: Brian Utley
 | url            = http://ibm1130.org/party/v03
 | format         = MP3
 |date=Jan 2005
 | access-date     = 2012-01-02
 }}</ref>
The 1130 holds a place in computing history because it (and its non-IBM clones) gave many people their first direct interaction with a computer. Its price-performance ratio was good and it notably included inexpensive, removable [[disk storage]], with reliable, easy-to-use software that could be in several [[high-level language]]s. The low price (from around $32,000 or $41,000 with disk drive)<ref name=":0" /> and well-balanced feature set enabled interactive "open shop" [[software development|program development]].

The IBM 1130 uses the same electronics packaging, called [[Solid Logic Technology]] (SLT), that was used in [[System/360]]. It has a [[16-bit]] binary architecture, as do later [[minicomputer]]s like the [[PDP-11]] and [[Data General Nova]].

The [[address space]] is 15 bits, limiting the 1130 to {{nowrap|32,768 16-bit}} [[Word (data type)|words]] ({{nowrap|65,536 bytes}}) of memory.  The 1130 uses [[magnetic-core memory]], which the processor addresses on word boundaries, using direct, indirect, and indexed addressing modes.

=== Models ===
IBM implemented five models of the 1131 [[central processing unit]], the primary processing component of the IBM 1130. The Model 1 through Model 5 describe the core memory cycle time, as well as the model's ability to have disk storage. A letter A through D appended to the model number indicates the amount of core memory installed.

IBM 1131 Central Processing Unit weighs about 760/1050&nbsp;lb (345/477&nbsp;kg).<ref>760 lb: models 1A, 1B, 2A, 2B, 4A and 4B<br/>
1050 lb: models 1C, 1D, 2C, 2D, 3B, 3C, 3D, 5B, 5C and 5D
*{{cite web |title=IBM 1130 documents |url=http://www.bitsavers.org/pdf/ibm/1130/ |website=www.bitsavers.org|at=[http://www.bitsavers.org/pdf/ibm/1130/fe/GA26-5914-8_1130_Installation_Manual_Physical_Planning_Dec71.pdf fe/GA26-5914-8_1130_Installation_Manual_Physical_Planning_Dec71.pdf], pp. 10-11}}</ref>

{| class="wikitable"
|- class="tgray"
| &nbsp;
! colspan="5" style="text-align:center;" | Memory cycle time
|- style="background-color:#ffffff;vertical-align:top;"
! style="background-color:#ffffff;text-align:center;" | Core memory
! style="width:7.5em;text-align:center;" | 3.6&nbsp;[[μs]],<br />no internal disk
! style="width:7.5em;text-align:center;" | 3.6&nbsp;μs,<br />plus disks
! style="width:7.5em;text-align:center;" | 2.2&nbsp;μs,<br />plus disks
! style="width:7.5em;text-align:center;" | 5.9&nbsp;μs<br />(3.6&nbsp;μs: see below),<br />single disk
! style="width:7.5em;text-align:center;" | 2.2&nbsp;μs,<br />no internal disk
|- style="background-color:#CCCCCC;"
! style="text-align:right;" | 4096 words
| style="width:7.5em;text-align:center;"| Model 1A
| style="width:7.5em;text-align:center;"| Model 2A
| {{sdash}}
| style="width:7.5em;text-align:center;"| Model 4A
| {{sdash}}
|- style="background-color:#ffffff;"
! style="text-align:right;" | 8192 words
| style="width:7.5em;text-align:center;"| Model 1B
| style="width:7.5em;text-align:center;"| Model 2B
| style="width:7.5em;text-align:center;"| Model 3B
| style="width:7.5em;text-align:center;"| Model 4B
| style="width:7.5em;text-align:center;"| Model 5B
|- style="background-color:#CCCCCC;"
! style="text-align:right;" | 16,384 words
| style="width:7.5em;text-align:center;"| Model 1C
| style="width:7.5em;text-align:center;"| Model 2C
| style="width:7.5em;text-align:center;"| Model 3C
| {{sdash}}
| style="width:7.5em;text-align:center;"| Model 5C
|- style="background-color:#ffffff;"
! style="text-align:right;" | 32,768 words
| style="width:7.5em;text-align:center;"| Model 1D
| style="width:7.5em;text-align:center;"| Model 2D
| style="width:7.5em;text-align:center;"| Model 3D
| {{sdash}}
| style="width:7.5em;text-align:center;"| Model 5D
|}

The Model 4 was a lower-priced product with a 5.9&nbsp;μs cycle time. Some purchasers of performance upgrades observed that the field adjustment to achieve the improvement was surprisingly trivial.

The [[IBM 1132]] printer relies on the 1130 processor rather than internal logic to determine when to fire the print wheels as they rotated. Printers for the Model 4 run more slowly, but the slower processor still can not keep up with it. The hardware manual discloses that when the Model 4 was servicing the two highest-level [[interrupt]]s (the level 0 card-reader column interrupt or the level 1 printer interrupt), it ran at the faster 3.6&nbsp;μs cycle time. Some users of the Model 4 would write a phony [[device driver|printer driver]] that did not dismiss the printer interrupt, in order to benefit from the higher processor speed. However, lower-level interrupts are disabled during this interval, even the end-of-card interrupt (level 4) from the 1442 card reader.

==== Follow-on products ====
The [[IBM 1800]], announced November 1964,<ref>{{cite web |title=IBM 1800 data acquisition and control system |url=https://www.ibm.com/ibm/history/exhibits/vintage/vintage_4506VV4022.html |website=IBM Archives |date=23 January 2003 |access-date=Aug 20, 2021}}</ref> is a variant of the IBM 1130 for [[process control]] applications. It uses hardware rather than core memory for the three index registers and features two extra [[instruction set|instructions]] (CMP and DCM) plus extra interrupt and [[input/output|I/O]] capabilities. It is a successor to the [[IBM 1710]], as the IBM 1130 is a successor to the [[IBM 1620]].

The [[IBM 1500]] is a multi-user educational system based around either an IBM 1130 or an IBM 1800. It can connect to up to 32 student work stations, each with a variety of [[audio-visual]] capabilities.

Other than these, IBM produced no compatible successor systems to the 1130. The [[IBM System/7]] is a process control and real-time system, and the [[IBM Series/1]] is a general-purpose 16-bit minicomputer, both having different [[Computer architecture|architectures]] from the 1130, and from each other.

==== Chronology ====
*February 11, 1965 – IBM introduces the 1130 (Models 1A, 1B, 2A, and 2B). Also announced is the IBM 1132 printer, the lowest cost online computer printer ever announced by IBM at that time.
*Fourth quarter 1965 – First customer shipments begin from the [[San_Jose,_California|San Jose]] plant.
*March 31, 1966 – IBM introduces the IBM 1500 educational system.
*April 1966 – IBM 1800 ships.<ref name="Pugh1991" />{{rp|497}}
*August 9, 1966 – IBM rolls out the 1130 [[synchronous communication]]s adapter, which permits the small 1130 system to be connected by regular leased telephone lines to, and function as a communications terminal for, any model of the IBM System/360.
*April 17, 1967 – A four-way expansion of the 1130 is announced (Models 2C, 2D, 3B, 3C, and 3D), involving:
**Five times the disk storage and four times the core memory;
**An additional processing speed almost 40 percent faster than previously available;
**More and faster peripheral equipment, including an optical mark reader;
**An improved commercial programming package.
*January 1968 – First shipments begin of the 1130 Models 2C, 2D, 3B, 3C, and 3D.
*July 1968 – The [[Boca Raton]] plant begins shipping the 1130.
*July 22, 1971 – 1130 Models 4A and 4B are introduced at new levels of economy.
*September 1971 – First customer shipments begin of the 1130 Model 4.
*May 31, 1972 – Models 1C, 1D, 5B, 5C and 5D are announced.
*1973 - The [[Xerox 500 series#16-bit systems (Xerox 530)|Xerox 530]] was marketed as a possible successor to IBM 1130 customers.<ref>{{cite news |newspaper=[[The New York Times]]
|url=https://www.nytimes.com/1973/01/29/archives/new-xerox-minicomputer.html
|title=New Xerox minicomputer |date=January 29, 1973}}</ref><ref>{{cite magazine |magazine=ComputerWorld
|date=December 26, 1973 |url=https://books.google.com/books?id=Hx7KTIal060C
|title=Xerox 530 supports COBOL}}</ref><ref>{{cite web |title=Rank Xerox 530 Computer
|url=http://archive.computerhistory.org/resources/access/text/2010/06/102672228-05-02-acc.pdf |website=computerhistory.org |access-date=Sep 23, 2014}}</ref> Orders for the Xerox 530 were deemed "encouraging" as of January 1974.<ref>{{cite news
|url=https://www.newspapers.com/newspage/136847295 |title=Xerox 530 orders "encouraging"}}</ref>

==Software==
To maximize speed and conserve space, the operating system and compilers are written entirely in [[assembly language]] and employ techniques that are rare today, including intermixing code and data as well as [[self-modifying code]].

Much user programming is done in [[Fortran]]. The 1130 Fortran [[compiler]] can run on a machine with only 4,096 words of core—though the compiled program might not fit on such a machine. In this [[multi-pass compiler]], each "phase" processes the entire source program and takes it another step toward [[machine code]].  For example, the first phase reads the source statements into memory, discards comment lines, removes spaces except in text literals, concatenates continuation lines and identifies labels. The compiler is available in a disk-resident version as well as on eight-channel [[Punched tape|punched paper tape]] or punched cards.

The most widely used [[operating system]] for the 1130 is the ''Disk Monitor System Version 2'' (DM2) introduced in 1967. DM2 is a single-task [[batch processing|batch-oriented]] system. It requires a system with at least 4&nbsp;KB of core memory and one integrated 2310 disk drive for system residence. The Supervisor is tiny by modern standards, containing assorted system details such as first-level interrupt routines, called ''Interrupt Level Subroutines'', plus the disk driver and routines to load the interpreter of [[job Control Language|job control]] commands and the card reader driver. Device drivers for other I/O devices required by a job are incorporated as part of the loading of that job, which might also include the replacement of the basic disk driver by a more advanced driver. During the execution of a job, only a [[resident monitor]], called the ''Skeleton Supervisor'', resides in memory. This Supervisor requires just 1020 bytes, so a task's first available memory starts with address {{mono|/01FE}} ([[hexadecimal]]) or word 510.  When the job ends or is aborted, the supervisor loads the ''Monitor Control Record Analyzer'' (''MCRA'') to read the job control for the next. While the job is running, the Supervisor is inactive. Aside from device drivers and interrupt processing all CPU time is entirely devoted to the job's activities.  Other programs distributed as part of the operating system are a [[core dump]] utility, ''DUMP'', and the [[Disk utility|Disk Utility Program]], ''DUP''.

A Card/Paper Tape Programming System was available to support systems without disk.

There is a hierarchy of device drivers: those with names ending in Z are for Fortran, such as DISKZ, while assembler programmers might use DISK0, and DISK1 was even faster at reading multiple disk sectors. But DISKZ starts its sector addressing with the first available unused sector, while the others start with sector zero of the disk, making it possible for a programmer unfamiliar with disk organization to inadvertently overwrite the bootstrap loader.

Other programming languages available on the 1130 include
* [[APL (programming language)|APL]],<ref>{{cite journal|url=http://www.vector.org.uk/archive/v223/APL_1130.htm|title=How We Got To APL\1130|author=Larry Breed|author-link=Lawrence M. Breed|journal=Vector (British APL Association)|volume=22|issue=3|date=August 2006|issn=0955-1433|access-date=2007-03-11|archive-url=https://web.archive.org/web/20080512031437/http://www.vector.org.uk/archive/v223/APL_1130.htm|archive-date=2008-05-12|url-status=dead}}</ref>
* [[BASIC]], 
* [[COBOL]],<ref group=note>for which there was an IBM compiler</ref>
* [[Forth (programming language)|FORTH]], 
* [[PL/I]] (in the form of the [[SL/1]] interpreter),<ref group=note>SL/1: references to Student Language/One, Student Language/1 and Subset Language/1 exist</ref> and 
* [[IBM RPG|RPG]].<ref group=note>an IBM Program Product</ref>

There is even a French language [[ALGOL]] compiler, in which for example "<code>Debut ...Fin;</code>" take the place of "<code>Begin ... End;</code>".  All its messages are in French, so "Bonne compilation" is the goal.

[[Eastern Michigan University]] developed a Fortran IV compiler for the 1130, known as Fortran-EMU, as an alternative to the Fortran IV (subset) compiler provided by IBM.  It adds many Fortran Iv features not supported by the IBM compiler, including the LOGICAL data type, six-letter variable names, and enhanced diagnostics. The Fortran-EMU compiler was distributed as a deck of punched cards in a disk image file format with all the remaining system area deleted, to prevent copying other modules that would normally reside on the same disk, such as the assembler or compilers.

[[Oklahoma State University]] developed an [[ALGOL 68]] compiler, written in ANSI Fortran 1966.<ref>{{cite conference |last1=Hedrick |first1=G.E. |last2=Robertson |first2=Alan |title=The Oklahoma State ALGOL 68 Subset Compiler |conference=1975 International Conference on ALGOL 68 |location=Stillwater, OK |date=June 10–12, 1975}}</ref><ref>{{cite journal |last=Hedrick |first=G.E. |doi=10.1145/382175.803425 |title=ALGOL68 instruction at Oklahoma State University |journal=ACM SIGCSE Bulletin |volume=9 |issue=3 |date=August 1977 |pages=16–20 |publisher=ACM |location=New York, NY, USA}}</ref><ref>{{cite web |last=McJones |first=Paul |url=http://www.softwarepreservation.org/projects/ALGOL/algol68impl |title=Algol 68 implementations and dialects |website=Software Preservation Group, [[Computer History Museum]]}}</ref>

A [[FOCAL (programming language)|FOCAL]] interpreter was developed at the University of Michigan.

IBM also distributed a large library of programs, both IBM-supported (Type I and II) and unsupported (Type III and IV).

Since the 1130 was aimed primarily at the scientific market,
scientific and engineering programs predominated:
* Scientific Subroutine Package
* Draw and Plot Subroutines
* Electric Power System Load Flow Program
* Multiple Regression
* Calculation of Electrical Distribution System Fault Currents
* Pipe Analysis
* [[COGO]] coordinate geometry
* [[CSMP III|Continuous System Modeling]] (CSMP)
* [[Linear Programming]] Mathematical optimization Subroutine System
* Structural Engineering System Solver (STRESS)
* Statistical System<ref>{{cite book|last1=IBM Corporation|title=1130 Statistical System (1130-CA-06X) User's Manual|date=1967|url=http://www.mirrorservice.org/sites/www.bitsavers.org/pdf/ibm/1130/statisticalSystem/H20-0333-1_1130_Statistical_System_Users_Manual_1967.pdf|access-date=Feb 8, 2015}}</ref>

The 1130 also occupied a niche as a [[data processing]] machine for smaller organizations:
* 1130 Commercial Subroutine Package
* Student Information System
* [[Program evaluation and review technique|CPM/PERT]]

There is also special-purpose software:
* Remote Job Entry (RJE)<ref>{{cite book|last1=IBM Corporation|title=IBM 1130 Remote Job Entry Work Station Program Program Logic Manual|date=1968|url=http://www.mirrorservice.org/sites/www.bitsavers.org/pdf/ibm/1130/program_libr/Y30-1001-0_RJE_PLM_Jun68.pdf|access-date=Feb 8, 2015}}</ref>
* Typesetting<ref>{{cite book|last1=IBM Corporation|title=IBM 1130 Typesetting System (RPQ)|date=1967|url=http://www.mirrorservice.org/sites/www.bitsavers.org/pdf/ibm/1130/program_libr/GA26-3531-0_1130_Typesetting_System_1967.pdf|access-date=Feb 8, 2015}}</ref>

==Job control==
Batch operation of the 1130 is directed by control records in the primary input stream (card or paper tape reader). There are two types of control records, monitor control records and supervisor control records.<ref name="DM2">{{cite book |last1=IBM Corporation |title=IBM 1130 Disk Monitor System Reference Manual |date=1968 |url=http://bitsavers.org/pdf/ibm/1130/monitor/C26-3750-2_1130_Disk_Monitor_System_Reference_Manual_1968.pdf |access-date=Aug 31, 2021}}</ref>

===Monitor control records===
Monitor control records are identified by <code>//␢</code> followed by a "pseudo-operation code" in columns 4–7. "␢" represents a single blank.
{| class="wikitable"
|+ 1130 Monitor Control Records
|-
! Control record !! Function
|-
| <code>//␢* comments</code> || Provides a comment to be printed in the job listing in columns 5 thru 80
|-
| <code>//␢JOB</code>  || Identifies the start of a job
|-
| <code>//␢ASM</code>  || Invokes the Assembler
|-
| <code>//␢FOR</code>  || Invokes the FORTRAN compiler
|-
| <code>//␢PAUS</code>  || Stops the system until the console START key is pressed
|-
| <code>//␢TYP</code>  || Switches from the printer to the console for control record input and output
|-
| <code>//␢TEND</code>  || Cancels the effect of <code>//␢TYP</code>
|-
| <code>//␢DUP</code>  || Invokes the Disk Utility Program
|-
| <code>//␢XEQ</code>  || Reads and transfers control to a mainline program
|}

The <code>JOB</code> record can have a "T" in column 8 to indicate that any files added to the User Area by this job should be deleted at the end. Columns 11 thru 15 can contain a cartridge label; the system verifies that the specified cartridge is mounted before proceeding.

The <code>XEQ</code> record may contain the name of the program to be run in columns 8 thru 12. If this is omitted, the program currently in Working Storage will be executed. If column 14 contains "L", and the program is in Disk System Format (not core-image) a core map will be printed by the Core Load Builder. If this statement is followed by <code>LOCAL</code> <code>NOCAL</code>, or <code>FILES</code> Supervisor Control Records, columns 16 and 17 contain the count of these records. Column 19 optionally indicated which disk driver routine is to be linked. "0", "1", or "N", request DISK1, DISK2, or DISKN, any other character, including blank, requests DISKZ, the FORTRAN disk routine.

===Supervisor control records===
Supervisor control records begin with an "*" in column 1, immediately followed by the command pseudo-operation in column 2. They are <code>LOCAL</code>, <code>NOCAL</code>, and <code>FILES</code> for the Core Load Builder. DUP control records have a similar format. These records control program linking, either for the <code>// XEQ</code> statement or the DUP <code>*STORECI</code> command.
{| class="wikitable"
|+ Supervisor Control Records
|-
! Control record !! Description
|-
| <code>*LOCAL</code> || Supplies a list of subprograms which will be loaded as [[Overlay (programming)|overlays]] at run time, rather than included with the main program
|-
| <code>*NOCAL</code> || Supplies a list of subprograms to be linked with the main program, even though they are never called. These are usually either debug routines which the operator can manually branch to from the console, or interrupt service routines
|-
| <code>*FILES</code> || Equates ''File Identification Numbers'' from the FORTRAN <code>DEFINE FILE</code> statement or the Assembler <code>FILE</code> statement to named files on disk.
|}

== Operating procedure ==
[[File:IBM1130CopyCard.agr.jpg|thumb|Punched card containing a self-loading 1130 program that would copy the deck of cards placed after it in the input hopper]]
The enduring memories of the IBM 1130 may have resulted from its need for continual human intervention. It was usually occupied running "jobs" specified by a deck of [[punched card]]s. The human operator would load jobs into the card reader and separate them back into jobs for return, perhaps along with printed output, to the submitter. The operator would also have to watch the 1130 for evidence of a malfunctioning or stalled job and intervene by pressing the {{key press|INT REQ}} key on the keyboard to skip ahead to the start of the next job.<ref name=OperGuide>{{cite book|last1=IBM Corporation|title=IBM 1130 Disk Monitor System, Version 2, Programmer's and Operator's Guide|date=May 1972|url=http://www.mirrorservice.org/sites/www.bitsavers.org/pdf/ibm/1130/monitor/C26-3717-9_1130_1130_Disk_Monitor_System_Version_2_Programming_and_Operators_Guide_May72.pdf|access-date=Feb 6, 2015}}</ref>

Marking the start of a job was a punched card that started with <code>// JOB</code>. Any card that started with <code>//</code> was a command to the Supervisor and could not be used as user program or data. Other commands included <code>// DUP</code> to execute the Disk Utility Program (to delete files or add the file in the temporary area to the file collection) and <code>// XEQ</code> to execute a named program from disk. If a user program tried to read a command card, the standard card reader routine would signal end-of-input to the program and save that card's content for the Supervisor.

;Initial Program Load (IPL)
Unlike the IBM 360, where a [[booting]] device can be selected from the system console, an IBM 1130 can only be "booted" (IPL'd: Initial Program Load) from an external device: a card reader or a paper tape reader.<ref>{{cite web
|url=http://ed-thelen.org/comp-hist/vs-ibm-1130.html
|title=IBM 1130|access-date=2017-02-21}}</ref><ref>Quote: "''Our 1130 has a 2315, 1/2 million-word disk cartridge unit on the right side, behind the door. The paper tape reader was probably primarily used for booting, instead of the large, 300 cards/min 1442 card reader.''"</ref>

The bootstrap procedure reads one card from the card reader.  The boot card contains binary code<ref>{{cite book
|url=http://media.ibm1130.org/1130-102-ocr.pdf
|series=IBM Systems Reference Library |title=IBM 1130 Functional Characteristics}} Page 136 of the Functional Characteristics, Figure 40, shows how each of the 12 holes on a punched card fill the 16 bits of a memory word, when doing an IPL (Initial Program Load), using "Load Mode Read."</ref> to read the contents of sector zero of the disk drive, which in turn handles the "operation complete" interrupt from the disk drive and performs additional disk reads to prepare the 1130 for the first punched-card job. The whole process takes about a second to complete.

;Recovery procedures
When the IBM 1130 is started, the Supervisor is still in memory and probably intact, as core memory retains its state without power.  If the operator concludes that a user program has stalled, the Supervisor can sense a key press to abort the program and skip ahead to the next // card.  The Supervisor is not protected against modification by a badly written job, a case that might require that the operator reboot the 1130.  Nor was there protection against writing to disk.  If the copy of the system software on disk is modified, it can be restored by reloading it from about 4000 binary-coded punched cards (approximately two boxes).

== Disk organization ==
[[File:IBM 2315 disk cartridge.agr.jpg|thumb|IBM 2315 disk cartridge]]
[[File:Disk Cartridge 2315 type.jb.jpg|thumb|2315 compatible disk cartridge (dimensions 1 3/8 x 15 in.)]]
The IBM 2310 disk drive stores [[Disk sector|sectors]] of 320 words (640 bytes) plus a one-word sector address. A [[Cylinder-head-sector#Cylinders|cylinder]] consists of two [[Track (disk drive)|tracks]] stacked on the top and bottom surfaces of the 2315, or stacked on the top and bottom surfaces of each of the 6 platters (outermost surfaces excepted) of the 1316 [[disk pack]] used in the 2311. Each disk cylinder contains eight sectors per surface with each surface having a dedicated read-write head. Each sector is logically divided by the monitor into sixteen ''disk blocks'' of 20 words (40 bytes) each. The disk block is the unit of allocation for files.

The system distinguishes between ''system cartridges'', which contain the monitor and utilities along with user data, and ''nonsystem cartridges'', which contain user data only. All cartridges contain information on cylinder 0, including the defective cylinder table, cartridge id, and a bootstrap program ([[Booting|bootstrap code]]). On nonsystem cartridges, the bootstrap simply prints an error message and waits if an attempt is made to boot from this cartridge. On a system cartridge this is the ''cold-start program'', followed by a ''communications area'' and the resident monitor in sectors one and two.  Sectors three through five contain the ''System Location Equivalence Table'' (SLET)—a directory of all phases of all monitor programs.  Other control information fills out the first track.

The system area is present on system cartridges. It contains the Disk Monitor program, and optionally the FORTRAN compiler, the Assembler, and a ''core image buffer'' used for linking relocatable programs. It also contains the user file directories— ''Fixed Location Equivalence Table'' (FLET), and ''Location Equivalence Table'' (LET),

Following the system area, the cartridge contains up to three logical subdivisions: the ''fixed area'', the ''user area'', and ''working storage''. Both the fixed area and user area store non-temporary programs and data. The fixed area size is defined by DUP, and stores data, and programs in core image format only. It is not repacked when files are deleted. The user area stores data and programs in any format. The boundary between the user area and working storage "floats"— the user area expands as files are added and contracts as it is repacked to reclaim space from deleted files. If a file needs to be modified, the usual process is to use <code>// DUP</code> commands to delete it, which moves any subsequent files back to close the gap, and then give that name to the temporary file as the new version of the file. Rarely modified files thus migrate towards the start of the disk as new files or new versions are appended, and frequently modified files are stored towards the end of the disk.

Working storage starts after the last file in the user area and occupies all the remaining space on the cartridge. It may contain one temporary file created by the system or the user, such as the output of a compiler or an application program. This file is subject to possible deletion at the end of the current job, unless saved to the fixed area or the user area.

All disk files are contiguous disk blocks, thus there is no [[File system fragmentation|fragmentation]]. A program can use and modify named files, but can not expand them beyond their created size. A program which creates more than one file must have all but one pre-allocated by a DUP.

With limited disk space, program source files are normally kept as decks of cards. Users having larger requirements may have a disk of their own containing the operating system, but only their files, and would have to replace the "pool" system disk with theirs and restart the system when their programs are to be run. A system with a second disk drive that can be devoted entirely to one user's code and data provides some relief.

With Disk Monitor System version 1, a disk pack or cartridge is initialized for use on the 1130 by the ''Disk Pack Initialization Routine'' (DPIR). This routine scans the disk and writes sector addresses on all cylinders, flags defective sectors, and writes a cartridge id on cylinder zero. DPIR is a [[standalone program]], which is loaded from cards or paper tape, and accepts the cartridge id from the system console.<ref name=DM2 />

With Disk Monitor System version 2, disk cartridge initialization is performed with the ''Disk Cartridge Initialization Program'' (DCIP), which can also copy, dump, patch, analyze, and compare disks.<ref name=OperGuide />

== Disk Utility Program (DUP) ==
The '''Disk Utility Program (DUP)''' provides commands for transferring programs, subroutines and data. It is invoked by the job control  <code>// DUP</code> card, followed by one or more control cards:<ref>{{Cite web | url=http://www.ibm1130.net/DM2/MonitorPrograms.html#dupcontrecords |title = Monitor Programs}}</ref>
{| class="wikitable"
|+ Common DUP commands
|-
! Command !! Function
|-
| *STORE || Store a program in Disk System Format<br>(relocatable object)
|-
| *STORECI || Store a program in Core Image Format<br>(fully linked and relocated)
|-
| *STOREDATA || Store a data file to disk
|-
| *STOREDATACI || Reload a dumped core image program
|-
| *STOREMOD || Replace or create a disk file
|-
| *DUMP || Dump data file from disk
|-
| *DUMPDATA || Dump arbitrary sectors from disk
|-
| *DUMPLET || Print the disk Location Equivalence Table (LET),<br> and the Fixed Location Equivalence Table (FLET) if a fixed area exists
|-
| *DELETE || Delete a program or data file
|}

Other commands, mainly for use by the system administrator, define or expand the Fixed Area, delete the FORTRAN compiler and/or Assembler from the system, and restore correct sector addresses to Working Storage if they have been modified.

The operands have to be placed into fixed columns.The source device code goes in columns 13 and 14, the destination device in columns 17 and 18. These device codes are:
* '''UA''' – User Area
* '''FX''' – The fixed area (no "extents" as per the 360; just contiguous space)
* '''WS''' – Working Storage
* '''CD''' – Punched Card/Principal Input device (could be '''PT''': Paper Tape)
* '''PR''' – Printer
Optionally, a program name may be coded in columns 21 thru 25, and a count field in 27 thru 30. The interpretation of these fields depends on the DUP function requested.

Programs can be converted to a faster-loading format with the ''STORECI'' command, which invokes Core Image Builder (DM2's counterpart to the 360's Linkage Editor). Alternatively, a program can go through this process each time it is to be run, and for infrequently used programs this is preferred in order to conserve disk space.

The following control card instructs DUP to take the current contents of working storage and move it to the user area naming it PROGM. DUP knows the size of the file in working storage. The size of the user area will be increased by the size of the file, and the size of working storage will be decreased correspondingly.
[[File:IBM 1130 DUP control card.png|thumb|center|upright=2|IBM 1130 DUP control card example]]

==Peripheral devices==
[[File:Vintage Computer Festival 2010 056 (4717096457) (cropped).jpg|thumb|IBM 1132 line printer]]
[[File:IBM1442.corestore.jpg|thumb|[[IBM 1442]] card reader/punch]]
[[File:IBM 1627 plotter.mw.jpg|thumb|[[IBM 1627]] drum plotter]]

Disk memory is used to store the operating system, object code, and data, but source code is kept on punched cards.

The basic 1130 came with an [[IBM 2310]] voice-coil actuated disk drive, called "Ramkit", from IBM's General Products Division in San Jose.<ref name=Pugh1991>{{cite book |title= IBM's 360 and early 370 systems |author1= Emerson W. Pugh |author2= Lyle R. Johnson |author3= John H. Palmer |publisher= MIT Press |year= 1991 |isbn= 978-0-262-16123-7 |url= https://archive.org/details/ibms360early370s0000pugh |url-access= registration }}</ref>{{rp|497}} Their pizza-box-sized IBM 2315 single platter cartridges holds 512,000 words or 1,024,000 bytes (less than a [[Floppy disk#3½-inch floppy disk|3.5" HD floppy]]'s 1.44MB or even the [[Floppy disk#5¼-inch floppy disk|5.25" HD floppy]]'s 1.2MB). Transfer rate is 35,000 words per second (70&nbsp;KB/sec) using [[cycle stealing]].<ref>{{cite web |last1=IBM Corporation |title=1130 Facts folder: IBM 1130 computing system |url=https://www.ibm.com/ibm/history/exhibits/1130/1130_facts.html |website=IBM Archives |access-date=April 29, 2023 |archive-url=https://web.archive.org/web/20230501235104/https://www.ibm.com/ibm/history/exhibits/1130/1130_facts.html |archive-date=May 1, 2023 |url-status=dead}}</ref>

The IBM 1053 console typewriter uses an IBM [[Selectric]] mechanism, which means one could change the typeface or character set by replacing a hollow, golf-ball sized type element. There is a special type element available for [[APL programming language|APL]], a powerful array-oriented [[programming language]] using a special symbolic notation. A row of 16 toggle switches on the console typewriter can be individually tested from within programs, using the special Fortran statement <code>IF (SENSE SWITCH ''i'')</code>, for example.

Other available peripherals included:
*'''Printers''' – the [[IBM 1132]]<ref group=note>Model 1 @ 80 Lines/minute, Model 2 @ 40 LPM</ref> and [[IBM 1403]]<ref group=note>choice of 340 Lines/minute Model 6, 600 LPM Model 7</ref><ref>{{cite web |website=BitSavers
   |url=http://www.bitsavers.org/pdf/ibm/1130/GA26-5717-1_1130_Operating_Procedures_Aug71.pdf
   |series=IBM Systems Reference Library |title=IBM 1130 Operating Procedures}}</ref> [[line printer]]s
*'''Punched-card''' – the [[IBM 1442]] card reader/punch and the [[IBM 2501]] card reader
*'''Paper tape''' – the IBM 1055 paper tape punch, the IBM 1054 paper tape reader, and the IBM 1134 paper tape reader
*'''Disk''' – the [[IBM 2311]] Disk Drive
*'''Magnetic tape''' – From 1968, IBM 2415 [[Magnetic tape data storage]] drives were available as an [[Request price quotation|RPQ]].<ref>{{cite book
 |url=http://media.ibm1130.org/E0004.pdf |access-date=2009-08-10 |edition=First
 |title=IBM 1130 Custom Feature Description – Attachment Channel RPQ Number 831552, Form A26-1579-0
 |date= October 1968 |location=San Jose, California |series=IBM Systems Reference Library |publisher=IBM Corporation }}</ref>
*'''Graphics''' – [[IBM 2250]] Graphic Display Unit.
*'''Color Pen Plotter''' – [[IBM 1627]] drum plotter.
*'''Optical Mark Reader''' – [http://bitsavers.trailing-edge.com/pdf/ibm/1401/A21-9012-3_1231_opticalRdr_1963.pdf IBM 1231 Optical Mark Page Reader] <ref>{{cite web |url=http://www.ibm1130.net/functional/OMPR.html|title=IBM 1231 Optical Mark Page Reader }}</ref>
*'''Communications''' – Synchronous Communications Adapter (SCA).  The IBM 1130 MTCA, for ''Multiple Terminal Control Adapter'', announced in 1970<ref>{{cite web|last=IBM Corporation|title=IBM Archives: DPD Chronology (page 4)|url=http://www-03.ibm.com/ibm/history/exhibits/dpd50/dpd50_chronology4.html|archive-url=https://web.archive.org/web/20091023214552/http://www-03.ibm.com/ibm/history/exhibits/dpd50/dpd50_chronology4.html|url-status=dead|archive-date=October 23, 2009|access-date=10 Aug 2011}}</ref> allowed up to four 2741 terminals to be connected to an IBM 1130, for use with APL.

To simplify the design of peripheral devices, these rely on the processor. The card reader has no memory buffers, but instead gives the CPU a level-zero (highest priority) interrupt after each individual column of the card has been read. If the CPU does not respond and store the twelve bits of data before another such interrupt indicates that the next column has been read, data will be lost. Similarly, the 1132 printer relies on software in the 1130. When a letter such as <code>A</code> comes into position, the CPU has to analyze a buffered line of text and assemble an array of bits that will indicate to the 1132 which print positions should be printed with <code>A</code>. If the CPU can not respond before the <code>A</code> rotates out of position, print speed could be severely degraded.

Other peripherals accept text in a device-specific code convenient for its hardware. The CPU has to translate it to or from the EBCDIC code in which the CPU processes the text.

== Instruction set overview ==
Instructions have short (one-word) and long (two-word) formats.  Most computational, load, and store instructions reference one register (usually ACC) and a memory location.  The memory location is identified, in the short format, by an 8-bit signed displacement from either the current address or one of the index registers; or in the long format, by a full 15-bit address, which can be indexed and specify indirection. Memory is addressed in units of words.

The 1130 supports only single-precision and double-precision binary data natively (16 and 32&nbsp;bits)  stored in [[big-endian]] format. Standard- and extended-precision floating-point (32 and 48&nbsp;bits) and decimal data are supported through the use of subroutines.

Conditional transfers are based on (a) the current contents of the [[Accumulator (computing)|accumulator]], or (b) the carry and overflow indicators set by a preceding operation.  Transfers can be by skip (which assumed that the next instruction was short) or by branch. A skip occurs if any of the specified tests are true. A branch occurs if ''none'' of the specified tests were true.

<pre>
Main Registers:
IAR = Instruction Address Register
ACC = Accumulator
EXT = Extension Register
XRx = Index Registers: x = 1,2,3
      Implemented as memory words 1,2,3, not as hardware registers.

Condition tests:
Z  Accumulator zero
-  Accumulator negative
+  Accumulator positive
E  Accumulator even
C  Carry indicator off
O  Overflow indicator off

1130 Instruction Set Mnemonics:
LD   = Load ACC                   STO  = Store ACC
LDD  = Load Double (ACC & EXT)    STD  = Store Double (ACC & EXT)
LDX  = Load Index                 STX  = Store Index
LDS  = Load Status                STS  = Store Status
A    = Add ACC                    AD   = Add Double
S    = Subtract ACC               SD   = Subtract Double
M    = Multiply                   D    = Divide
AND  = Boolean AND                OR   = Boolean OR
XOR  = Boolean Exclusive OR
SLA  = Shift Left ACC             SLT  = Shift Left ACC & EXT
SLCA = Shift Left and Count ACC   SLC  = Shift Left and Count ACC & EXT
SRA  = Shift Right ACC            SRT  = Shift Right ACC & EXT
RTE  = Rotate Right ACC & EXT
BSC  = Branch or Skip on Condition (Modifier dependent)
       i.e. BP BNP BN BNN BZ BNZ BC BO BOD
BOSC - Branch Out or Skip Conditionally (alternate for BSC with bit 9 set)
       Exits current interrupt level.
BSI  = Branch and Store IAR
MDX  = Modify Index and Skip (Increment IAR one if a sign change or becomes zero)
WAIT = Halt                       NOP  = No Operation (alternate for SLA 0)
XIO  = Execute I/O

1800 Additional Instruction Mnemonics:
CMP  = Compare ACC                DCM  = Double Compare ACC & EXT

Equivalent Mnemonics
The disk assembler introduced several mnemonics equivalent to existing
instructions intended to make the programmer's intent clearer:
SKP - Skip on condition, equivalent to a short BSC
B   - Branch unconditionally, equivalent to BSC with no conditions specified
BP  - Branch Accumulator Positive, equivalent to BSC specifying '+' condition
BNP - Branch Accumulator not Positive
BN  - Branch Accumulator Negative
BNN - Branch Accumulator not Negative
BZ  - Branch Accumulator Zero
BNZ - Branch Accumulator not Zero
BC  - Branch on Carry
BO  - Branch on Overflow
BOD - Branch Accumulator Odd
MDM - Modify Memory, equivalent to unindexed long-format MDX
XCH - Exchange Accumulator and Extension, equivalent to RTE 16

Short instruction format (one 16 bit word):
                       1
Bits    0...45678......5
        OP---FTTDisp----

OP    is Operation
F     is format 0 = Short
TT    is Tag
Disp  is Displacement

Long instruction format (two 16 bit words):
                       1               1
Bits    0...456789.....50..............5
        OP---FTTIMod----Address---------

OP    is Operation
F     is format 1 = Long
TT    is Tag
I     is Indirect bit
Mod   is Modifier

Effective Address Calculation (EA):
          F = 0            | F = 1, I = 0     | F = 1, I = 1
          Direct Addressing| Direct Addressing| Indirect Addressing
-------------------------------------------------------------------
TT = 00 | EA = Displ + IAR | EA = Add         | EA = C/Add
TT = 01 | EA = Displ + XR1 | EA = Add + XR1   | EA = C/Add + XR1
TT = 10 | EA = Displ + XR2 | EA = Add + XR2   | EA = C/Add + XR2
TT = 11 | EA = Displ + XR3 | EA = Add + XR3   | EA = C/Add + XR3
-------------------------------------------------------------------
    Disp = Contents of displacement field
     Add = Contents of address field of instruction
       C = Contents of location specified by Add or Add + XR
</pre>
{| class="infobox" style="font-size:88%;width:34em;"
|+ IBM 1130 registers
|-
| style="text-align:center;"| <sup>1</sup><sub>5</sub>
| style="text-align:center;"| <sup>1</sup><sub>4</sub>
| style="text-align:center;"| <sup>1</sup><sub>3</sub>
| style="text-align:center;"| <sup>1</sup><sub>2</sub>
| style="text-align:center;"| <sup>1</sup><sub>1</sub>
| style="text-align:center;"| <sup>1</sup><sub>0</sub>
| style="text-align:center;"| <sup>0</sup><sub>9</sub>
| style="text-align:center;"| <sup>0</sup><sub>8</sub>
| style="text-align:center;"| <sup>0</sup><sub>7</sub>
| style="text-align:center;"| <sup>0</sup><sub>6</sub>
| style="text-align:center;"| <sup>0</sup><sub>5</sub>
| style="text-align:center;"| <sup>0</sup><sub>4</sub>
| style="text-align:center;"| <sup>0</sup><sub>3</sub>
| style="text-align:center;"| <sup>0</sup><sub>2</sub>
| style="text-align:center;"| <sup>0</sup><sub>1</sub>
| style="text-align:center;"| <sup>0</sup><sub>0</sub>
| ''(bit position)''
|- 16
|colspan="17" | '''Accumulator''' <br/>
|- style="background:silver;color:black"
| style="text-align:center;" colspan="16"| ACC
| style="background:white; color:black;"| '''A'''ccumulator
|- style="background:silver;color:black"
| style="text-align:center;" colspan="16"| Q
| style="background:white; color:black;"| '''E'''xtension
|- 
|colspan="17" | '''Index registers''' <br/>
|- style="background:silver;color:black"
| style="text-align:center; background:white" colspan="1"| &nbsp;
| style="text-align:center;" colspan="15"| IAR
| style="background:white; color:black;"| '''I'''nstruction address
|- style="background:silver;color:black"
| style="text-align:center;" colspan="16"| XR1
| style="background:white; color:black;"| '''I'''ndex 1
|- style="background:silver;color:black"
| style="text-align:center;" colspan="16"| XR2
| style="background:white; color:black;"| '''I'''ndex 2
|- style="background:silver;color:black"
| style="text-align:center;" colspan="16"| XR3
| style="background:white; color:black;"| '''I'''ndex 3
|- 
|colspan="17" | '''Flags'''
|- style="background:silver;color:black"
| style="text-align:center; background:white" colspan="14" | &nbsp;
| style="text-align:center;"| [[Overflow flag|O]]
| style="text-align:center;"| [[Carry flag|C]]
|}
;Reserved memory
The lowest addresses of core memory have uses dictated either by the hardware or by convention:
{| class="wikitable"
|-
!Address
!Usage
|-
|/0000
|By convention, contains the instruction <code>B *-1</code>, which would branch to itself indefinitely until an operator noticed that all the console IAR lights were dark and flushed the job, either by pressing Int Req or by rebooting.
|-
|/0001
|XR1.  The memory addresses of the index registers permit direct moves between them, such as with <code>LDX I1 2</code>
|-
|/0002
|XR2.
|-
|/0003
|XR3.
|-
|/0008
|The address of the handler for the Level 0 (highest priority) interrupt— 1442 card reader/punch "column ready" interrupt.
|-
|/0009
|The address of the handler for the Level 1 interrupt— 1132 printer and Synchronous Communications Adapter.  Handlers for this and lower interrupts have to test a Status Word to determine which device has interrupted.
|-
|/000A=10
|The address of the handler for the Level 2 interrupt— disk storage, Storage Access Channel.
|-
|/000B=11
|The address of the handler for the Level 3 interrupt— 1627 plotter, Storage Access Channel.
|-
|/000C=12
|The address of the handler for the Level 4 interrupt— 1134 paper tape reader, 1055 paper tape punch, console, 1442 card read punch, 2501 card reader, 1403 printer, 1231 optical mark reader, Storage Access Channel device.
|-
|/000D=13
|The address of the handler for the Level 5 (lowest priority) interrupt— console stop  and interrupt switches, Storage Access Channel.
|-
|/0020=32
|First word of the scan field for the 1132 printer (/0020–/0027).
|-
|/0026=38
|Last full word of the scan field.
|-
|/0027=39
|Half used: 120 columns = 120 bits = seven 16-bit words plus 8 bits.
|-
|/0038=56
|EXIT to Supervisor/Return to Monitor (CALL EXIT)
|}

== Programming ==
=== Subprograms ===
The 1130 has no hardware support for a [[Call stack|stack]].  Most subprograms are called with the instruction BSI (Branch and Store IAR).  This deposits the value of IAR (the return address) at the destination address and transfers control to destination+1. Subprograms return to wherever they were called on that occasion using an indirect branch through that first word of the subprogram. Placing the return address in-line was a common technique of computers at that time, such as the Hewlett-Packard [[HP 2100]],<ref>{{cite book|last1=Hewlett-Packard|title=2100A Computer Reference Manual|date=December 1971|page=18|url=http://bitsavers.informatik.uni-stuttgart.de/pdf/hp/21xx/02100-90001_2100refManDec71.pdf|access-date=August 5, 2016}}</ref> the DEC [[PDP-8]],<ref>{{cite web |title=PDP-8 User's Manual |url=https://archive.org/details/bitsavers_decpdp8pdpokMay66_22437012/page/n26/mode/1up |publisher=Digital Equipment Corporation |access-date=26 April 2021 |date=May 1966}}</ref> and the Scientific Data Systems [[SDS 9 Series|SDS 920]].<ref>{{cite book|last1=Scirntific Data Systems|title=920 Computer Reference Manual|page=17|url=http://bitsavers.informatik.uni-stuttgart.de/pdf/sds/9xx/920/SDS5002_920_RefMan.pdf|access-date=August 5, 2016}}</ref>

So a subprogram named SIMPL might be organized as follows (comments follow the instruction operand):

 SIMPL: DC     *-*    This is the entry point, filled with a zero initially.
        (whatever the routine does)
        B    I SIMPL  Return by an '''I'''ndirect branch, to the address found in location SIMPL.
        END    SIMPL  Instructs the assembler that the source for routine SIMPLE is complete.

The subprogram would be called as follows:

        BSI  L SIMPL  Call SIMPL. L (Long) is needed if SIMPL is more than -128 or +127 words away.

The [[Assembly language#Opcode mnemonics and extended mnemonics|pseudo-opcode]] CALL would typically be used.

As shown, a subprogram's entry point is <code>DC *-*</code>, an assembler pseudo operation that is used to Define a Constant (occupying one word of storage) with the value specified by the expression. The * stands for the current address of the assembly and so *-* results in zero. Writing this rather than 0 provides a visually distinctive note that a meaningful value (the return address) will be placed there at run time. The entry point need not be the first word of the subprogram. Indeed, the preceding word can be the start of a two-word direct branch instruction whose address field is at SIMPL. Then, returns can be effected by one-word branches there: <code>B SIMPL-1</code>

When SIMPL is called, the BSI instruction replaces <code>*-*</code> with the current value of IAR, which is the address just past the BSI instruction.  After SIMPL does whatever it is written to do, <code>B I SIMPL</code> branches not to SIMPL, but indirect through it, thus continuing execution with the instruction following the BSI instruction that called SIMPL.

Without extra arrangements to protect the return address, [[Recursion#In computer science|recursion]] is impossible:  If SIMPL calls itself, or called a subprogram that called it, its original return address is overwritten.  [[Reentrancy (computing)|Re-entrancy]] is problematic for the same reason:  An interrupt service routine must refrain from calling any subprogram that might have been the code that was interrupted.

The caller of SIMPL might pass it parameters, which might be values or addresses of values.  Parameters might be coded in-line (immediately following the BSI instruction) or might be placed in index registers XR1 and XR2.  If parameters are placed in-line, SIMPL modifies its own return address so its final indirect branch returns beyond the parameters.

Integer functions of a single integer expect the parameter in the accumulator and return their result there. Floating-point functions employ the floating-point accumulator (a two word area set aside by the floating-point library, three words for extended precision), and so on.

The convention of coding 0 as the initial value at the entry point means that if a programming error leads to SIMPL returning before the first time it was ever called, execution would jump to memory location 0.  As mentioned [[#Instruction set overview|above]], it is customary to have location 0 contain a branch to location 0.  The 1130 would be stuck at location 0, and the IAR lights on the console would be entirely dark, making it clear the program had failed.

=== Linkage to library routines ===
For subprograms that would be called many times (for example, subprograms for [[floating-point arithmetic]]), it is important to reduce the size of each call to one word. Such "library routines" use the LIBF protocol.  It is more complex than the CALL protocol described in the previous section, but LIBF hides the complexity from the writer of the assembly-language program.

Library routines are addressed through index register XR3.  (Fortran subprograms use index register XR1 for the addresses of parameters and the return address, but register XR2 is unused.)  XR3 points to a sequence of three-word '''transfer vectors''' such that the first entry is -128 words from XR3's value.  The programmer calls the library routine using the <code>LIBF</code> pseudo-operation, which assembles not a direct <code>BSI</code> to the routine but a one-word indexed branch instruction (<code>BSI 3 ''disp''</code>) whose displacement (-128, -125, and so on) identifies the start of the routine's transfer vector.

The transfer vector is prepared by the linkage loader when it puts together the program.  A transfer vector entry to a library function named SIMPL takes this form:

       DC       *-*            A word into which BSI stores the return address.
       B    L   SIMPL          Branch to the start of the library function.

The way SIMPL knew where its return address was is that, if SIMPL were declared a LIBF routine, the linkage loader would modify the code of SIMPL, placing the address of SIMPL's transfer vector entry at SIMPL+2.  LIBF routines, unlike CALL subprograms, do not start with a DC directive to hold the return address (it is in the transfer vector) but with actual code, as follows:

 SIMPL STX   1  RCVR1+1        Save the caller's value of XR1 at a nearby location.
       LDX  I1  *-*            The linkage loader changes the address word to point to the transfer vector.

Placing the address of SIMPL's transfer vector at SIMPL+2 leaves room for a one-word instruction to save the chosen index register, here XR1. Then the indirect LDX instruction points XR1 not at the transfer vector, but through it to the return address, or to any parameters stored in-line after the BSI.  SIMPL then does whatever it was written to do, gaining access to any in-line parameters through XR1 (in which case it must increment XR1 for the return address), and returns as follows:

       STX   1  RETN+1         Store XR1 to prepare to use it as a return address.
 RCVR1 LDX  L1  *-*            SIMPL's first instruction modified this address.  Now,
 *                              restore the original value of XR1.
 RETN  B    L   *-*            This instruction was modified two instructions ago; return.

;Example
Suppose a LIBF-style call to SIMPL were at address 100.  Then the return address would be 101, because <code>BSI 3 ''disp''</code> is a one-word instruction. XR3 points into the group of transfer vectors.  If the transfer vector for SIMPL started at address 2000, then the BSI would be assembled with a <code>''disp''</code> so that XR3+disp = 2000.  Executing the BSI stores 101 at location 2000 and jumps to location 2001.  At 2001 is a two-word long jump to the entry point of SIMPL, which the linkage loader might have placed at address 300.

The long jump transfers control to SIMPL.  After the instruction at 300 stores XR1, the instruction at 301 is <code>LDX '''I'''1 2000</code>, the linkage loader having placed 2000 at location 302.  This does not load 2000 into XR1; it is an indirect instruction, and loads the contents of 2000, which is 101, the return address for that call to SIMPL.

In the return sequence shown above, by the time control reaches RETN, the instruction there is <code>B L 101</code>, which returns to the caller.  (If there is one or more in-line parameters at 101, SIMPL would increment XR1 to point to 102 or beyond, and this would be the destination of the <code>B</code> instruction.)

;Variations
If SIMPL took parameters coded in-line following the BSI instruction, SIMPL gains access to them with indexed addressing off XR1.  The first could be obtained by <code>LD 1 0</code>, the second by <code>LD 1 1</code>, and so on. If the second parameter is the address of the actual parameter, then <code>LD '''I'''1 1</code> obtains its value. Before returning, SIMPL increments XR1 past the ''n'' parameters with an instruction such as <code>MDX 1 ''n''</code> so as to place the right value at RETN+1.

A LIBF routine that declined to restore the original value of XR1 could omit the above steps and return with a simple <code>B 1 ''n''</code> to skip ''n'' in-line parameters.  However, such a routine can not be called by other LIBF routines because it disrupts the caller's use of XR1 for access to its own parameters and return address.

The complexity of LIBF saves memory for subprograms that are frequently called.:<ref name=ASM>{{cite book|last1=IBM Corporation|title=IBM 1130 Assembler Language|date=1968|url=http://bitsavers.trailing-edge.com/pdf/ibm/1130/lang/C26-5927-4_1130_Assember_Upd_Jun68.pdf|access-date=Feb 6, 2015}}</ref>{{rp|p.24}}  The LIBF linkage requires one word per invocation, plus three words for the transfer vector entry and extra code in the routine itself, whereas the CALL linkage requires two words per invocation because most CALLs will be to an address beyond the -128 to +127 word reach of the one-word opcode.

The register XR3 must point to the transfer vector entries for the library routines rather than a [[dispatch table]] of only their addresses, because this latter would require that LIBF routines be called with an indirect BSI instruction.  These instructions are two words long, so such a design would negate the code size savings of LIBF. The eight-bit limit for the ''disp'' field of the one-word instruction code limits usage of LIBF routines to no more than 85 distinct entries.

=== Code modification ===
<!--THIS TITLE IS REFERENCED IN THE ARTICLE "Self-modifying code" -->
The previous sections show that code and data are intermingled.  It is common in 1130 programming to modify the address fields of instructions and, in fact, to modify entire instructions.

==== By the Fortran compiler ====
The Fortran compiler produces self-modifying code when generating code for any subprograms (subroutines or functions) that have parameters. The compiler builds a table of every location where the subprogram references one of its parameters, and compiles as the first instruction in the body of the subprogram a call to a subprogram called {{mono|SUBIN}} that uses the table to modify the address field of every reference to a parameter to be the actual address of the parameter during the current invocation.  {{mono|SUBIN}} makes these patches every time the subprogram is called.

When a Fortran program calls a subprogram, the addresses of any parameters appear in-line following the call.  For example, the Fortran statement {{code|CALL SIMPL(X)}} might compile into:
   BSI L  SIMPL
   DC     X      The address of X, on which SIMPL is to operate

Within the subprogram, parameters could be accessed by indirect indexed addressing as shown above in [[#Linkage to library routines|Variations]], so, given that XR1 has been suitably prepared, an integer parameter could be loaded into the accumulator with an instruction like this:
   LD  I1 0      Load the value of the first parameter (offset 0) into the accumulator

The compiler instead used direct addressing.  When {{mono|SUBIN}} runs, it obtains the address of {{mono|{{var|X}}}} and patches the instruction's address field to become:
   LD  L  X      Load the value of X into the accumulator

The advantages of {{mono|SUBIN}} are as follows:
*To obtain the operand's address an indirect indexed instruction requires three memory cycles (the index register being in memory) while the direct access instruction require only one.
*If {{mono|SIMPL}} were to pass one of its parameters to any subprogram that expected to receive the address of its parameter (including all the {{mono|LIBF}} routines for floating-point arithmetic), {{mono|SUBIN}} is needed to supply the actual address of the original parameter.

The disadvantages of {{mono|SUBIN}} are the time it requires to run and the memory required for the table of references.  The size of this table is the sum of 5, the number of parameters, and the number of references; if this sum exceeds 511, compilation will fail.  For subprograms with many references to a parameter, the author of the subprogram might copy the parameter into a local variable.

==== By the user ====
Modifying entire instructions was a common technique at the time.  For example, although the 1130 has an OR instruction, the syntax of Fortran provides no way to write it.  An integer function IOR can be defined, enabling logical OR to be part of a Fortran expression such as:
<syntaxhighlight lang="fortranfixed">
   M = 3*IOR(I,J) + 5
</syntaxhighlight>
The Fortran compiler places the addresses of I and J in-line and expects the result in the accumulator.  Using IOR(I,J) in a Fortran expression compiles the following four words:

   BSI  L IOR    Two-word jump to the start of the IOR function.
   DC     I      A one-word in-line parameter: The address of I.
   DC     J      A one-word in-line parameter: The address of J.

In fact, the assembler IOR function does not compute I '''or''' J at all.  Instead, it '''replaces''' the above four words with the following:

   LD   L I      Load accumulator with I (two-word instruction)
   OR   L J      OR accumulator with J   (two-word instruction)

After performing that transformation, it does not return past the end of the four-word block (which it had just modified).  Instead, it branches to the exact address from which it had been called originally.  The BSI instruction is no longer there; what is now there is the two instructions it has just written.  They combine the two integers with the machine-language OR instruction and leave the result in the accumulator, as required.

The call to IOR and the transformation of the four-word block happens at most once per program run.  If the Fortran line illustrated above is executed again, it runs faster than it did the first time. Similar functions could be devised for other useful operations.

A function that self-modifies, as IOR does, can not be used in a Fortran subprogram on any of the parameters to that subprogram (though it could be used to combine local variables) because it is incompatible with the SUBIN subprogram discussed above.  IOR's transformation of its four-word calling sequence, shown above, moves the location of the address of variable I.  On subsequent calls to the Fortran subprogram, the table of references to parameters would be in error and SUBIN would patch the wrong word, in this case placing the new address of I over the OR operation code.

=== Extended precision ===
1130 FORTRAN  offers two floating point formats:  a 32-bit "standard precision" format and a 40-bit "extended precision" format.

Standard precision format contains a 24-bit [[two's complement]] significand while [[extended precision]] utilizes a 32-bit two's complement [[significand]]. This format makes full use of the CPU's 32-bit integer operations. The extended format occupies three 16-bit words, with the high-order eight bits of the first word unused. The [[Exponentiation|characteristic]] in both formats is an 8-bit field containing the power of two [[exponent bias|biased]] by 128.  Floating-point arithmetic operations are performed by software.<ref>{{cite book |title=IBM 1130 Subroutine Library 9th ed |year=1974 |publisher=IBM Corporation |pages=93 |url=http://media.ibm1130.org/1130-037-ocr.pdf }}</ref>

The <code>*EXTENDED PRECISION</code> compiler option card tells the FORTRAN compiler to use 40 bits instead of 32 bits for all floating point data, there is no provision for mixing formats.

=== Large Fortran programs ===
Data to be manipulated and the instructions that manipulate them have to reside together in core memory.  The amount of installed memory (from 4,096 to 32,768 words) is a key limitation.  Fortran provides several techniques to write large programs despite this limitation.

;LOCAL subprograms
Fortran let any subprogram be designated as "LOCAL" (Load-on-Call).  Each LOCAL subprogram is an [[overlay (programming)|overlay]]; it is part of the disk-resident executable program but is only loaded into core memory (if not already there) during the time it is called.  So, for example, six LOCAL subprograms would require only as much core memory as the largest, rather than the total amount for all six. However, none of the six can invoke another, either directly or through intermediary subprograms.

;Programs in phases
An entire Fortran program can pass control to a subsequent phase, exiting to the Supervisor with an instruction to load the follow-on phase into core memory. A large program might be split into three parts, separately compiled, called PART1, PART2, and PART3.  Execution is started by <code>// XEQ PART1</code> and at a suitable point, PART1 would execute the Fortran statement <code>CALL LINK(PART2)</code> and so forth.  The name of the successor program in the CALL can not be variable, but program logic can govern whether control is transferred to another phase, and which <code>CALL LINK</code> statement is executed.  As mentioned [[#Software|above]], the Fortran compiler itself was written this way, with each phase of compilation achieved by a separate program.

;COMMON data storage
Programs, such as Fortran programs, reside at low core memory addresses (just above the Supervisor).  Fortran allocates space at the highest addresses for any variables and arrays declared COMMON.  If a follow-on phase of the program contains a corresponding COMMON declaration, then information in this common area can be shared among phases.  Phases could omit the COMMON declaration without problem, provided those phases were not so large as to have their program code invade the common area.  COMMON storage not only shares data between phases; lower-memory COMMON variables can be used to pass data among a main program and subprograms within a single phase, though the data could be lost on moving to the next phase.

== Programming examples ==
The examples can be executed on the IBM 1130 emulator available at [http://ibm1130.org/ IBM 1130.org].

=== Sample assembler program deck ===
The following listing shows a [[punched card|card]] deck that compiles and runs an [[Assembly language#Assembler|assembler]] program that lists a deck of cards to the line printer.

<pre>
 // JOB
 // ASM
 *LIST
                     * LCARD.ASM - LIST A DECK OF CARDS TO LINE PRINTER
                     *
                     * PROGRAM
                     *    NEW PAGE ON PRINTER
                     * A  READ A CARD
                     *    CONVERT FORMAT
                     *    PRINT A LINE ON PRINTER
                     *    GOTO A
                     *
                     START LIBF    PRNT1    GOTO NEW PAGE ON 1132
                           DC      /3100    PRINTER CHANNEL 1-NEW PAGE
                     *
                     NEXTC LIBF    CARD0    READ FROM 1442 CARD READER
                           DC      /1000    CONTROL TO READ
                           DC      CBUFF    STORE 80 COLUMNS
                     CINP  LIBF    CARD0
                           DC      0
                           B       CINP     LOOP UNTIL CARD IS READ
                     *
                           LIBF    ZIPCO    CONVERT CARD TO PRINTER
                           DC      /1100    UNPACKED IN, PACKED OUT
                           DC      CBUFF+1  INPUT BUFFER
                           DC      PBUFF+1  OUTPUT BUFFER
                           DC      80       CHARACTER COUNT
                           CALL    HLEBC    HOLLERITH TO EBCDIC
                     *
                           LIBF    PRNT1    PRINT 80 CHARACTERS
                           DC      /2000    CONTROL CODE TO PRINT
                           DC      PBUFF    PRINT BUFFER
                           DC      PERR     PRINT ERROR
                     POUT  LIBF    PRNT1    CHECK FOR PRINT COMPLETE
                           DC      0
                           B       POUT     LOOP UNTIL COMPLETE
                     *
                           B       NEXTC    READ NEXT CARD
                     *
                     * DATA
                     *
                     CBUFF DC      80       80 COLUMNS PER CARD
                           BSS     80
                     *
                     PBUFF DC      40       40 WORDS 80 CHARACTERS
                           BSS     40
                     *
                     PERR  DC      0
                           B    I  PERR     THIS RETURNS TO THE
                     *                       PRINTER ERROR HANDLER
                     *                       WHICH WILL TERMINATE THE PROGRAM
                     *
                           END     START    PROGRAM ENTRY POINT
 // XEQ
 TEST DATA 1
 HELLO WORLD
 TEST DATA 2
</pre>

In this job, the assembler leaves the result of its assembly in the temporary area of the system disk, and the XEQ command executes the content of the temporary area. The odd-looking <code>END START</code> has two meanings: end of assembler source, and the name of the entry point of the routine, which has the label START.

Assembler source starts with column 21 of the card, not column one. In systems without a disk drive, the assembler would punch code into the start of the card just read (the card reader was actually a reader-punch, with the punch station after the read station) and then read the next card. To handle forward branches and the like, the assembler's second pass literally involved a second pass of the cards through the reader/punch. If source changes were needed the programmer would duplicate the cards to obtain a deck with columns 1-20 blank ready for the next run through the assembler.

By convention, buffers are preceded by a word count.  The <code>DC</code> (Define Constant) assembles a count word and the following <code>BSS</code> (Block Started by Symbol) reserves the required number of words for the buffer. The card buffer requires 80 words, one for each card column.  Driver CARD0 reads each card column literally, using 12 of the 16 bits in the buffer word, with a bit set to '''on''' for each hole punched in the corresponding row for that column.  The pattern of punches typically describes a text character using the [[Punched card|Hollerith code]].  The console keyboard also gives input to the program in the Hollerith code, the only case of two devices using the same character encoding.

The printer routine, however, works with text in 8-bit [[EBCDIC]] with two characters per word, requiring a 40-word buffer.  The program uses library routine ZIPCO to perform the conversion. Despite appearances, the statement <code>CALL HLEBC</code> is not executed because HLEBC is not a subroutine but an IBM-supplied Hollerith-to-EBCDIC conversion table.  The CALL statement provides the address of the table to ZIPCO and ensures that the linking loader includes the table in the program, thus it is the fifth parameter to ZIPCO, though one occupying two words of storage: the BSI operation code word for the CALL is unused and thus usually wasted, but the second word of the expansion of <code>CALL HLEBC</code> is the address of the HLEBC table needed by ZIPCO. After the conversion, the program sends the converted output, now in buffer PBUFF, to the printer through driver PRNT1.  Again, the program loops until the printer driver reports completion, then the program reads the next card.

This example contains no code to decide when to stop.  A more complete program would check for cards that begin with <code>//</code>, which denotes the start of the next job. To stop the card reader as soon as possible, a program could check for the Hollerith code of <code>/</code> before even converting the card to EBCDIC.

==== [[Asynchronous I/O]] and performance ====
The call to CARD0 to read a card initiates that operation and immediately returns to the caller, which could proceed with other activity. However, the example program makes no attempt to overlap input and output using buffers even though it has two separate work areas; it simply loops back to CIMP to test afresh. After CARD0 has sensed the card reader's operation-complete interrupt, it returns one word further on, thus skipping the jump back to CIMP and leaving the loop.

The example routines do not run the I/O devices at top speed. Notably, the card reader, only a few milliseconds after reporting completion on reading a card, will commence its stop sequence, after which a new read command will have to wait to initiate another read cycle. The IBM 1442 reader could read 400 cards/minute at full speed, but just a little hesitancy in the read commands would halve its throughput or worse. A Fortran program could not complete even the simplest input processing in time, and so could not read cards at full speed. One common Fortran <code>DO</code> loop to read cards made the motor stop and start so frequently as to accelerate wear.  With buffering, the card reader control could be overlapped with processing, and the reader could be run at full speed through large data decks, but memory for the more complex program and for buffers was often at a premium.

Even with assembler and double buffering, a program to list a deck of cards from the IBM 2501 reader (1,000 cards/minute) on the line printer could not keep up, as the translation from card hole patterns to EBCDIC for the printer as done by EBPRT was too slow; the more complex ZIPCO and HLEBC were needed instead, as in the example.

=== Sample APL\1130 session ===
The following image shows a simple [[APL (programming language)|APL]] \ 1130 session.   This session was performed via the 1130 simulator available from [http://ibm1130.org/ IBM 1130.org]<br />
[[File:Ibm1130 apl.jpg|'''apl \ 1130''' <br />apl \ 1130 sample session]]<br />
The above session shows a signon, addition of the integers 1 to 100, generation of an addition table for the integers 1..5 and a sign off.

== Competing systems ==
In the same year as the 1130's introduction, Digital Equipment Corporation introduced the smaller, cheaper, and better-selling 12-bit [[PDP-8]], recognized as the first successful minicomputer.

== Influence of the 1130 ==

*Brian Utley was the 1130s [[project manager]] during its [[product development|development]] and introduction. Brian said at the third 11/30 party that before IBM Marketing named the 1130 it was known as the Small Engineering Computer System or SECS.<ref>{{cite web|url=http://mail.computerhistory.org/pipermail/inforoots/2006-October/001138.html|title=Origin of the IBM 1130 Name|first=Brian|last=Utley|date=2006-10-30|access-date=2007-01-16|archive-url=https://web.archive.org/web/20071001043542/http://mail.computerhistory.org/pipermail/inforoots/2006-October/001138.html|archive-date=2007-10-01|url-status=dead}}</ref>  The initial architecture was 18 bits but was changed to 16 bits due to the influence of the [[System/360]] development.  The full dialogue of his 2005 presentation is available at [http://ibm1130.org/party/v03 IBM1130.org].
*Notable software designer [[Grady Booch]] got his first exposure to programming on an IBM 1130:<ref>{{cite web|url=http://www-106.ibm.com/developerworks/library/i-booch/ |title=Grady Booch polishes his crystal ball|first=Grady|last=Booch|author-link=Grady Booch|date=2003-04-03|publisher=[[IBM]] |access-date=2007-01-16}}</ref>
<blockquote>... I pounded the doors at the local IBM sales office until a salesman took pity on me. After we chatted for a while, he handed me a Fortran [manual]. I'm sure he gave it to me thinking, "I'll never hear from this kid again." I returned the following week saying, "This is really cool. I've read the whole thing and have written a small program. Where can I find a computer?" The fellow, to my delight, found me programming time on an IBM 1130 on weekends and late-evening hours. That was my first programming experience, and I must thank that anonymous IBM salesman for launching my career. Thank you, IBM.</blockquote>
*[[LISP]] guru [[Guy Steele]] wrote a LISP interpreter for the IBM 1130 when he was in high school ([[Boston Latin School]], which had an IBM 1130 for student use).<ref>{{cite web|url=http://www.ddj.com/dept/architect/184406382|title=Thoughts on Language Design -- New challenges require new solutions|first=Guy L. Jr.|last=Steele|author-link=Guy L. Steele Jr.|date=2005-11-24|publisher=[[Dr. Dobb's Journal]]|access-date=2006-01-16}}</ref><ref>{{cite web|url=http://www.ccil.org/jargon/jargon.html |title=Confessions of a Happy Hacker |first=Guy L. Jr. |last=Steele |author-link=Guy L. Steele Jr. |access-date=2006-01-16 |archive-url=https://web.archive.org/web/20070203031636/http://www.ccil.org/jargon/jargon.html |archive-date=2007-02-03 |url-status=dead }}</ref>  His code and documentation for LISP 1.6, along with a summary of current work in getting it to run under simulation, is available at [http://ibm1130.org/sw/lisp IBM1130.org].
*[[Charles H. Moore|Chuck Moore]] wanted to call his new language "Fourth" but the IBM 1130 operating system was limited to five-character names, so it wound up being called [[Forth (programming language)|FORTH]].<ref>{{cite web|url=http://www.forth.com/resources/evolution/evolve_0.html|title=The Evolution of Forth|first=Elizabeth|last=Rather |author2=Colburn, Donald |author3=Moore, Charles|date=March 1993|access-date=2007-01-16}}</ref>
*[[Dan Bricklin]], creator of the [[VisiCalc]] program, got his start in programming when he learned and used the IBM 1130 as part of the National Science Foundation Computer/Math Summer Project for high school students, given at the University of Pennsylvania in 1966.<ref>{{cite web|url=http://www.danbricklin.com/log/2002_08_23.htm|title=Memories while visiting the Bay Area and the Computer History Museum|date=2002-08-23|first=Dan|last=Bricklin|author-link=Dan Bricklin|access-date=2007-01-16}}</ref>
*An IBM 1130 with 8 [[kiloword]]s of core was used for the world's first full-time [[Search for Extraterrestrial Intelligence]] research at [[Big Ear|The Ohio State University Radio Observatory]]. This equipment detected the [[Wow! signal]].<ref>{{cite web|url=http://www.bigear.org/oldseti.htm|title=SETI in the 1970s|first=Bob|last=Dixon|date=2005-08-13|publisher=[[The Big Ear]]|access-date=2007-01-16}}</ref>
*[[Charles Goldfarb]], the father of [[SGML]], describes a job installing a typesetting system based on an IBM 1130 that "eventually changed my career", driving him towards generic markup:<ref>{{cite web|url=http://www.sgmlsource.com/history/roots.htm|title=The Roots of SGML -- A Personal Recollection|first=Charles|last=Goldfarb|author-link=Charles Goldfarb|year=1996|access-date=2007-01-16|archive-date=2012-12-20|archive-url=https://web.archive.org/web/20121220071917/http://www.sgmlsource.com/history/roots.htm|url-status=usurped}}</ref>
<blockquote>The system was an IBM 1130 computer, a machine the size of a desk with 8&nbsp;KB of main memory, a 512&nbsp;KB disk drive, a Teletype CX paper tape reader and BRPE paper tape punch, and a Photon 713 photomechanical typesetter. The assignment was my first experience with managing a machine-readable document database: I learned to roll the punched paper tape carefully so that it could be stored neatly in cylindrical waste paper baskets.<br />In the meantime, though I didn't know about it, the roots of generalized markup were being planted. Historically, electronic manuscripts contained control codes or macros that caused the document to be formatted in a particular way ("specific coding"). In contrast, generic coding, which began in the late 1960s, uses descriptive tags (for example, "heading", rather than "format-17").</blockquote>
* [[Alan Kay]] used the IBM 1130 in early GUI work for his Ph.D. thesis in 1969.<ref>Kay, Alan C., [http://www.mprove.de/diplom/gui/kay69.html "The Reactive Engine"], Ph.D. dissertation, University of Utah, 1969."The graphics display routines, character generator and editor ran for a year on an IBM 1130 computer with a "home-brew" interface. Unfortunately, the 1130 was straining to just act as a glorified display buffer, and none of the algorithmic routines were implemented."</ref>
*[[Hutchinson Central Technical High School]] ("Hutch Tech") in Buffalo, NY used the IBM 1130 in the nation's first four-year [[high school]] computer science curriculum in 1969. Robert Santuci was the computer science program head and taught classes in programming and inductive logic.<ref>{{cite web|url=https://files.eric.ed.gov/fulltext/ED070289.pdf|title=The Use of Computers in Instruction in Secondary Schools|first=Warren|last=Koch|year=1972|access-date=2025-05-23}}</ref>
* An engineer from IBM was hired by [[Signetics]] and incorporated a number of architectural features from the IBM 1130 into the [[Signetics 2650]] single-chip processor.<ref>{{cite web|url=http://www.cpushack.com/2016/10/16/signetics-2650-an-ibm-on-a-chip/|title=Signetics 2650: An IBM on a Chip|publisher=CPU Shack|date=16 October 2016|access-date=25 October 2016}}</ref>

== 1130s today ==
Out of an estimated 10,000 systems produced, the following are known to exist {{as of|2025|lc=yes}}:
* ACONIT in [[Grenoble|Grenoble, France]] has a complete 1130 system.<ref>{{cite web|title=IBM 1130|url=http://www.aconit.org/spip/spip.php?rubrique6|website=ACONIT|language=fr|access-date=July 11, 2016}}</ref>
* The [[Computer History Museum]] ([[Mountain View, California]]) has an 1130 system.<ref>{{cite web|title=Artifact Details:IBM 1130 model|url=https://www.computerhistory.org/collections/catalog/102689999|website=Computer History Museum|access-date=July 11, 2016}}</ref>
* COSECANS ([[Basel|Basel, Switzerland]]).<ref>{{cite web|last1=Wyss|first1=Oscar|url=http://www.cosecans.ch/home/oscar.e.wyss/galerie.html|title=Website von Oscar E. Wyss |website=COSECANS|language=de|access-date=July 11, 2016}}</ref>
* [[The National Museum of Computing]] (TNMOC) (Bletchley Park, United Kingdom) has a complete 1130 system.<ref>{{cite web|title=IBM 1130 system restoration during 2011|url=http://www.tnmoc.org/news/current-projects/ibm-1130-system-restoration-during-2011|website=The National Museum of Computing|date=28 December 2011 |access-date=July 11, 2016|archive-url=https://web.archive.org/web/20190404172112/http://www.tnmoc.org/news/current-projects/ibm-1130-system-restoration-during-2011|archive-date=4 April 2019}}</ref><ref name=tnmoc-lsg>{{cite web |title=Large Systems Gallery: IBM 1130 |url=https://www.tnmoc.org/large-systems-gallery |publisher=National Museum of Computing |access-date=11 February 2020|archive-url=https://web.archive.org/web/20200211092340/https://www.tnmoc.org/large-systems-gallery|archive-date=11 February 2020|url-status=live}}</ref>
* The [[University of Stuttgart]] (Germany) has a functional 1130 system.<ref>{{cite web|title=IBM 1130|url=http://computermuseum.informatik.uni-stuttgart.de/dev_en/ibm1130/ibm1130.html|website=Computermuseum der Fakultät Informatik|access-date=July 11, 2016}}</ref>
* Carl Claunch<ref>{{cite web|last1=Claunch|first1=Carl|title=Rescue 1130|url=http://rescue1130.blogspot.com/|access-date=July 11, 2016}}</ref> has restored or is in the process of restoring several 1130 systems, including one for the [[System Source Computer Museum]]<ref>{{cite web|url=https://museum.syssrc.com/|title=Computer Museum @ System Source}}</ref> and another for the Vintage Computer Federation museum.<ref>{{cite web|url=https://vcfed.org/|title= Vintage Computer Federation}}</ref>

== Apocrypha ==
Speculation on why the product was given the number 1130 centered on the following possibilities:
*That, since the 1130 was a small scientific machine, the number was chosen by multiplying 360 (as in [[IBM 360]]) by [[Pi|π]].
*That 11:30 was the time of day that product planners reached an impasse regarding what to call the product.
*That the 1130 was IBM's 11th Computer Design, and it had 30 instructions.

Others have speculated that the existence of the IBM 1130 explains why no computer designated "11/30" ever appeared in the [[PDP-11]] family of machines.<ref>[http://hampage.hu/pdp-11/1120.html PDP-11/20 and /15]</ref>

== See also ==
*[[IBM mainframe]]
*[[List of IBM products]]

==Notes==
{{Reflist| group=note}}

== References ==
{{Reflist}}

== External links ==
{{Commons category}}
*[https://web.archive.org/web/20050318090458/http://www-03.ibm.com/ibm/history/exhibits/1130/1130_intro.html IBM Archive: IBM 1130] press releases, chronology, photos, facts folder.
*[http://ibm1130.org/ IBM 1130.org] Norm Aleks and Brian Knittel site which has significant information about the 1130 and a downloadable simulator that supports the DMS R2V12 and APL environments.
*[http://www.ibm1130.net/ www.ibm1130.net] is Howard Shubs' site dedicated to the 1130.
*[http://world.std.com/~reinhold/dir/computer-history.html#IBM-1130 Arnold Reinhold's personal account of the 1130. Text from here has been incorporated into this article with permission]
*[https://web.archive.org/web/20120204222128/http://computer-refuge.org/bitsavers/pdf/ibm/1130/ A set of PDFs made up of scanned IBM 1130 manuals]
*[http://www.farnik.com/cgi-bin/wiki.pl?Retro_Computing Kym Farnik's page on Retro Computing specifically the 1130]
*[http://davidnewall.com/angle-park.html A discussion about the (then) Angle Park computing centre which was equipped with IBM 1130's]
*[http://www.dvq.com/1130/1130.htm Bob Rosenbloom's IBM 1130 Photos]
*[http://www.columbiauniversity.org/acis/history/1130.html IBM 1130] material at Columbia University, Computing History site.
*[https://www.flickr.com/photos/32324331@N02/sets/72157618932114066/ A Flickr collection of detail photos taken by Peter Vaughan of an IBM 1130] at [[The National Museum of Computing]]

{{IBM midrange computers}}

[[Category:IBM minicomputers|1130]]
[[Category:Magnetic-core memory computers]]
[[Category:16-bit computers]]
[[Category:IBM 1130]]