<div id='wikitext'>
<pre><b> File: FC6DIG.PA of Tape: Sources/Focal/s6</b></pre>
<pre><b>(Source file text) </b></pre>
<hr />
<pre>
/PATCH FOR 3-WORD 6.5 DIGITS PRECISION

	FIELD 1

FISW=52
GINC=70
WORDS=3
MFLT=113
TWOPI=5306
PI=5312
PIOT=5316
DIGITS=6
MD=5527
RND2=5530
DCOUNT=6143
PTEN=6273
FPNT=6400
ZERO=6521
TEST2=6742
OVER1=43
OVER2=47
DMULT=7000
DMDONE=7057
MULDIV=7075
MIF=7260
DUBDIV=7261
LASTV=31
END=132
DOLL=3243

	*LASTV
	DOLL+2

	*END
	DOLL+2

	*FISW
	2004

	*GINC
	WORDS+2

	*MFLT
	-WORDS

	*TWOPI+2
	3756
	*PI+2
	3756
	*PIOT+2
	3756

	*MD
	-DIGITS
	*RND2
	DIGITS+1

	*DCOUNT
	-DIGITS-1

	*PTEN+2
	3147

	*FPNT+3
	DCA OVER1
	DCA OVER2

	*ZERO+20
	DCA OVER1

	*TEST2
	27

	*DMULT+32
	JMP DMDONE

	*DMDONE+7
	DCA OVER2

	*MULDIV+4
	ISZ OVER2

	*MIF
	-27

	*DUBDIV+10
	1042
	1046
	3256
	7004
	1045
	1041
	7420
	5304
	3045
	1256
	3046
	7200
	1254
	7004
	3254
	1200
	7004
	3200
	2255
	5267
	1254
	3046
	1200
	3045
	5661

$$$$
</pre>
<hr/>
</div>