Skip to main content

Full text of "univOfIllinoisUrbana :: illiac :: ILLIAC :: Active Library :: P03-53"

See other formats


ucrasm oar nuaop 

DIGITAL CCWUIXR IA&^ATCKY 
ILLIAC PROGRAM UBWH 



Jdfcrary Routin e P 3 * 33 



TITLE: 



TYPE: 



IUNBER OF WORDS: 
TBflPQRARY STORAGE: 
ACCURACY: 
DIRATIQI: 
DESCRIFTIOI: 



Print n Ittgita of an Integer with or without a Sign. 
(DOI or SADOl) 

Closed - with one program parameter. If routine is at 
x then it is called into action hy the orders 



if a sign is desired and hy the order 



y 


50 


nF 




50 


YT 


y+1 


26 


xF 



y+i 



JO nF 
50 yF 
26 xF 



if no sign is wanted 



RESTRICTION: 



20 

0, 1, 2 

Exact 

Determined solely "by punch speed 

When the subroutine is calied into use, it prints the 

integer Ax2^ton digits p where the parameter is 

50 nF if a sign is desired and JO nF if no sign is 

desired. One space is punched after each number. 

11 > n > 1 



DAT E December 18, 1953 HTr 
CODED BY D.J. Wheeler 



APPROVED BY J.P. Bash 



lgr 





i 






J 


LOCATION 


j :. ORDER 




NOTES 




1 00K(P3) 











40 F 








41 2F 




— Prepare count and link address 




1 


S5 F 
46 2F 




n to 2 




2 


L4 19L 
42 16L 




1 




3 


36 6L 
L5 F 




__ Print sign if desired 




4 


32 5L 
92 706F 


- sign 






5 


26 6l 

92 642F 


+ sign 






6 


50 19L 
75 17L 


1 in Q 
x 10 






7 


L5 2F 
LO 18L 




._ 10 n x 2" 59 




8 


40 2F 

32 6L 




to 1 




9 


S5 F 
40 IF 








10 


L7 F 

50 L 




Roundoff 




11 


66 IF 
75 17L 


x 10 


■ 




12 


00 36F 

82 4F 




— Print one character 




13 


10 40F 
L5 2F 




Arrange to print n characters 




14 


L4 19L 

42 2F 








15 


32 11L 
92 96IF 




Spaces 




16 


36 F 
22 F 




Waste 




17 


00 F 




] 10 x 2~ 59 

1 




- 


00 10F 







LOCATION 
18 

19 



ORDER 

00 IT 
00 IP 

80 F 
00 IP 



1**ES 



TSatt of doubl? eoxmfc 



Halt of oo mat