Mercurial > octave

comparison src/DLD-FUNCTIONS/fftn.cc @ 5275:23b37da9fd5b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-04-08 16:07:35 by jwe]
author jwe
date Fri, 08 Apr 2005 16:07:37 +0000
parents a3440ff5eb14
children 4c8a2e4e0717
comparison
equal deleted inserted replaced
5274:eae7b40388e9 5275:23b37da9fd5b
72 { 72 {
73 for (int i = 0; i < dims.length (); i++) 73 for (int i = 0; i < dims.length (); i++)
74 { 74 {
75 if (xisnan (val(i,0))) 75 if (xisnan (val(i,0)))
76 error ("%s: NaN is invalid as a dimension", fcn); 76 error ("%s: NaN is invalid as a dimension", fcn);
77 else if (NINT (val(i,0)) < 0) 77 else if (NINTbig (val(i,0)) < 0)
78 error ("%s: all dimension must be greater than zero", fcn); 78 error ("%s: all dimension must be greater than zero", fcn);
79 else 79 else
80 { 80 {
81 dims(i) = NINT(val(i,0)); 81 dims(i) = NINTbig(val(i,0));
82 } 82 }
83 } 83 }
84 } 84 }
85 } 85 }
86 86