Directory of image this file is from
This file as a plain text file

[SQRTS
[SINGLE PRECISION
[SQUARE ROOT
[USES FLOS SETUP
[JMP 1T
[ADDR RADICAND
[ADDR RESULT
#1T CLR
ADD 0
JMP1X-1
LDA 2 [EXP|2
STA
p+10
SCR i1
APO
JMP p+3
LZE
ADD 1Q+1
STA 3
LDA i
 0
LDA 2
APO [EVEN|ODD
COM
SCR i1
LDA i2 [ML
APO 
JMP p+2 [HLT
COM
AZE i
JMP p+51
LZE
JMP p+51 [1,ODD
SCR i1 [0,EVEN
STC p+27
COM
ROR i1 [MR
STC p+20
 STC p+13
CLR
ADD 1Q+1
STC p+5
JMP p+13-3
 LDA i
+2
LAM i
 XXX [RIGHT SUM
STC 0
LAM i
 XXX
LDA 
p-5
LAM i
 XXX [-MR
LDA
p-6
LAM i
 XXX [-ML
APO
JMP p-20 [ADD NEXT ODD #
[NORMALIZE[[EXP-1] * LN 2
JMP 1M
1L-2
1L-22
1L-16
[2M-1
JMP 1S
1L-20
1L-4
1L-20
LDA i
7
STC 1L+61
STC 1L-2
STC 1L-1
[SET POINTER TO A4
LDA i
1L-14
STC p+2
[LOOP
JMP 1A 
X
1L-2
1L-2
JMP 1M
1L-20
1L-2
1L-2
LDA i
2
ADD p-11
SRO i
XXX [1L+61
JMP p-16
[[EXP-1]*LN 2 + LN[2M-1]
JMP 1A
1L-16 
1L-2
XXX [1L+66
JMP RETURN [1L+67
[BASE 10
#1C CLR
ADD 0
JMP 1X-1
LDA i
1C+24 [ADDR LN 10
STC 1C+21
ADD 1R+1
STC 1C+23
ADD 2
STC p+4
ADD 3
STC p+7
JMP 1L [LN X
ADDR X
1L-16
JMP 1D [LN X | LN B
1L-16
ADDR LN B  [EC+21
ADDR RESULT
JMP RETURN [1C+23
2 [LN 10
2232
[BASE 2
#1U CLR
ADD 0
JMP 1X-1
LDA i 
1L-22 [ADDR LN 2
JMP 1C+5
[END LOGHS
[JAN 8|19|69