/ arthur whitney 1995
/ N, fg, l, and k added sa 11.4.2004

s..t:".[`d;(;);{. y};s[]];s[.;`f]:9$d[]"				/ trigger: re-evaluate data, screen
s:d:.+(`N,`$'_ci 97+!26;(,$!99),26 99#,"")				/ initialize data, screen
s[`N.;`e`l]:0,`								/ first column nameless, cannot be edited
s[.;`fg]:{99*~&/x _lin,/".",$!10}					/ formula foreground = blue
.[`s;(.;`k);:[;".k.s..l:((2$*|$_v),-3$*_i),$_v ._i"]];			/ click to display formula as label
s.[`x`y`l]:65 20,`							/ initial size, no label
`show$`s;

\

S..t:".[`D;(;);{. y};S[]];S[.;`f]:9$D[]"
S:D:.+(`$'_ci 97+!26;26 99#,"");`show$`S