clear
[fi,txterr]=fopen('datos1.txt','r');
[n]=fscanf(fi,'%5d',2);
nx=n(1);
ny=n(2);
fscanf(fi,'%s',0);
for i=1:ny+1
  [a]=fscanf(fi,'%f',nx+1);
  AX(i,:)=a';
end
fscanf(fi,'%s',0);
for i=1:ny+1
  [a]=fscanf(fi,'%f',nx+1);
  BX(i,:)=a';
end
fscanf(fi,'%s',0);
for i=1:ny+1
  [a]=fscanf(fi,'%f',nx+1);
  CX(i,:)=a';
end
st=fclose(fi);
surf(AX,BX,CX);
axis('normal')
