
% a is a 3-D (67x180x360) of GRACE derived mass change
% (in units of cm of equivalent water height change);

fid=fopen('mass_grace_1m_200204_200802.dat','w');

for i=1:67,
y(:,:)=a(i,:,:);
for j=1:180,
fprintf(fid,'%8.2f',y(j,:));
fprintf(fid,'\n');
end
end

fclose(fid);

