util1_jan/read_m.m

   1 function a=read_m(name,num1,num2)
   2 % a=read_m(name,num1,num2)
   3 % a=read_m(name,num1)
   4 % a=read_m(name)
   5 %
   6 % read array from file created by call write_array subroutines with this name num1 num2
   7 % Jan Mandel, 2005
   8
   9 % the mode of reading may change; do not call the functions below directly
  10 if ~exist('num1','var'),
  11         num1=-1;
  12 end
  13 if ~exist('num2','var'),
  14         num2=-1;
  15 end
  16 name=file_name(name,num1,num2);
  17 a=read_array(name);
  18