comparison scripts/time/datestr.m @ 7493:f1bce8450fd0

[mq]: tmp-patch
author John W. Eaton <jwe@octave.org>
date Tue, 19 Feb 2008 03:36:08 -0500
parents bd1168732c95
children 4f9e8eeb2059
comparison
equal deleted inserted replaced
7492:bd1168732c95 7493:f1bce8450fd0
202 # guess, so we might be wrong 202 # guess, so we might be wrong
203 if (iscell (date) || columns (date) != 6) 203 if (iscell (date) || columns (date) != 6)
204 v = datevec (date, p); 204 v = datevec (date, p);
205 else 205 else
206 v = []; 206 v = [];
207 if columns (date) == 6 207 if (columns (date) == 6)
208 ## make sure that the input really is a datevec 208 ## Make sure that the input really is a datevec.
209 maxdatevec = [inf 12 31 23 59 60]; 209 maxdatevec = [Inf, 12, 31, 23, 59, 60];
210 for i = 1:numel (maxdatevec) 210 for i = 1:numel (maxdatevec)
211 if any (date(:,i) > maxdatevec(i)) 211 if (any (date(:,i) > maxdatevec(i)))
212 v = datevec (date, p); 212 v = datevec (date, p);
213 break; 213 break;
214 endif 214 endif
215 endfor 215 endfor
216 endif 216 endif
217 if isempty (v) 217 if (isempty (v))
218 v = date; 218 v = date;
219 endif 219 endif
220 endif 220 endif
221 221
222 for i = 1:(rows (v)) 222 for i = 1:(rows (v))