function [A,firstline, lastline]=read_file(fullName);
  
fid=fopen(fullName);
firstline=fgetl(fid);
A = textscan(fid,'%f %f %f %f %f %f %f %f %f %f %f %f %f',4,"endofline","\r\n");
lastline=fgetl(fid); 
fclose(fullName)
