Special; even; 28 storage locations (normally 88-115); used with initial input routine R0. R1 is used to read in long integers and decimal fractions of either sign into successive long storage locations in the memory. During the reading in of R1, the initial input routine is slightly modified so as to enabel use of the control symbols "+" and "-" during its operation. With this routine, any number less than 2^{35}followed by a "+" will be read as a positive integer, and any number followed by a "-" as a negative integer. Numbers exceeding this limit will be interpreted modulo 2^{36}. If the number is preceded by a decimal point with or without a zero ("0." or ".") and followed by a sign it will be read in as a decimal fraction of that sign. Any number of digits up to 10 may follow the decimal point. For instance, 2^{-1}cat be punched .5+ or 0.5+ instead of .5000000000+, but punching more than 10 digits will give incorrect result. Long numbers and short words may appear mixed on the tape and they are stored successively in their natural order on the tape, but the location of long numbers must always be such that they are stored in even storage locations. Control symbols "+" and "-" causes storage address fo the number to be increased by 2. Hence no extra "," should be placed after long numbers. No code letter nore function symbol can be used with long numbers. Author: H. Takahasi Date: 58-12-08 88: 0 88 zl 2r from 18 ¨¤decide whether the symbol just read ¨¢is a decimal point or a control symbol. 1 89jl 15¨¥ 2 90 p 4r from 0r ¨¤it is a decimal point. place the "magic ¨¢number" in 28 and 64 (by 41 and 42) 3 91jl 41¨¥ 4 92 | 156416 used by 2r "magic number" = 1.193359375 * 5 93 |nl 28used by 8r 6 94 p 12r from 18 ¨¤place "pl 28" in 23r on ¨¢reading "+". 7 95jl 9r¨¥ 8 96 p 5r from 18 ¨¤place "nl 28" in 23r on ¨¢reading "-". 9 97 t 23r from 7r ¨¥ 10 98 p 64 ¨¤test whether an integer or a ¨¢fraction by reading C(64). 11 99 kl 19r ¨¥ 12 100 pl 28 also used by 6r ¨¤test whether multiplied^{ }¨¤ ¨¢10 times^{ }¨¢ 13 101 kl 17r ¨¥^{ }¨¢ ¡¡^{ }¨¢ 14 102 v 48 from 16 ¨¤multiply by 10 up to ten times^{ }¨¢ ¨¢^{ }¨¢ 15 103 ll 5 ¨¢^{ }¨¢fraction ¨¢^{ }¨¢ 16 104 k 14r ¨¥^{ }¨¢ ¡¡^{ }¨¢ 17 105 dl 26r ¨¤divide by 10^{10}¨¢ ¨¢^{ }¨¢ 18 106 tl 28 ¨¥^{ }¨¥ 19 107 p 57 ¨¤set store order for long number. ¨¢ 20 108 x 24r ¨¥ 21 109 a 40 ¨¤increase address of store order ¨¢by 2. 22 110 x 57 ¨¥ 23 111 ( ) by 9r becomes pl 28 or nl 28 24 112 tl ( ) by 20r ¨£ store a long number in ultimate ¨¦ storage location. 25 113jl 4026 114 | 38146 ¨¤ ¨¢ used by 17r 10^{10}27 115 | 254976 ¨¥ t 26. 212988r (-) makes jl 8r t 31. 212980r (.) makes jlr 212986r (+) makes jl 6r 28r. stop tape * "Magic number" is a 9 digit binary fraction whose decimal form contains only odd digits.