#include <string.h>

#include "extern.h"

l_del(numd)

int numd;

	{
		int n_line = 0,flg = 0;
		fmove(seek_hdr);

		fpw = fopen(temp_fil,"w");
		fp2 = fopen(seek_hdr,"r");

		fgets(fbuff,255,fp2); fputs(fbuff,fpw);
		fgets(fbuff,255,fp2); fputs(fbuff,fpw);

		while(1)
		{
			if ( fgets(fbuff,255,fp2) == NULL )  break;
			n_line++;
			if ( n_line == numd ) {	flg = 1; }
						else	  {	fputs(fbuff,fpw); }
		}

		if ( ! flg ) { strcpy(ssent,"\n行番号にあやまりがあります\n");
						rsout();
					}
		fclose(fpw); fclose(fp2);

	return(0);
	}