annotate arrows/anull.m @ 6:0ce3c2070089

Removed duplicate code and fixed doc in timed_action.
author samer
date Mon, 14 Jan 2013 14:33:37 +0000
parents 672052bd81f8
children 5de03f77dae1
rev   line source
samer@0 1 % asink - Do nothing absorbing arrow
samer@0 2 %
samer@0 3 % asink :: N:natural -> arrow(_:arglist(N),{},empty).
samer@0 4 function a=asink(nin)
samer@0 5 if nargin<1, nin=1; end
samer@0 6 a=arr(@nop,'nargin',nin,'nargout',0);
samer@0 7 end