annotate arrows/ainsert.m @ 61:eff6bddf82e3
tip
Finally implemented perceptual brightness thing.
| author |
samer |
| date |
Sun, 11 Oct 2015 10:20:42 +0100 |
| parents |
672052bd81f8 |
| children |
|
| rev |
line source |
|
samer@0
|
1 % ainsert - Arrow which does whatever you write in the text box
|
|
samer@0
|
2 %
|
|
samer@0
|
3 % ainsert :: expr(arrow(A,B,S)) -> arrow(A,B,S).
|
|
samer@0
|
4 %
|
|
samer@0
|
5 % expr(T) denotes the type of strings which evaulate to a value of type T.
|
|
samer@0
|
6 % This arrow provides a text box initialised to the given string.
|
|
samer@0
|
7 % The arrow behaves like the arrow created by evaluating the expression.
|
|
samer@0
|
8 % You can type a new expression at any time and the arrow will switch
|
|
samer@0
|
9 % behaviour.
|
|
samer@0
|
10
|
|
samer@0
|
11 function o=ainsert(a0,varargin)
|
|
samer@0
|
12 o=(aid + esender('init',a0,varargin{:}))*aswitch(evalin('base',a0));
|
|
samer@0
|
13 end
|
