F.I.G. Forth

* FIG FORTH FOR SERIES-16 MACHINES PAGE 84

3597 03467 0 001565 DAC AT 3598 03470 0 002223 DAC ONEP 3599 03471 0 000277 DAC ZBRA 3600 03472 0 003476 DAC PNM2 3601 03473 0 001722 DAC ONE 3602 03474 0 002157 DAC DPL 3603 03475 0 001546 DAC PSTR 3604 03476 0 001412 PNM2 DAC FRMR 3605 03477 0 000263 DAC BRAN 3606 03500 0 003443 DAC PNM1 3607 03501 0 001412 PNM3 DAC FRMR 3608 03502 0 001361 DAC SMIS 3609 * 3610 * **** NUMBER **** 3611 * ( CADDR --- D ) 3612 * HEAD FNUL,NUMBER,NUMB,DOCL 3613 003503 TLNK SET * 3614 03503 003316 VFD 1,0,1,FNUL,6,6,8,'316 3615 * =<FNUL,6>,'N' 3616 03504 152715 BCI 2,UMBE 03505 141305 3617 03506 051000 VFD 8,'122 ='R' 3618 03507 0 003434 DAC LINK 3619 003503 LINK SET TLNK 3620 03510 0 10 00130 NUMB JST DOCL 3621 03511 0 001716 DAC ZERO 3622 03512 0 001716 DAC ZERO 3623 03513 0 002325 DAC ROT 3624 03514 0 001541 DAC DUP 3625 03515 0 002223 DAC ONEP 3626 03516 0 001572 DAC CAT 3627 03517 0 000241 DAC LIT 3628 03520 000255 VFD 16,CMNS 3629 03521 0 002273 DAC EQAL 3630 03522 0 001541 DAC DUP 3631 03523 0 001402 DAC TOR 3632 03524 0 001443 DAC PLUS 3633 03525 0 000241 DAC LIT 3634 03526 0 177777 DAC -1 3635 03527 0 002157 NUM1 DAC DPL 3636 03530 0 001577 DAC STOR 3637 03531 0 003442 DAC PNUM 3638 03532 0 001541 DAC DUP 3639 03533 0 001572 DAC CAT 3640 03534 0 000277 DAC ZBRA 3641 03535 0 003550 DAC NUM2 3642 03536 0 001541 DAC DUP 3643 03537 0 001572 DAC CAT 3644 03540 0 000241 DAC LIT 3645 03541 000256 VFD 16,CDOT