fix thickness of the lowest layer in vis3d/balbi_atm.m
[wrf-fire-matlab.git] / netcdf / ncvar.m
blob5627874a61af09a4392a7c0c044b058400defe57
1 function v=ncvar(filename,varname,start,count)
2 % v=ncvar(filename,varname [,start,count])
3 % read all about variable varname from filename
4 % arguments:
5 %      filename   character, NetCDF file name
6 %      varname    character, variable name
7 %      start,count not present: read all  variable data 
8 %                 empty: do not read variable data 
9 %                 given: read in each dimension from start (begins at 0) count entries
11 read_value=1;
12 if exist('start','var')
13     if isempty(start)
14         read_value=0;
15     else
16         read_value=2;
17     end
18 end
19       
20 % fprintf('ncdump/ncvar: open %s\n',filename)
21 try
22    ncid = netcdf.open(filename,'NC_NOWRITE');
23 catch ERR 
24    disp(['cannot open NetCDF file ',filename])
25    rethrow(ERR);
26 end
27 %fprintf('reading variable %s\n',varname)
28 varid = netcdf.inqVarID(ncid,char(varname));
29 v=ncvarinfo(ncid,varid); % find out all about this variable
30 if read_value==2,
31     s=start;
32     c=count;
33 else
34     [s,c]=getstartcount(v);
35 end
36 if read_value>0,
37     v.var_value = netcdf.getVar(ncid,varid,s,c);
38 end
39 netcdf.close(ncid);
40 dispvarinfo(v);
41 end