X-Git-Url: https://git.creatis.insa-lyon.fr/pubgit/?p=CreaPhase.git;a=blobdiff_plain;f=octave_packages%2Foctcdf-1.1.4%2Fncfloat.m;fp=octave_packages%2Foctcdf-1.1.4%2Fncfloat.m;h=b3634a203557df4c0854afa31289158340abfbdd;hp=0000000000000000000000000000000000000000;hb=c880e8788dfc484bf23ce13fa2787f2c6bca4863;hpb=1705066eceaaea976f010f669ce8e972f3734b05
diff --git a/octave_packages/octcdf-1.1.4/ncfloat.m b/octave_packages/octcdf-1.1.4/ncfloat.m
new file mode 100644
index 0000000..b3634a2
--- /dev/null
+++ b/octave_packages/octcdf-1.1.4/ncfloat.m
@@ -0,0 +1,40 @@
+## Copyright (C) 2005 Alexander Barth
+##
+## This program is free software; you can redistribute it and/or modify
+## it under the terms of the GNU General Public License as published by
+## the Free Software Foundation; either version 2 of the License, or
+## (at your option) any later version.
+##
+## This program is distributed in the hope that it will be useful,
+## but WITHOUT ANY WARRANTY; without even the implied warranty of
+## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+## GNU General Public License for more details.
+##
+## You should have received a copy of the GNU General Public License
+## along with this program; If not, see .
+
+## -*- texinfo -*-
+## @deftypefn {Loadable Function} {@var{ncvar} = } ncfloat(@var{dimname_1},...,@var{dimname_N})
+## creates a netcdf variable of type ncfloat. @var{dimname_1} is the name
+## of the 1st netcdf dimension, and so on. The return value is a netcdf
+## variable object and must be affected to a netcdf file, before its content
+## can be defined.
+##
+## Example:
+## @example
+## nc = netcdf('test.nc','w');
+## nc('lon') = 360;
+## nc('lat') = 180;
+## nc@{'var'@} = ncfloat('lon','lat');
+## @end example
+## A new 360 by 180 netcdf variable named 'var' of type float is
+## created in file 'test.nc'.
+## @end deftypefn
+## @seealso{netcdf}
+
+## Author: Alexander Barth
+
+function c = ncfloat(varargin);
+
+c = {'float' varargin{:}};
+