merge( out )
int out;
{
int i, isml;
typekey lastout;
extern struct rec LastRec[];
extern char FilStat[];
lastout = MinimumKey;
LastRec[0].k = MaximumKey;
while (TRUE) {
isml = 0;
for (i=1; i<=maxfiles; i++) if ( filstat[i]=='i' && !eof(i) && lastrec[i].k>= lastout &&
LastRec[i].k |