view arrows/obs_with.m @ 61:eff6bddf82e3 tip

Finally implemented perceptual brightness thing.
author samer
date Sun, 11 Oct 2015 10:20:42 +0100
parents 672052bd81f8
children
line wrap: on
line source
% obs_with - arrow to observe a signal while passing it through
%
% obs_with ::
%    arrow({A},{},S) ~'arrow sink to observe values of type A',
% -> arrow({A},{A},pair(empty,S)).

function b=obs_with(a), b=dup*first(a); end