␣␣␣␣D1 = 218

1. Definition

   00332

   0 50000 0 00107

   95

   D1

   CLA

   TTEV SET ADDRESS OF D5 EQUAL TO LOCATION OF

   F6K00880

␣␣␣␣D3 = 246

1. Definition

   00366

   −0 63400 4 00601

   123

   D3

   SXD

   IR4,4

   F6K01160

2. References (3)

   	00234	0 07400 4 00366	29		TSX	D3,4 TO PREPARE FIRST TWO WORDS OF TAPE TWO ENTRY.	F6K00260
   	00277	0 07400 4 00366	68		TSX	D3,4 DEV ENTRY AND GO TO PREPARE THE 4-WORD ENTRY.	F6K00610
   	00336	0 07400 4 00366	99		TSX	D3,4 WORD2 TO VARIABLE NAME.	F6K00920

␣␣␣␣D4 = 261

1. Definition

   00405

   −0 63400 4 00601

   138

   D4

   SXD

   IR4,4

   F6K01310

2. References (3)

   	00235	0 07400 4 00405	30		TSX	D4,4 TO PREPARE 3RD AND 4TH WORDS OF ENTRY.	F6K00270
   	00300	0 07400 4 00405	69		TSX	D4,4	F6K00620
   	00343	0 07400 4 00405	104		TSX	D4,4 AND OCTAL REPRESENTAT1ONS IN WORDS 3 AND 4.	F6K00970

␣␣␣␣D5 = 221

1. Definition

   U

   00335

   0 56000 1

   98

   D5

   LDQ

   TEV,1 SELECT TEV ENTRY, AND GO SET WORD 1 TO BLANK,

   F6K00910

2. References (3)

   	00333	0 62100 0 00335	96		STA	D5 BEGINNING OF TEV TABLE.	F6K00890
   	00345	2 00004 2 00335	106		TIX	D5,2,4 TRANSFER IF STILL ROOM IN BUFFER.	F6K00990
   	00350	0 02000 0 00334	109		TRA	D5−1	F6K01020

␣␣␣␣D6 = 233

1. Definition

   00351

   0 07400 1 00353

   110

   D6

   TSX

   WLL,1 WRITE FINAL RECORD AND GO TO LOADER.

   F6K01030

2. Reference

   00344

   −2 00001 1 00351

   105

   TNX

   D6,1,1 IF END OF TEV ENTRIES, GO WRITE LAST RECORD.

   F6K00980

␣␣␣␣D7 = 208

1. Definition

   00320

   0 50000 0 00310

   85

   D7

   CLA

   ME5 IS ANYTHING IN TAPE TWO BUFFER

   F6K00780

2. Reference

   00306

   −2 00001 1 00320

   75

   B11

   TNX

   D7,1,1 TRANSFER IF NO MORE ENTRIES IN DEV.

   F6K00680

␣␣␣␣J1 = 212

1. Definition

   00324

   −0 53400 1 00120

   89

   J1

   LXD

   TEVL,1 ANY TEV ENTRIES.

   F6K00820

2. References (2)

   D	00250	−3 00000 1 00324	43		TXL	J1,1 NO, TRANSFER	F6K00380
   	00321	0 10000 0 00324	86		TZE	J1 TRANSFER IF NOT.	F6K00790

␣␣␣␣J3 = 296

1. Definition

   00450

   0 02000 0 00004

   173

   J3

   TRA

   4

   F6K01660

2. Reference

   D

   00325

   −3 00000 1 00450

   90

   TXL

   J3,1 NO, GO TO LOADER

   F6K00830

␣␣␣␣J4 = 167

1. Definition

   00247

   −0 53400 1 00155

   42

   J4

   LXD

   DEVL,1 ANY DEV ENTRIES.

   F6K00370

2. Reference

   D

   00211

   −3 00000 1 00247

   9

   TXL

   J4,1 NO, TRANSFER.

   F6K00070

␣␣␣␣J6 = 185

1. Definition

   			61			ENTRIES.	F6K00541
   	00271	0 34000 0 00175	62	J6	CAS	L3 IS DEV ENTRY IN COMMON.	F6K00550

2. References (2)

   	00266	0 02000 0 00271	58		TRA	J6 NOT PREVI0USLY LISTED AS FORTRAN FUNCTION	F6K00520
   	00267	0 02000 0 00271	59		TRA	J6 OR IN TRANSFER VECTOR. GO SEE IF COMMON.	F6K00530

␣␣␣B10 = 188

1. Definition

   00274

   0 50000 0 00310

   65

   B10

   CLA

   ME5 TRANSFER VECTOR OR COMMON. ME5 IS TAPE TWO

   F6K00580

2. Reference

   00273

   0 02000 0 00274

   64

   TRA

   B10 DEV ENTRY NOT A FORTRAN FUNCTION, NOT IN

   F6K00570

␣␣␣B11 = 198

1. Definition

   00306

   −2 00001 1 00320

   75

   B11

   TNX

   D7,1,1 TRANSFER IF NO MORE ENTRIES IN DEV.

   F6K00680

2. References (2)

   	00270	0 02000 0 00306	60		TRA	B11 PREVIOUSLY LISTED. GO SEE IF ANY MORE DEV	F6K00540
   	00272	0 02000 0 00306	63		TRA	B11 YES, GO SEE IF ANY MORE DEV ENTRIES.	F6K00560

␣␣␣B25 = 211

1. Definition

   00323

   0 07400 1 00353

   88

   B25

   TSX

   WLL,1 AND GO WRITE LAST RECORD.

   F6K00810

2. References (2)

   	00301	−2 00001 1 00323	70		TNX	B25,1,1 GO WRITE FINAL RECORD IF DEV TABLE FINISHED.	F6K00630
   	00322	1 00004 2 00323	87		TXI	B25,2,4 ADJUST BUFFER INDEX	F6K00800

␣␣␣BDV = 178

1. Definition

   00262

   0 50000 1 00000

   54

   BDV

   CLA

   **,1 SELECT LOCATION FROM ADDRESS PART OF DEA

   F6K00480

2. References (3)

   	00260	0 62100 0 00262	52		STA	BDV OF BDV.	F6K00460
   	00302	2 00004 2 00262	71		TIX	BDV,2,4 TRANSFER IF STILL ROOM IN TAPE TWO BUFFER.	F6K00640
   	00307	0 02000 0 00262	76		TRA	BDV GO SELECT NEXT DEV ENTRY.	F6K00690

␣␣␣CNA = 259

1. Definition

   00403

   −0 53400 4 00601

   136

   CNA

   LXD

   IR4,4

   F6K01290

2. Reference

   00377

   0 10000 0 00403

   132

   TZE

   CNA LEFT IN WORD 2 OF ENTRY.

   F6K01250

␣␣␣CNL = 177

1. Definition

   00261

   −0 53400 2 00241

   53

   CNL

   LXD

   LNC,2 SET TAPE TWO RECORD LENGTH TO 20.

   F6K00470

2. Reference

   00305

   0 02000 0 00261

   74

   TRA

   CNL GO SET BUFFER LENGTH AND CONTINUE.

   F6K00670

␣␣␣CNV = 264

1. Definition

   00410

   0 50000 0 00454

   141

   CNV

   CLA

   TEN STORE IT IN WORD 3 0F ENTRY.

   F6K01340

2. Reference

   00415

   1 00001 4 00410

   146

   TXI

   CNV,4,1

   F6K01390

␣␣␣CNW = 247

1. Definition

   00367

   −0 50000 0 00451

   124

   CNW

   CAL

   BLANKS

   F6K01170

␣␣␣DEC = 272

1. Definition

   00420

   0 76700 0 00006

   149

   DEC

   ALS

   6

   F6K01420

2. Reference

   00422

   2 00001 4 00420

   151

   TIX

   DEC,4,1

   F6K01440

␣␣␣DIG = 392

1. Definition

   00610

   267

   DIG

   BES

   6

   F6K01970

2. References (3)

   	00414	0 60200 4 00610	145		SLW	DIG,4	F6K01380
   	00416	−0 60000 4 00610	147	FIN	STQ	DIG,4	F6K01400
   	00421	−0 50100 4 00610	150		ORA	DIG,4	F6K01430

␣␣␣FIN = 270

1. Definition

   00416

   −0 60000 4 00610

   147

   FIN

   STQ

   DIG,4

   F6K01400

2. Reference

   00411

   0 04000 0 00416

   142

   TLQ

   FIN

   F6K01350

␣␣␣IR4 = 385

1. Definition

   00601

   0 00000 0 00000

   266

   IR4

   F6K01960

2. References (4)

   	00366	−0 63400 4 00601	123	D3	SXD	IR4,4	F6K01160
   	00403	−0 53400 4 00601	136	CNA	LXD	IR4,4	F6K01290
   	00405	−0 63400 4 00601	138	D4	SXD	IR4,4	F6K01310
   	00434	−0 53400 4 00601	161		LXD	IR4,4	F6K01540

␣␣␣LIN = 411

1. Definition

   00633

   269

   LIN

   BSS

   1

   F6K01990

2. References (9)

   	00241	0 00024 0 00634	35	LNC		LIN+1,,20	F6K00310
   	00304	0 00024 0 00634	73			LIN+1,,20	F6K00660
   	00347	0 00024 0 00634	108			LIN+1,,20	F6K01010
   	00365	0 00030 0 00640	122	LNE		LIN+5,,24	F6K01150
   	00370	0 60200 2 00634	125		SLW	LIN+1,2 STORE BLANKS IN WORDS 1 AND 2 OF ENTRY.	F6K01180
   	00371	0 60200 2 00635	126		SLW	LIN+2,2	F6K01190
   	00401	0 60200 2 00635	134		SLW	LIN+2,2	F6K01270
   	00423	0 60200 2 00636	152		SLW	LIN+3,2	F6K01450
   	00433	0 60200 2 00637	160		SLW	LIN+4,2	F6K01530

␣␣␣LNC = 161

1. Definition

   00241

   0 00024 0 00634

   35

   LNC

   LIN+1,,20

   F6K00310

2. References (4)

   	00224	−0 53400 2 00241	20	TV2	LXD	LNC,2 SET TAPE TWO RECORD LENGTH EQUAL TO TWENTY.	F6K00180
   	00261	−0 53400 2 00241	53	CNL	LXD	LNC,2 SET TAPE TWO RECORD LENGTH TO 20.	F6K00470
   	00315	−0 53400 2 00241	82		LXD	LNC,2 RESET COUNTER FOR TAPE TWO BUFFER AND STORE	F6K00750
   	00334	−0 53400 2 00241	97		LXD	LNC,2 SET TAPE TWO RECORD LENGTH TO 20.	F6K00900

␣␣␣LND = 243

1. Definition

   00363

   0 00000 0 00000

   120

   LND

   F6K01130

2. References (4)

   	00354	0 60100 0 00363	113		STO	LND	F6K01060
   	00356	0 62100 0 00363	115		STA	LND	F6K01080
   	00360	0 40200 0 00363	117		SUB	LND	F6K01100
   	00361	0 60100 0 00363	118		STO	LND	F6K01110

␣␣␣LNE = 245

1. Definition

   00365

   0 00030 0 00640

   122

   LNE

   LIN+5,,24

   F6K01150

2. Reference

   00357

   0 50000 0 00365

   116

   CLA

   LNE

   F6K01090

␣␣␣LOC = 301

1. Definition

   00455

   +000000000000

   178

   LOC

   DEC

   0

   F6K01710

2. References (7)

   	00226	0 62100 0 00455	22		STA	LOC	F6K00200
   	00227	0 50000 0 00455	23		CLA	LOC IF DEV ENTRY IS IN TRANS. VECTOR, ITS CORRES-	F6K00210
   	00263	0 62100 0 00455	55		STA	LOC ENTRY. COMPARE IT WITH MAX (TRANSFER VECTOR	F6K00490
   	00264	0 50000 0 00455	56		CLA	LOC WORD C0UNT, LAST LOCATION OF FORTRAN FUNCTIONS	F6K00500
   	00342	0 62100 0 00455	103		STA	LOC AND GO COMPUTE AND STORE BCD IMAGES OF DECIMAL	F6K00960
   	00407	0 56000 0 00455	140		LDQ	LOC DECIMAL REPRESENTATION, AND	F6K01330
   	00424	0 50000 0 00455	153		CLA	LOC	F6K01460

␣␣␣ME5 = 200

1. Definition

   00310

   0 00000 0 00000

   77

   ME5

   HTR

   0

   F6K00700

2. References (3)

   	00274	0 50000 0 00310	65	B10	CLA	ME5 TRANSFER VECTOR OR COMMON. ME5 IS TAPE TWO	F6K00580
   	00316	−0 63400 2 00310	83		SXD	ME5,2 IT IN ME5	F6K00760
   	00320	0 50000 0 00310	85	D7	CLA	ME5 IS ANYTHING IN TAPE TWO BUFFER	F6K00780

␣␣␣ME6 = 201

1. Definition

   00311

   0 07400 4 00436

   78

   ME6

   TSX

   SPACE,4 TO WRITE STORAGE LOCATIONS FOR VARIABLES

   F6K00710

2. Reference

   00275

   0 10000 0 00311

   66

   TZE

   ME6 BUFFER C0UNTER (0 TO START). GO WRITE HEADING,

   F6K00590

␣␣␣ME7 = 190

1. Definition

   00276

   0 56000 1 77777

   67

   ME7

   LDQ

   DEV,1 TAPE 2 BUFFER INDEX NOT 0. LOAD APPROPRIATE

   F6K00600

2. Reference

   00317

   0 02000 0 00276

   84

   TRA

   ME7

   F6K00770

␣␣␣ME8 = 134

1. Definition

   			2			FORTRAN 2 RECORD 110 - MAP OTHER VARIABLES.	F6K00011
   			3				F6K00012
   			4			LIST DATA LOCATI0NS NOT APPEARING IN COMMON	F6K00020
   		00206	5	ME8	SYN	134	F6K00030

2. References (2)

   	00252	0 34000 0 00206	45		CAS	ME8 LAST LOCATION OF FORTRAN FUNCTIONS+1 (ME8 SET	F6K00400
   	00255	0 50000 0 00206	49	LIB37	CLA	ME8 LENG EQUAL TO ME8 TO AVOID DUPLICATE LISTING	F6K00430

␣␣␣OCT = 280

1. Definition

   00430

   0 76700 0 00003

   157

   OCT

   ALS

   3

   F6K01500

2. References (2)

   	00427	−0 14000 0 00430	156		TNO	OCT REPRESENTATION, AND STORE IT IN WORD 4 OF ENTRY	F6K01490
   	00432	−0 14000 0 00430	159		TNO	OCT	F6K01520

␣␣␣PC3 = 26

1. Definition

   00032

   6

   PC3

   SYN

   26

   F6K00040

2. Reference

   00210

   −0 53400 1 00032

   8

   LXD

   PC3,1 ANY TRANSFER VECTOR.

   F6K00060

␣␣␣SIX = 251

1. Definition

   00373

   −0 76300 0 00006

   128

   SIX

   LGL

   6

   F6K01210

2. References (2)

   	00372	0 53400 4 00373	127		LXA	SIX,4	F6K01200
   	00402	2 00001 4 00373	135		TIX	SIX,4,1	F6K01280

␣␣␣SYM = 412

1. Definition

   00634

   270

   SYM

   BSS

   1

   F6K02000

2. References (2)

   	00374	0 60200 0 00634	129		SLW	SYM	F6K01220
   	00400	−0 50000 0 00634	133		CAL	SYM	F6K01260

␣␣␣TEN = 300

1. Definition

   00454

   +000000000012

   177

   TEN

   DEC

   10

   F6K01700

2. References (2)

   	00410	0 50000 0 00454	141	CNV	CLA	TEN STORE IT IN WORD 3 0F ENTRY.	F6K01340
   	00413	0 22100 0 00454	144		DVP	TEN	F6K01370

␣␣␣TV1 = 149

1. Definition

   00225

   0 50000 1 00000

   21

   TV1

   CLA

   **,1 LOCATION FROM DEA TABLE.

   F6K00190

2. References (3)

   	00217	0 62100 0 00225	15		STA	TV1 INITIAL DEA LOCATION.	F6K00130
   	00237	2 00004 2 00225	33		TIX	TV1,2,4 IF TAPE TWO RECORD FULL, GO TO WRITE RECORD	F6K00290
   	00244	0 02000 0 00225	39		TRA	TV1 AND GO TO SELECT NEXT DEA. IF END OF DEV,	F6K00340

␣␣␣TV2 = 148

1. Definition

   00224

   −0 53400 2 00241

   20

   TV2

   LXD

   LNC,2 SET TAPE TWO RECORD LENGTH EQUAL TO TWENTY.

   F6K00180

2. Reference

   00242

   0 02000 0 00224

   36

   TRA

   TV2

   F6K00320

␣␣␣TV3 = 163

1. Definition

   00243

   −2 00001 1 00245

   37

   TV3

   TNX

   TV6,1,1 DO NOT LIST (NOT IN TRANSFER VECTOR). UPDATE

   F6K00330

2. References (2)

   	00231	0 02000 0 00243	26		TRA	TV3 DEV ENTRY NOT IN TRANSFER VECTOR.	F6K00230
   	00232	0 02000 0 00243	27		TRA	TV3	F6K00240

␣␣␣TV4 = 155

1. Definition

   00233

   0 56000 1 77777

   28

   TV4

   LDQ

   DEV,1 DEV ENTRY IS IN TRANSFER VECTOR SO LIST IT.

   F6K00250

␣␣␣TV5 = 166

1. Definition

   00246

   0 07400 1 00353

   41

   TV5

   TSX

   WLL,1 WRITE LAST RECORD.

   F6K00360

2. References (2)

   	00236	−2 00001 1 00246	31		TNX	TV5,1,1 IF NO MORE WOROS IN DEV TABLE, GO TO WRITE LAST	F6K00280
   	00245	1 00004 2 00246	40	TV6	TXI	TV5,2,4 ADJUST WRITE-COPY INDEX AND GO	F6K00350

␣␣␣TV6 = 165

1. Definition

   00245

   1 00004 2 00246

   40

   TV6

   TXI

   TV5,2,4 ADJUST WRITE-COPY INDEX AND GO

   F6K00350

2. Reference

   00243

   −2 00001 1 00245

   37

   TV3

   TNX

   TV6,1,1 DO NOT LIST (NOT IN TRANSFER VECTOR). UPDATE

   F6K00330

␣␣␣WLL = 235

1. Definition

   00353

   −0 75400 2 00000

   112

   WLL

   PXD

   0,2 C0MPUTE COUNT TO WRITE FINAL RECORD.

   F6K01050

2. References (3)

   	00246	0 07400 1 00353	41	TV5	TSX	WLL,1 WRITE LAST RECORD.	F6K00360
   	00323	0 07400 1 00353	88	B25	TSX	WLL,1 AND GO WRITE LAST RECORD.	F6K00810
   	00351	0 07400 1 00353	110	D6	TSX	WLL,1 WRITE FINAL RECORD AND GO TO LOADER.	F6K01030

␣␣LENG = 302

1. Definition

   00456

   0 00000 0 00000

   179

   LENG

   HTR

   0

   F6K01720

2. References (5)

   	00222	0 60100 0 00456	18		STO	LENG NO. OF WORDS IN TRANSFER VECTOR.	F6K00160
   	00230	0 34000 0 00456	24		CAS	LENG PONDING DEA ENTRY(ADDR. PART)WILL BE LESS	F6K00220
   	00251	0 50000 0 00456	44		CLA	LENG YES, COMPARE WD. CT. OF TRANSFER VECTOR WITH	F6K00390
   	00256	0 60100 0 00456	50		STO	LENG OF FORTRAN FUNCTIONS (LISTED BY RECOR0 105).	F6K00440
   	00265	0 34000 0 00456	57		CAS	LENG PLUS 1).	F6K00510

␣␣POOP = 292

1. Definition

   00444

   0 70000 2 00000

   169

   POOP

   CPY

   **,2

   F6K01620

2. References (2)

   	00442	0 62100 0 00444	167		STA	POOP	F6K01600
   	00445	2 00001 2 00444	170		TIX	POOP,2,1	F6K01630

␣␣TRAN = 323

1. Definition

   A

   00503

   200

   TRAN

   BSS

   F6K01760

2. Reference

   00213

   0 00024 0 00503

   11

   TRAN,,20

   F6K00690

␣6BITS = 299

1. Definition

   00453

   +000000000077

   176

   6BITS

   OCT

   77

   F6K01690

2. Reference

   00375

   −0 32000 0 00453

   130

   ANA

   6BITS

   F6K01230

␣BLANK = 298

1. Definition

   00452

   000000000060

   175

   BLANK

   BCD

   100000␣

   F6K01680

2. References (2)

   	00376	0 40200 0 00452	131		SUB	BLANK STORE VARIABLE NAME FILLED WITH BLANKS AT	F6K01240
   	00426	0 50000 0 00452	155		CLA	BLANK CONVERT LOCATION TO BCD IMAGE 0F ITS OCTAL	F6K01480

␣ERAS1 = 384

1. Definition

   00600

   0 00000 0 00000

   265

   ERAS1

   F6K01950

␣ERAS2 = 383

1. Definition

   00577

   0 00000 0 00000

   264

   ERAS2

   F6K01940

␣LIB37 = 173

1. Definition

   00255

   0 50000 0 00206

   49

   LIB37

   CLA

   ME8 LENG EQUAL TO ME8 TO AVOID DUPLICATE LISTING

   F6K00430

2. Reference

   00254

   0 02000 0 00255

   48

   TRA

   LIB37 EQUAL OR GREATER THAN TR. VECTOR LENGTH. SET

   F6K00420

␣LIB38 = 175

1. Definition

   00257

   0 50000 0 00152

   51

   LIB38

   CLA

   ADEV STORE INITIAL LOCATION OF DEA TABLE IN AOORESS

   F6K00450

2. Reference

   00253

   0 02000 0 00257

   47

   TRA

   LIB38 LESS THAN TRANSFER VECTOR LENGTH.

   F6K00410

␣OTHER = 383

1. Definition

   A

   00577

   263

   OTHER

   BSS

   F6K01930

2. Reference

   00327

   0 00024 0 00577

   92

   OTHER,,20

   F6K00850

␣SPACE = 286

1. Definition

   00436

   0 76600 0 00202

   163

   SPACE

   WTD

   2

   F6K01560

2. References (6)

   	00212	0 07400 4 00436	10		TSX	SPACE,4 YES, G0 T0 WRITE COLUMN HEADINGS AND	F6K00080
   	00214	0 07400 4 00436	12		TSX	SPACE,4	F6K00100
   	00311	0 07400 4 00436	78	ME6	TSX	SPACE,4 TO WRITE STORAGE LOCATIONS FOR VARIABLES	F6K00710
   	00313	0 07400 4 00436	80		TSX	SPACE,4 STATEMENTS AND HEADINGS	F6K00730
   	00326	0 07400 4 00436	91		TSX	SPACE,4 YES, WRITE LOCATIONS FOR VARIABLES NOT APPEAR-	F6K00840
   	00330	0 07400 4 00436	93		TSX	SPACE,4 AND WRITE HEADINGS.	F6K00860

␣TITLE = 363

1. Definition

   A

   00553

   242

   TITLE

   BSS

   F6K01880

2. Reference

   00312

   0 00024 0 00553

   79

   TITLE,,20

   F6K00720

␣TRHAD = 343

1. Definition

   A

   00527

   221

   TRHAD

   BSS

   F6K01830

2. References (3)

   	00215	0 00024 0 00527	13			TRHAD,,20	F6K00110
   	00314	0 00024 0 00527	81			TRHAD,,20	F6K00740
   	00331	0 00024 0 00527	94			TRHAD,,20	F6K00870

␣WRITE = 288

1. Definition

   00440

   0 76600 0 00202

   165

   WRITE

   WTD

   2 TO WRITE TAPE-TWO BUFFER (20 WORDS) ONTO TAP,

   F6K01580

2. References (4)

   	00240	0 07400 4 00440	34		TSX	WRITE,4 AND THEN TO TV2 TO SET UP FOR NEXT RECORD.	F6K00300
   	00303	0 07400 4 00440	72		TSX	WRITE,4 BUFFER FULL. GO WRITE RECORD.	F6K00650
   	00346	0 07400 4 00440	107		TSX	WRITE,4 BUFFER FULL. WRITE BUFFER CONTENTS AND GO SET	F6K01000
   	00362	0 07400 4 00440	119		TSX	WRITE,4 WRITE FINAL RECORD.	F6K01120

BLANKS = 297

1. Definition

   00451

   606060606060

   174

   BLANKS

   BCD

   1␣␣␣␣␣␣

   F6K01670

2. References (3)

   	00367	−0 50000 0 00451	124	CNW	CAL	BLANKS	F6K01170
   	00417	−0 50000 0 00451	148		CAL	BLANKS	F6K01410
   	00437	0 70000 0 00451	164		CPY	BLANKS	F6K01570