diff general/arrutils/to1s.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/arrutils/to1s.m	Sat Jan 12 19:21:22 2013 +0000
@@ -0,0 +1,6 @@
+% to1s - return array of ones same size as given
+%
+% to1s :: [Size->A] -> [Size->real].
+function a=to1s(a)
+   a=ones(size(a));
+