View source for Random-access stored-program machine

In [[Theoretical computer science|theoretical computer science]] the '''random-access stored-program''' (RASP) machine model is an [[Abstract machine|abstract machine]] used for the purposes of [[Algorithm|algorithm]] development and algorithm complexity theory.

The RASP is a [[Random-access machine|random-access machine]] (RAM) model that, unlike the RAM, has its [[Computer program|program]] in its "registers" together with its input. The registers are unbounded (infinite in capacity); whether the number of registers is finite is model-specific. Thus the RASP is to the RAM as the [[Universal Turing machine]] is to the [[Turing machine]]. The RASP is an example of the [[Von Neumann architecture|von Neumann architecture]] whereas the RAM is an example of the [[Harvard architecture]].

The RASP is closest of all the abstract models to the common notion of [[Computer|computer]]. But unlike actual computers the RASP model usually has a very simple instruction set, greatly reduced from those of [[Complex instruction set computer|CISC]] and even RISC processors to the simplest arithmetic, register-to-register "moves", and "test/jump" instructions. Some models have a few extra registers such as an [[Accumulator (computing)|accumulator]].

Together with the [[Register machine|register machine]], the RAM, and the [[Pointer machine|pointer machine]] the RASP makes up the four common sequential machine models, called this to distinguish them from the "parallel" models (e.g. [[Parallel RAM|parallel random-access machine]]) [cf. van Emde Boas (1990)].

== Informal definition: random-access stored-program model (RASP) ==
Nutshell description of a RASP:
:The RASP is a [[Universal Turing machine|universal Turing machine]] (UTM) built on a [[Random-access machine|random-access machine]] RAM chassis.

The reader will remember that the UTM is a [[Turing machine]] with a "universal" finite-state table of instructions that can interpret any well-formed "program" written on the tape as a string of Turing 5-tuples, hence its universality. While the classical UTM model expects to find Turing 5-tuples on its tape, any program-set imaginable can be put there given that the Turing machine expects to find them—given that its finite-state table can interpret them and convert them to the desired action. Along with the program, printed on the tape will be the input data/parameters/numbers (usually to the program's right), and eventually the output data/numbers (usually to the right of both, or intermingled with the input, or replacing it). The "user" must position the Turing machine's head over the first instruction, and the input must be placed in a specified place and format appropriate to both the program-on-tape and the finite-state machine's instruction-table.

The RASP mimics this construction: it places the "program" and "data" in the holes (registers). But unlike the UTM the RASP proceeds to "fetch" its instructions in a sequential manner, unless the conditional test sends it elsewhere.

'''A point of confusion: two sets of instructions''': Unlike the UTM, the RASP model has two sets of instructions – the state machine table of instructions (the "interpreter") and the "program" in the holes. The two sets do not have to be drawn from the same set.

=== An example of a RAM working as a RASP ===
The following example of a program will move the contents of register (hole) #18 to register (hole) #19, erasing contents of #18 in the process.

<source lang="nasm">
    5: 03 18 15    JZ 18,15       ; if [18] is zero, jump to 15 to end the program
       02 18       DEC 18         ; Decrement [18]
       01 19       INC 19         ; Increment [19]
       03 15 05    JZ 15, 5       ; If [15] is zero, jump to 5 to repeat the loop (use Halt to simulate unconditional jump)
   15: 00          H              ; Halt

   18:  n                         ; Source value to copy
   19:                            ; Destination for copy 
</source>
The ''program''-instructions available in this RASP machine will be a simple set to keep the example short:

{|class="wikitable"
|-  style="text-align:center; font-size:9pt; font-weight:bold; vertical-align:bottom;"
!  style="width:63.6; height:12px;"| Instruction
! style="width:67.8;"| Mnemonic
! style="width:130.2;"| Action on register "r"
! style="width:240.6;"| Action on finite state machine's Instruction Register, IR
|-  style="font-size:9pt; vertical-align:bottom;"
|  style="height:11.4; "| INCrement
|| INC ( r )
|  style="text-align:center; "| [r] +1 → r
|  style="text-align:center; "| [IR] +1 → IR
|-  style="font-size:9pt; vertical-align:bottom;"
|  style="height:11.4; "| DECrement
|| DEC ( r )
|  style="text-align:center; "| [r] -1 → r
|  style="text-align:center; "| [IR] +1 → IR
|-  style="font-size:9pt; vertical-align:bottom;"
|  style="height:11.4; "| Jump if Zero
|| JZ ( r, z )
|  style="text-align:center; "| none
|  style="text-align:center; "| IF [r] = 0 THEN z → IR  ELSE [IR] +1 → IR
|-  style="font-size:9pt; vertical-align:bottom;"
|  style="height:11.4; "| Halt
|| H
|  style="text-align:center; "| none
|  style="text-align:center; "| [IR]  → IR
|}

To ease the example we will equip the ''state machine'' of the RAM-as-RASP with the primitive instructions drawn from the same set, but augmented with two indirect copy instructions:
:RAM state machine instructions:
::{ INC h; DEC h;  JZ h,xxx; CPY ⟪h{{sub|a}}⟫,{{angbr|h{{sub|a}}}}; CPY {{angbr|h{{sub|a}}}},⟪h{{sub|a}}⟫ }

As the RASP machine's state machine interprets the program in the registers, what exactly will the state machine be doing? The column containing the exclamation mark ! will list in time sequence the state machine's actions as it "interprets" {{--}} converts to action {{--}} the program:

{|class="wikitable"
|- style="font-size:9pt"
!
!style="font-weight:bold"  | PC
!style="font-weight:bold"  | IR
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
|- style="font-size:9pt" 
! style="text-align:right" | hole # →
 | 1
 | 2
 | 3
 | 4
 | 5
 | 6
 | 7
 | 8
 | 9
 | 10
 | 11
 | 12
 | 13
 | 14
 | 15
 | 16
 | 17
 | 18
 | 19
|- style="font-size:9pt" 
! style="text-align:right" | program, parameters →
|style="font-weight:bold;color:#FF0000" | 5
 | 
 | 
 | 
|style="font-weight:bold" | JZ
|style="font-weight:bold" | 18
|style="font-weight:bold" | 15
|style="font-weight:bold" | DEC
|style="font-weight:bold" | 18
|style="font-weight:bold" | INC
|style="font-weight:bold" | 19
|style="font-weight:bold" | JZ
|style="font-weight:bold" | 15
|style="font-weight:bold" | 5
|style="font-weight:bold" | H
 | 
 | 
 | n
 | 
|- style="font-size:9pt" 
! style="text-align:right" | encoded program →
|style="font-weight:bold" | 5
 | 
 | 
 | 
|style="font-weight:bold" | 3
|style="font-weight:bold" | 18
|style="font-weight:bold" | 15
|style="font-weight:bold" | 2
|style="font-weight:bold" | 18
|style="font-weight:bold" | 1
|style="font-weight:bold" | 19
|style="font-weight:bold" | 3
|style="font-weight:bold" | 15
|style="font-weight:bold" | 5
|style="font-weight:bold" | 0
 | 
 | 
 | n
 | 
|- style="font-size:9pt" 
! state machine instructions ↓
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
|- style="font-size:9pt" 
!
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
|- style="font-size:9pt" 
!style="font-weight:bold" | !
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
|}

Tradition divides the state-machine's actions into two major "phases" called ''Fetch'' and ''Execute''. We will observe below that there are "sub-phases" within these two major phases. There is no agreed-to convention; every model will require its own precise description. 
 
==== Fetch phase ====
The state machine has access to all the registers, both directly and indirectly. So it adopts #1 as "the program counter" PC. The role of the ''program'' counter will be to "keep the place" in the program's listing; the state machine has its own state register for its private use.

Upon start, the state machine expects to find a number in the PC—the first "Program-Instruction" in the program (i.e. at #5).

(Without the use of the indirect COPYs, the task of getting the pointed-to program-instruction into #2 is a bit arduous. The state machine would indirectly decrement the pointed-to register while directly incrementing (empty) register #2. During the "parse" phase it will restore the sacrificed contents of #5 by sacrificing the count in #2.)

The point of the above detour is to show that life is much easier when the state machine has access to two kinds of indirect copy: 
* copy indirect from i and direct to j: CPY ⟪h{{sub|i}}⟫,{{angbr|h{{sub|j}}}}
* copy direct from i and indirect to j: CPY {{angbr|h{{sub|i}}}},⟪h{{sub|j}}⟫

The following example shows what happens during the state-machine's "fetch" phase. The state-machine's operations are listed on the column labelled "State machine instruction ↓". Observe that at the end of the fetch, register #2 contains the numerical value 3 of the "operation code" ("opcode") of the first instruction '''JZ''':
{|class="wikitable"
|- style="font-size:9pt"
!  
! 
! 
!style="font-weight:bold" | PC
!style="font-weight:bold" | PIR
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
|- style="font-size:9pt"
!
!
! style="text-align:right" | hole # →
|style="font-weight:bold"  | 1
|style="font-weight:bold"  | 2
|style="font-weight:bold"  | 3
|style="font-weight:bold"  | 4
|style="font-weight:bold"  | 5
|style="font-weight:bold"  | 6
|style="font-weight:bold"  | 7
|style="font-weight:bold"  | 8
|style="font-weight:bold"  | 9
|style="font-weight:bold"  | 10
|style="font-weight:bold"  | 11
|style="font-weight:bold"  | 12
|style="font-weight:bold"  | 13
|style="font-weight:bold"  | 14
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | 16
|style="font-weight:bold"  | 17
|style="font-weight:bold"  | 18
|style="font-weight:bold"  | 19
|- style="font-size:9pt"
!
!
! style="text-align:right" | program, parameters →
|style="font-weight:bold;color:#FF0000"  | 5
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | JZ
|style="font-weight:bold"  | 18
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | DEC
|style="font-weight:bold"  | 18
|style="font-weight:bold"  | INC
|style="font-weight:bold"  | 19
|style="font-weight:bold"  | JZ
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | 5
|style="font-weight:bold"  | H
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | n
|style="font-weight:bold"  | 
|- style="font-size:9pt"
!
!
! style="text-align:right" | encoded program →
|style="font-weight:bold"  | 5
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 3
|style="font-weight:bold"  | 18
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | 2
|style="font-weight:bold"  | 18
|style="font-weight:bold"  | 1
|style="font-weight:bold"  | 19
|style="font-weight:bold"  | 3
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | 5
|style="font-weight:bold"  | 0
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | n
|style="font-weight:bold"  | 
|- style="font-size:9pt"
! step
!
! state machine instructions ↓
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|- style="font-size:9pt"
!
!
!
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|- style="font-size:9pt" 
! 1
 | fetch_instr:
 | CPY ⟪1⟫,{{angbr|2}}
|style="font-weight:bold" | 5 i
|style="font-weight:bold" | [3]
|style="font-weight:bold" | 
|style="font-weight:bold" | 
|style="font-weight:bold" | [3]
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="font-weight:bold;color:#808080" | 2
|style="color:#808080" | 18
|style="font-weight:bold;color:#808080" | 1
|style="color:#808080" | 19
|style="font-weight:bold;color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|}

====Parse phase====
Now that the number of the program-instruction (e.g. 3 = "JZ") is in register #2 -- the "Program-Instruction Register" PIR—the state machine proceeds to decrement the number until the IR is empty:

If the IR were empty before decrement then the program-instruction would be 0 = HALT, and the machine would jump to its "HALT" routine. After the first decrement, if the hole were empty the instruction would be INC, and the machine would jump to instruction "inc_routine". After the second decrement, the empty IR would represent DEC, and the machine would jump to the "dec_routine". After the third decrement, the IR is indeed empty, and this causes a jump to the "JZ_routine" routine. If an unexpected number were still in the IR, then the machine would have detected an error and could HALT (for example).

{|class="wikitable"
|- style="font-size:9pt"
!
!
!
!style="font-weight:bold" | PC
!style="font-weight:bold" | IR
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
|- style="font-size:9pt"
!
!
! style="text-align:right" | hole # →
|style="font-weight:bold"  | 1
|style="font-weight:bold"  | 2
|style="font-weight:bold"  | 3
|style="font-weight:bold"  | 4
|style="font-weight:bold"  | 5
|style="font-weight:bold"  | 6
|style="font-weight:bold"  | 7
|style="font-weight:bold"  | 8
|style="font-weight:bold"  | 9
|style="font-weight:bold"  | 10
|style="font-weight:bold"  | 11
|style="font-weight:bold"  | 12
|style="font-weight:bold"  | 13
|style="font-weight:bold"  | 14
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | 16
|style="font-weight:bold"  | 17
|style="font-weight:bold"  | 18
|style="font-weight:bold"  | 19
|- style="font-size:9pt"
!
!
! style="text-align:right" | program, parameters →
|style="font-weight:bold;color:#FF0000"  | 5
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | JZ
|style="font-weight:bold"  | 18
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | DEC
|style="font-weight:bold"  | 18
|style="font-weight:bold"  | INC
|style="font-weight:bold"  | 19
|style="font-weight:bold"  | JZ
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | 5
|style="font-weight:bold"  | H
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | n
|style="font-weight:bold"  | 
|- style="font-size:9pt"
!
!
! style="text-align:right" | encoded program →
|style="font-weight:bold"  | 5
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 3
|style="font-weight:bold"  | 18
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | 2
|style="font-weight:bold"  | 18
|style="font-weight:bold"  | 1
|style="font-weight:bold"  | 19
|style="font-weight:bold"  | 3
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | 5
|style="font-weight:bold"  | 0
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | n
|style="font-weight:bold"  | 
|- style="font-size:9pt"
!
! 
! state machine instructions ↓
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|- style="font-size:9pt"
!
!
!
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|- style="font-size:9pt" 
!
|
| CPY ⟪1⟫,{{angbr|2}}
|style="font-weight:bold" | 5 i
|style="font-weight:bold" | [3]
|style="font-weight:bold" | 
|style="font-weight:bold" | 
|style="font-weight:bold" | [3]
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="font-weight:bold;color:#808080" | 2
|style="color:#808080" | 18
|style="font-weight:bold;color:#808080" | 1
|style="color:#808080" | 19
|style="font-weight:bold;color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
!
|
| JZ 2,halt
|style="font-weight:bold" | 5
|style="font-weight:bold" | 3
|style="font-weight:bold" | 
|style="font-weight:bold" | 
|style="font-weight:bold" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="font-weight:bold;color:#808080" | 2
|style="color:#808080" | 18
|style="font-weight:bold;color:#808080" | 1
|style="color:#808080" | 19
|style="font-weight:bold;color:#808080" | 3
|style="color:#808080" | 19
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 3
 | 
 | DEC 2
 | 5
|style="font-weight:bold" | 2
 | 
 | 
|style="font-weight:bold" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="font-weight:bold;color:#808080" | 2
|style="color:#808080" | 18
|style="font-weight:bold;color:#808080" | 1
|style="color:#808080" | 19
|style="font-weight:bold;color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 4
 | 
 | JZ 2,inc_routine:
 | 5
|style="font-weight:bold" | 2
 | 
 | 
|style="font-weight:bold" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="font-weight:bold;color:#808080" | 2
|style="color:#808080" | 18
|style="font-weight:bold;color:#808080" | 1
|style="color:#808080" | 19
|style="font-weight:bold;color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 5
 | 
 | DEC 2
 | 5
|style="font-weight:bold" | 1
 | 
 | 
|style="font-weight:bold" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="font-weight:bold;color:#808080" | 2
|style="color:#808080" | 18
|style="font-weight:bold;color:#808080" | 1
|style="color:#808080" | 19
|style="font-weight:bold;color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 6
 | 
 | JZ 2,dec_routine
 | 5
|style="font-weight:bold" | 1
 | 
 | 
|style="font-weight:bold" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="font-weight:bold;color:#808080" | 2
|style="color:#808080" | 18
|style="font-weight:bold;color:#808080" | 1
|style="color:#808080" | 19
|style="font-weight:bold;color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 7
 | 
 | DEC 2
 | 5
|style="font-weight:bold" | 0
 | 
 | 
|style="font-weight:bold" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="font-weight:bold;color:#808080" | 2
|style="color:#808080" | 18
|style="font-weight:bold;color:#808080" | 1
|style="color:#808080" | 19
|style="font-weight:bold;color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 8
 | 
 | JZ 2, JZ_routine
 | 5
|style="font-weight:bold" | 0 !
 | 
 | 
|style="font-weight:bold" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="font-weight:bold;color:#808080" | 
|style="color:#808080" | 
|style="font-weight:bold;color:#808080" | 
|style="color:#808080" | 
|style="font-weight:bold;color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
 | 
|- style="font-size:9pt" 
!  {{--}}
 | halt:
 | HALT
 | 5
|style="font-weight:bold" | 3
 | 
 | 
|style="font-weight:bold" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="font-weight:bold;color:#808080" | 2
|style="color:#808080" | 18
|style="font-weight:bold;color:#808080" | 1
|style="color:#808080" | 19
|style="font-weight:bold;color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
!  {{--}}
 | inc_routine:
 | etc.
 | 5
|style="font-weight:bold" | 3
 | 
 | 
|style="font-weight:bold" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="font-weight:bold;color:#808080" | 2
|style="color:#808080" | 18
|style="font-weight:bold;color:#808080" | 1
|style="color:#808080" | 19
|style="font-weight:bold;color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
!  {{--}}
 | dec_routine:
 | etc.
 | 5
|style="font-weight:bold" | 3
 | 
 | 
|style="font-weight:bold" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="font-weight:bold;color:#808080" | 2
|style="color:#808080" | 18
|style="font-weight:bold;color:#808080" | 1
|style="color:#808080" | 19
|style="font-weight:bold;color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 9
 | JZ_routine:
 | etc.
 | 5
|style="font-weight:bold" | 3
 | 
 | 
|style="font-weight:bold" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="font-weight:bold;color:#808080" | 2
|style="color:#808080" | 18
|style="font-weight:bold;color:#808080" | 1
|style="color:#808080" | 19
|style="font-weight:bold;color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|}

==== Execute phase, JZ_routine ====
Now the state machine knows what program-instruction to execute; indeed it has jumped to the "JZ_routine" sequence of instructions. The JZ instruction has 2 operands {{--}} (i) the number of the register to test, and (ii) the address to go to if the test is successful (the hole is empty).

'''(i) Operand fetch {{--}} which register to test for empty?''': Analogous to the fetch phase, the finite state machine moves the contents of the register pointed to by the PC, i.e. hole #6,  into the Program-Instruction Register PIR #2. It then uses the contents of register #2 to point to the register to be tested for zero, i.e. register #18. Hole #18 contains a number "n". To do the test, now the state machine uses the contents of the PIR to indirectly copy the contents of register #18 into a spare register, #3. So there are two eventualities (ia), register #18 is empty, (ib) register #18 is not empty.
 
(ia): If register #3 is empty then the state machine jumps to (ii) Second operand fetch {{--}} fetch the jump-to address.

(ib): If register #3 is not empty then the state machine can skip (ii) Second operand fetch. It simply increments twice the PC and then unconditionally jumps back to the instruction-fetch phase, where it fetches program-instruction #8 (DEC).

'''(ii) Operand fetch {{--}} jump-to address'''. If register #3 is empty, the state machine proceeds to use the PC to indirectly copy the contents of the register it points to (#8) into ''itself''. Now the PC holds the jump-to address 15.  Then the state machine unconditionally goes back to the instruction fetch phase, where it fetches program-instruction #15 (HALT).

{|class="wikitable"
|- style="font-size:9pt"
!
!
!
!style="font-weight:bold" | PC
!style="font-weight:bold" | IR
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
|- style="font-size:9pt"
!
!
! style="text-align:right" | hole # →
|style="font-weight:bold"  | 1
|style="font-weight:bold"  | 2
|style="font-weight:bold"  | 3
|style="font-weight:bold"  | 4
|style="font-weight:bold"  | 5
|style="font-weight:bold"  | 6
|style="font-weight:bold"  | 7
|style="font-weight:bold"  | 8
|style="font-weight:bold"  | 9
|style="font-weight:bold"  | 10
|style="font-weight:bold"  | 11
|style="font-weight:bold"  | 12
|style="font-weight:bold"  | 13
|style="font-weight:bold"  | 14
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | 16
|style="font-weight:bold"  | 17
|style="font-weight:bold"  | 18
|style="font-weight:bold"  | 19
|- style="font-size:9pt"
!
!
! style="text-align:right" | program, parameters →
|style="font-weight:bold"  | 5
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | JZ
|style="font-weight:bold"  | 18
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | DEC
|style="font-weight:bold"  | 18
|style="font-weight:bold"  | INC
|style="font-weight:bold"  | 19
|style="font-weight:bold"  | JZ
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | 5
|style="font-weight:bold"  | H
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | n
|style="font-weight:bold"  | 
|- style="font-size:9pt"
!
!
! style="text-align:right" | encoded program →
|style="font-weight:bold"  | 5
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 3
|style="font-weight:bold"  | 18
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | 2
|style="font-weight:bold"  | 18
|style="font-weight:bold"  | 1
|style="font-weight:bold"  | 19
|style="font-weight:bold"  | 3
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | 5
|style="font-weight:bold"  | 0
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | n
|style="font-weight:bold"  | 
|- style="font-size:9pt"
! step
!
! state machine instructions ↓
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|- style="font-size:9pt"
|
|
|
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|  | 
|  | 
|  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|- style="font-size:9pt" 
! 9
 | JZ_routine
 | INC 1
|style="font-weight:bold" | [6]
|style="font-weight:bold" | 3
|style="font-weight:bold" | 
|style="font-weight:bold" | 
|style="color:#808080" | 3
|style="font-weight:bold" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 10
 | 
 | CPY ⟪1⟫,{{angbr|2}}
|style="font-weight:bold" | 6 i
|style="font-weight:bold" | [18]
|style="font-weight:bold" | 
|style="font-weight:bold" | 
|style="color:#808080" | 3
|style="font-weight:bold" | [18]
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 11
 | test hole:
 | CPY ⟪2⟫,{{angbr|3}}
|style="font-weight:bold" | 6
|style="font-weight:bold" | 18 i
|style="font-weight:bold" | [n]
|style="font-weight:bold" | 
|style="color:#808080" | 3
|style="font-weight:bold" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="font-weight:bold" | [n]
 | 
|- style="font-size:9pt" 
! 12
 | test hole:
 | JZ 3, jump
|style="font-weight:bold" | 6
|style="font-weight:bold" | 18 i
|style="font-weight:bold" | [n]
|style="font-weight:bold" | 
|style="color:#808080" | 3
|style="font-weight:bold" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
!
 | 
 | 
|style="font-weight:bold" | 
|style="font-weight:bold" | 
|style="color:#808080" | n
|style="font-weight:bold" | 
|style="color:#808080" | 
|style="font-weight:bold" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 13
 | no_jump:
 | INC 1
|style="font-weight:bold" | [7]
|style="font-weight:bold" | 18
|style="color:#808080" | n
|style="font-weight:bold" | 
|style="color:#808080" | 3
|style="font-weight:bold" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 14
 | 
 | INC 1
|style="font-weight:bold" | [8]
|style="font-weight:bold" | 18
|style="color:#808080" | n
|style="font-weight:bold" | 
|style="color:#808080" | 3
|style="font-weight:bold" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 15
 | 
 | J   fetch_instr
|style="font-weight:bold" | 8
|style="font-weight:bold" | 18
|style="color:#808080" | n
|style="font-weight:bold" | 
|style="color:#808080" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 1
 | fetch_instr:
 | CPY ⟪1⟫,{{angbr|2}}
|style="font-weight:bold" | 8 i
|style="font-weight:bold" | [2]
|style="color:#808080" | n
|style="font-weight:bold" | 
|style="color:#808080" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="font-weight:bold" | [2]
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 2
 | parse:
 | etc.
|style="font-weight:bold" | 
|style="font-weight:bold" | 
|style="color:#808080" | 
|style="font-weight:bold" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="font-weight:bold" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
 | 
|- style="font-size:9pt" 
!
 | 
 | 
|style="font-weight:bold" | 
|style="font-weight:bold" | 
|style="color:#808080" | 
|style="font-weight:bold" | 
 | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="font-weight:bold;color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
 | 
|- style="font-size:9pt" 
! 13
 | jump:
 | INC 1
|style="font-weight:bold" | [7]
|style="font-weight:bold" | 18
|style="color:#808080" | n
|style="font-weight:bold" | 
|style="color:#808080" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 14
 | 
 | CPY ⟪1⟫,{{angbr|1}}
|style="font-weight:bold" | [15]
|style="font-weight:bold" | 18
|style="color:#808080" | n
|style="font-weight:bold" | 
|style="color:#808080" | 3
|style="color:#808080" | 18
|style="font-weight:bold" | [15]
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt"
! 15
|  valign="bottom" | 
|  | J fetch_instr
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | 18
|style="color:#808080"  | n
|  | 
|style="color:#808080"  | 3
|style="color:#808080"  | 18
|style="color:#808080"  | 15
|style="color:#808080"  | 2
|style="color:#808080"  | 18
|style="color:#808080"  | 1
|style="color:#808080"  | 19
|style="color:#808080"  | 3
|style="color:#808080"  | 15
|style="color:#808080"  | 5
|style="color:#808080"  | 0
|style="color:#808080"  | 
|style="color:#808080"  | 
|style="color:#808080"  | n
|  | 
|- style="font-size:9pt" 
! 1
 | fetch_instr:
 | CPY ⟪1⟫,{{angbr|2}}
|style="font-weight:bold" | 15 i
|style="font-weight:bold" | [0]
|style="color:#808080" | n
 | 
|style="color:#808080" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="font-weight:bold" | [0]
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 2
 | parse:
 | etc.
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
 | 
|}

==== Execute phase INC, DEC ====
The following completes the RAM's state-machine interpretation of program-instructions, INC h, DEC h and thus completes the demonstration of how a RAM can "impersonate" a RASP:
: Target program instruction set: { INC h; DEC h; JZ h,xxx, HALT }

Without indirect state-machine instructions INCi and DECi, to execute the INC and DEC ''program''-instructions the state machine must use indirect copy to get the contents of the pointed-to register into spare register #3, DEC or INC it, and then use indirect copy to send it back to the pointed-to register.

{|class="wikitable"
|- style="font-size:9pt"
!
!
!
!style="font-weight:bold" | PC
!style="font-weight:bold" | IR
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!  | 
!
!  | 
|- style="font-size:9pt"
!
!
! style="text-align:right" | hole # →
|style="font-weight:bold"  | 1
|style="font-weight:bold"  | 2
|style="font-weight:bold"  | 3
|style="font-weight:bold"  | 4
|style="font-weight:bold"  | 5
|style="font-weight:bold"  | 6
|style="font-weight:bold"  | 7
|style="font-weight:bold"  | 8
|style="font-weight:bold"  | 9
|style="font-weight:bold"  | 10
|style="font-weight:bold"  | 11
|style="font-weight:bold"  | 12
|style="font-weight:bold"  | 13
|style="font-weight:bold"  | 14
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | 16
|style="font-weight:bold"  | 17
|style="font-weight:bold"  | 18
|style="font-weight:bold"  | 19
|- style="font-size:9pt"
!
!
! style="text-align:right" | program, parameters →
|style="font-weight:bold;color:#FF0000"  | 5
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | JZ
|style="font-weight:bold"  | 18
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | DEC
|style="font-weight:bold"  | 18
|style="font-weight:bold"  | INC
|style="font-weight:bold"  | 19
|style="font-weight:bold"  | JZ
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | 5
|style="font-weight:bold"  | H
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | n
|style="font-weight:bold"  | 
|- style="font-size:9pt"
!
!
! style="text-align:right" | encoded program →
|style="font-weight:bold"  | 5
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 3
|style="font-weight:bold"  | 18
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | 2
|style="font-weight:bold"  | 18
|style="font-weight:bold"  | 1
|style="font-weight:bold"  | 19
|style="font-weight:bold"  | 3
|style="font-weight:bold"  | 15
|style="font-weight:bold"  | 5
|style="font-weight:bold"  | 0
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | n
|style="font-weight:bold"  | 
|- style="font-size:9pt"
!
!
!state machine instructions ↓
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|- style="font-size:9pt"
!
!
!
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|style="font-weight:bold"  | 
|- style="font-size:9pt" 
! 15
 | 
 | J   fetch_instr
|style="font-weight:bold" | 8
|style="font-weight:bold" | 18
|style="color:#808080" | n
|style="font-weight:bold" | 
|style="color:#808080" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 16
|style="font-weight:bold" | fetch_instr:
 | CPY ⟪1⟫,{{angbr|2}}
|style="font-weight:bold" | 8 i
|style="font-weight:bold" | [2]
|style="color:#808080" | n
|style="font-weight:bold" | 
|style="color:#808080" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 17
 | parse:
 | JZ 2,halt
|style="font-weight:bold" | 8
|style="font-weight:bold" | 2
|style="color:#808080" | n
|style="font-weight:bold" | 
|style="color:#808080" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 18
 | 
 | DEC 2
|style="font-weight:bold" | 8
|style="font-weight:bold" | [1]
|style="color:#808080" | n
|style="font-weight:bold" | 
|style="color:#808080" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 19
 | 
 | JZ 2, inc_routine:
|style="font-weight:bold" | 8
|style="font-weight:bold" | 1
|style="color:#808080" | n
|style="font-weight:bold" | 
|style="color:#808080" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt" 
! 20
 | 
 | DEC 2
|style="font-weight:bold" | 8
|style="font-weight:bold" | [0]
|style="color:#808080" | n
|style="font-weight:bold" | 
|style="color:#808080" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt"
! 21
|
|  | JZ 2, dec_routine:
|style="font-weight:bold"  | 8
|style="font-weight:bold"  | 0 !
|style="color:#808080"  | n
|  | 
|style="color:#808080"  | 3
|style="color:#808080"  | 18
|style="color:#808080"  | 15
|style="color:#808080"  | 2
|style="color:#808080"  | 18
|style="color:#808080"  | 1
|style="color:#808080"  | 19
|style="color:#808080"  | 3
|style="color:#808080"  | 15
|style="color:#808080"  | 5
|style="color:#808080"  | 0
|style="color:#808080"  | 
|style="color:#808080"  | 
|style="color:#808080"  | n
|  | 
|- style="font-size:9pt" 
! 22
 | dec_routine:
 | INC 1
|style="font-weight:bold" | 9
|style="color:#808080" | 0
|style="color:#808080" | n
 | 
|style="color:#808080" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt"
! 23
|
|  | CPY ⟪1⟫,{{angbr|2}}
|style="font-weight:bold"  | 9 i
|style="font-weight:bold"  | 18
|style="color:#808080"  | n
|  | 
|style="color:#808080"  | 3
|style="color:#808080"  | 18
|style="color:#808080"  | 15
|style="color:#808080"  | 2
|style="font-weight:bold"  | 18
|style="color:#808080"  | 1
|style="color:#808080"  | 19
|style="color:#808080"  | 3
|style="color:#808080"  | 15
|style="color:#808080"  | 5
|style="color:#808080"  | 0
|style="color:#808080"  | 
|style="color:#808080"  | 
|style="color:#808080"  | n
|  | 
|- style="font-size:9pt"
! 24
|
|  | CPY ⟪2⟫,{{angbr|3}}
|style="color:#808080"  | 9
|style="font-weight:bold"  | 18 i
|style="font-weight:bold"  | n
|  | 
|style="color:#808080"  | 3
|style="color:#808080"  | 18
|style="color:#808080"  | 15
|style="color:#808080"  | 2
|style="color:#808080"  | 18
|style="color:#808080"  | 1
|style="color:#808080"  | 19
|style="color:#808080"  | 3
|style="color:#808080"  | 15
|style="color:#808080"  | 5
|style="color:#808080"  | 0
|  | 
|  | 
|style="font-weight:bold"  | n
|  | 
|- style="font-size:9pt" 
! 25
 | 
 | JZ 3,*+2
|style="color:#808080" | 9
|style="color:#808080" | 18
|style="font-weight:bold" | n
 | 
|style="color:#808080" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
 | 
 | 
|style="color:#808080" | n
 | 
|- style="font-size:9pt"
! 26
|
|  | DEC 3
|style="color:#808080"  | 9
|style="color:#808080"  | 18
|style="font-weight:bold"  | n-1
|  | 
|style="color:#808080"  | 3
|style="color:#808080"  | 18
|style="color:#808080"  | 15
|style="color:#808080"  | 2
|style="color:#808080"  | 18
|style="color:#808080"  | 1
|style="color:#808080"  | 19
|style="color:#808080"  | 3
|style="color:#808080"  | 15
|style="color:#808080"  | 5
|style="color:#808080"  | 0
|  | 
|  | 
|style="color:#808080"  | n
|  | 
|- style="font-size:9pt"
! 27
|
|  | CPY {{angbr|3}},⟪2⟫
|style="color:#808080"  | 9
|style="font-weight:bold"  | 18 i
|style="font-weight:bold"  | n-1
|  | 
|style="color:#808080"  | 3
|style="color:#808080"  | 18
|style="color:#808080"  | 15
|style="color:#808080"  | 2
|style="color:#808080"  | 18
|style="color:#808080"  | 1
|style="color:#808080"  | 19
|style="color:#808080"  | 3
|style="color:#808080"  | 15
|style="color:#808080"  | 5
|style="color:#808080"  | 0
|  | 
|  | 
|style="font-weight:bold"  | n-1
|  | 
|- style="font-size:9pt"
! 28
|
|  | INC 1
|style="font-weight:bold"  | 10
|style="color:#808080"  | 18
|style="color:#808080"  | n-1
|  | 
|style="color:#808080"  | 3
|style="color:#808080"  | 18
|style="color:#808080"  | 15
|style="color:#808080"  | 2
|style="color:#808080"  | 18
|style="color:#808080"  | 1
|style="color:#808080"  | 19
|style="color:#808080"  | 3
|style="color:#808080"  | 15
|style="color:#808080"  | 5
|style="color:#808080"  | 0
|  | 
|  | 
|style="color:#808080"  | n-1
|  | 
|- style="font-size:9pt" 
! 29
 | 
 | J   fetch_instr
|style="color:#808080" | 10
|style="color:#808080" | 18
|style="color:#808080" | n-1
 | 
|style="color:#808080" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
 | 
 | 
|style="color:#808080" | n-1
 | 
|- style="font-size:9pt" 
| Height="2.4" | 
 | 
 | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
 | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
|style="color:#808080" | 
 | 
 | 
|style="color:#808080" | 
 | 
|- style="font-size:9pt" 
! 30
|style="font-weight:bold" | fetch_instr:
 | CPY ⟪1⟫,{{angbr|2}}
|style="font-weight:bold" | 10 i
|style="font-weight:bold" | 1
|style="color:#808080" | n-1
 | 
|style="color:#808080" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="font-weight:bold" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
 | 
 | 
|style="color:#808080" | n-1
 | 
|- style="font-size:9pt" 
! 31
 | parse:
 | JZ 2,halt
|style="color:#808080" | 10
|style="font-weight:bold" | 1
|style="color:#808080" | n-1
 | 
|style="color:#808080" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
 | 
 | 
|style="color:#808080" | n-1
 | 
|- style="font-size:9pt" 
! 32
 | 
 | DEC 2
|style="color:#808080" | 10
|style="font-weight:bold" | 0
|style="color:#808080" | n-1
 | 
|style="color:#808080" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
 | 
 | 
|style="color:#808080" | n-1
 | 
|- style="font-size:9pt" 
! 33
 | 
 | JZ 2,inc_routine:
|style="color:#808080" | 10
|style="font-weight:bold" | 0 !
|style="color:#808080" | n-1
 | 
|style="color:#808080" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
 | 
 | 
|style="color:#808080" | n-1
 | 
|- style="font-size:9pt"
! 34
|inc_routine:
|  | INC 1
|style="font-weight:bold"  | 11
|style="color:#808080"  | 0
|style="color:#808080"  | n-1
|  | 
|style="color:#808080"  | 3
|style="color:#808080"  | 18
|style="color:#808080"  | 15
|style="color:#808080"  | 2
|style="color:#808080"  | 18
|style="color:#808080"  | 1
|style="color:#808080"  | 19
|style="color:#808080"  | 3
|style="color:#808080"  | 15
|style="color:#808080"  | 5
|style="color:#808080"  | 0
|  | 
|  | 
|style="color:#808080"  | n-1
|  | 
|- style="font-size:9pt"
! 35
|
|  | CPY ⟪1⟫,{{angbr|2}}
|style="font-weight:bold"  | 11 i
|style="font-weight:bold"  | 19
|style="color:#808080"  | n-1
|  | 
|style="color:#808080"  | 3
|style="color:#808080"  | 18
|style="color:#808080"  | 15
|style="color:#808080"  | 2
|style="color:#808080"  | 18
|style="color:#808080"  | 1
|style="font-weight:bold"  | 19
|style="color:#808080"  | 3
|style="color:#808080"  | 15
|style="color:#808080"  | 5
|style="color:#808080"  | 0
|  | 
|  | 
|style="color:#808080"  | n-1
|  | 
|- style="font-size:9pt"
! 36
|
|  | CPY ⟪2⟫,{{angbr|3}}
|style="color:#808080"  | 11
|style="font-weight:bold"  | 19 i
|style="font-weight:bold"  | 0
|  | 
|style="color:#808080"  | 3
|style="color:#808080"  | 18
|style="color:#808080"  | 15
|style="color:#808080"  | 2
|style="color:#808080"  | 18
|style="color:#808080"  | 1
|style="color:#808080"  | 19
|style="color:#808080"  | 3
|style="color:#808080"  | 15
|style="color:#808080"  | 5
|style="color:#808080"  | 0
|  | 
|  | 
|style="color:#808080"  | n-1
|style="font-weight:bold"  | 0
|- style="font-size:9pt"
! 37
|
|  | INC 3
|style="color:#808080"  | 11
|style="color:#808080"  | 19
|style="font-weight:bold"  | 1
|  | 
|style="color:#808080"  | 3
|style="color:#808080"  | 18
|style="color:#808080"  | 15
|style="color:#808080"  | 2
|style="color:#808080"  | 18
|style="color:#808080"  | 1
|style="color:#808080"  | 19
|style="color:#808080"  | 3
|style="color:#808080"  | 15
|style="color:#808080"  | 5
|style="color:#808080"  | 0
|  | 
|  | 
|style="color:#808080"  | n-1
|style="color:#808080"  | 0
|- style="font-size:9pt"
! 38
|
|  | CPY {{angbr|3}},⟪2⟫
|style="color:#808080"  | 11
|style="font-weight:bold"  | 19 i
|style="font-weight:bold"  | 1
|  | 
|style="color:#808080"  | 3
|style="color:#808080"  | 18
|style="color:#808080"  | 15
|style="color:#808080"  | 2
|style="color:#808080"  | 18
|style="color:#808080"  | 1
|style="color:#808080"  | 19
|style="color:#808080"  | 3
|style="color:#808080"  | 15
|style="color:#808080"  | 5
|style="color:#808080"  | 0
|  | 
|  | 
|style="color:#808080"  | n-1
|style="font-weight:bold"  | 1
|- style="font-size:9pt"
! 39
|
|  | INC 1
|style="font-weight:bold"  | 12
|style="color:#808080"  | 19
|style="color:#808080"  | 1
|  | 
|style="color:#808080"  | 3
|style="color:#808080"  | 18
|style="color:#808080"  | 15
|style="color:#808080"  | 2
|style="color:#808080"  | 18
|style="color:#808080"  | 1
|style="color:#808080"  | 19
|style="color:#808080"  | 3
|style="color:#808080"  | 15
|style="color:#808080"  | 5
|style="color:#808080"  | 0
|  | 
|  | 
|style="color:#808080"  | n-1
|style="color:#808080"  | 0
|- style="font-size:9pt"
! 40
|
|  | J   fetch_instr
|style="color:#808080"  | 12
|style="color:#808080"  | 19
|style="color:#808080"  | 1
|  | 
|style="color:#808080"  | 3
|style="color:#808080"  | 18
|style="color:#808080"  | 15
|style="color:#808080"  | 2
|style="color:#808080"  | 18
|style="color:#808080"  | 1
|style="color:#808080"  | 19
|style="color:#808080"  | 3
|style="color:#808080"  | 15
|style="color:#808080"  | 5
|style="color:#808080"  | 0
|  | 
|  | 
|style="color:#808080"  | n-1
|style="color:#808080"  | 0
|- style="font-size:9pt" 
! 41
|style="font-weight:bold" | fetch_instr:
 | etc.
|style="font-weight:bold" | 12
|style="color:#808080" | 19
|style="color:#808080" | 1
 | 
|style="color:#808080" | 3
|style="color:#808080" | 18
|style="color:#808080" | 15
|style="color:#808080" | 2
|style="color:#808080" | 18
|style="color:#808080" | 1
|style="color:#808080" | 19
|style="color:#808080" | 3
|style="color:#808080" | 15
|style="color:#808080" | 5
|style="color:#808080" | 0
 | 
 | 
|style="color:#808080" | n-1
|style="color:#808080" | 0
|}

'''Alternate instructions''': Although the demonstration resulted in a primitive RASP of only four instructions, the reader might imagine how an additional instruction such as "ADD {{angbr|h}}" or "MULT {{angbr|h{{sub|a}}}},⟪h{{sub|b}}>might be done.

==== Self-Modifying RASP programs ====
When a RAM is acting as a RASP, something new has been gained: unlike the RAM, the RASP has the capacity for self-modification of its ''program''-instructions (the state-machine instructions are frozen, unmodifiable by the machine). Cook-Reckhow (1971) (p. 75) comment on this in their description of their RASP model, as does Hartmanis (1971) (pp. 239ff)

An early description of this notion can be found in Goldstine-von Neumann (1946):
:"We need an order [instruction] that can substitute a number into a given order... By means of such an order the results of a computation can be introduced into the instructions governing that or a different computation" (p. 93)

Such an ability makes the following possible: 
* [[Subroutine|subroutine]]s -- the calling routine (or perhaps the subroutine) stores the return address "return_address" in the subroutine's last command, i.e. "JMP return_address"
* so-called JUMP-tables
* [[Self-modifying code|self-modifying code]]

== RASP program-instruction set of Cook and Reckhow (1973) ==
In an influential paper [[Biography:Stephen Cook|Stephen A. Cook]] and Robert A. Reckhow define their version of a RASP:
:"The Random Access Stored-Program Machine (RASP) described here is similar to the RASP's described by Hartmanis [1971]" (p. 74).

Their purpose was to compare execution-times of the various models: RAM, RASP and multi-tape Turing machine for use in the theory of complexity analysis.

The salient feature of their RASP model is no provision for indirect program-instructions (cf their discussion p.&nbsp;75). This they achieve by requiring the program to modify itself: if necessary an instruction can modify the "parameter" (their word, i.e. "operand") of a particular instruction. They have designed their model so each "instruction" uses two consecutive registers, one for the "operation code" (their word) and the parameter "either an address or an integer constant".

Their RASP's registers are unbounded in capacity and unbounded in number; likewise their accumulator AC and instruction counter IC are unbounded. The instruction set is the following:

{|class="wikitable"
|- style="font-size:9pt;font-weight:bold" align="center" valign="bottom"
!operation
! mnemonic
! operation code
! description

|- style="font-size:9pt"
| load constant
|LOD, k
| 1
|put constant k into accumulator

|- style="font-size:9pt"
| add
|ADD, j
| 2
|add contents of register j to accumulator

|- style="font-size:9pt"
| subtract
|SUB, j
| 3
|subtract contents of register j from accumulator

|- style="font-size:9pt"
| store
|STO, j
| 4
|copy contents of accumulator into register j

|- style="font-size:9pt"
| branch on positive accumulator
|BPA, xxx
| 5
|IF contents of accumulator > 0 THEN jump to xxx ELSE next instruction

|- style="font-size:9pt"
| read
|RD, j
| 6
|next input into register j

|- style="font-size:9pt"
| print
|PRI, j
| 7
|output contents of register j

|- style="font-size:9pt"
| halt
|HLT
| any other - or + integer
|stop

|}

== References ==
Often both the RAM and RASP machines are presented together in the same article. These have been copied over from [[Random-access machine]]; with a few exceptions, these references are the same as those at [[Register machine]].

* [[Biography:George Boolos|George Boolos]], John P. Burgess, [[Biography:Richard Jeffrey|Richard Jeffrey]] (2002), ''Computability and Logic: Fourth Edition'', Cambridge University Press, Cambridge, England. The original Boolos-Jeffrey text has been extensively revised by Burgess: more advanced than an introductory textbook. "Abacus machine" model is extensively developed in Chapter 5 ''Abacus Computability''; it is one of three models extensively treated and compared—the Turing machine (still in Boolos' original 4-tuple form) and two recursion models.
* [[Biography:Arthur Burks|Arthur Burks]], [[Biography:Herman Goldstine|Herman Goldstine]], [[Biography:John von Neumann|John von Neumann]] (1946), ''Preliminary discussion of the logical design of an electronic computing instrument'', reprinted pp.&nbsp;92ff in [[Biography:Gordon Bell|Gordon Bell]] and [[Biography:Allen Newell|Allen Newell]] (1971), ''Computer Structures: Readings and Examples'', McGraw-Hill Book Company, New York. {{ISBN|0-07-004357-4}}  .
* [[Biography:Stephen Cook|Stephen A. Cook]] and Robert A. Reckhow (1972), ''Time-bounded random access machines'', Journal of Computer Systems Science 7 (1973), 354–375.
* [[Biography:Martin Davis (mathematician)|Martin Davis]] (1958), ''Computability & Unsolvability'', McGraw-Hill Book Company, Inc. New York.
* Calvin Elgot and [[Biography:Abraham Robinson|Abraham Robinson]] (1964), ''Random-Access Stored-Program Machines, an Approach to Programming Languages'', Journal of the Association for Computing Machinery, Vol. 11, No. 4 (October, 1964), pp.&nbsp;365–399.
* [[Biography:Juris Hartmanis|J. Hartmanis]] (1971), "Computational Complexity of Random Access Stored Program Machines," Mathematical Systems Theory 5, 3 (1971) pp.&nbsp;232–245.
* [[Biography:John Hopcroft|John Hopcroft]], [[Biography:Jeffrey Ullman|Jeffrey Ullman]] (1979). ''Introduction to Automata Theory, Languages and Computation'', 1st ed., Reading Mass: Addison-Wesley. {{ISBN|0-201-02988-X}}.  A difficult book centered around the issues of machine-interpretation of "languages", NP-Completeness, etc. 
* Stephen Kleene (1952), ''Introduction to Metamathematics'', North-Holland Publishing Company, Amsterdam, Netherlands. {{ISBN|0-7204-2103-9}}.
* [[Biography:Donald Knuth|Donald Knuth]] (1968), ''The Art of Computer Programming'', Second Edition 1973, Addison-Wesley, Reading, Massachusetts. Cf pages 462-463 where he defines "a new kind of abstract machine or 'automaton' which deals with linked structures."
* [[Biography:Joachim Lambek|Joachim Lambek]] (1961, received 15 June 1961), ''How to Program an Infinite Abacus'', Mathematical Bulletin, vol. 4, no. 3. September 1961 pages 295–302. In his Appendix II, Lambek proposes a "formal definition of 'program'. He references Melzak (1961) and Kleene (1952) ''Introduction to Metamathematics''.
* Z. A. Melzak (1961, received 15 May 1961), ''An informal Arithmetical Approach to Computability and Computation'', [[Canadian Mathematical Bulletin]], vol. 4, no. 3. September 1961 pages 279-293. Melzak offers no references but acknowledges "the benefit of conversations with Drs. [[Biography:Richard Hamming|R. Hamming]], D. McIlroy and [[Biography:Victor A. Vyssotsky|V. Vyssotsky]] of the [[Organization:Bell Labs|Bell telephone Laboratories]] and with Dr. [[Biography:Hao Wang (academic)|H. Wang]] of [[Organization:University of Oxford|Oxford University]]
*{{cite journal|author=[[Biography:Marvin Minsky|Marvin Minsky]]
 |title=Recursive Unsolvability of Post's Problem of 'Tag' and Other Topics in Theory of Turing Machines
 |journal=Annals of Mathematics
 |date=1961
 |volume=74
 |pages=437&ndash;455
 |doi=10.2307/1970290|issue=3|jstor=1970290
}}
*{{cite book |author= [[Biography:Marvin Minsky|Marvin Minsky]] |title = Computation: Finite and Infinite Machines |url= https://archive.org/details/computationfinit0000mins |url-access= registration | edition = 1st | publisher = Prentice-Hall, Inc.| location = Englewood Cliffs, N. J. | year = 1967 |isbn= 0-13-165449-7}} In particular see chapter 11: ''Models Similar to Digital Computers'' and chapter 14: ''Very Simple Bases for Computability''. In the former chapter he defines "Program machines" and in the later chapter he discusses "Universal Program machines with Two Registers" and "...with one register", etc.
* John C. Shepherdson and H. E. Sturgis (1961) received December 1961 ''Computability of Recursive Functions'', Journal of the Association for Computing Machinery (JACM) 10:217-255, 1963. An extremely valuable reference paper. In their Appendix A the authors cite 4 others with reference to "Minimality of Instructions Used in 4.1: Comparison with Similar Systems".
:* Kaphengst, Heinz, ''Eine Abstrakte programmgesteuerte Rechenmaschine''', Zeitschrift fur mathematische Logik und Grundlagen der Mathematik:''5'' (1959), 366-379. 
:* [[Biography:Andrey Ershov|Ershov, A. P.]] ''On operator algorithms'', (Russian) Dok. Akad. Nauk 122 (1958), 967-970. English translation, Automat. Express 1 (1959), 20-23.
:* [[Biography:Rózsa Péter|Péter, Rózsa]] ''Graphschemata und rekursive Funktionen'', Dialectica 12 (1958), 373.
:* Hermes, Hans ''Die Universalität programmgesteuerter Rechenmaschinen. Math.-Phys. Semsterberichte (Göttingen) 4 (1954), 42-53.
* [[Biography:Arnold Schönhage|Arnold Schönhage]] (1980), ''Storage Modification Machines'', Society for Industrial and Applied Mathematics, SIAM J. Comput. Vol. 9, No. 3, August 1980. Wherein Schōnhage shows the equivalence of his SMM with the "successor RAM" (Random Access Machine), etc. resp. ''Storage Modification Machines'', in ''Theoretical Computer Science'' (1979), pp.&nbsp;36–37
* [[Biography:Peter van Emde Boas|Peter van Emde Boas]], ''Machine Models and Simulations'' pp.&nbsp;3–66, appearing in: [[Biography:Jan van Leeuwen|Jan van Leeuwen]], ed. "Handbook of Theoretical Computer Science. Volume A: Algorithms and Complexity'', The MIT PRESS/Elsevier, 1990. {{ISBN|0-444-88071-2}} (volume A). QA 76.H279 1990. 
:van Emde Boas' treatment of SMMs appears on pp. 32-35. This treatment clarifies Schōnhage 1980 -- it closely follows but expands slightly the Schōnhage treatment. Both references may be needed for effective understanding.
* [[Biography:Hao Wang (academic)|Hao Wang]] (1957), ''A Variant to Turing's Theory of Computing Machines'', JACM (Journal of the Association for Computing Machinery) 4; 63–92. Presented at the meeting of the Association, June 23–25, 1954.

[[Category:Register machines]]

{{Sourceattribution|Random-access stored-program machine}}