diff general/cellutils/@cell/head.m @ 4:e44f49929e56

Adding reorganised general toolbox, now in several subdirectories.
author samer
date Sat, 12 Jan 2013 19:21:22 +0000
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/general/cellutils/@cell/head.m	Sat Jan 12 19:21:22 2013 +0000
@@ -0,0 +1,4 @@
+% head - Head for cell arrays (first element)
+%
+% head :: cells(A) -> A.
+function y=head(x), y=x{1}; % if iscell(x), y=x{1}; else y=x; end;