function A= readmat(matfile)

  A= DLMREAD(matfile, ' ',1,1);
