Mercurial > forge

view main/netcdf/inst/private/bug_47014.m @ 12711:a4de85b2e6a0 octave-forge

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix bug 47014 and make test code work in matlab
author abarth93
date Fri, 19 Feb 2016 13:45:14 +0000
parents
children
line wrap: on
line source

% 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)