File: bug_47014.m

package info (click to toggle)
octave-netcdf 1.0.18-2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 1,756 kB
  • sloc: sh: 2,943; cpp: 1,812; python: 438; makefile: 224; awk: 51; xml: 20
file content (13 lines) | stat: -rw-r--r-- 354 bytes parent folder | download | duplicates (6) 
1
2
3
4
5
6
7
8
9
10
11
12
13
 
% test case for bug  47014
% https://savannah.gnu.org/bugs/?func=detailitem&item_id=47014

fname = [tempname '-octave-netcdf.nc'];
nccreate(fname,'var','Dimensions',{'x',10},...
         'FillValue',-32767,'Datatype','int16')

var = ones(10,1);
var(1) = NaN;
ncwrite(fname,'var',var);
var2 = ncread(fname,'var');
assert(isequaln(var,var2))
delete(fname)