function lc = linecount(filename)%LINECOUNT Count the number of lines in given file%%          LC = LINECOUNT(FILENAME) Returns LC, the number of%          lines in text file named FILENAME, or 0 if the file%          does not exist or is not readable.% Matthew Dailey 2000  fid = fopen(filename,'r');  if fid < 0    lc = 0;  else    lc = 0;    while 1      ln = fgetl(fid);      if ~isstr(ln) break; end;      lc = lc + 1;    end;    fclose(fid);  end;