{File name YLispLFAUFN12K.mc
Last edited: Purcell,  27-Jul-84  1:09:15
Last edited: charnley,  24-Sep-84 16:28:46
Created: Purcell  5-Dec-83 12:10:57
}

{	removed the following opcodes:
	030	RPLACA  --  NoLispRplX.mc
	031	RPLACD  --  NoLispRplX.mc
	040	BIN  --  LispBin.mc
	050	ELT  --  NoLispElt.mc
	054	EVAL  --  LispEval.mc
	061	MISC8  --  INTENSITYBLT  --  LispMakeGraph.mc
	073	DRAWLINE  --  DrawLine.mc
	164	READPRINTERPORT  --  MoreLisp12K.mc
	165	WRITEPRINTERPORT  --  MoreLisp12K.mc
	172	RECLAIMCELL  --  LispRecl.mc
	354	BOXIPLUS  --  LispBox.mc
	355	UNBOX1  --  LFAB1.mc
	366	UNBOX2  --  LFAB1.mc
	367	BOXIDIFFERENCE  --  LispBox.mc
	371	LISPFFT  --  LispFFT.mc
	372	MISC3  --  LFAB(1/2).mc
	373	MISC4  --  LFAB(1/2).mc
	}


SetTask[0];

{*************************}
	UFNs:
{*************************}

 ufn[7];    ufn[17];

    ufn[26];    {ufn[30];}   {ufn[31];}    ufn[33];    ufn[34];    ufn[35];    ufn[36];
    
     {ufn[40];}   ufn[41];    ufn[42];    ufn[43];    ufn[44];    ufn[45];    ufn[46];    ufn[47];
 {ufn[50];}    ufn[51];    ufn[52];    ufn[53];    {ufn[54];}    ufn[55];    ufn[56];    {ufn[57];}    {ufn[60];}{pcBlk}
    ufn[62];    ufn[63];    ufn[64];    ufn[65];    ufn[66];    ufn[67];    ufn[70];    ufn[71];
 ufn[72];    {ufn[73];}    ufn[75];

 ufn[77];{used to be debugging return}

 ufn[141];    ufn[145];

 ufn[177];    ufn[266];    ufn[267];    ufn[300];    ufn[301];    ufn[303];

 ufn[305];    ufn[306];    ufn[313];    ufn[314];

 ufn[337];    ufn[347];
 {ufn[354];UNBOX1}    {ufn[355]; UNBOX2}
 ufn[356];    ufn[357];
 {ufn[363];}    ufn[364];    {ufn[365];}    {ufn[366];}    {ufn[367];}

 ufn[370];

 {ufn[372]; FLOATBLT1}

 {ufn[373];FLOATBLT2}

 ufn[374];     ufn[377];

	{END}