#include	<stdio.h>

fmkdl(fd)
FILE		*fd;
/*
 * Close and delete the file
 */
{
	char buffer[81];

	fgetname(fd, buffer);
	fclose(fd);
	delete(buffer);
}