F.I.G. Forth

* FIG FORTH FOR SERIES-16 MACHINES PAGE 69

2861 02463 0 002465 DAC QER2 2862 02464 0 001526 QER1 DAC DROP 2863 02465 0 001361 QER2 DAC SMIS 2864 * 2865 * **** ?COMP **** 2866 * HEAD FNUL,?COMP,QCMP,DOCL 2867 002466 TLNK SET * 2868 02466 002677 VFD 1,0,1,FNUL,6,5,8,'277 2869 * =<FNUL,5>,'?' 2870 02467 141717 BCI 1,CO 2871 02470 146520 VFD 8,'315,8,'120 ='MP' 2872 02471 0 002450 DAC LINK 2873 002466 LINK SET TLNK 2874 02472 0 10 00130 QCMP JST DOCL 2875 02473 0 002144 DAC STAT 2876 02474 0 001565 DAC AT 2877 02475 0 001423 DAC ZEQU 2878 02476 0 000241 DAC LIT 2879 02477 000021 OCT 21 2880 02500 0 002455 DAC QERR 2881 02501 0 001361 DAC SMIS 2882 * 2883 * **** ?EXEC **** 2884 * HEAD FNUL,?EXEC,QEXC,DOCL 2885 002502 TLNK SET * 2886 02502 002677 VFD 1,0,1,FNUL,6,5,8,'277 2887 * =<FNUL,5>,'?' 2888 02503 142730 BCI 1,EX 2889 02504 142503 VFD 8,'305,8,'103 ='EC' 2890 02505 0 002466 DAC LINK 2891 002502 LINK SET TLNK 2892 02506 0 10 00130 QEXC JST DOCL 2893 02507 0 002144 DAC STAT 2894 02510 0 001565 DAC AT 2895 02511 0 000241 DAC LIT 2896 02512 000022 OCT 22 2897 02513 0 002455 DAC QERR 2898 02514 0 001361 DAC SMIS 2899 * 2900 * **** ?PAIRS **** 2901 * HEAD FNUL,?PAIRS,QPRS,DOCL 2902 002515 TLNK SET * 2903 02515 003277 VFD 1,0,1,FNUL,6,6,8,'277 2904 * =<FNUL,6>,'?' 2905 02516 150301 BCI 2,PAIR 02517 144722 2906 02520 051400 VFD 8,'123 ='S' 2907 02521 0 002502 DAC LINK 2908 002515 LINK SET TLNK 2909 02522 0 10 00130 QPRS JST DOCL